/**
 ** 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 closcall12(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 12, buf ); \
} else { \
   ((clo)->fn)(td, clo, 12, buf); \
;\
}
#define return_closcall12(td, clo,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12) { \
 char top; \
 object buf[12]; 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;buf[10] = a11;buf[11] = a12;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 12); \
     return; \
 } else {\
     closcall12(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc12(td, clo,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[12]; 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;buf[10] = a11;buf[11] = a12;\
     GC(td, clo, buf, 12); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct12(td, _fn,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12) { \
 char top; \
 object buf[12]; 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;buf[10] = a11;buf[11] = a12; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 12); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 12, buf); \
 }}

#define return_direct_with_clo12(td, clo, _fn,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12) { \
 char top; \
 object buf[12]; 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;buf[10] = a11;buf[11] = a12;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 12); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 12, buf); \
 }}

#define closcall37(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 37, buf ); \
} else { \
   ((clo)->fn)(td, clo, 37, buf); \
;\
}
#define return_closcall37(td, clo,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18,a19,a20,a21,a22,a23,a24,a25,a26,a27,a28,a29,a30,a31,a32,a33,a34,a35,a36,a37) { \
 char top; \
 object buf[37]; 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;buf[10] = a11;buf[11] = a12;buf[12] = a13;buf[13] = a14;buf[14] = a15;buf[15] = a16;buf[16] = a17;buf[17] = a18;buf[18] = a19;buf[19] = a20;buf[20] = a21;buf[21] = a22;buf[22] = a23;buf[23] = a24;buf[24] = a25;buf[25] = a26;buf[26] = a27;buf[27] = a28;buf[28] = a29;buf[29] = a30;buf[30] = a31;buf[31] = a32;buf[32] = a33;buf[33] = a34;buf[34] = a35;buf[35] = a36;buf[36] = a37;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 37); \
     return; \
 } else {\
     closcall37(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc37(td, clo,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18,a19,a20,a21,a22,a23,a24,a25,a26,a27,a28,a29,a30,a31,a32,a33,a34,a35,a36,a37) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[37]; 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;buf[10] = a11;buf[11] = a12;buf[12] = a13;buf[13] = a14;buf[14] = a15;buf[15] = a16;buf[16] = a17;buf[17] = a18;buf[18] = a19;buf[19] = a20;buf[20] = a21;buf[21] = a22;buf[22] = a23;buf[23] = a24;buf[24] = a25;buf[25] = a26;buf[26] = a27;buf[27] = a28;buf[28] = a29;buf[29] = a30;buf[30] = a31;buf[31] = a32;buf[32] = a33;buf[33] = a34;buf[34] = a35;buf[35] = a36;buf[36] = a37;\
     GC(td, clo, buf, 37); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct37(td, _fn,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18,a19,a20,a21,a22,a23,a24,a25,a26,a27,a28,a29,a30,a31,a32,a33,a34,a35,a36,a37) { \
 char top; \
 object buf[37]; 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;buf[10] = a11;buf[11] = a12;buf[12] = a13;buf[13] = a14;buf[14] = a15;buf[15] = a16;buf[16] = a17;buf[17] = a18;buf[18] = a19;buf[19] = a20;buf[20] = a21;buf[21] = a22;buf[22] = a23;buf[23] = a24;buf[24] = a25;buf[25] = a26;buf[26] = a27;buf[27] = a28;buf[28] = a29;buf[29] = a30;buf[30] = a31;buf[31] = a32;buf[32] = a33;buf[33] = a34;buf[34] = a35;buf[35] = a36;buf[36] = a37; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 37); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 37, buf); \
 }}

#define return_direct_with_clo37(td, clo, _fn,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18,a19,a20,a21,a22,a23,a24,a25,a26,a27,a28,a29,a30,a31,a32,a33,a34,a35,a36,a37) { \
 char top; \
 object buf[37]; 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;buf[10] = a11;buf[11] = a12;buf[12] = a13;buf[13] = a14;buf[14] = a15;buf[15] = a16;buf[16] = a17;buf[17] = a18;buf[18] = a19;buf[19] = a20;buf[20] = a21;buf[21] = a22;buf[22] = a23;buf[23] = a24;buf[24] = a25;buf[25] = a26;buf[26] = a27;buf[27] = a28;buf[28] = a29;buf[29] = a30;buf[30] = a31;buf[31] = a32;buf[32] = a33;buf[33] = a34;buf[34] = a35;buf[35] = a36;buf[36] = a37;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 37); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 37, buf); \
 }}

#include "cyclone/types.h"
object __glo_lib_91init_117schemebase_scheme_base = NULL;
object __glo_define_91values_scheme_base = NULL;
object __glo_define_91record_91type_scheme_base = NULL;
object __glo_is_91a_127_scheme_base = NULL;
object __glo_record_127_scheme_base = NULL;
object __glo__191list_91index_scheme_base = NULL;
object __glo_make_91setter_scheme_base = NULL;
object __glo_make_91getter_scheme_base = NULL;
object __glo_slot_91ref_scheme_base = NULL;
object __glo_slot_91set_67_scheme_base = NULL;
object __glo_type_91slot_91offset_scheme_base = NULL;
object __glo_make_91constructor_95args_scheme_base = NULL;
object __glo_make_91constructor_scheme_base = NULL;
object __glo_make_91type_91predicate_scheme_base = NULL;
object __glo_register_91simple_91type_scheme_base = NULL;
object __glo_record_91marker_scheme_base = NULL;
object __glo_guard_91aux_scheme_base = NULL;
object __glo_guard_scheme_base = NULL;
object __glo_let_91values_scheme_base = NULL;
object __glo_let_85_91values_scheme_base = NULL;
object __glo_letrec_85_scheme_base = NULL;
object __glo_syntax_91rules_scheme_base = NULL;
object __glo_cons_91source_scheme_base = NULL;
object __glo_find_scheme_base = NULL;
object __glo_find_91tail_scheme_base = NULL;
object __glo_identifier_127_scheme_base = NULL;
object __glo_open_91output_91bytevector_scheme_base = NULL;
object __glo_open_91input_91bytevector_scheme_base = NULL;
object __glo_get_91output_91bytevector_scheme_base = NULL;
object __glo_get_91output_91string_scheme_base = NULL;
object __glo_open_91output_91string_scheme_base = NULL;
object __glo_open_91input_91string_scheme_base = NULL;
object __glo_output_91port_91open_127_scheme_base = NULL;
object __glo_input_91port_91open_127_scheme_base = NULL;
object __glo_output_91port_127_scheme_base = NULL;
object __glo_input_91port_127_scheme_base = NULL;
object __glo_make_91record_91marker_scheme_base = NULL;
object __glo_make_91record_91marker_191_191inline_191_191_scheme_base = NULL;
object __glo__void_scheme_base = NULL;
object __glo_void_191_191inline_191_191_scheme_base = NULL;
object __glo_eof_91object_scheme_base = NULL;
object __glo_eof_91object_191_191inline_191_191_scheme_base = NULL;
object __glo_expt_scheme_base = NULL;
object __glo_square_191_191inline_191_191_scheme_base = NULL;
object __glo_square_scheme_base = NULL;
object __glo_floor_95_scheme_base = NULL;
object __glo_floor_91remainder_scheme_base = NULL;
object __glo_floor_91quotient_scheme_base = NULL;
object __glo_truncate_95_scheme_base = NULL;
object __glo_truncate_91remainder_scheme_base = NULL;
object __glo_truncate_91quotient_scheme_base = NULL;
object __glo_quotient_191_191inline_191_191_scheme_base = NULL;
object __glo_quotient_scheme_base = NULL;
object __glo_fixnum_127_scheme_base = NULL;
object __glo_fixnum_127_191_191inline_191_191_scheme_base = NULL;
object __glo_denominator_scheme_base = NULL;
object __glo_numerator_scheme_base = NULL;
object __glo_lcm_95entry_scheme_base = NULL;
object __glo_lcm_95main_scheme_base = NULL;
object __glo_gcd_95entry_scheme_base = NULL;
object __glo_gcd_95main_scheme_base = NULL;
object __glo_lcm_scheme_base = NULL;
object __glo_gcd_scheme_base = NULL;
object __glo_min_scheme_base = NULL;
object __glo_max_scheme_base = NULL;
object __glo_rationalize_scheme_base = NULL;
object __glo_rational_127_scheme_base = NULL;
object __glo_complex_127_scheme_base = NULL;
object __glo_complex_127_191_191inline_191_191_scheme_base = NULL;
object __glo_inexact_127_scheme_base = NULL;
object __glo_exact_127_scheme_base = NULL;
object __glo_exact_127_191_191inline_191_191_scheme_base = NULL;
object __glo_exact_91integer_127_scheme_base = NULL;
object __glo_exact_91integer_127_191_191inline_191_191_scheme_base = NULL;
object __glo_sqrt_scheme_base = NULL;
object __glo_sqrt_191_191inline_191_191_scheme_base = NULL;
object __glo_exact_91integer_91sqrt_scheme_base = NULL;
object __glo_bignum_91sqrt_scheme_base = NULL;
object __glo_bignum_127_scheme_base = NULL;
object __glo_even_127_scheme_base = NULL;
object __glo_odd_127_scheme_base = NULL;
object __glo_modulo_scheme_base = NULL;
object __glo_remainder_scheme_base = NULL;
object __glo_abs_scheme_base = NULL;
object __glo_inexact_scheme_base = NULL;
object __glo_inexact_191_191inline_191_191_scheme_base = NULL;
object __glo_exact_scheme_base = NULL;
object __glo_exact_191_191inline_191_191_scheme_base = NULL;
object __glo_round_scheme_base = NULL;
object __glo_round_191_191inline_191_191_scheme_base = NULL;
object __glo_truncate_scheme_base = NULL;
object __glo_truncate_191_191inline_191_191_scheme_base = NULL;
object __glo_ceiling_scheme_base = NULL;
object __glo_ceiling_191_191inline_191_191_scheme_base = NULL;
object __glo_floor_scheme_base = NULL;
object __glo_floor_191_191inline_191_191_scheme_base = NULL;
object __glo_every_scheme_base = NULL;
object __glo_any_scheme_base = NULL;
object __glo_error_95loc_scheme_base = NULL;
object __glo_Cyc_91remove_91exception_91handler_scheme_base = NULL;
object __glo_Cyc_91add_91exception_91handler_scheme_base = NULL;
object __glo_with_91exception_91handler_scheme_base = NULL;
object __glo_with_91handler_scheme_base = NULL;
object __glo_raise_91continuable_scheme_base = NULL;
object __glo_raise_scheme_base = NULL;
object __glo_error_scheme_base = NULL;
object __glo_error_91object_91irritants_scheme_base = NULL;
object __glo_error_91object_91message_scheme_base = NULL;
object __glo_error_91object_127_scheme_base = NULL;
object __glo_current_91error_91port_scheme_base = NULL;
object __glo_current_91input_91port_scheme_base = NULL;
object __glo_current_91output_91port_scheme_base = NULL;
object __glo_make_91parameter_scheme_base = NULL;
object __glo__85parameter_91id_85_scheme_base = NULL;
object __glo_set_91param_91obj_67_scheme_base = NULL;
object __glo_get_91param_91objs_scheme_base = NULL;
object __glo_parameterize_scheme_base = NULL;
object __glo_Cyc_91make_91string_scheme_base = NULL;
object __glo_make_91string_scheme_base = NULL;
object __glo_string_scheme_base = NULL;
object __glo_Cyc_91obj_123_127_scheme_base = NULL;
object __glo_symbol_123_127_scheme_base = NULL;
object __glo_boolean_123_127_scheme_base = NULL;
object __glo_vector_91fill_67_scheme_base = NULL;
object __glo_vector_91copy_67_scheme_base = NULL;
object __glo_vector_91copy_scheme_base = NULL;
object __glo_vector_91append_scheme_base = NULL;
object __glo_vector_91for_91each_scheme_base = NULL;
object __glo_vector_91map_scheme_base = NULL;
object __glo_string_91for_91each_scheme_base = NULL;
object __glo_string_91map_scheme_base = NULL;
object __glo_string_91fill_67_scheme_base = NULL;
object __glo_string_91copy_67_scheme_base = NULL;
object __glo_string_91copy_scheme_base = NULL;
object __glo_string_91_125vector_scheme_base = NULL;
object __glo_string_91_125list_scheme_base = NULL;
object __glo_vector_91_125string_scheme_base = NULL;
object __glo_string_91_125utf8_scheme_base = NULL;
object __glo_utf8_91_125string_scheme_base = NULL;
object __glo_bytevector_91copy_67_scheme_base = NULL;
object __glo_bytevector_91copy_scheme_base = NULL;
object __glo_vector_91_125list_scheme_base = NULL;
object __glo_vector_scheme_base = NULL;
object __glo_reverse_scheme_base = NULL;
object __glo_list_91set_67_scheme_base = NULL;
object __glo_list_91ref_scheme_base = NULL;
object __glo_list_91tail_scheme_base = NULL;
object __glo_for_91each_scheme_base = NULL;
object __glo_Cyc_91for_91each_91loop_912_scheme_base = NULL;
object __glo_Cyc_91for_91each_91loop_911_scheme_base = NULL;
object __glo_Cyc_91map_91loop_912_scheme_base = NULL;
object __glo_Cyc_91map_91loop_911_scheme_base = NULL;
object __glo_map_scheme_base = NULL;
object __glo__75cars_87cdrs_scheme_base = NULL;
object __glo_car_87cdr_scheme_base = NULL;
object __glo_receive_scheme_base = NULL;
object __glo_list_91copy_scheme_base = NULL;
object __glo_make_91list_scheme_base = NULL;
object __glo__list_scheme_base = NULL;
object __glo_append_scheme_base = NULL;
object __glo_negative_127_191_191inline_191_191_scheme_base = NULL;
object __glo_negative_127_scheme_base = NULL;
object __glo_positive_127_191_191inline_191_191_scheme_base = NULL;
object __glo_positive_127_scheme_base = NULL;
object __glo_zero_127_191_191inline_191_191_scheme_base = NULL;
object __glo_zero_127_scheme_base = NULL;
object __glo_list_127_scheme_base = NULL;
object __glo_list_127_191_191inline_191_191_scheme_base = NULL;
object __glo_not_191_191inline_191_191_scheme_base = NULL;
object __glo_not_scheme_base = NULL;
object __glo_newline_scheme_base = NULL;
object __glo_write_91char_scheme_base = NULL;
object __glo__75write_91bytevector_scheme_base = NULL;
object __glo__75write_91bytevector_191_191inline_191_191_scheme_base = NULL;
object __glo_write_91bytevector_scheme_base = NULL;
object __glo_read_91bytevector_67_scheme_base = NULL;
object __glo_read_91bytevector_scheme_base = NULL;
object __glo_write_91string_scheme_base = NULL;
object __glo_write_91string_912_scheme_base = NULL;
object __glo_write_91string_911_scheme_base = NULL;
object __glo_flush_91output_91port_scheme_base = NULL;
object __glo_textual_91port_127_scheme_base = NULL;
object __glo_binary_91port_127_scheme_base = NULL;
object __glo__191binary_91port_127_scheme_base = NULL;
object __glo_read_91string_scheme_base = NULL;
object __glo__191read_91line_scheme_base = NULL;
object __glo_read_91line_scheme_base = NULL;
object __glo_read_91char_scheme_base = NULL;
object __glo_peek_91char_scheme_base = NULL;
object __glo_char_91ready_127_scheme_base = NULL;
object __glo_Cyc_91char_91ready_127_scheme_base = NULL;
object __glo_write_91u8_scheme_base = NULL;
object __glo_peek_91u8_scheme_base = NULL;
object __glo_read_91u8_scheme_base = NULL;
object __glo__191write_91u8_scheme_base = NULL;
object __glo__191peek_91u8_scheme_base = NULL;
object __glo__191read_91u8_scheme_base = NULL;
object __glo_foldr_scheme_base = NULL;
object __glo_foldl_scheme_base = NULL;
object __glo_assoc_scheme_base = NULL;
object __glo_assoc_91helper_scheme_base = NULL;
object __glo_member_scheme_base = NULL;
object __glo_member_91helper_scheme_base = NULL;
object __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base = NULL;
object __glo_fast_91string_125_123_127_scheme_base = NULL;
object __glo_fast_91string_125_127_191_191inline_191_191_scheme_base = NULL;
object __glo_fast_91string_125_127_scheme_base = NULL;
object __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base = NULL;
object __glo_fast_91string_121_123_127_scheme_base = NULL;
object __glo_fast_91string_121_127_191_191inline_191_191_scheme_base = NULL;
object __glo_fast_91string_121_127_scheme_base = NULL;
object __glo_fast_91string_123_127_191_191inline_191_191_scheme_base = NULL;
object __glo_fast_91string_123_127_scheme_base = NULL;
object __glo_string_125_123_127_scheme_base = NULL;
object __glo_string_125_127_scheme_base = NULL;
object __glo_string_121_123_127_scheme_base = NULL;
object __glo_string_121_127_scheme_base = NULL;
object __glo_string_123_127_scheme_base = NULL;
object __glo_char_125_123_127_scheme_base = NULL;
object __glo_char_121_123_127_scheme_base = NULL;
object __glo_char_125_127_scheme_base = NULL;
object __glo_char_121_127_scheme_base = NULL;
object __glo_char_123_127_scheme_base = NULL;
object __glo_Cyc_91bin_91op_91char_scheme_base = NULL;
object __glo_Cyc_91bin_91op_scheme_base = NULL;
object __glo_call_91with_91port_scheme_base = NULL;
object __glo_dynamic_91wind_scheme_base = NULL;
object __glo_call_91with_91values_scheme_base = NULL;
object __glo_values_scheme_base = NULL;
object __glo_call_91with_91current_91continuation_scheme_base = NULL;
object __glo_syntax_91error_scheme_base = NULL;
object __glo_quasiquote_scheme_base = NULL;
object __glo__do_scheme_base = NULL;
object __glo_unless_scheme_base = NULL;
object __glo_when_scheme_base = NULL;
object __glo__case_scheme_base = NULL;
object __glo_cond_scheme_base = NULL;
object __glo_cond_91expand_scheme_base = NULL;
object __glo_begin_scheme_base = NULL;
object __glo_letrec_scheme_base = NULL;
object __glo_let_85_scheme_base = NULL;
object __glo_let_scheme_base = NULL;
object __glo_or_scheme_base = NULL;
object __glo_and_scheme_base = NULL;
object __glo_Cyc_91version_scheme_base = NULL;
object __glo_Cyc_91add_91feature_67_scheme_base = NULL;
object __glo__85other_91features_85_scheme_base = NULL;
object __glo_features_scheme_base = NULL;
object __glo_call_95cc_scheme_base = NULL;
extern object __glo__85Cyc_91version_91banner_85_scheme_cyclone_common;
extern object __glo__85version_85_scheme_cyclone_common;
extern object __glo__85version_91number_85_scheme_cyclone_common;
extern object __glo__85version_91name_85_scheme_cyclone_common;
extern object __glo__85version_91banner_85_scheme_cyclone_common;
extern object __glo__85c_91file_91header_91comment_85_scheme_cyclone_common;
extern object __glo__85reader_91source_91db_85_scheme_cyclone_common;
extern object __glo_memloc_scheme_cyclone_common;
#include "cyclone/runtime.h"
defsymbol(posix);
defsymbol(full_91unicode);
defsymbol(ieee_91float);
defsymbol(r7rs);
defsymbol(current_91output_91port);
defsymbol(current_91input_91port);
defsymbol(current_91error_91port);
defsymbol(error_91object_91message);
defsymbol(error_91object_91irritants);
defsymbol(rational_127);
defsymbol(gcd);
defsymbol(lcm);
defsymbol(truncate_91quotient);
defsymbol(truncate_91remainder);
defsymbol(open_91output_91bytevector);
defsymbol(identifier_127);
defsymbol(record_91marker);
defsymbol(set_91cdr_67);
defsymbol(cddr);
defsymbol(cadr);
defsymbol(v);
defsymbol(dummy);
defsymbol(args);
defsymbol(register_91simple_91type);
defsymbol(slot_91set_67);
defsymbol(type_91slot_91offset);
defsymbol(make_91type_91predicate);
defsymbol(make_91getter);
defsymbol(make_91setter);
defsymbol(vector);
defsymbol(make_91record_91marker);
defsymbol(expected);
defsymbol(temp);
defsymbol(call_91with_91current_91continuation);
defsymbol(guard_91aux);
defsymbol(handler_91k);
defsymbol(raise_91continuable);
defsymbol(condition);
defsymbol(guard_91k);
defsymbol(x);
defsymbol(let_91values);
defsymbol(let_85_91values);
defsymbol(define);
defsymbol(er_91macro_91transformer);
defsymbol(equal_127);
defsymbol(car);
defsymbol(cdr);
defsymbol(pair_127);
defsymbol(null_127);
defsymbol(expr);
defsymbol(compare);
defsymbol(apply);
defsymbol(map);
defsymbol(vector_127);
defsymbol(list_127);
defsymbol(len);
defsymbol(length);
defsymbol(_91);
defsymbol(_125_123);
defsymbol(error_95loc);
defsymbol(ls);
defsymbol(res);
defsymbol(i);
defsymbol(reverse);
defsymbol(vector_91_125list);
defsymbol(cons_91source);
defsymbol(_93_93_93);
defsymbol(obj);
defsymbol(with_91exception_91handler);
defsymbol(k);
defsymbol(call_95cc);
defsymbol(continuable);
defsymbol(raised);
defsymbol(_85parameter_91id_85);
defsymbol(parameterize);
defsymbol(p);
defsymbol(old);
defsymbol(new);
defsymbol(_121param_91convert_125);
defsymbol(dynamic_91wind);
defsymbol(_121param_91set_67_125);
defsymbol(call_91with_91values);
defsymbol(values);
defsymbol(multiple);
defsymbol(list_91_125vector);
defsymbol(append);
defsymbol(quasiquote);
defsymbol(unquote_91splicing);
defsymbol(cons);
defsymbol(_list);
defsymbol(unquote);
defsymbol(lp);
defsymbol(eq_127);
defsymbol(eqv_127);
defsymbol(quote);
defsymbol(cond);
defsymbol(_123_125);
defsymbol(sld);
defsymbol(srfi);
defsymbol(scheme);
defsymbol(rename);
defsymbol(prefix);
defsymbol(except);
defsymbol(only);
defsymbol(library);
defsymbol(not);
defsymbol(_else);
defsymbol(set_67);
defsymbol(begin);
defsymbol(let_85);
defsymbol(letrec);
defsymbol(lambda);
defsymbol(let);
defsymbol(tmp);
defsymbol(or);
defsymbol(_if);
defsymbol(and);
defsymbol(_85other_91features_85);
defsymbol(platform);
defsymbol(cyclone);
defsymbol(memory_91streams);
static void __lambda_1327(void *data, object clo, int argc, object *args) ;/*closure _,object k_738391*/
static void __lambda_1328(void *data, object clo, int argc, object *args) ;/*object self_7314305, object r_738393*/
static void __lambda_1329(void *data, object clo, int argc, object *args) ;/*object self_7314306, object r_738394*/
static void __lambda_1330(void *data, object clo, int argc, object *args) ;/*object self_7314307, object r_738412*/
static void __lambda_1331(void *data, object clo, int argc, object *args) ;/*object self_7314308, object r_738395*/
static void __lambda_1332(void *data, object clo, int argc, object *args) ;/*object self_7314309, object r_738410*/
static void __lambda_1333(void *data, object clo, int argc, object *args) ;/*object self_7314310, object r_738396*/
static void __lambda_1334(void *data, object clo, int argc, object *args) ;/*object self_7314311, object r_738408*/
static void __lambda_1335(void *data, object clo, int argc, object *args) ;/*object self_7314312, object r_738397*/
static void __lambda_1336(void *data, object clo, int argc, object *args) ;/*object self_7314313, object r_738398*/
static void __lambda_1337(void *data, object clo, int argc, object *args) ;/*object self_7314314, object r_738399*/
static void __lambda_1338(void *data, object clo, int argc, object *args) ;/*object self_7314315, object r_738400*/
static void __lambda_1339(void *data, object clo, int argc, object *args) ;/*object self_7314316, object r_738401*/
static void __lambda_1340(void *data, object clo, int argc, object *args) ;/*object self_7314317, object r_738402*/
static void __lambda_1341(void *data, object clo, int argc, object *args) ;/*object self_7314318, object r_738403*/
static void __lambda_1342(void *data, object clo, int argc, object *args) ;/*object self_7314319, object r_738404*/
static void __lambda_1343(void *data, object clo, int argc, object *args) ;/*object self_7314320, object r_738405*/
static void __lambda_1344(void *data, object clo, int argc, object *args) ;/*object self_7314321, object r_738406*/
static void __lambda_1269(void *data, object clo, int argc, object *args) ;/*closure _,object k_738077, object expr_732685_732725_732817_734061, object rename_732686_732726_732818_734062, object compare_732687_732727_732819_734063*/
static void __lambda_1270(void *data, object clo, int argc, object *args) ;/*object self_7314247, object v_931_732693_732807_732867_734111*/
static void __lambda_1278(void *data, object clo, int argc, object *args) ;/*object self_7314248, object tmp_732729_732731_732820_734064*/
static void __lambda_1326(void *data, object clo, int argc, object *args) ;/*object self_7314249, object r_738078*/
static void __lambda_1279(void *data, object clo, int argc, object *args) ;/*object self_7314250, object k_738080*/
static void __lambda_1280(void *data, object clo, int argc, object *args) ;/*object self_7314251, object v_936_732698_732793_732858_734102*/
static void __lambda_1283(void *data, object clo, int argc, object *args) ;/*object self_7314252, object tmp_732733_732735_732821_734065*/
static void __lambda_1284(void *data, object clo, int argc, object *args) ;/*object self_7314253, object v_9313_732705_732754_732831_734075*/
static void __lambda_1317(void *data, object clo, int argc, object *args) ;/*object self_7314254, object tmp_732737_732739_732822_734066*/
static void __lambda_1318(void *data, object clo, int argc, object *args) ;/*object self_7314255, object v_9328_732720_732744_732824_734068*/
static void __lambda_1324(void *data, object clo, int argc, object *args) ;/*object self_7314256, object tmp_732741_732743_732823_734067*/
static void __lambda_1325(void *data, object clo, int argc, object *args) ;/*object self_7314257, object r_738084*/
static void __lambda_1319(void *data, object clo, int argc, object *args) ;/*object self_7314258, object k_738086*/
static void __lambda_1320(void *data, object clo, int argc, object *args) ;/*object self_7314259, object r_738095*/
static void __lambda_1321(void *data, object clo, int argc, object *args) ;/*object self_7314260, object r_738103*/
static void __lambda_1322(void *data, object clo, int argc, object *args) ;/*object self_7314261, object r_738113*/
static void __lambda_1323(void *data, object clo, int argc, object *args) ;/*object self_7314262, object r_738109_7312676_7312685_7312693*/
static void __lambda_1285(void *data, object clo, int argc, object *args) ;/*object self_7314263, object k_738125*/
static void __lambda_1286(void *data, object clo, int argc, object *args) ;/*object self_7314264, object var0_732759_732834_734078*/
static void __lambda_1287(void *data, object clo, int argc, object *args) ;/*object self_7314265, object ls_732689_732764_732837_734081, object i_732691_732765_732838_734082, object res_732690_732766_732839_734083*/
static void __lambda_1288(void *data, object clo, int argc, object *args) ;/*object self_7314266, object lp_9317_732709_732767_732840_734084*/
static void __lambda_1444(void *data, object clo, int argc, object *args) ;/*object self_7314267, object lp_9317_732709_732767_732840_734084*/
static void __lambda_1291(void *data, object clo, int argc, object *args) ;/*object self_7314268, object k_738137, object ls_732689_732768_732841_734085, object i_732691_732769_732842_734086, object res_732690_732770_732843_734087*/
static void __lambda_1292(void *data, object clo, int argc, object *args) ;/*object self_7314269, object r_738310_7313015*/
static void __lambda_1293(void *data, object clo, int argc, object *args) ;/*object self_7314270, object v_9318_732710_732771_732844_734088_7313016*/
static void __lambda_1294(void *data, object clo, int argc, object *args) ;/*object self_7314271, object r_738158_7313017*/
static void __lambda_1295(void *data, object clo, int argc, object *args) ;/*object self_7314272, object r_738279_7313018*/
static void __lambda_1296(void *data, object clo, int argc, object *args) ;/*object self_7314273, object r_738287_7313019*/
static void __lambda_1297(void *data, object clo, int argc, object *args) ;/*object self_7314274, object r_738297_7313020*/
static void __lambda_1298(void *data, object clo, int argc, object *args) ;/*object self_7314275, object r_738293_7311728_7311792_7311855_7313021*/
static void __lambda_1309(void *data, object clo, int argc, object *args) ;/*object self_7314276, object k_738224_7311765_7311829_7311892_7311953_7312013_7312072_7312130_7312187_7312243_7313032, object var1_732792_732857_734101_7311766_7311830_7311893_7311954_7312014_7312073_7312131_7312188_7312244_7313033*/
static void __lambda_1310(void *data, object clo, int argc, object *args) ;/*object self_7314277, object r_738225_7311767_7311831_7311894_7311955_7312015_7312074_7312132_7312189_7312245_7313034*/
static void __lambda_1311(void *data, object clo, int argc, object *args) ;/*object self_7314278, object r_738233_7311768_7311832_7311895_7311956_7312016_7312075_7312133_7312190_7312246_7313035*/
static void __lambda_1312(void *data, object clo, int argc, object *args) ;/*object self_7314279, object r_738264_7311769_7311833_7311896_7311957_7312017_7312076_7312134_7312191_7312247_7313036*/
static void __lambda_1313(void *data, object clo, int argc, object *args) ;/*object self_7314280, object r_738270_7311770_7311834_7311897_7311958_7312018_7312077_7312135_7312192_7312248_7313037*/
static void __lambda_1314(void *data, object clo, int argc, object *args) ;/*object self_7314281, object r_738246_7311776_7311840_7311903_7311964_7312024_7312083_7312141_7312198_7312254_7312521_7312539_7312556_7312572_7312587_7313038*/
static void __lambda_1315(void *data, object clo, int argc, object *args) ;/*object self_7314282, object r_738254_7311777_7311841_7311904_7311965_7312025_7312084_7312142_7312199_7312255_7312522_7312540_7312557_7312573_7312588_7313039*/
static void __lambda_1316(void *data, object clo, int argc, object *args) ;/*object self_7314283, object r_738242_7311783_7311847_7311910_7311971_7312031_7312090_7312148_7312205_7312261_7312528_7312546_7312563_7312579_7312594_7312606_7312617_7312627_7312636_7312644_7313040*/
static void __lambda_1299(void *data, object clo, int argc, object *args) ;/*object self_7314284, object r_738223_7311735_7311799_7311862_7311923_7311983_7312042_7312100_7312157_7312213_7313022*/
static void __lambda_1300(void *data, object clo, int argc, object *args) ;/*object self_7314285, object r_738164_7311736_7311800_7311863_7311924_7311984_7312043_7312101_7312158_7312214_7313023*/
static void __lambda_1301(void *data, object clo, int argc, object *args) ;/*object self_7314286, object r_738169_7311737_7311801_7311864_7311925_7311985_7312044_7312102_7312159_7312215_7313024*/
static void __lambda_1302(void *data, object clo, int argc, object *args) ;/*object self_7314287, object r_738177_7311738_7311802_7311865_7311926_7311986_7312045_7312103_7312160_7312216_7313025*/
static void __lambda_1303(void *data, object clo, int argc, object *args) ;/*object self_7314288, object r_738208_7311739_7311803_7311866_7311927_7311987_7312046_7312104_7312161_7312217_7313026*/
static void __lambda_1304(void *data, object clo, int argc, object *args) ;/*object self_7314289, object r_738214_7311740_7311804_7311867_7311928_7311988_7312047_7312105_7312162_7312218_7313027*/
static void __lambda_1305(void *data, object clo, int argc, object *args) ;/*object self_7314290, object r_738190_7311746_7311810_7311873_7311934_7311994_7312053_7312111_7312168_7312224_7312273_7312296_7312318_7312339_7312359_7313028*/
static void __lambda_1306(void *data, object clo, int argc, object *args) ;/*object self_7314291, object r_738198_7311747_7311811_7311874_7311935_7311995_7312054_7312112_7312169_7312225_7312274_7312297_7312319_7312340_7312360_7313029*/
static void __lambda_1307(void *data, object clo, int argc, object *args) ;/*object self_7314292, object r_738186_7311753_7311817_7311880_7311941_7312001_7312060_7312118_7312175_7312231_7312280_7312303_7312325_7312346_7312366_7312383_7312399_7312414_7312428_7312441_7313030*/
static void __lambda_1308(void *data, object clo, int argc, object *args) ;/*object self_7314293, object r_738162_7311762_7311826_7311889_7311950_7312010_7312069_7312127_7312184_7312240_7312289_7312312_7312334_7312355_7312375_7312392_7312408_7312423_7312437_7312450_7312461_7312471_7312480_7312488_7312495_7312501_7312506_7312510_7313031*/
static void __lambda_1289(void *data, object clo, int argc, object *args) ;/*object self_7314294, object r_738136*/
static void __lambda_1290(void *data, object clo, int argc, object *args) ;/*object self_7314295, object r_738135*/
static void __lambda_1281(void *data, object clo, int argc, object *args) ;/*object self_7314296, object k_738317*/
static void __lambda_1282(void *data, object clo, int argc, object *args) ;/*object self_7314297, object r_738330*/
static void __lambda_1271(void *data, object clo, int argc, object *args) ;/*object self_7314298, object k_738339*/
static void __lambda_1272(void *data, object clo, int argc, object *args) ;/*object self_7314299, object r_738349*/
static void __lambda_1273(void *data, object clo, int argc, object *args) ;/*object self_7314300, object r_738352*/
static void __lambda_1274(void *data, object clo, int argc, object *args) ;/*object self_7314301, object r_738358*/
static void __lambda_1275(void *data, object clo, int argc, object *args) ;/*object self_7314302, object r_738377*/
static void __lambda_1276(void *data, object clo, int argc, object *args) ;/*object self_7314303, object r_738367_7311638_7311651_7311663*/
static void __lambda_1277(void *data, object clo, int argc, object *args) ;/*object self_7314304, object r_738370_7311639_7311652_7311664*/
static void __lambda_1238(void *data, object clo, int argc, object *args) ;/*closure _,object k_737908, object expr_732618_734042, object rename_732619_734043, object compare_732620_734044*/
static void __lambda_1240(void *data, object clo, int argc, object *args) ;/*object self_7314217, object parent_732629_734047*/
static void __lambda_1241(void *data, object clo, int argc, object *args) ;/*object self_7314218, object _191define_732647_734053*/
static void __lambda_1242(void *data, object clo, int argc, object *args) ;/*object self_7314219, object _191lambda_732650_734054*/
static void __lambda_1243(void *data, object clo, int argc, object *args) ;/*object self_7314220, object _191let_732653_734055*/
static void __lambda_1244(void *data, object clo, int argc, object *args) ;/*object self_7314221, object _191register_732656_734056*/
static void __lambda_1245(void *data, object clo, int argc, object *args) ;/*object self_7314222, object _191slot_91set_67_732659_734057*/
static void __lambda_1246(void *data, object clo, int argc, object *args) ;/*object self_7314223, object _191type_191slot_191offset_732662_734058*/
static void __lambda_1248(void *data, object clo, int argc, object *args) ;/*object self_7314224, object r_737923*/
static void __lambda_1249(void *data, object clo, int argc, object *args) ;/*object self_7314225, object r_737924*/
static void __lambda_1250(void *data, object clo, int argc, object *args) ;/*object self_7314226, object r_738057*/
static void __lambda_1251(void *data, object clo, int argc, object *args) ;/*object self_7314227, object r_738036*/
static void __lambda_1266(void *data, object clo, int argc, object *args) ;/*object self_7314228, object k_738002, object f_732667_734059*/
static void __lambda_1267(void *data, object clo, int argc, object *args) ;/*object self_7314229, object r_738010*/
static void __lambda_1268(void *data, object clo, int argc, object *args) ;/*object self_7314230, object r_738012*/
static void __lambda_1252(void *data, object clo, int argc, object *args) ;/*object self_7314231, object r_738001*/
static void __lambda_1253(void *data, object clo, int argc, object *args) ;/*object self_7314232, object r_737930*/
static void __lambda_1263(void *data, object clo, int argc, object *args) ;/*object self_7314233, object k_737967, object f_732673_734060*/
static void __lambda_1264(void *data, object clo, int argc, object *args) ;/*object self_7314234, object r_737976*/
static void __lambda_1265(void *data, object clo, int argc, object *args) ;/*object self_7314235, object r_737978*/
static void __lambda_1254(void *data, object clo, int argc, object *args) ;/*object self_7314236, object r_737966*/
static void __lambda_1255(void *data, object clo, int argc, object *args) ;/*object self_7314237, object r_737932*/
static void __lambda_1256(void *data, object clo, int argc, object *args) ;/*object self_7314238, object r_737944*/
static void __lambda_1257(void *data, object clo, int argc, object *args) ;/*object self_7314239, object r_737952*/
static void __lambda_1258(void *data, object clo, int argc, object *args) ;/*object self_7314240, object r_737954*/
static void __lambda_1259(void *data, object clo, int argc, object *args) ;/*object self_7314241, object r_737953*/
static void __lambda_1260(void *data, object clo, int argc, object *args) ;/*object self_7314242, object r_737931*/
static void __lambda_1261(void *data, object clo, int argc, object *args) ;/*object self_7314243, object r_737929*/
static void __lambda_1262(void *data, object clo, int argc, object *args) ;/*object self_7314244, object r_737927*/
static void __lambda_1247(void *data, object clo, int argc, object *args) ;/*object self_7314245, object k_738063*/
static void __lambda_1239(void *data, object clo, int argc, object *args) ;/*object self_7314246, object k_738071*/
static void __lambda_1235(void *data, object clo, int argc, object *args) ;/*closure _,object k_737901, object obj_732614_734040, object rtype_732615_734041*/
static void __lambda_1236(void *data, object clo, int argc, object *args) ;/*object self_7314215, object r_737902*/
static void __lambda_1237(void *data, object clo, int argc, object *args) ;/*object self_7314216, object r_737903*/
static void __lambda_1514(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
static void __lambda_1229(void *data, object clo, int argc, object *args) ;/*closure _,object k_737890, object e_732605_734033, object lst1_732606_734034*/
static void __lambda_1230(void *data, object clo, int argc, object *args) ;/*object self_7314209, object lis_732608_734035*/
static void __lambda_1231(void *data, object clo, int argc, object *args) ;/*object self_7314210, object lp_732610_734037*/
static void __lambda_1443(void *data, object clo, int argc, object *args) ;/*object self_7314211, object lp_732610_734037*/
static void __lambda_1234(void *data, object clo, int argc, object *args) ;/*object self_7314212, object k_737893, object lis_732611_734038, object n_732612_734039*/
static void __lambda_1232(void *data, object clo, int argc, object *args) ;/*object self_7314213, object r_737892*/
static void __lambda_1233(void *data, object clo, int argc, object *args) ;/*object self_7314214, object r_737891*/
static void __lambda_1225(void *data, object clo, int argc, object *args) ;/*closure _,object k_737882, object sym_732600_734028, object name_732601_734029, object idx_732602_734030*/
static void __lambda_1226(void *data, object clo, int argc, object *args) ;/*object self_7314206, object k_737883, object obj_732603_734031, object val_732604_734032*/
static void __lambda_1227(void *data, object clo, int argc, object *args) ;/*object self_7314207, object r_737887*/
static void __lambda_1228(void *data, object clo, int argc, object *args) ;/*object self_7314208, object r_737885*/
static void __lambda_1223(void *data, object clo, int argc, object *args) ;/*closure _,object k_737874, object sym_732596_734024, object name_732597_734025, object idx_732598_734026*/
static void __lambda_1224(void *data, object clo, int argc, object *args) ;/*object self_7314205, object k_737875, object obj_732599_734027*/
static void __lambda_1220(void *data, object clo, int argc, object *args) ;/*closure _,object k_737867, object name_732585_734020, object obj_732586_734021, object field_732587_734022*/
static void __lambda_1222(void *data, object clo, int argc, object *args) ;/*object self_7314203, object idx_732590_734023*/
static void __lambda_1221(void *data, object clo, int argc, object *args) ;/*object self_7314204, object k_737870*/
static void __lambda_1217(void *data, object clo, int argc, object *args) ;/*closure _,object k_737863, object name_732580_734015, object obj_732581_734016, object idx_732582_734017, object val_732583_734018*/
static void __lambda_1218(void *data, object clo, int argc, object *args) ;/*object self_7314201, object vec_732584_734019*/
static void __lambda_1219(void *data, object clo, int argc, object *args) ;/*object self_7314202, object r_737864*/
static void __lambda_1216(void *data, object clo, int argc, object *args) ;/*closure _,object k_737859, object name_732577_734012, object sym_732578_734013*/
static void __lambda_1211(void *data, object clo, int argc, object *args) ;/*closure _,object k_737848, object make_732567_734007, object name_732568_734008*/
static void __lambda_1212(void *data, object clo, int argc, object *args) ;/*object self_7314197, object k_737849, object args_732569_734009_raw, ...*/
static void __lambda_1213(void *data, object clo, int argc, object *args) ;/*object self_7314198, object field_91values_732575_734011*/
static void __lambda_1215(void *data, object clo, int argc, object *args) ;/*object self_7314199, object r_737852*/
static void __lambda_1214(void *data, object clo, int argc, object *args) ;/*object self_7314200, object k_737853*/
static void __lambda_1208(void *data, object clo, int argc, object *args) ;/*closure _,object k_737841, object make_732557_734002, object name_732558_734003*/
static void __lambda_1209(void *data, object clo, int argc, object *args) ;/*object self_7314195, object k_737842, object args_732559_734004_raw, ...*/
static void __lambda_1210(void *data, object clo, int argc, object *args) ;/*object self_7314196, object field_91values_732565_734006*/
static void __lambda_1205(void *data, object clo, int argc, object *args) ;/*closure _,object k_737835, object pred_732553_733999, object name_732554_734000*/
static void __lambda_1206(void *data, object clo, int argc, object *args) ;/*object self_7314193, object k_737836, object obj_732555_734001*/
static void __lambda_1207(void *data, object clo, int argc, object *args) ;/*object self_7314194, object r_737837*/
static void __lambda_1204(void *data, object clo, int argc, object *args) ;/*closure _,object k_737832, object name_732550_733996, object parent_732551_733997, object field_91tags_732552_733998*/
static void __lambda_1153(void *data, object clo, int argc, object *args) ;/*closure _,object k_737527, object expr_732192_732269_732444_733890, object rename_732193_732270_732445_733891, object compare_732194_732271_732446_733892*/
static void __lambda_1154(void *data, object clo, int argc, object *args) ;/*object self_7314143, object v_931_732200_732425_732538_733984*/
static void __lambda_1159(void *data, object clo, int argc, object *args) ;/*object self_7314144, object tmp_732273_732275_732447_733893*/
static void __lambda_1203(void *data, object clo, int argc, object *args) ;/*object self_7314145, object r_737528*/
static void __lambda_1160(void *data, object clo, int argc, object *args) ;/*object self_7314146, object k_737530*/
static void __lambda_1161(void *data, object clo, int argc, object *args) ;/*object self_7314147, object v_9310_732209_732403_732524_733970*/
static void __lambda_1170(void *data, object clo, int argc, object *args) ;/*object self_7314148, object tmp_732277_732279_732448_733894*/
static void __lambda_1171(void *data, object clo, int argc, object *args) ;/*object self_7314149, object v_9321_732220_732376_732506_733952*/
static void __lambda_1181(void *data, object clo, int argc, object *args) ;/*object self_7314150, object tmp_732281_732283_732449_733895*/
static void __lambda_1182(void *data, object clo, int argc, object *args) ;/*object self_7314151, object v_9334_732233_732362_732497_733943*/
static void __lambda_1185(void *data, object clo, int argc, object *args) ;/*object self_7314152, object tmp_732285_732287_732450_733896*/
static void __lambda_1186(void *data, object clo, int argc, object *args) ;/*object self_7314153, object v_9341_732240_732343_732484_733930*/
static void __lambda_1190(void *data, object clo, int argc, object *args) ;/*object self_7314154, object tmp_732289_732291_732451_733897*/
static void __lambda_1191(void *data, object clo, int argc, object *args) ;/*object self_7314155, object v_9350_732249_732324_732471_733917*/
static void __lambda_1195(void *data, object clo, int argc, object *args) ;/*object self_7314156, object tmp_732293_732295_732452_733898*/
static void __lambda_1196(void *data, object clo, int argc, object *args) ;/*object self_7314157, object v_9359_732258_732300_732454_733900*/
static void __lambda_1201(void *data, object clo, int argc, object *args) ;/*object self_7314158, object tmp_732297_732299_732453_733899*/
static void __lambda_1202(void *data, object clo, int argc, object *args) ;/*object self_7314159, object r_737537*/
static void __lambda_1197(void *data, object clo, int argc, object *args) ;/*object self_7314160, object k_737539*/
static void __lambda_1198(void *data, object clo, int argc, object *args) ;/*object self_7314161, object r_737558*/
static void __lambda_1199(void *data, object clo, int argc, object *args) ;/*object self_7314162, object r_737576*/
static void __lambda_1200(void *data, object clo, int argc, object *args) ;/*object self_7314163, object r_737569_7311590_7311599*/
static void __lambda_1192(void *data, object clo, int argc, object *args) ;/*object self_7314164, object k_737583*/
static void __lambda_1193(void *data, object clo, int argc, object *args) ;/*object self_7314165, object r_737599*/
static void __lambda_1194(void *data, object clo, int argc, object *args) ;/*object self_7314166, object r_737609*/
static void __lambda_1187(void *data, object clo, int argc, object *args) ;/*object self_7314167, object k_737616*/
static void __lambda_1188(void *data, object clo, int argc, object *args) ;/*object self_7314168, object r_737632*/
static void __lambda_1189(void *data, object clo, int argc, object *args) ;/*object self_7314169, object r_737640*/
static void __lambda_1183(void *data, object clo, int argc, object *args) ;/*object self_7314170, object k_737649*/
static void __lambda_1184(void *data, object clo, int argc, object *args) ;/*object self_7314171, object r_737662*/
static void __lambda_1172(void *data, object clo, int argc, object *args) ;/*object self_7314172, object k_737671*/
static void __lambda_1173(void *data, object clo, int argc, object *args) ;/*object self_7314173, object r_737740*/
static void __lambda_1174(void *data, object clo, int argc, object *args) ;/*object self_7314174, object r_737682*/
static void __lambda_1175(void *data, object clo, int argc, object *args) ;/*object self_7314175, object r_737694*/
static void __lambda_1176(void *data, object clo, int argc, object *args) ;/*object self_7314176, object r_737733*/
static void __lambda_1177(void *data, object clo, int argc, object *args) ;/*object self_7314177, object r_737703_7311409_7311427_7311444*/
static void __lambda_1178(void *data, object clo, int argc, object *args) ;/*object self_7314178, object r_737706_7311410_7311428_7311445*/
static void __lambda_1179(void *data, object clo, int argc, object *args) ;/*object self_7314179, object r_737724_7311411_7311429_7311446*/
static void __lambda_1180(void *data, object clo, int argc, object *args) ;/*object self_7314180, object r_737715_7311414_7311432_7311449_7311462_7311474*/
static void __lambda_1162(void *data, object clo, int argc, object *args) ;/*object self_7314181, object k_737743*/
static void __lambda_1163(void *data, object clo, int argc, object *args) ;/*object self_7314182, object r_737801*/
static void __lambda_1164(void *data, object clo, int argc, object *args) ;/*object self_7314183, object r_737754*/
static void __lambda_1165(void *data, object clo, int argc, object *args) ;/*object self_7314184, object r_737763*/
static void __lambda_1166(void *data, object clo, int argc, object *args) ;/*object self_7314185, object r_737794*/
static void __lambda_1167(void *data, object clo, int argc, object *args) ;/*object self_7314186, object r_737772_7311322_7311336_7311349*/
static void __lambda_1168(void *data, object clo, int argc, object *args) ;/*object self_7314187, object r_737775_7311323_7311337_7311350*/
static void __lambda_1169(void *data, object clo, int argc, object *args) ;/*object self_7314188, object r_737785_7311324_7311338_7311351*/
static void __lambda_1155(void *data, object clo, int argc, object *args) ;/*object self_7314189, object k_737804*/
static void __lambda_1156(void *data, object clo, int argc, object *args) ;/*object self_7314190, object r_737826*/
static void __lambda_1157(void *data, object clo, int argc, object *args) ;/*object self_7314191, object r_737812*/
static void __lambda_1158(void *data, object clo, int argc, object *args) ;/*object self_7314192, object r_737821*/
static void __lambda_1121(void *data, object clo, int argc, object *args) ;/*closure _,object k_737314, object expr_732135_732150_732173_733875, object rename_732136_732151_732174_733876, object compare_732137_732152_732175_733877*/
static void __lambda_1122(void *data, object clo, int argc, object *args) ;/*object self_7314112, object v_931_732143_732157_732177_733879*/
static void __lambda_1149(void *data, object clo, int argc, object *args) ;/*object self_7314113, object tmp_732154_732156_732176_733878*/
static void __lambda_1152(void *data, object clo, int argc, object *args) ;/*object self_7314114, object r_737315*/
static void __lambda_1150(void *data, object clo, int argc, object *args) ;/*object self_7314115, object k_737317*/
static void __lambda_1151(void *data, object clo, int argc, object *args) ;/*object self_7314116, object r_737318*/
static void __lambda_1123(void *data, object clo, int argc, object *args) ;/*object self_7314117, object k_737320*/
static void __lambda_1124(void *data, object clo, int argc, object *args) ;/*object self_7314118, object r_737336*/
static void __lambda_1125(void *data, object clo, int argc, object *args) ;/*object self_7314119, object r_737342*/
static void __lambda_1126(void *data, object clo, int argc, object *args) ;/*object self_7314120, object r_737519*/
static void __lambda_1127(void *data, object clo, int argc, object *args) ;/*object self_7314121, object r_737351_739374*/
static void __lambda_1128(void *data, object clo, int argc, object *args) ;/*object self_7314122, object r_737413_739375*/
static void __lambda_1129(void *data, object clo, int argc, object *args) ;/*object self_7314123, object r_737513_739376*/
static void __lambda_1130(void *data, object clo, int argc, object *args) ;/*object self_7314124, object r_737425_739378_739453*/
static void __lambda_1131(void *data, object clo, int argc, object *args) ;/*object self_7314125, object r_737431_739379_739454*/
static void __lambda_1132(void *data, object clo, int argc, object *args) ;/*object self_7314126, object r_737507_739380_739455*/
static void __lambda_1133(void *data, object clo, int argc, object *args) ;/*object self_7314127, object r_737440_739382_739457_739528*/
static void __lambda_1134(void *data, object clo, int argc, object *args) ;/*object self_7314128, object r_737446_739383_739458_739529*/
static void __lambda_1135(void *data, object clo, int argc, object *args) ;/*object self_7314129, object r_737455_739384_739459_739530*/
static void __lambda_1136(void *data, object clo, int argc, object *args) ;/*object self_7314130, object r_737500_739385_739460_739531*/
static void __lambda_1137(void *data, object clo, int argc, object *args) ;/*object self_7314131, object r_737464_739389_739464_739535_739601_739666_739730*/
static void __lambda_1138(void *data, object clo, int argc, object *args) ;/*object self_7314132, object r_737469_739390_739465_739536_739602_739667_739731*/
static void __lambda_1139(void *data, object clo, int argc, object *args) ;/*object self_7314133, object r_737475_739391_739466_739537_739603_739668_739732*/
static void __lambda_1140(void *data, object clo, int argc, object *args) ;/*object self_7314134, object r_737484_739392_739467_739538_739604_739669_739733*/
static void __lambda_1141(void *data, object clo, int argc, object *args) ;/*object self_7314135, object r_737487_739393_739468_739539_739605_739670_739734*/
static void __lambda_1142(void *data, object clo, int argc, object *args) ;/*object self_7314136, object r_737360_739420_739495_739566_739632_739697_739761_739819_739876_739932_739987_7310041_7310094_7310146_7310197_7310247_7310296_7310344_7310391_7310437_7310482_7310526_7310569_7310611_7310652_7310692_7310731_7310769_7310806_7310842_7310877_7310911_7310944*/
static void __lambda_1143(void *data, object clo, int argc, object *args) ;/*object self_7314137, object r_737369_739421_739496_739567_739633_739698_739762_739820_739877_739933_739988_7310042_7310095_7310147_7310198_7310248_7310297_7310345_7310392_7310438_7310483_7310527_7310570_7310612_7310653_7310693_7310732_7310770_7310807_7310843_7310878_7310912_7310945*/
static void __lambda_1144(void *data, object clo, int argc, object *args) ;/*object self_7314138, object r_737399_739422_739497_739568_739634_739699_739763_739821_739878_739934_739989_7310043_7310096_7310148_7310199_7310249_7310298_7310346_7310393_7310439_7310484_7310528_7310571_7310613_7310654_7310694_7310733_7310771_7310808_7310844_7310879_7310913_7310946*/
static void __lambda_1145(void *data, object clo, int argc, object *args) ;/*object self_7314139, object r_737405_739423_739498_739569_739635_739700_739764_739822_739879_739935_739990_7310044_7310097_7310149_7310200_7310250_7310299_7310347_7310394_7310440_7310485_7310529_7310572_7310614_7310655_7310695_7310734_7310772_7310809_7310845_7310880_7310914_7310947*/
static void __lambda_1146(void *data, object clo, int argc, object *args) ;/*object self_7314140, object r_737378_739429_739504_739575_739641_739706_739770_739828_739885_739941_739996_7310050_7310103_7310155_7310206_7310256_7310305_7310353_7310400_7310446_7310491_7310535_7310578_7310620_7310661_7310701_7310740_7310778_7310815_7310851_7310886_7310920_7310953_7310981_7311008_7311034_7311059_7311083*/
static void __lambda_1147(void *data, object clo, int argc, object *args) ;/*object self_7314141, object r_737384_739430_739505_739576_739642_739707_739771_739829_739886_739942_739997_7310051_7310104_7310156_7310207_7310257_7310306_7310354_7310401_7310447_7310492_7310536_7310579_7310621_7310662_7310702_7310741_7310779_7310816_7310852_7310887_7310921_7310954_7310982_7311009_7311035_7311060_7311084*/
static void __lambda_1148(void *data, object clo, int argc, object *args) ;/*object self_7314142, object r_737390_739431_739506_739577_739643_739708_739772_739830_739887_739943_739998_7310052_7310105_7310157_7310208_7310258_7310307_7310355_7310402_7310448_7310493_7310537_7310580_7310622_7310663_7310703_7310742_7310780_7310817_7310853_7310888_7310922_7310955_7310983_7311010_7311036_7311061_7311085*/
static void __lambda_1066(void *data, object clo, int argc, object *args) ;/*closure _,object k_736966, object expr_731740_731824_732014_733758, object rename_731741_731825_732015_733759, object compare_731742_731826_732016_733760*/
static void __lambda_1067(void *data, object clo, int argc, object *args) ;/*object self_7314058, object v_931_731748_732002_732123_733867*/
static void __lambda_1071(void *data, object clo, int argc, object *args) ;/*object self_7314059, object tmp_731828_731830_732017_733761*/
static void __lambda_1120(void *data, object clo, int argc, object *args) ;/*object self_7314060, object r_736967*/
static void __lambda_1072(void *data, object clo, int argc, object *args) ;/*object self_7314061, object k_736969*/
static void __lambda_1073(void *data, object clo, int argc, object *args) ;/*object self_7314062, object v_936_731753_731984_732112_733856*/
static void __lambda_1076(void *data, object clo, int argc, object *args) ;/*object self_7314063, object tmp_731832_731834_732018_733762*/
static void __lambda_1077(void *data, object clo, int argc, object *args) ;/*object self_7314064, object v_9315_731762_731953_732092_733836*/
static void __lambda_1080(void *data, object clo, int argc, object *args) ;/*object self_7314065, object tmp_731836_731838_732019_733763*/
static void __lambda_1081(void *data, object clo, int argc, object *args) ;/*object self_7314066, object v_9330_731777_731923_732072_733816*/
static void __lambda_1087(void *data, object clo, int argc, object *args) ;/*object self_7314067, object tmp_731840_731842_732020_733764*/
static void __lambda_1088(void *data, object clo, int argc, object *args) ;/*object self_7314068, object v_9345_731792_731885_732046_733790*/
static void __lambda_1101(void *data, object clo, int argc, object *args) ;/*object self_7314069, object tmp_731844_731846_732021_733765*/
static void __lambda_1102(void *data, object clo, int argc, object *args) ;/*object self_7314070, object v_9362_731809_731851_732023_733767*/
static void __lambda_1118(void *data, object clo, int argc, object *args) ;/*object self_7314071, object tmp_731848_731850_732022_733766*/
static void __lambda_1119(void *data, object clo, int argc, object *args) ;/*object self_7314072, object r_736975*/
static void __lambda_1103(void *data, object clo, int argc, object *args) ;/*object self_7314073, object k_736977*/
static void __lambda_1104(void *data, object clo, int argc, object *args) ;/*object self_7314074, object r_737004*/
static void __lambda_1105(void *data, object clo, int argc, object *args) ;/*object self_7314075, object r_737054*/
static void __lambda_1106(void *data, object clo, int argc, object *args) ;/*object self_7314076, object r_737013_739178_739208_739237*/
static void __lambda_1117(void *data, object clo, int argc, object *args) ;/*object self_7314077, object k_737052_739204_739234_739263, object arg_731883_732044_733788_739205_739235_739264*/
static void __lambda_1107(void *data, object clo, int argc, object *args) ;/*object self_7314078, object r_737051_739179_739209_739238*/
static void __lambda_1108(void *data, object clo, int argc, object *args) ;/*object self_7314079, object r_737048_739180_739210_739239*/
static void __lambda_1109(void *data, object clo, int argc, object *args) ;/*object self_7314080, object r_737049_739181_739211_739240*/
static void __lambda_1110(void *data, object clo, int argc, object *args) ;/*object self_7314081, object r_737016_739182_739212_739241*/
static void __lambda_1111(void *data, object clo, int argc, object *args) ;/*object self_7314082, object r_737022_739183_739213_739242*/
static void __lambda_1116(void *data, object clo, int argc, object *args) ;/*object self_7314083, object k_737046_739202_739232_739261, object tmp_731884_732045_733789_739203_739233_739262*/
static void __lambda_1112(void *data, object clo, int argc, object *args) ;/*object self_7314084, object r_737045_739184_739214_739243*/
static void __lambda_1113(void *data, object clo, int argc, object *args) ;/*object self_7314085, object r_737034_739185_739215_739244*/
static void __lambda_1114(void *data, object clo, int argc, object *args) ;/*object self_7314086, object r_737041_739186_739216_739245*/
static void __lambda_1115(void *data, object clo, int argc, object *args) ;/*object self_7314087, object r_737029_739190_739220_739249_739268_739282_739295*/
static void __lambda_1089(void *data, object clo, int argc, object *args) ;/*object self_7314088, object k_737065*/
static void __lambda_1090(void *data, object clo, int argc, object *args) ;/*object self_7314089, object r_737095*/
static void __lambda_1100(void *data, object clo, int argc, object *args) ;/*object self_7314090, object k_737134, object arg_731921_732070_733814*/
static void __lambda_1091(void *data, object clo, int argc, object *args) ;/*object self_7314091, object r_737133*/
static void __lambda_1092(void *data, object clo, int argc, object *args) ;/*object self_7314092, object r_737127*/
static void __lambda_1093(void *data, object clo, int argc, object *args) ;/*object self_7314093, object r_737129*/
static void __lambda_1094(void *data, object clo, int argc, object *args) ;/*object self_7314094, object r_737104_739088*/
static void __lambda_1099(void *data, object clo, int argc, object *args) ;/*object self_7314095, object k_737126_739104, object tmp_731922_732071_733815_739105*/
static void __lambda_1095(void *data, object clo, int argc, object *args) ;/*object self_7314096, object r_737125_739089*/
static void __lambda_1096(void *data, object clo, int argc, object *args) ;/*object self_7314097, object r_737114_739090*/
static void __lambda_1097(void *data, object clo, int argc, object *args) ;/*object self_7314098, object r_737121_739091*/
static void __lambda_1098(void *data, object clo, int argc, object *args) ;/*object self_7314099, object r_737109_739095_739109_739120_739130*/
static void __lambda_1082(void *data, object clo, int argc, object *args) ;/*object self_7314100, object k_737137*/
static void __lambda_1083(void *data, object clo, int argc, object *args) ;/*object self_7314101, object r_737163*/
static void __lambda_1084(void *data, object clo, int argc, object *args) ;/*object self_7314102, object r_737193*/
static void __lambda_1085(void *data, object clo, int argc, object *args) ;/*object self_7314103, object r_737172_738979_738994_739008*/
static void __lambda_1086(void *data, object clo, int argc, object *args) ;/*object self_7314104, object r_737180_738980_738995_739009*/
static void __lambda_1078(void *data, object clo, int argc, object *args) ;/*object self_7314105, object k_737204*/
static void __lambda_1079(void *data, object clo, int argc, object *args) ;/*object self_7314106, object r_737231*/
static void __lambda_1074(void *data, object clo, int argc, object *args) ;/*object self_7314107, object k_737251*/
static void __lambda_1075(void *data, object clo, int argc, object *args) ;/*object self_7314108, object r_737268*/
static void __lambda_1068(void *data, object clo, int argc, object *args) ;/*object self_7314109, object k_737277*/
static void __lambda_1069(void *data, object clo, int argc, object *args) ;/*object self_7314110, object r_737287*/
static void __lambda_1070(void *data, object clo, int argc, object *args) ;/*object self_7314111, object r_737303*/
static void __lambda_1046(void *data, object clo, int argc, object *args) ;/*closure _,object k_736856, object expr_731606_731637_731698_733720, object rename_731607_731638_731699_733721, object compare_731608_731639_731700_733722*/
static void __lambda_1047(void *data, object clo, int argc, object *args) ;/*object self_7314039, object v_931_731614_731692_731732_733754*/
static void __lambda_1050(void *data, object clo, int argc, object *args) ;/*object self_7314040, object tmp_731641_731643_731701_733723*/
static void __lambda_1065(void *data, object clo, int argc, object *args) ;/*object self_7314041, object r_736857*/
static void __lambda_1051(void *data, object clo, int argc, object *args) ;/*object self_7314042, object k_736859*/
static void __lambda_1052(void *data, object clo, int argc, object *args) ;/*object self_7314043, object v_934_731617_731670_731717_733739*/
static void __lambda_1056(void *data, object clo, int argc, object *args) ;/*object self_7314044, object tmp_731645_731647_731702_733724*/
static void __lambda_1057(void *data, object clo, int argc, object *args) ;/*object self_7314045, object v_9315_731628_731652_731704_733726*/
static void __lambda_1063(void *data, object clo, int argc, object *args) ;/*object self_7314046, object tmp_731649_731651_731703_733725*/
static void __lambda_1064(void *data, object clo, int argc, object *args) ;/*object self_7314047, object r_736862*/
static void __lambda_1058(void *data, object clo, int argc, object *args) ;/*object self_7314048, object k_736864*/
static void __lambda_1059(void *data, object clo, int argc, object *args) ;/*object self_7314049, object r_736879*/
static void __lambda_1060(void *data, object clo, int argc, object *args) ;/*object self_7314050, object r_736902*/
static void __lambda_1061(void *data, object clo, int argc, object *args) ;/*object self_7314051, object r_736888_738820_738832_738843*/
static void __lambda_1062(void *data, object clo, int argc, object *args) ;/*object self_7314052, object r_736896_738821_738833_738844*/
static void __lambda_1053(void *data, object clo, int argc, object *args) ;/*object self_7314053, object k_736913*/
static void __lambda_1054(void *data, object clo, int argc, object *args) ;/*object self_7314054, object r_736932*/
static void __lambda_1055(void *data, object clo, int argc, object *args) ;/*object self_7314055, object r_736941_738781_738789_738796*/
static void __lambda_1048(void *data, object clo, int argc, object *args) ;/*object self_7314056, object k_736955*/
static void __lambda_1049(void *data, object clo, int argc, object *args) ;/*object self_7314057, object r_736961*/
static void __lambda_1025(void *data, object clo, int argc, object *args) ;/*closure _,object k_736805, object expr_731521_731541_731576_733694, object rename_731522_731542_731577_733695, object compare_731523_731543_731578_733696*/
static void __lambda_1026(void *data, object clo, int argc, object *args) ;/*object self_7314018, object v_931_731529_731548_731580_733698*/
static void __lambda_1042(void *data, object clo, int argc, object *args) ;/*object self_7314019, object tmp_731545_731547_731579_733697*/
static void __lambda_1045(void *data, object clo, int argc, object *args) ;/*object self_7314020, object r_736806*/
static void __lambda_1043(void *data, object clo, int argc, object *args) ;/*object self_7314021, object k_736808*/
static void __lambda_1044(void *data, object clo, int argc, object *args) ;/*object self_7314022, object r_736809*/
static void __lambda_1027(void *data, object clo, int argc, object *args) ;/*object self_7314023, object k_736811*/
static void __lambda_1028(void *data, object clo, int argc, object *args) ;/*object self_7314024, object w_933_731531_731552_731582_733700, object var_91ls5_731533_731553_731583_733701, object val_91ls6_731534_731554_731584_733702*/
static void __lambda_1029(void *data, object clo, int argc, object *args) ;/*object self_7314025, object lp_934_731532_731555_731585_733703*/
static void __lambda_1442(void *data, object clo, int argc, object *args) ;/*object self_7314026, object lp_934_731532_731555_731585_733703*/
static void __lambda_1032(void *data, object clo, int argc, object *args) ;/*object self_7314027, object k_736818, object w_933_731531_731556_731586_733704, object var_91ls5_731533_731557_731587_733705, object val_91ls6_731534_731558_731588_733706*/
static void __lambda_1033(void *data, object clo, int argc, object *args) ;/*object self_7314028, object r_736820_7312992*/
static void __lambda_1034(void *data, object clo, int argc, object *args) ;/*object self_7314029, object r_736821_7312993_7313004*/
static void __lambda_1035(void *data, object clo, int argc, object *args) ;/*object self_7314030, object var_731559_731589_733707_7312994_7313005, object val_731560_731590_733708_7312995_7313006*/
static void __lambda_1036(void *data, object clo, int argc, object *args) ;/*object self_7314031, object r_736824_7312996_7313007*/
static void __lambda_1040(void *data, object clo, int argc, object *args) ;/*object self_7314032, object k_736832_7313000_7313011, object var_731563_731593_733711_7313001_7313012, object val_731564_731594_733712_7313002_7313013*/
static void __lambda_1041(void *data, object clo, int argc, object *args) ;/*object self_7314033, object r_736833_7313003_7313014*/
static void __lambda_1037(void *data, object clo, int argc, object *args) ;/*object self_7314034, object r_736831_7312997_7313008*/
static void __lambda_1038(void *data, object clo, int argc, object *args) ;/*object self_7314035, object r_736830_7312998_7313009*/
static void __lambda_1039(void *data, object clo, int argc, object *args) ;/*object self_7314036, object r_736828_7312999_7313010*/
static void __lambda_1030(void *data, object clo, int argc, object *args) ;/*object self_7314037, object r_736817*/
static void __lambda_1031(void *data, object clo, int argc, object *args) ;/*object self_7314038, object r_736816*/
static void __lambda_810(void *data, object clo, int argc, object *args) ;/*closure _,object k_736347, object expr_731263_733551, object rename_731264_733552, object compare_731265_733553*/
static void __lambda_811(void *data, object clo, int argc, object *args) ;/*object self_7313786, object r_736802*/
static void __lambda_812(void *data, object clo, int argc, object *args) ;/*object self_7313787, object r_736348*/
static void __lambda_813(void *data, object clo, int argc, object *args) ;/*object self_7313788, object r_736349*/
static void __lambda_814(void *data, object clo, int argc, object *args) ;/*object self_7313789, object r_736350*/
static void __lambda_815(void *data, object clo, int argc, object *args) ;/*object self_7313790, object r_736351*/
static void __lambda_816(void *data, object clo, int argc, object *args) ;/*object self_7313791, object r_736352*/
static void __lambda_817(void *data, object clo, int argc, object *args) ;/*object self_7313792, object r_736353*/
static void __lambda_818(void *data, object clo, int argc, object *args) ;/*object self_7313793, object r_736354*/
static void __lambda_819(void *data, object clo, int argc, object *args) ;/*object self_7313794, object r_736355*/
static void __lambda_820(void *data, object clo, int argc, object *args) ;/*object self_7313795, object r_736356*/
static void __lambda_821(void *data, object clo, int argc, object *args) ;/*object self_7313796, object r_736357*/
static void __lambda_822(void *data, object clo, int argc, object *args) ;/*object self_7313797, object r_736358*/
static void __lambda_823(void *data, object clo, int argc, object *args) ;/*object self_7313798, object r_736359*/
static void __lambda_824(void *data, object clo, int argc, object *args) ;/*object self_7313799, object r_736360*/
static void __lambda_825(void *data, object clo, int argc, object *args) ;/*object self_7313800, object r_736361*/
static void __lambda_826(void *data, object clo, int argc, object *args) ;/*object self_7313801, object r_736362*/
static void __lambda_827(void *data, object clo, int argc, object *args) ;/*object self_7313802, object r_736363*/
static void __lambda_828(void *data, object clo, int argc, object *args) ;/*object self_7313803, object r_736364*/
static void __lambda_829(void *data, object clo, int argc, object *args) ;/*object self_7313804, object r_736365*/
static void __lambda_830(void *data, object clo, int argc, object *args) ;/*object self_7313805, object r_736366*/
static void __lambda_831(void *data, object clo, int argc, object *args) ;/*object self_7313806, object r_736367*/
static void __lambda_832(void *data, object clo, int argc, object *args) ;/*object self_7313807, object r_736368*/
static void __lambda_833(void *data, object clo, int argc, object *args) ;/*object self_7313808, object r_736369*/
static void __lambda_834(void *data, object clo, int argc, object *args) ;/*object self_7313809, object r_736370*/
static void __lambda_835(void *data, object clo, int argc, object *args) ;/*object self_7313810, object r_736371*/
static void __lambda_836(void *data, object clo, int argc, object *args) ;/*object self_7313811, object r_736372*/
static void __lambda_837(void *data, object clo, int argc, object *args) ;/*object self_7313812, object r_736373*/
static void __lambda_838(void *data, object clo, int argc, object *args) ;/*object self_7313813, object r_736374*/
static void __lambda_839(void *data, object clo, int argc, object *args) ;/*object self_7313814, object r_736375*/
static void __lambda_840(void *data, object clo, int argc, object *args) ;/*object self_7313815, object r_736376*/
static void __lambda_841(void *data, object clo, int argc, object *args) ;/*object self_7313816, object r_736377*/
static void __lambda_842(void *data, object clo, int argc, object *args) ;/*object self_7313817, object r_736378*/
static void __lambda_843(void *data, object clo, int argc, object *args) ;/*object self_7313818, object r_736379*/
static void __lambda_844(void *data, object clo, int argc, object *args) ;/*object self_7313819, object r_736380*/
static void __lambda_845(void *data, object clo, int argc, object *args) ;/*object self_7313820, object r_736381*/
static void __lambda_846(void *data, object clo, int argc, object *args) ;/*object self_7313821, object r_736382*/
static void __lambda_847(void *data, object clo, int argc, object *args) ;/*object self_7313822, object r_736383*/
static void __lambda_848(void *data, object clo, int argc, object *args) ;/*object self_7313823, object ellipsis_91specified_127_731266_733566, object count_731267_733567, object _191er_91macro_91transformer_731268_733568, object _191lambda_731269_733569, object _191let_731270_733570, object _191begin_731271_733571, object _191if_731272_733572, object _191and_731273_733573, object _191or_731274_733574, object _191eq_127_731275_733575, object _191equal_127_731276_733576, object _191car_731277_733577, object _191cdr_731278_733578, object _191cons_731279_733579, object _191pair_127_731280_733580, object _191null_127_731281_733581, object _191expr_731282_733582, object _191rename_731283_733583, object _191compare_731284_733584, object _191quote_731285_733585, object _191apply_731286_733586, object _191append_731287_733587, object _191map_731288_733588, object _191vector_127_731289_733589, object _191list_127_731290_733590, object _191len_731291_733591, object _191length_731292_733592, object _191_91_731293_733593, object _191_125_123_731294_733594, object _191error_731295_733595, object _191ls_731296_733596, object _191res_731297_733597, object _191i_731298_733598, object _191reverse_731299_733599, object _191vector_91_125list_731300_733600, object _191list_91_125vector_731301_733601, object _191cons3_731302_733602*/
static void __lambda_1441(void *data, object clo, int argc, object *args) ;/*object self_7313824, object count_731267_733567*/
static void __lambda_849(void *data, object clo, int argc, object *args) ;/*object self_7313825, object ellipsis_733603, object lits_733604, object forms_733605, object next_91symbol_733606, object expand_91pattern_733607, object ellipsis_91escape_127_733608, object ellipsis_127_733609, object ellipsis_91depth_733610, object ellipsis_91tail_733611, object all_91vars_733612, object free_91vars_733613, object expand_91template_733614*/
static void __lambda_1440(void *data, object clo, int argc, object *args) ;/*object self_7313826, object ellipsis_733603*/
static void __lambda_1439(void *data, object clo, int argc, object *args) ;/*object self_7313827, object lits_733604*/
static void __lambda_1438(void *data, object clo, int argc, object *args) ;/*object self_7313828, object forms_733605*/
static void __lambda_1437(void *data, object clo, int argc, object *args) ;/*object self_7313829, object next_91symbol_733606*/
static void __lambda_1436(void *data, object clo, int argc, object *args) ;/*object self_7313830, object expand_91pattern_733607*/
static void __lambda_1435(void *data, object clo, int argc, object *args) ;/*object self_7313831, object ellipsis_91escape_127_733608*/
static void __lambda_1434(void *data, object clo, int argc, object *args) ;/*object self_7313832, object ellipsis_127_733609*/
static void __lambda_1433(void *data, object clo, int argc, object *args) ;/*object self_7313833, object ellipsis_91depth_733610*/
static void __lambda_1432(void *data, object clo, int argc, object *args) ;/*object self_7313834, object ellipsis_91tail_733611*/
static void __lambda_1431(void *data, object clo, int argc, object *args) ;/*object self_7313835, object all_91vars_733612*/
static void __lambda_1430(void *data, object clo, int argc, object *args) ;/*object self_7313836, object free_91vars_733613*/
static void __lambda_1429(void *data, object clo, int argc, object *args) ;/*object self_7313837, object expand_91template_733614*/
static void __lambda_850(void *data, object clo, int argc, object *args) ;/*object self_7313838, object r_736764*/
static void __lambda_851(void *data, object clo, int argc, object *args) ;/*object self_7313839, object r_736384*/
static void __lambda_853(void *data, object clo, int argc, object *args) ;/*object self_7313840, object r_736761*/
static void __lambda_854(void *data, object clo, int argc, object *args) ;/*object self_7313841, object r_736385*/
static void __lambda_856(void *data, object clo, int argc, object *args) ;/*object self_7313842, object r_736758*/
static void __lambda_857(void *data, object clo, int argc, object *args) ;/*object self_7313843, object r_736386*/
static void __lambda_1020(void *data, object clo, int argc, object *args) ;/*object self_7313844, object k_736752, object s_731303_733615*/
static void __lambda_1021(void *data, object clo, int argc, object *args) ;/*object self_7313845, object r_736757*/
static void __lambda_1022(void *data, object clo, int argc, object *args) ;/*object self_7313846, object r_736753*/
static void __lambda_1023(void *data, object clo, int argc, object *args) ;/*object self_7313847, object r_736756*/
static void __lambda_1024(void *data, object clo, int argc, object *args) ;/*object self_7313848, object r_736755*/
static void __lambda_858(void *data, object clo, int argc, object *args) ;/*object self_7313849, object r_736751*/
static void __lambda_859(void *data, object clo, int argc, object *args) ;/*object self_7313850, object r_736387*/
static void __lambda_958(void *data, object clo, int argc, object *args) ;/*object self_7313851, object k_736536, object pat_731304_733616, object tmpl_731305_733617*/
static void __lambda_1018(void *data, object clo, int argc, object *args) ;/*object self_7313852, object k_736749, object vars_731384_733647*/
static void __lambda_1019(void *data, object clo, int argc, object *args) ;/*object self_7313853, object r_736750*/
static void __lambda_959(void *data, object clo, int argc, object *args) ;/*object self_7313854, object r_736540*/
static void __lambda_960(void *data, object clo, int argc, object *args) ;/*object self_7313855, object p_731307_733618, object x_731308_733619, object vars_731310_733621, object k_731311_733622*/
static void __lambda_961(void *data, object clo, int argc, object *args) ;/*object self_7313856, object lp_731312_733623*/
static void __lambda_1428(void *data, object clo, int argc, object *args) ;/*object self_7313857, object lp_731312_733623*/
static void __lambda_964(void *data, object clo, int argc, object *args) ;/*object self_7313858, object k_736543, object p_731313_733624, object x_731314_733625, object dim_731315_733626, object vars_731316_733627, object k_731317_733628*/
static void __lambda_965(void *data, object clo, int argc, object *args) ;/*object self_7313859, object v_731318_733629*/
static void __lambda_1017(void *data, object clo, int argc, object *args) ;/*object self_7313860, object r_736546*/
static void __lambda_966(void *data, object clo, int argc, object *args) ;/*object self_7313861, object k_736547*/
static void __lambda_967(void *data, object clo, int argc, object *args) ;/*object self_7313862, object r_736548*/
static void __lambda_974(void *data, object clo, int argc, object *args) ;/*object self_7313869, object r_736561*/
static void __lambda_1016(void *data, object clo, int argc, object *args) ;/*object self_7313911, object r_736747*/
static void __lambda_1015(void *data, object clo, int argc, object *args) ;/*object self_7313910, object r_736745*/
static void __lambda_1013(void *data, object clo, int argc, object *args) ;/*object self_7313908, object r_736741*/
static void __lambda_1014(void *data, object clo, int argc, object *args) ;/*object self_7313909, object r_736740*/
static void __lambda_1012(void *data, object clo, int argc, object *args) ;/*object self_7313905, object k_736735, object vars_731376_733646*/
static void __lambda_1010(void *data, object clo, int argc, object *args) ;/*object self_7313906, object r_736734*/
static void __lambda_1011(void *data, object clo, int argc, object *args) ;/*object self_7313907, object r_736731*/
static void __lambda_975(void *data, object clo, int argc, object *args) ;/*object self_7313870, object r_736728*/
static void __lambda_1008(void *data, object clo, int argc, object *args) ;/*object self_7313897, object k_736725, object x_731332_733631*/
static void __lambda_1009(void *data, object clo, int argc, object *args) ;/*object self_7313898, object r_736726*/
static void __lambda_1002(void *data, object clo, int argc, object *args) ;/*object self_7313899, object r_736723*/
static void __lambda_1003(void *data, object clo, int argc, object *args) ;/*object self_7313900, object r_736724*/
static void __lambda_1004(void *data, object clo, int argc, object *args) ;/*object self_7313901, object r_736618*/
static void __lambda_1005(void *data, object clo, int argc, object *args) ;/*object self_7313902, object r_736620*/
static void __lambda_1006(void *data, object clo, int argc, object *args) ;/*object self_7313903, object len_731335_733632, object _191lp_731336_733633*/
static void __lambda_1007(void *data, object clo, int argc, object *args) ;/*object self_7313904, object r_736640*/
static void __lambda_976(void *data, object clo, int argc, object *args) ;/*object self_7313871, object r_736563*/
static void __lambda_978(void *data, object clo, int argc, object *args) ;/*object self_7313873, object w_731352_733634*/
static void __lambda_979(void *data, object clo, int argc, object *args) ;/*object self_7313874, object _191lp_731355_733635*/
static void __lambda_980(void *data, object clo, int argc, object *args) ;/*object self_7313875, object new_91vars_731358_733636*/
static void __lambda_999(void *data, object clo, int argc, object *args) ;/*object self_7313876, object k_736611, object x_731372_733645*/
static void __lambda_1000(void *data, object clo, int argc, object *args) ;/*object self_7313877, object r_736613*/
static void __lambda_1001(void *data, object clo, int argc, object *args) ;/*object self_7313878, object r_736612*/
static void __lambda_981(void *data, object clo, int argc, object *args) ;/*object self_7313879, object r_736610*/
static void __lambda_982(void *data, object clo, int argc, object *args) ;/*object self_7313880, object ls_91vars_731361_733637*/
static void __lambda_994(void *data, object clo, int argc, object *args) ;/*object self_7313881, object k_736603, object _191_731369_733642*/
static void __lambda_998(void *data, object clo, int argc, object *args) ;/*object self_7313882, object k_736608, object x_731370_733643, object l_731371_733644*/
static void __lambda_995(void *data, object clo, int argc, object *args) ;/*object self_7313883, object r_736607*/
static void __lambda_996(void *data, object clo, int argc, object *args) ;/*object self_7313884, object r_736606*/
static void __lambda_997(void *data, object clo, int argc, object *args) ;/*object self_7313885, object r_736604*/
static void __lambda_983(void *data, object clo, int argc, object *args) ;/*object self_7313886, object r_736602*/
static void __lambda_984(void *data, object clo, int argc, object *args) ;/*object self_7313887, object once_731364_733638*/
static void __lambda_993(void *data, object clo, int argc, object *args) ;/*object self_7313888, object k_736595, object x_731366_733639*/
static void __lambda_985(void *data, object clo, int argc, object *args) ;/*object self_7313889, object r_736594*/
static void __lambda_986(void *data, object clo, int argc, object *args) ;/*object self_7313890, object r_736593*/
static void __lambda_992(void *data, object clo, int argc, object *args) ;/*object self_7313891, object k_736589, object x_731367_733640, object l_731368_733641*/
static void __lambda_987(void *data, object clo, int argc, object *args) ;/*object self_7313892, object r_736588*/
static void __lambda_988(void *data, object clo, int argc, object *args) ;/*object self_7313893, object r_736585*/
static void __lambda_989(void *data, object clo, int argc, object *args) ;/*object self_7313894, object r_736587*/
static void __lambda_990(void *data, object clo, int argc, object *args) ;/*object self_7313895, object r_736586*/
static void __lambda_991(void *data, object clo, int argc, object *args) ;/*object self_7313896, object r_736582*/
static void __lambda_977(void *data, object clo, int argc, object *args) ;/*object self_7313872, object r_736567*/
static void __lambda_973(void *data, object clo, int argc, object *args) ;/*object self_7313863, object k_736560, object l_731322_733630*/
static void __lambda_968(void *data, object clo, int argc, object *args) ;/*object self_7313864, object r_736559*/
static void __lambda_969(void *data, object clo, int argc, object *args) ;/*object self_7313865, object r_736549*/
static void __lambda_972(void *data, object clo, int argc, object *args) ;/*object self_7313868, object r_736555*/
static void __lambda_970(void *data, object clo, int argc, object *args) ;/*object self_7313866, object r_736553*/
static void __lambda_971(void *data, object clo, int argc, object *args) ;/*object self_7313867, object r_736551*/
static void __lambda_962(void *data, object clo, int argc, object *args) ;/*object self_7313912, object r_736542*/
static void __lambda_963(void *data, object clo, int argc, object *args) ;/*object self_7313913, object r_736541*/
static void __lambda_860(void *data, object clo, int argc, object *args) ;/*object self_7313914, object r_736535*/
static void __lambda_861(void *data, object clo, int argc, object *args) ;/*object self_7313915, object r_736388*/
static void __lambda_957(void *data, object clo, int argc, object *args) ;/*object self_7313916, object k_736532, object x_731385_733648*/
static void __lambda_862(void *data, object clo, int argc, object *args) ;/*object self_7313917, object r_736531*/
static void __lambda_863(void *data, object clo, int argc, object *args) ;/*object self_7313918, object r_736389*/
static void __lambda_956(void *data, object clo, int argc, object *args) ;/*object self_7313919, object k_736526, object x_731387_733649*/
static void __lambda_864(void *data, object clo, int argc, object *args) ;/*object self_7313920, object r_736525*/
static void __lambda_865(void *data, object clo, int argc, object *args) ;/*object self_7313921, object r_736390*/
static void __lambda_953(void *data, object clo, int argc, object *args) ;/*object self_7313922, object k_736521, object x_731390_733650*/
static void __lambda_954(void *data, object clo, int argc, object *args) ;/*object self_7313923, object r_736522*/
static void __lambda_955(void *data, object clo, int argc, object *args) ;/*object self_7313924, object r_736523*/
static void __lambda_866(void *data, object clo, int argc, object *args) ;/*object self_7313925, object r_736520*/
static void __lambda_867(void *data, object clo, int argc, object *args) ;/*object self_7313926, object r_736391*/
static void __lambda_951(void *data, object clo, int argc, object *args) ;/*object self_7313927, object k_736517, object x_731391_733651*/
static void __lambda_952(void *data, object clo, int argc, object *args) ;/*object self_7313928, object r_736518*/
static void __lambda_868(void *data, object clo, int argc, object *args) ;/*object self_7313929, object r_736516*/
static void __lambda_869(void *data, object clo, int argc, object *args) ;/*object self_7313930, object r_736392*/
static void __lambda_937(void *data, object clo, int argc, object *args) ;/*object self_7313931, object k_736495, object x_731392_733652, object dim_731393_733653*/
static void __lambda_938(void *data, object clo, int argc, object *args) ;/*object self_7313932, object x_731395_733654, object dim_731396_733655, object vars_731397_733656*/
static void __lambda_939(void *data, object clo, int argc, object *args) ;/*object self_7313933, object lp_731398_733657*/
static void __lambda_1427(void *data, object clo, int argc, object *args) ;/*object self_7313934, object lp_731398_733657*/
static void __lambda_942(void *data, object clo, int argc, object *args) ;/*object self_7313935, object k_736499, object x_731399_733658, object dim_731400_733659, object vars_731401_733660*/
static void __lambda_943(void *data, object clo, int argc, object *args) ;/*object self_7313936, object r_736500*/
static void __lambda_947(void *data, object clo, int argc, object *args) ;/*object self_7313940, object r_736505*/
static void __lambda_950(void *data, object clo, int argc, object *args) ;/*object self_7313943, object r_736515*/
static void __lambda_949(void *data, object clo, int argc, object *args) ;/*object self_7313942, object r_736512*/
static void __lambda_948(void *data, object clo, int argc, object *args) ;/*object self_7313941, object r_736508*/
static void __lambda_946(void *data, object clo, int argc, object *args) ;/*object self_7313937, object k_736504, object lit_731405_733661*/
static void __lambda_944(void *data, object clo, int argc, object *args) ;/*object self_7313938, object r_736503*/
static void __lambda_945(void *data, object clo, int argc, object *args) ;/*object self_7313939, object r_736501*/
static void __lambda_940(void *data, object clo, int argc, object *args) ;/*object self_7313944, object r_736498*/
static void __lambda_941(void *data, object clo, int argc, object *args) ;/*object self_7313945, object r_736497*/
static void __lambda_870(void *data, object clo, int argc, object *args) ;/*object self_7313946, object r_736494*/
static void __lambda_871(void *data, object clo, int argc, object *args) ;/*object self_7313947, object r_736393*/
static void __lambda_923(void *data, object clo, int argc, object *args) ;/*object self_7313948, object k_736477, object x_731416_733662, object vars_731417_733663, object dim_731418_733664*/
static void __lambda_924(void *data, object clo, int argc, object *args) ;/*object self_7313949, object x_731420_733665, object free_731421_733666*/
static void __lambda_925(void *data, object clo, int argc, object *args) ;/*object self_7313950, object lp_731422_733667*/
static void __lambda_1426(void *data, object clo, int argc, object *args) ;/*object self_7313951, object lp_731422_733667*/
static void __lambda_928(void *data, object clo, int argc, object *args) ;/*object self_7313952, object k_736481, object x_731423_733668, object free_731424_733669*/
static void __lambda_929(void *data, object clo, int argc, object *args) ;/*object self_7313953, object r_736482*/
static void __lambda_936(void *data, object clo, int argc, object *args) ;/*object self_7313960, object r_736493*/
static void __lambda_935(void *data, object clo, int argc, object *args) ;/*object self_7313959, object r_736490*/
static void __lambda_934(void *data, object clo, int argc, object *args) ;/*object self_7313954, object r_736483*/
static void __lambda_930(void *data, object clo, int argc, object *args) ;/*object self_7313955, object k_736484*/
static void __lambda_931(void *data, object clo, int argc, object *args) ;/*object self_7313956, object r_736485*/
static void __lambda_932(void *data, object clo, int argc, object *args) ;/*object self_7313957, object tmp_731431_731433_733670*/
static void __lambda_933(void *data, object clo, int argc, object *args) ;/*object self_7313958, object cell_731434_733671*/
static void __lambda_926(void *data, object clo, int argc, object *args) ;/*object self_7313961, object r_736480*/
static void __lambda_927(void *data, object clo, int argc, object *args) ;/*object self_7313962, object r_736479*/
static void __lambda_872(void *data, object clo, int argc, object *args) ;/*object self_7313963, object r_736476*/
static void __lambda_873(void *data, object clo, int argc, object *args) ;/*object self_7313964, object r_736394*/
static void __lambda_881(void *data, object clo, int argc, object *args) ;/*object self_7313965, object k_736410, object tmpl_731443_733672, object vars_731444_733673*/
static void __lambda_882(void *data, object clo, int argc, object *args) ;/*object self_7313966, object t_731446_733674*/
static void __lambda_883(void *data, object clo, int argc, object *args) ;/*object self_7313967, object lp_731448_733676*/
static void __lambda_1425(void *data, object clo, int argc, object *args) ;/*object self_7313968, object lp_731448_733676*/
static void __lambda_886(void *data, object clo, int argc, object *args) ;/*object self_7313969, object k_736413, object t_731449_733677, object dim_731450_733678*/
static void __lambda_887(void *data, object clo, int argc, object *args) ;/*object self_7313970, object r_736414*/
static void __lambda_921(void *data, object clo, int argc, object *args) ;/*object self_7314005, object r_736473*/
static void __lambda_922(void *data, object clo, int argc, object *args) ;/*object self_7314006, object r_736472*/
static void __lambda_892(void *data, object clo, int argc, object *args) ;/*object self_7313975, object r_736423*/
static void __lambda_895(void *data, object clo, int argc, object *args) ;/*object self_7313978, object r_736430*/
static void __lambda_917(void *data, object clo, int argc, object *args) ;/*object self_7314001, object r_736466*/
static void __lambda_918(void *data, object clo, int argc, object *args) ;/*object self_7314002, object r_736469*/
static void __lambda_919(void *data, object clo, int argc, object *args) ;/*object self_7314003, object r_736467*/
static void __lambda_920(void *data, object clo, int argc, object *args) ;/*object self_7314004, object r_736468*/
static void __lambda_896(void *data, object clo, int argc, object *args) ;/*object self_7313979, object depth_731473_733682*/
static void __lambda_897(void *data, object clo, int argc, object *args) ;/*object self_7313980, object r_736465*/
static void __lambda_898(void *data, object clo, int argc, object *args) ;/*object self_7313981, object ell_91vars_731479_733684*/
static void __lambda_900(void *data, object clo, int argc, object *args) ;/*object self_7313982, object r_736435*/
static void __lambda_901(void *data, object clo, int argc, object *args) ;/*object self_7313983, object r_736459*/
static void __lambda_902(void *data, object clo, int argc, object *args) ;/*object self_7313984, object once_731491_733685*/
static void __lambda_907(void *data, object clo, int argc, object *args) ;/*object self_7313985, object nest_731494_733686*/
static void __lambda_908(void *data, object clo, int argc, object *args) ;/*object self_7313986, object d_731501_733688, object many_731502_733689*/
static void __lambda_909(void *data, object clo, int argc, object *args) ;/*object self_7313987, object lp_731448_731503_733690*/
static void __lambda_1424(void *data, object clo, int argc, object *args) ;/*object self_7313988, object lp_731448_731503_733690*/
static void __lambda_916(void *data, object clo, int argc, object *args) ;/*object self_7313989, object k_736446, object d_731504_733691, object many_731505_733692*/
static void __lambda_910(void *data, object clo, int argc, object *args) ;/*object self_7313990, object r_736445*/
static void __lambda_911(void *data, object clo, int argc, object *args) ;/*object self_7313991, object r_736444*/
static void __lambda_912(void *data, object clo, int argc, object *args) ;/*object self_7313992, object many_731497_733687*/
static void __lambda_913(void *data, object clo, int argc, object *args) ;/*object self_7313993, object r_736443*/
static void __lambda_914(void *data, object clo, int argc, object *args) ;/*object self_7313994, object r_736442*/
static void __lambda_915(void *data, object clo, int argc, object *args) ;/*object self_7313995, object r_736441*/
static void __lambda_903(void *data, object clo, int argc, object *args) ;/*object self_7313996, object k_736450*/
static void __lambda_906(void *data, object clo, int argc, object *args) ;/*object self_7313997, object r_736451*/
static void __lambda_904(void *data, object clo, int argc, object *args) ;/*object self_7313998, object k_736454*/
static void __lambda_905(void *data, object clo, int argc, object *args) ;/*object self_7313999, object r_736456*/
static void __lambda_899(void *data, object clo, int argc, object *args) ;/*object self_7314000, object k_736460*/
static void __lambda_894(void *data, object clo, int argc, object *args) ;/*object self_7313976, object r_736424*/
static void __lambda_893(void *data, object clo, int argc, object *args) ;/*object self_7313977, object k_736425*/
static void __lambda_891(void *data, object clo, int argc, object *args) ;/*object self_7313971, object k_736420, object v_731461_733681*/
static void __lambda_888(void *data, object clo, int argc, object *args) ;/*object self_7313972, object r_736419*/
static void __lambda_889(void *data, object clo, int argc, object *args) ;/*object self_7313973, object tmp_731456_731458_733679*/
static void __lambda_890(void *data, object clo, int argc, object *args) ;/*object self_7313974, object cell_731459_733680*/
static void __lambda_884(void *data, object clo, int argc, object *args) ;/*object self_7314007, object r_736412*/
static void __lambda_885(void *data, object clo, int argc, object *args) ;/*object self_7314008, object r_736411*/
static void __lambda_874(void *data, object clo, int argc, object *args) ;/*object self_7314009, object r_736409*/
static void __lambda_875(void *data, object clo, int argc, object *args) ;/*object self_7314010, object r_736395*/
static void __lambda_880(void *data, object clo, int argc, object *args) ;/*object self_7314011, object k_736406, object clause_731516_733693*/
static void __lambda_876(void *data, object clo, int argc, object *args) ;/*object self_7314012, object r_736405*/
static void __lambda_877(void *data, object clo, int argc, object *args) ;/*object self_7314013, object r_736401*/
static void __lambda_878(void *data, object clo, int argc, object *args) ;/*object self_7314014, object r_736404*/
static void __lambda_879(void *data, object clo, int argc, object *args) ;/*object self_7314015, object r_736400*/
static void __lambda_855(void *data, object clo, int argc, object *args) ;/*object self_7314016, object k_736759*/
static void __lambda_852(void *data, object clo, int argc, object *args) ;/*object self_7314017, object k_736762*/
static void __lambda_809(void *data, object clo, int argc, object *args) ;/*closure _,object k_736344, object kar_731260_733548, object kdr_731261_733549, object source_731262_733550*/
static void __lambda_807(void *data, object clo, int argc, object *args) ;/*closure _,object k_736340, object pred_731252_733545, object ls_731253_733546*/
static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_7313785, object tmp_731256_731258_733547*/
static void __lambda_805(void *data, object clo, int argc, object *args) ;/*closure _,object k_736333, object pred_731249_733543, object ls_731250_733544*/
static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_7313784, object r_736335*/
static void __lambda_1513(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object bv)*/
static void __lambda_1512(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static void __lambda_1511(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static void __lambda_1510(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
static void __lambda_1509(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object str)*/
static void __lambda_1508(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static void __lambda_1507(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static void __lambda_1506(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static void __lambda_1505(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static object __lambda_1504(void *data, object ptr) ;
static void __lambda_1503(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
static object __lambda_1502(void *data, object ptr) ;
static void __lambda_1501(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
static object __lambda_1500(void *data, object ptr) ;
static void __lambda_1499(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
static void __lambda_1498(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z1, object z2)*/
static object __lambda_1497(void *data, object ptr,object z_731248_733542) ;
static void __lambda_804(void *data, object clo, int argc, object *args) ;/*closure _,object k_736326, object z_731248_733542*/
static void __lambda_801(void *data, object clo, int argc, object *args) ;/*closure _,object k_736321, object n_731246_733540, object m_731247_733541*/
static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_7313782, object r_736322*/
static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_7313783, object r_736323*/
static void __lambda_799(void *data, object clo, int argc, object *args) ;/*closure _,object k_736316, object n_731244_733538, object m_731245_733539*/
static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_7313781, object r_736318*/
static void __lambda_798(void *data, object clo, int argc, object *args) ;/*closure _,object k_736308, object n_731240_733535, object m_731241_733536*/
static void __lambda_795(void *data, object clo, int argc, object *args) ;/*closure _,object k_736303, object n_731238_733533, object m_731239_733534*/
static void __lambda_796(void *data, object clo, int argc, object *args) ;/*object self_7313779, object r_736304*/
static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_7313780, object r_736305*/
static object __lambda_1496(void *data, object ptr,object x_731235_733531, object y_731236_733532) ;
static void __lambda_794(void *data, object clo, int argc, object *args) ;/*closure _,object k_736290, object x_731235_733531, object y_731236_733532*/
static object __lambda_1495(void *data, object ptr, object obj) ;
static void __lambda_1494(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
static void __lambda_1493(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object n)*/
static void __lambda_1492(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object n)*/
static void __lambda_793(void *data, object clo, int argc, object *args) ;/*closure _,object k_736283, object nums_731234_733530_raw, ...*/
static void __lambda_791(void *data, object clo, int argc, object *args) ;/*closure _,object k_736277, object a_731232_733528, object b_731233_733529*/
static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_7313778, object r_736280*/
static void __lambda_790(void *data, object clo, int argc, object *args) ;/*closure _,object k_736270, object nums_731231_733527_raw, ...*/
static void __lambda_788(void *data, object clo, int argc, object *args) ;/*closure _,object k_736265, object a_731229_733525, object b_731230_733526*/
static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_7313777, object r_736267*/
static void __lambda_785(void *data, object clo, int argc, object *args) ;/*closure _,object k_736255, object first_731225_733521, object rest_731226_733522_raw, ...*/
static void __lambda_787(void *data, object clo, int argc, object *args) ;/*object self_7313775, object k_736257, object old_731227_733523, object new_731228_733524*/
static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_7313776, object r_736256*/
static void __lambda_782(void *data, object clo, int argc, object *args) ;/*closure _,object k_736249, object first_731221_733517, object rest_731222_733518_raw, ...*/
static void __lambda_784(void *data, object clo, int argc, object *args) ;/*object self_7313773, object k_736251, object old_731223_733519, object new_731224_733520*/
static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_7313774, object r_736250*/
static void __lambda_781(void *data, object clo, int argc, object *args) ;/*closure _,object k_736246, object x_731219_733515, object y_731220_733516*/
static object __lambda_1491(void *data, object ptr, object z) ;
static void __lambda_1490(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
static void __lambda_780(void *data, object clo, int argc, object *args) ;/*closure _,object k_736240, object num_731218_733514*/
static object __lambda_1489(void *data, object ptr, object num) ;
static void __lambda_1488(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
static object __lambda_1487(void *data, object ptr, object num) ;
static void __lambda_1486(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
static object __lambda_1485(void *data, object ptr, object z) ;
static void __lambda_1484(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
static void __lambda_774(void *data, object clo, int argc, object *args) ;/*closure _,object k_736223, object k_731208_733511*/
static void __lambda_776(void *data, object clo, int argc, object *args) ;/*object self_7313768, object r_736224*/
static void __lambda_779(void *data, object clo, int argc, object *args) ;/*object self_7313769, object s_731213_733512*/
static void __lambda_777(void *data, object clo, int argc, object *args) ;/*object self_7313770, object k_736228*/
static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_7313771, object r_736229*/
static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_7313772, object k_736232*/
static void __lambda_1483(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
static void __lambda_1482(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
static void __lambda_772(void *data, object clo, int argc, object *args) ;/*closure _,object k_736218, object num_731207_733510*/
static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_7313767, object r_736220*/
static void __lambda_770(void *data, object clo, int argc, object *args) ;/*closure _,object k_736213, object num_731206_733509*/
static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_7313766, object r_736215*/
static void __lambda_768(void *data, object clo, int argc, object *args) ;/*closure _,object k_736206, object a_731203_733506, object b_731204_733507*/
static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_7313765, object res_731205_733508*/
static void __lambda_1481(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num1, object num2)*/
static void __lambda_1480(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
static object __lambda_1479(void *data, object ptr, object z) ;
static void __lambda_1478(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
static object __lambda_1477(void *data, object ptr, object z) ;
static void __lambda_1476(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
static object __lambda_1475(void *data, object ptr, object z) ;
static void __lambda_1474(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
static object __lambda_1473(void *data, object ptr, object z) ;
static void __lambda_1472(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
static object __lambda_1471(void *data, object ptr, object z) ;
static void __lambda_1470(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
static object __lambda_1469(void *data, object ptr, object z) ;
static void __lambda_1468(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
static void __lambda_762(void *data, object clo, int argc, object *args) ;/*closure _,object k_736196, object pred_731190_733501, object lst_731191_733502*/
static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_7313759, object l_731193_733503*/
static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_7313760, object every_85_731194_733504*/
static void __lambda_1423(void *data, object clo, int argc, object *args) ;/*object self_7313761, object every_85_731194_733504*/
static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_7313762, object k_736200, object l_731195_733505*/
static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_7313763, object r_736199*/
static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_7313764, object r_736198*/
static void __lambda_756(void *data, object clo, int argc, object *args) ;/*closure _,object k_736186, object pred_731177_733496, object lst_731178_733497*/
static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_7313753, object l_731180_733498*/
static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_7313754, object any_85_731181_733499*/
static void __lambda_1422(void *data, object clo, int argc, object *args) ;/*object self_7313755, object any_85_731181_733499*/
static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_7313756, object k_736190, object l_731182_733500*/
static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_7313757, object r_736189*/
static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_7313758, object r_736188*/
static void __lambda_742(void *data, object clo, int argc, object *args) ;/*closure _,object k_736163, object reason_731161_733486, object expr_731162_733487, object args_731163_733488_raw, ...*/
static void __lambda_743(void *data, object clo, int argc, object *args) ;/*object self_7313739, object reason_95line_91loc_127_733490*/
static void __lambda_1421(void *data, object clo, int argc, object *args) ;/*object self_7313740, object reason_95line_91loc_127_733490*/
static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_7313741, object k_736181, object reason_731164_733492*/
static void __lambda_755(void *data, object clo, int argc, object *args) ;/*object self_7313742, object r_736183*/
static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_7313743, object r_736180*/
static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_7313744, object r_736164*/
static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_7313745, object found_731168_733493*/
static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_7313746, object msg_731174_733495*/
static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_7313747, object k_736170*/
static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_7313748, object r_736171*/
static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_7313749, object r_736172*/
static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_7313750, object r_736173*/
static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_7313751, object k_736177*/
static void __lambda_749(void *data, object clo, int argc, object *args) ;/*object self_7313752, object r_736178*/
static void __lambda_1467(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
static void __lambda_1466(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object h)*/
static void __lambda_730(void *data, object clo, int argc, object *args) ;/*closure _,object k_736145, object handler_731153_733479, object thunk_731154_733480*/
static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_7313726, object k_736151, object obj_731157_733483*/
static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_7313727, object result_731158_733484, object continuable_127_731159_733485*/
static void __lambda_1420(void *data, object clo, int argc, object *args) ;/*object self_7313728, object result_731158_733484*/
static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_7313729, object r_736153*/
static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_7313730, object r_736155*/
static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_7313731, object r_736154*/
static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_7313732, object r_736146*/
static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_7313733, object result_731155_733481, object my_91handler_731156_733482*/
static void __lambda_1419(void *data, object clo, int argc, object *args) ;/*object self_7313734, object result_731155_733481*/
static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_7313735, object r_736147*/
static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_7313736, object r_736150*/
static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_7313737, object r_736148*/
static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_7313738, object r_736149*/
static void __lambda_729(void *data, object clo, int argc, object *args) ;/*closure _,object k_736104, object exp_731147_733476, object rename_731148_733477, object compare_731149_733478*/
static void __lambda_728(void *data, object clo, int argc, object *args) ;/*closure _,object k_736095, object obj_731146_733475*/
static void __lambda_727(void *data, object clo, int argc, object *args) ;/*closure _,object k_736086, object obj_731145_733474*/
static void __lambda_726(void *data, object clo, int argc, object *args) ;/*closure _,object k_736082, object msg_731143_733472, object args_731144_733473_raw, ...*/
static void __lambda_725(void *data, object clo, int argc, object *args) ;/*closure _,object k_736073, object x_731141_733471*/
static void __lambda_707(void *data, object clo, int argc, object *args) ;/*closure _,object k_736037, object init_731114_733461, object o_731115_733462_raw, ...*/
static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_7313708, object converter_731118_733463*/
static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_7313709, object value_731121_733464*/
static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_7313710, object key_731124_733465*/
static void __lambda_1418(void *data, object clo, int argc, object *args) ;/*object self_7313711, object key_731124_733465*/
static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_7313712, object r_736040*/
static void __lambda_714(void *data, object clo, int argc, object *args) ;/*object self_7313713, object r_736061*/
static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_7313714, object r_736041*/
static void __lambda_716(void *data, object clo, int argc, object *args) ;/*object self_7313715, object r_736042*/
static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_7313716, object k_736043, object args_731126_733466_raw, ...*/
static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_7313721, object r_736055*/
static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_7313722, object cell_731139_733469*/
static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_7313723, object r_736053*/
static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_7313719, object r_736050*/
static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_7313720, object cell_731134_733468*/
static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_7313717, object pobj_731130_733467*/
static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_7313718, object r_736046*/
static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_7313724, object k_736062*/
static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_7313725, object k_736064, object x_731140_733470*/
static void __lambda_1465(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
static void __lambda_1464(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
static void __lambda_636(void *data, object clo, int argc, object *args) ;/*closure _,object k_735723, object expr_73790_73856_731007_733354, object rename_73791_73857_731008_733355, object compare_73792_73858_731009_733356*/
static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_7313636, object v_931_73798_73933_731057_733404*/
static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_7313637, object tmp_73860_73862_731010_733357*/
static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_7313638, object r_735724*/
static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_7313639, object k_735726*/
static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_7313640, object v_9330_73827_73899_731035_733382*/
static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_7313641, object tmp_73864_73866_731011_733358*/
static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_7313642, object v_9347_73844_73871_731013_733360*/
static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_7313643, object tmp_73868_73870_731012_733359*/
static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_7313644, object r_735729*/
static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_7313645, object k_735731*/
static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_7313646, object w_9349_73846_73875_731015_733362, object param_91ls51_73848_73876_731016_733363, object value_91ls52_73849_73877_731017_733364*/
static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_7313647, object lp_9350_73847_73878_731018_733365*/
static void __lambda_1417(void *data, object clo, int argc, object *args) ;/*object self_7313648, object lp_9350_73847_73878_731018_733365*/
static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_7313649, object k_735738, object w_9349_73846_73879_731019_733366, object param_91ls51_73848_73880_731020_733367, object value_91ls52_73849_73881_731021_733368*/
static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_7313650, object r_735740_7312973*/
static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_7313651, object r_735741_7312974_7312983*/
static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_7313652, object param_73882_731022_733369_7312975_7312984, object value_73883_731023_733370_7312976_7312985*/
static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_7313653, object r_735744_7312977_7312986*/
static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_7313654, object k_735759_738751_7312980_7312989, object param_73886_731026_733373_738752_7312981_7312990, object value_73887_731027_733374_738753_7312982_7312991*/
static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_7313655, object r_735758_738744_7312978_7312987*/
static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_7313656, object r_735753_738745_7312979_7312988*/
static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_7313657, object r_735737*/
static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_7313658, object r_735736*/
static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_7313659, object k_735780*/
static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_7313660, object r_735810*/
static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_7313661, object r_735829_738663*/
static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_7313662, object r_735832_738664*/
static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_7313663, object r_735835_738665*/
static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_7313664, object k_735845*/
static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_7313665, object v_935_73802_73941_731061_733408*/
static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_7313666, object w_937_73804_73945_731063_733410, object param_91ls9_73806_73946_731064_733411, object value_91ls10_73807_73947_731065_733412, object p_91ls11_73808_73948_731066_733413, object old_91ls12_73809_73949_731067_733414, object new_91ls13_73810_73950_731068_733415*/
static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_7313667, object lp_938_73805_73951_731069_733416*/
static void __lambda_1416(void *data, object clo, int argc, object *args) ;/*object self_7313668, object lp_938_73805_73951_731069_733416*/
static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_7313669, object k_735863, object w_937_73804_73952_731070_733417, object param_91ls9_73806_73953_731071_733418, object value_91ls10_73807_73954_731072_733419, object p_91ls11_73808_73955_731073_733420, object old_91ls12_73809_73956_731074_733421, object new_91ls13_73810_73957_731075_733422*/
static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_7313670, object r_735865_7312728*/
static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_7313671, object r_735866_7312729_7312779*/
static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_7313672, object r_735867_7312730_7312780_7312829*/
static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_7313673, object r_735868_7312731_7312781_7312830_7312878*/
static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_7313674, object r_735869_7312732_7312782_7312831_7312879_7312926*/
static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_7313675, object param_73958_731076_733423_7312733_7312783_7312832_7312880_7312927, object value_73959_731077_733424_7312734_7312784_7312833_7312881_7312928, object p_73960_731078_733425_7312735_7312785_7312834_7312882_7312929, object old_73961_731079_733426_7312736_7312786_7312835_7312883_7312930, object new_73962_731080_733427_7312737_7312787_7312836_7312884_7312931*/
static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_7313676, object r_735880_7312738_7312788_7312837_7312885_7312932*/
static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_7313677, object k_736003_7312776_7312826_7312875_7312923_7312970, object p_73973_731087_733434_7312777_7312827_7312876_7312924_7312971, object param_73974_731088_733435_7312778_7312828_7312877_7312925_7312972*/
static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_7313678, object r_736002_7312739_7312789_7312838_7312886_7312933*/
static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_7313679, object r_735883_7312740_7312790_7312839_7312887_7312934*/
static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_7313680, object r_735889_7312741_7312791_7312840_7312888_7312935*/
static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_7313681, object k_735993_7312773_7312823_7312872_7312920_7312967, object old_73975_731089_733436_7312774_7312824_7312873_7312921_7312968, object p_73976_731090_733437_7312775_7312825_7312874_7312922_7312969*/
static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_7313682, object r_735992_7312742_7312792_7312841_7312889_7312936*/
static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_7313683, object r_735965_7312743_7312793_7312842_7312890_7312937*/
static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_7313684, object k_735968_7312767_7312817_7312866_7312914_7312961, object new_73977_731091_733438_7312768_7312818_7312867_7312915_7312962, object p_73978_731092_733439_7312769_7312819_7312868_7312916_7312963, object value_73979_731093_733440_7312770_7312820_7312869_7312917_7312964*/
static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_7313685, object r_735984_7312771_7312821_7312870_7312918_7312965*/
static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_7313686, object r_735987_7312772_7312822_7312871_7312919_7312966*/
static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_7313687, object r_735967_7312744_7312794_7312843_7312891_7312938*/
static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_7313688, object r_735966_7312745_7312795_7312844_7312892_7312939*/
static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_7313689, object r_735892_7312746_7312796_7312845_7312893_7312940*/
static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_7313690, object r_735898_7312747_7312797_7312846_7312894_7312941*/
static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_7313691, object r_735940_7312748_7312798_7312847_7312895_7312942*/
static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_7313692, object k_735947_7312762_7312812_7312861_7312909_7312956, object p_73980_731094_733441_7312763_7312813_7312862_7312910_7312957, object new_73981_731095_733442_7312764_7312814_7312863_7312911_7312958*/
static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_7313693, object r_735955_7312765_7312815_7312864_7312912_7312959*/
static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_7313694, object r_735958_7312766_7312816_7312865_7312913_7312960*/
static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_7313695, object r_735946_7312749_7312799_7312848_7312896_7312943*/
static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_7313696, object r_735944_7312750_7312800_7312849_7312897_7312944*/
static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_7313697, object r_735941_738424_7312751_7312801_7312850_7312898_7312945*/
static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_7313698, object r_735934_738426_738454_7312752_7312802_7312851_7312899_7312946*/
static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_7313699, object r_735910_738429_738457_738483_738508_7312753_7312803_7312852_7312900_7312947*/
static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_7313700, object k_735917_738444_738472_738498_738523_7312757_7312807_7312856_7312904_7312951, object p_73982_731096_733443_738445_738473_738499_738524_7312758_7312808_7312857_7312905_7312952, object old_73983_731097_733444_738446_738474_738500_738525_7312759_7312809_7312858_7312906_7312953*/
static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_7313701, object r_735925_738447_738475_738501_738526_7312760_7312810_7312859_7312907_7312954*/
static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_7313702, object r_735928_738448_738476_738502_738527_7312761_7312811_7312860_7312908_7312955*/
static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_7313703, object r_735916_738430_738458_738484_738509_7312754_7312804_7312853_7312901_7312948*/
static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_7313704, object r_735914_738431_738459_738485_738510_7312755_7312805_7312854_7312902_7312949*/
static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_7313705, object r_735911_738432_738460_738486_738511_738532_7312756_7312806_7312855_7312903_7312950*/
static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_7313706, object r_735862*/
static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_7313707, object r_735861*/
static void __lambda_1463(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object count, object fill)*/
static void __lambda_635(void *data, object clo, int argc, object *args) ;/*closure _,object k_735717, object k_73784_733352, object fill_73785_733353_raw, ...*/
static void __lambda_634(void *data, object clo, int argc, object *args) ;/*closure _,object k_735714, object chars_73783_733351_raw, ...*/
static void __lambda_627(void *data, object clo, int argc, object *args) ;/*closure _,object k_735704, object type_127_73777_733346, object obj_73778_733347, object objs_73779_733348*/
static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_7313630, object r_735705*/
static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_7313631, object k_735707, object return_73781_733349*/
static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_7313632, object k_735710, object o_73782_733350*/
static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_7313633, object r_735709*/
static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_7313634, object r_735708*/
static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_7313635, object r_735706*/
static void __lambda_626(void *data, object clo, int argc, object *args) ;/*closure _,object k_735700, object sym1_73774_733343, object sym2_73775_733344, object syms_73776_733345_raw, ...*/
static void __lambda_625(void *data, object clo, int argc, object *args) ;/*closure _,object k_735696, object b1_73771_733340, object b2_73772_733341, object bs_73773_733342_raw, ...*/
static void __lambda_612(void *data, object clo, int argc, object *args) ;/*closure _,object k_735675, object vec_73759_733332, object fill_73760_733333, object opts_73761_733334_raw, ...*/
static void __lambda_613(void *data, object clo, int argc, object *args) ;/*object self_7313614, object len_73762_733335, object start_73763_733336, object end_73764_733337, object loop_73765_733338*/
static void __lambda_1415(void *data, object clo, int argc, object *args) ;/*object self_7313615, object len_73762_733335*/
static void __lambda_1414(void *data, object clo, int argc, object *args) ;/*object self_7313616, object start_73763_733336*/
static void __lambda_1413(void *data, object clo, int argc, object *args) ;/*object self_7313617, object end_73764_733337*/
static void __lambda_1412(void *data, object clo, int argc, object *args) ;/*object self_7313618, object loop_73765_733338*/
static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_7313619, object r_735693*/
static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_7313620, object r_735676*/
static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_7313621, object r_735677*/
static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_7313622, object r_735685*/
static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_7313623, object r_735678*/
static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_7313624, object k_735681, object i_73766_733339*/
static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_7313625, object r_735682*/
static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_7313626, object r_735683*/
static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_7313627, object r_735680*/
static void __lambda_621(void *data, object clo, int argc, object *args) ;/*object self_7313628, object r_735679*/
static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_7313629, object k_735686*/
static void __lambda_601(void *data, object clo, int argc, object *args) ;/*closure _,object k_735652, object to_73745_733322, object at_73746_733323, object from_73747_733324, object opts_73748_733325_raw, ...*/
static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_7313600, object len_73749_733326, object start_73750_733327, object end_73751_733328, object loop_73752_733329*/
static void __lambda_1411(void *data, object clo, int argc, object *args) ;/*object self_7313601, object len_73749_733326*/
static void __lambda_1410(void *data, object clo, int argc, object *args) ;/*object self_7313602, object start_73750_733327*/
static void __lambda_1409(void *data, object clo, int argc, object *args) ;/*object self_7313603, object end_73751_733328*/
static void __lambda_1408(void *data, object clo, int argc, object *args) ;/*object self_7313604, object loop_73752_733329*/
static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_7313605, object r_735653*/
static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_7313606, object r_735654*/
static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_7313607, object r_735664*/
static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_7313608, object r_735655*/
static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_7313609, object k_735658, object i_91at_73753_733330, object i_91from_73754_733331*/
static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_7313610, object r_735660*/
static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_7313611, object r_735657*/
static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_7313612, object r_735656*/
static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_7313613, object k_735665*/
static void __lambda_588(void *data, object clo, int argc, object *args) ;/*closure _,object k_735627, object vec_73733_733314, object opts_73734_733315_raw, ...*/
static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_7313584, object len_73735_733316, object start_73736_733317, object end_73737_733318, object loop_73738_733319*/
static void __lambda_1407(void *data, object clo, int argc, object *args) ;/*object self_7313585, object len_73735_733316*/
static void __lambda_1406(void *data, object clo, int argc, object *args) ;/*object self_7313586, object start_73736_733317*/
static void __lambda_1405(void *data, object clo, int argc, object *args) ;/*object self_7313587, object end_73737_733318*/
static void __lambda_1404(void *data, object clo, int argc, object *args) ;/*object self_7313588, object loop_73738_733319*/
static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_7313589, object r_735628*/
static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_7313590, object r_735629*/
static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_7313591, object r_735641*/
static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_7313592, object r_735630*/
static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_7313593, object k_735635, object i_73739_733320, object new_91vec_73740_733321*/
static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_7313594, object r_735637*/
static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_7313595, object r_735634*/
static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_7313596, object r_735631*/
static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_7313597, object r_735633*/
static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_7313598, object r_735632*/
static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_7313599, object k_735642*/
static void __lambda_585(void *data, object clo, int argc, object *args) ;/*closure _,object k_735622, object vecs_73732_733313_raw, ...*/
static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_7313582, object r_735624*/
static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_7313583, object r_735623*/
static void __lambda_582(void *data, object clo, int argc, object *args) ;/*closure _,object k_735615, object func_73726_733310, object vec1_73727_733311, object vecs_73728_733312_raw, ...*/
static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_7313580, object r_735618*/
static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_7313581, object r_735619*/
static void __lambda_578(void *data, object clo, int argc, object *args) ;/*closure _,object k_735607, object func_73720_733307, object vec1_73721_733308, object vecs_73722_733309_raw, ...*/
static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_7313577, object r_735611*/
static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_7313578, object r_735612*/
static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_7313579, object r_735608*/
static void __lambda_575(void *data, object clo, int argc, object *args) ;/*closure _,object k_735600, object func_73714_733304, object str1_73715_733305, object strs_73716_733306_raw, ...*/
static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_7313575, object r_735603*/
static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_7313576, object r_735604*/
static void __lambda_571(void *data, object clo, int argc, object *args) ;/*closure _,object k_735592, object func_73708_733301, object str1_73709_733302, object strs_73710_733303_raw, ...*/
static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_7313572, object r_735596*/
static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_7313573, object r_735597*/
static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_7313574, object r_735593*/
static void __lambda_559(void *data, object clo, int argc, object *args) ;/*closure _,object k_735571, object str_73696_733293, object fill_73697_733294, object opts_73698_733295_raw, ...*/
static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_7313557, object len_73699_733296, object start_73700_733297, object end_73701_733298, object loop_73702_733299*/
static void __lambda_1403(void *data, object clo, int argc, object *args) ;/*object self_7313558, object len_73699_733296*/
static void __lambda_1402(void *data, object clo, int argc, object *args) ;/*object self_7313559, object start_73700_733297*/
static void __lambda_1401(void *data, object clo, int argc, object *args) ;/*object self_7313560, object end_73701_733298*/
static void __lambda_1400(void *data, object clo, int argc, object *args) ;/*object self_7313561, object loop_73702_733299*/
static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_7313562, object r_735589*/
static void __lambda_562(void *data, object clo, int argc, object *args) ;/*object self_7313563, object r_735572*/
static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_7313564, object r_735573*/
static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_7313565, object r_735581*/
static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_7313566, object r_735574*/
static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_7313567, object k_735577, object i_73703_733300*/
static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_7313568, object r_735578*/
static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_7313569, object r_735576*/
static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_7313570, object r_735575*/
static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_7313571, object k_735582*/
static void __lambda_549(void *data, object clo, int argc, object *args) ;/*closure _,object k_735548, object to_73682_733283, object at_73683_733284, object from_73684_733285, object opts_73685_733286_raw, ...*/
static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_7313544, object len_73686_733287, object start_73687_733288, object end_73688_733289, object loop_73689_733290*/
static void __lambda_1399(void *data, object clo, int argc, object *args) ;/*object self_7313545, object len_73686_733287*/
static void __lambda_1398(void *data, object clo, int argc, object *args) ;/*object self_7313546, object start_73687_733288*/
static void __lambda_1397(void *data, object clo, int argc, object *args) ;/*object self_7313547, object end_73688_733289*/
static void __lambda_1396(void *data, object clo, int argc, object *args) ;/*object self_7313548, object loop_73689_733290*/
static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_7313549, object r_735549*/
static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_7313550, object r_735550*/
static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_7313551, object r_735560*/
static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_7313552, object r_735551*/
static void __lambda_558(void *data, object clo, int argc, object *args) ;/*object self_7313553, object k_735554, object i_91at_73690_733291, object i_91from_73691_733292*/
static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_7313554, object r_735553*/
static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_7313555, object r_735552*/
static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_7313556, object k_735561*/
static void __lambda_542(void *data, object clo, int argc, object *args) ;/*closure _,object k_735533, object str_73677_733278, object opts_73678_733279_raw, ...*/
static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_7313535, object len_73679_733280, object start_73680_733281, object end_73681_733282*/
static void __lambda_1395(void *data, object clo, int argc, object *args) ;/*object self_7313536, object len_73679_733280*/
static void __lambda_1394(void *data, object clo, int argc, object *args) ;/*object self_7313537, object start_73680_733281*/
static void __lambda_1393(void *data, object clo, int argc, object *args) ;/*object self_7313538, object end_73681_733282*/
static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_7313539, object r_735534*/
static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_7313540, object r_735535*/
static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_7313541, object r_735537*/
static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_7313542, object r_735536*/
static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_7313543, object k_735538*/
static void __lambda_540(void *data, object clo, int argc, object *args) ;/*closure _,object k_735528, object str_73675_733276, object opts_73676_733277_raw, ...*/
static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_7313534, object r_735529*/
static void __lambda_530(void *data, object clo, int argc, object *args) ;/*closure _,object k_735505, object str_73667_733268, object opts_73668_733269_raw, ...*/
static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_7313521, object len_73669_733270, object start_73670_733271, object end_73671_733272, object loop_73672_733273*/
static void __lambda_1392(void *data, object clo, int argc, object *args) ;/*object self_7313522, object len_73669_733270*/
static void __lambda_1391(void *data, object clo, int argc, object *args) ;/*object self_7313523, object start_73670_733271*/
static void __lambda_1390(void *data, object clo, int argc, object *args) ;/*object self_7313524, object end_73671_733272*/
static void __lambda_1389(void *data, object clo, int argc, object *args) ;/*object self_7313525, object loop_73672_733273*/
static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_7313526, object r_735506*/
static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_7313527, object r_735507*/
static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_7313528, object r_735517*/
static void __lambda_536(void *data, object clo, int argc, object *args) ;/*object self_7313529, object r_735508*/
static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_7313530, object k_735512, object i_73673_733274, object lst_73674_733275*/
static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_7313531, object r_735511*/
static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_7313532, object r_735509*/
static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_7313533, object k_735518*/
static void __lambda_528(void *data, object clo, int argc, object *args) ;/*closure _,object k_735500, object vec_73664_733265, object opts_73665_733266_raw, ...*/
static void __lambda_529(void *data, object clo, int argc, object *args) ;/*object self_7313520, object lst_73666_733267*/
static void __lambda_521(void *data, object clo, int argc, object *args) ;/*closure _,object k_735485, object str_73659_733260, object opts_73660_733261_raw, ...*/
static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_7313511, object len_73661_733262, object start_73662_733263, object end_73663_733264*/
static void __lambda_1388(void *data, object clo, int argc, object *args) ;/*object self_7313512, object len_73661_733262*/
static void __lambda_1387(void *data, object clo, int argc, object *args) ;/*object self_7313513, object start_73662_733263*/
static void __lambda_1386(void *data, object clo, int argc, object *args) ;/*object self_7313514, object end_73663_733264*/
static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_7313515, object r_735486*/
static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_7313516, object r_735487*/
static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_7313517, object r_735489*/
static void __lambda_527(void *data, object clo, int argc, object *args) ;/*object self_7313518, object r_735488*/
static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_7313519, object k_735490*/
static void __lambda_514(void *data, object clo, int argc, object *args) ;/*closure _,object k_735470, object bv_73654_733255, object opts_73655_733256_raw, ...*/
static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_7313502, object len_73656_733257, object start_73657_733258, object end_73658_733259*/
static void __lambda_1385(void *data, object clo, int argc, object *args) ;/*object self_7313503, object len_73656_733257*/
static void __lambda_1384(void *data, object clo, int argc, object *args) ;/*object self_7313504, object start_73657_733258*/
static void __lambda_1383(void *data, object clo, int argc, object *args) ;/*object self_7313505, object end_73658_733259*/
static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_7313506, object r_735471*/
static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_7313507, object r_735472*/
static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_7313508, object r_735474*/
static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_7313509, object r_735473*/
static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_7313510, object k_735475*/
static void __lambda_493(void *data, object clo, int argc, object *args) ;/*closure _,object k_735433, object to_73619_733236, object at_73620_733237, object from_73621_733238, object o_73622_733239_raw, ...*/
static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_7313480, object end_73628_733241*/
static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_7313481, object r_735460*/
static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_7313482, object limit_73631_733242*/
static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_7313491, object i_73647_733249, object j_73648_733250*/
static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_7313492, object lp_73643_73649_733251*/
static void __lambda_1382(void *data, object clo, int argc, object *args) ;/*object self_7313493, object lp_73643_73649_733251*/
static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_7313494, object k_735450, object i_73650_733252, object j_73651_733253*/
static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_7313495, object r_735455*/
static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_7313496, object r_735452*/
static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_7313497, object r_735449*/
static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_7313498, object r_735448*/
static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_7313483, object i_73637_733243, object j_73638_733244*/
static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_7313484, object lp_73633_73639_733245*/
static void __lambda_1381(void *data, object clo, int argc, object *args) ;/*object self_7313485, object lp_73633_73639_733245*/
static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_7313486, object k_735440, object i_73640_733246, object j_73641_733247*/
static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_7313487, object r_735445*/
static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_7313488, object r_735442*/
static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_7313489, object r_735439*/
static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_7313490, object r_735438*/
static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_7313499, object k_735461*/
static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_7313500, object r_735462*/
static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_7313501, object k_735463*/
static void __lambda_486(void *data, object clo, int argc, object *args) ;/*closure _,object k_735418, object bv_73614_733231, object opts_73615_733232_raw, ...*/
static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_7313471, object len_73616_733233, object start_73617_733234, object end_73618_733235*/
static void __lambda_1380(void *data, object clo, int argc, object *args) ;/*object self_7313472, object len_73616_733233*/
static void __lambda_1379(void *data, object clo, int argc, object *args) ;/*object self_7313473, object start_73617_733234*/
static void __lambda_1378(void *data, object clo, int argc, object *args) ;/*object self_7313474, object end_73618_733235*/
static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_7313475, object r_735419*/
static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_7313476, object r_735420*/
static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_7313477, object r_735422*/
static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_7313478, object r_735421*/
static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_7313479, object k_735423*/
static void __lambda_476(void *data, object clo, int argc, object *args) ;/*closure _,object k_735395, object vec_73606_733223, object opts_73607_733224_raw, ...*/
static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_7313458, object len_73608_733225, object start_73609_733226, object end_73610_733227, object loop_73611_733228*/
static void __lambda_1377(void *data, object clo, int argc, object *args) ;/*object self_7313459, object len_73608_733225*/
static void __lambda_1376(void *data, object clo, int argc, object *args) ;/*object self_7313460, object start_73609_733226*/
static void __lambda_1375(void *data, object clo, int argc, object *args) ;/*object self_7313461, object end_73610_733227*/
static void __lambda_1374(void *data, object clo, int argc, object *args) ;/*object self_7313462, object loop_73611_733228*/
static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_7313463, object r_735396*/
static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_7313464, object r_735397*/
static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_7313465, object r_735407*/
static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_7313466, object r_735398*/
static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_7313467, object k_735402, object i_73612_733229, object lst_73613_733230*/
static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_7313468, object r_735401*/
static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_7313469, object r_735399*/
static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_7313470, object k_735408*/
static void __lambda_475(void *data, object clo, int argc, object *args) ;/*closure _,object k_735392, object objs_73605_733222_raw, ...*/
static void __lambda_474(void *data, object clo, int argc, object *args) ;/*closure _,object k_735388, object lst_73604_733221*/
static void __lambda_472(void *data, object clo, int argc, object *args) ;/*closure _,object k_735384, object lst_73600_733217, object k_73601_733218, object obj_73602_733219*/
static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_7313457, object kth_73603_733220*/
static void __lambda_470(void *data, object clo, int argc, object *args) ;/*closure _,object k_735380, object lst_73598_733215, object k_73599_733216*/
static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_7313456, object r_735381*/
static void __lambda_469(void *data, object clo, int argc, object *args) ;/*closure _,object k_735374, object lst_73596_733213, object k_73597_733214*/
static void __lambda_457(void *data, object clo, int argc, object *args) ;/*closure _,object k_735353, object f_73587_733205, object lis1_73588_733206, object lists_73589_733207_raw, ...*/
static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_7313455, object r_735368*/
static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_7313444, object lists_73591_733208*/
static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_7313445, object recur_73592_733209*/
static void __lambda_1373(void *data, object clo, int argc, object *args) ;/*object self_7313446, object recur_73592_733209*/
static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_7313447, object k_735359, object lists_73593_733210*/
static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_7313448, object k_735365*/
static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_7313449, object r_735360*/
static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_7313450, object k_735362, object cars_73594_733211, object cdrs_73595_733212*/
static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_7313451, object r_735364*/
static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_7313452, object r_735361*/
static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_7313453, object r_735358*/
static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_7313454, object r_735357*/
static void __lambda_455(void *data, object clo, int argc, object *args) ;/*closure _,object k_735342, object f_73580_733201, object lst1_73581_733202, object lst2_73582_733203*/
static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_7313443, object r_735344*/
static void __lambda_453(void *data, object clo, int argc, object *args) ;/*closure _,object k_735335, object f_73578_733199, object lst_73579_733200*/
static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_7313442, object r_735337*/
static void __lambda_450(void *data, object clo, int argc, object *args) ;/*closure _,object k_735323, object f_73571_733195, object lst1_73572_733196, object lst2_73573_733197*/
static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_7313440, object r_735325*/
static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_7313441, object r_735326*/
static void __lambda_447(void *data, object clo, int argc, object *args) ;/*closure _,object k_735315, object f_73569_733193, object lst_73570_733194*/
static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_7313438, object r_735317*/
static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_7313439, object r_735318*/
static void __lambda_432(void *data, object clo, int argc, object *args) ;/*closure _,object k_735296, object f_73557_733182, object lis1_73558_733183, object lists_73559_733184_raw, ...*/
static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_7313435, object k_735311, object x_73567_733191, object y_73568_733192*/
static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_7313436, object r_735312*/
static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_7313437, object r_735309*/
static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_7313423, object lists_73561_733185*/
static void __lambda_434(void *data, object clo, int argc, object *args) ;/*object self_7313424, object recur_73562_733186*/
static void __lambda_1372(void *data, object clo, int argc, object *args) ;/*object self_7313425, object recur_73562_733186*/
static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_7313426, object k_735301, object lists_73563_733187*/
static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_7313427, object k_735308*/
static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_7313428, object r_735302*/
static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_7313429, object k_735304, object cars_73564_733188, object cdrs_73565_733189*/
static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_7313430, object x_73566_733190*/
static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_7313431, object r_735307*/
static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_7313432, object r_735303*/
static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_7313433, object r_735300*/
static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_7313434, object r_735299*/
static void __lambda_412(void *data, object clo, int argc, object *args) ;/*closure _,object k_735268, object lists_73545_733171*/
static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_7313403, object k_735270, object abort_73546_733172*/
static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_7313404, object lists_73548_733173*/
static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_7313405, object recur_73549_733174*/
static void __lambda_1371(void *data, object clo, int argc, object *args) ;/*object self_7313406, object recur_73549_733174*/
static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_7313407, object k_735273, object lists_73550_733175*/
static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_7313408, object k_735291*/
static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_7313409, object r_735275*/
static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_7313410, object k_735277, object list_73551_733176, object other_91lists_73552_733177*/
static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_7313411, object k_735290*/
static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_7313412, object r_735281*/
static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_7313413, object k_735283, object a_73553_733178, object d_73554_733179*/
static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_7313414, object k_735289*/
static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_7313415, object r_735284*/
static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_7313416, object k_735286, object cars_73555_733180, object cdrs_73556_733181*/
static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_7313417, object r_735285*/
static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_7313418, object r_735282*/
static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_7313419, object r_735276*/
static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_7313420, object r_735272*/
static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_7313421, object r_735271*/
static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_7313422, object r_735269*/
static void __lambda_411(void *data, object clo, int argc, object *args) ;/*closure _,object k_735263, object pair_73544_733170*/
static void __lambda_410(void *data, object clo, int argc, object *args) ;/*closure _,object k_735244, object expr_73535_733164, object rename_73536_733165, object compare_73537_733166*/
static void __lambda_403(void *data, object clo, int argc, object *args) ;/*closure _,object k_735232, object ls_73528_733158*/
static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_7313396, object ls_73530_733159, object res_73531_733160*/
static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_7313397, object lp_73532_733161*/
static void __lambda_1370(void *data, object clo, int argc, object *args) ;/*object self_7313398, object lp_73532_733161*/
static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_7313399, object k_735236, object ls_73533_733162, object res_73534_733163*/
static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_7313400, object r_735241_7312727*/
static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_7313401, object r_735235*/
static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_7313402, object r_735234*/
static void __lambda_396(void *data, object clo, int argc, object *args) ;/*closure _,object k_735219, object k_73522_733152, object fill_73523_733153_raw, ...*/
static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_7313388, object x_73524_733154, object make_73525_733155*/
static void __lambda_1369(void *data, object clo, int argc, object *args) ;/*object self_7313389, object x_73524_733154*/
static void __lambda_1368(void *data, object clo, int argc, object *args) ;/*object self_7313390, object make_73525_733155*/
static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_7313391, object r_735220*/
static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_7313392, object k_735223, object n_73526_733156, object obj_73527_733157*/
static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_7313393, object r_735225*/
static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_7313394, object r_735222*/
static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_7313395, object r_735221*/
static void __lambda_395(void *data, object clo, int argc, object *args) ;/*closure _,object k_735216, object objs_73521_733151_raw, ...*/
static void __lambda_386(void *data, object clo, int argc, object *args) ;/*closure _,object k_735201, object lst_73514_733141_raw, ...*/
static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_7313379, object append_912_733143*/
static void __lambda_1367(void *data, object clo, int argc, object *args) ;/*object self_7313380, object append_912_733143*/
static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_7313381, object k_735211, object inlist_73515_733145, object alist_73516_733146*/
static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_7313382, object k_735213, object ap_73517_733147, object in_73518_733148*/
static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_7313383, object r_735212*/
static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_7313384, object r_735210*/
static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_7313385, object r_735202*/
static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_7313386, object k_735208, object a_73519_733149, object b_73520_733150*/
static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_7313387, object r_735205*/
static object __lambda_1462(void *data, object ptr,object n_73513_733140) ;
static void __lambda_385(void *data, object clo, int argc, object *args) ;/*closure _,object k_735198, object n_73513_733140*/
static object __lambda_1461(void *data, object ptr,object n_73512_733139) ;
static void __lambda_384(void *data, object clo, int argc, object *args) ;/*closure _,object k_735195, object n_73512_733139*/
static object __lambda_1460(void *data, object ptr,object n_73511_733138) ;
static void __lambda_383(void *data, object clo, int argc, object *args) ;/*closure _,object k_735192, object n_73511_733138*/
static object __lambda_1459(void *data, object ptr, object o) ;
static void __lambda_1458(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object o)*/
static object __lambda_1457(void *data, object ptr,object x_73510_733137) ;
static void __lambda_382(void *data, object clo, int argc, object *args) ;/*closure _,object k_735189, object x_73510_733137*/
static void __lambda_381(void *data, object clo, int argc, object *args) ;/*closure _,object k_735185, object port_73509_733136_raw, ...*/
static void __lambda_379(void *data, object clo, int argc, object *args) ;/*closure _,object k_735179, object char_73507_733134, object port_73508_733135_raw, ...*/
static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_7313378, object r_735181*/
static object __lambda_1456(void *data, object ptr, object bv, object port, object start, object end) ;
static void __lambda_1455(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object bv, object port, object start, object end)*/
static void __lambda_369(void *data, object clo, int argc, object *args) ;/*closure _,object k_735159, object vec_73501_733128, object opts_73502_733129_raw, ...*/
static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_7313365, object len_73503_733130, object port_73504_733131, object start_73505_733132, object end_73506_733133*/
static void __lambda_1366(void *data, object clo, int argc, object *args) ;/*object self_7313366, object len_73503_733130*/
static void __lambda_1365(void *data, object clo, int argc, object *args) ;/*object self_7313367, object port_73504_733131*/
static void __lambda_1364(void *data, object clo, int argc, object *args) ;/*object self_7313368, object start_73505_733132*/
static void __lambda_1363(void *data, object clo, int argc, object *args) ;/*object self_7313369, object end_73506_733133*/
static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_7313370, object r_735160*/
static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_7313371, object r_735172*/
static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_7313372, object r_735161*/
static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_7313373, object r_735162*/
static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_7313374, object r_735164*/
static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_7313375, object r_735163*/
static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_7313376, object k_735165*/
static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_7313377, object k_735173*/
static void __lambda_352(void *data, object clo, int argc, object *args) ;/*closure _,object k_735128, object vec_73473_733117, object o_73474_733118_raw, ...*/
static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_7313348, object in_73477_733119*/
static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_7313349, object start_73483_733121*/
static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_7313350, object end_73486_733122*/
static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_7313351, object res_73488_733123*/
static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_7313352, object len_73493_733124*/
static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_7313353, object lp_73494_73498_733126*/
static void __lambda_1362(void *data, object clo, int argc, object *args) ;/*object self_7313354, object lp_73494_73498_733126*/
static void __lambda_366(void *data, object clo, int argc, object *args) ;/*object self_7313355, object k_735139, object i_73499_733127*/
static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_7313356, object r_735144*/
static void __lambda_368(void *data, object clo, int argc, object *args) ;/*object self_7313357, object r_735141*/
static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_7313358, object r_735138*/
static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_7313359, object r_735137*/
static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_7313360, object k_735146*/
static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_7313361, object r_735147*/
static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_7313362, object k_735148*/
static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_7313363, object k_735151*/
static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_7313364, object k_735155*/
static void __lambda_340(void *data, object clo, int argc, object *args) ;/*closure _,object k_735110, object k_73462_733110, object _191port_73463_733111_raw, ...*/
static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_7313334, object port_73464_733112, object bv_73465_733113, object loop_73466_733114*/
static void __lambda_1361(void *data, object clo, int argc, object *args) ;/*object self_7313335, object port_73464_733112*/
static void __lambda_1360(void *data, object clo, int argc, object *args) ;/*object self_7313336, object bv_73465_733113*/
static void __lambda_1359(void *data, object clo, int argc, object *args) ;/*object self_7313337, object loop_73466_733114*/
static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_7313338, object r_735123*/
static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_7313339, object r_735111*/
static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_7313340, object r_735122*/
static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_7313341, object r_735112*/
static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_7313342, object k_735115, object n_73467_733115*/
static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_7313343, object b_73468_733116*/
static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_7313344, object r_735120*/
static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_7313345, object r_735114*/
static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_7313346, object r_735113*/
static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_7313347, object k_735124*/
static void __lambda_336(void *data, object clo, int argc, object *args) ;/*closure _,object k_735095, object str_73451_733106, object opts_73452_733107_raw, ...*/
static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_7313332, object start_73460_733108, object end_73461_733109*/
static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_7313333, object r_735102*/
static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_7313331, object r_735097*/
static void __lambda_335(void *data, object clo, int argc, object *args) ;/*closure _,object k_735092, object str_73449_733104, object port_73450_733105*/
static void __lambda_333(void *data, object clo, int argc, object *args) ;/*closure _,object k_735088, object str_73448_733103*/
static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_7313330, object r_735089*/
static void __lambda_331(void *data, object clo, int argc, object *args) ;/*closure _,object k_735082, object port_73447_733102_raw, ...*/
static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_7313329, object r_735084*/
static void __lambda_329(void *data, object clo, int argc, object *args) ;/*closure _,object k_735077, object obj_73445_733101*/
static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_7313328, object r_735079_7312725*/
static void __lambda_328(void *data, object clo, int argc, object *args) ;/*closure _,object k_735073, object obj_73443_733100*/
static void __lambda_1454(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
static void __lambda_316(void *data, object clo, int argc, object *args) ;/*closure _,object k_735051, object k_73425_733090, object opts_73426_733091_raw, ...*/
static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_7313316, object port_73427_733092*/
static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_7313317, object r_735068*/
static void __lambda_320(void *data, object clo, int argc, object *args) ;/*object self_7313318, object acc_73429_733093, object i_73430_733094*/
static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_7313319, object loop_73432_733096*/
static void __lambda_1358(void *data, object clo, int argc, object *args) ;/*object self_7313320, object loop_73432_733096*/
static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_7313321, object k_735057, object acc_73433_733097, object i_73434_733098, object chr_73435_733099*/
static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_7313324, object r_735066_738421*/
static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_7313323, object r_735061_738418_7312724*/
static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_7313322, object r_735059_7312723*/
static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_7313325, object r_735056*/
static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_7313326, object r_735055*/
static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_7313327, object k_735069*/
static void __lambda_306(void *data, object clo, int argc, object *args) ;/*closure _,object k_735035, object str_73410_733083, object port_73411_733084*/
static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_7313306, object r_735037*/
static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_7313307, object lis_73413_733085, object str_73414_733086*/
static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_7313308, object loop_73415_733087*/
static void __lambda_1357(void *data, object clo, int argc, object *args) ;/*object self_7313309, object loop_73415_733087*/
static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_7313310, object k_735040, object lis_73416_733088, object str_73417_733089*/
static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_7313313, object r_735047*/
static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_7313312, object r_735044_7312722*/
static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_7313311, object r_735042_7312721*/
static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_7313314, object r_735039*/
static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_7313315, object r_735038*/
static void __lambda_301(void *data, object clo, int argc, object *args) ;/*closure _,object k_735025, object o_73395_733080_raw, ...*/
static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_7313302, object port_73398_733081*/
static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_7313303, object str_73401_733082*/
static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_7313304, object r_735030*/
static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_7313305, object k_735031*/
static void __lambda_299(void *data, object clo, int argc, object *args) ;/*closure _,object k_735019, object port_73394_733079_raw, ...*/
static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_7313301, object r_735021*/
static void __lambda_297(void *data, object clo, int argc, object *args) ;/*closure _,object k_735013, object port_73393_733078_raw, ...*/
static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_7313300, object r_735015*/
static void __lambda_295(void *data, object clo, int argc, object *args) ;/*closure _,object k_735007, object port_73392_733077_raw, ...*/
static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_7313299, object r_735009*/
static void __lambda_1453(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static void __lambda_293(void *data, object clo, int argc, object *args) ;/*closure _,object k_735001, object chr_73390_733075, object port_73391_733076_raw, ...*/
static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_7313298, object r_735003*/
static void __lambda_291(void *data, object clo, int argc, object *args) ;/*closure _,object k_734995, object port_73389_733074_raw, ...*/
static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_7313297, object r_734997*/
static void __lambda_289(void *data, object clo, int argc, object *args) ;/*closure _,object k_734989, object port_73388_733073_raw, ...*/
static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_7313296, object r_734991*/
static void __lambda_1452(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object chr, object port)*/
static void __lambda_1451(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static void __lambda_1450(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
static void __lambda_287(void *data, object clo, int argc, object *args) ;/*closure _,object k_734982, object func_73385_733070, object end_73386_733071, object lst_73387_733072*/
static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_7313295, object r_734985*/
static void __lambda_285(void *data, object clo, int argc, object *args) ;/*closure _,object k_734975, object func_73382_733067, object accum_73383_733068, object lst_73384_733069*/
static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_7313294, object r_734977*/
static void __lambda_284(void *data, object clo, int argc, object *args) ;/*closure _,object k_734970, object obj_73379_733064, object alist_73380_733065, object compare_73381_733066_raw, ...*/
static void __lambda_281(void *data, object clo, int argc, object *args) ;/*closure _,object k_734959, object obj_73368_733061, object lst_73369_733062, object cmp_127_73370_733063*/
static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_7313292, object r_734961*/
static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_7313293, object k_734963*/
static void __lambda_280(void *data, object clo, int argc, object *args) ;/*closure _,object k_734954, object obj_73365_733058, object lst_73366_733059, object compare_73367_733060_raw, ...*/
static void __lambda_278(void *data, object clo, int argc, object *args) ;/*closure _,object k_734947, object obj_73355_733055, object lst_73356_733056, object cmp_91proc_73357_733057*/
static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_7313291, object r_734949*/
static object __lambda_1449(void *data, object ptr,object str1_73353_733053, object str2_73354_733054) ;
static void __lambda_277(void *data, object clo, int argc, object *args) ;/*closure _,object k_734943, object str1_73353_733053, object str2_73354_733054*/
static object __lambda_1448(void *data, object ptr,object str1_73351_733051, object str2_73352_733052) ;
static void __lambda_276(void *data, object clo, int argc, object *args) ;/*closure _,object k_734939, object str1_73351_733051, object str2_73352_733052*/
static object __lambda_1447(void *data, object ptr,object str1_73349_733049, object str2_73350_733050) ;
static void __lambda_275(void *data, object clo, int argc, object *args) ;/*closure _,object k_734935, object str1_73349_733049, object str2_73350_733050*/
static object __lambda_1446(void *data, object ptr,object str1_73347_733047, object str2_73348_733048) ;
static void __lambda_274(void *data, object clo, int argc, object *args) ;/*closure _,object k_734931, object str1_73347_733047, object str2_73348_733048*/
static object __lambda_1445(void *data, object ptr,object str1_73345_733045, object str2_73346_733046) ;
static void __lambda_273(void *data, object clo, int argc, object *args) ;/*closure _,object k_734927, object str1_73345_733045, object str2_73346_733046*/
static void __lambda_272(void *data, object clo, int argc, object *args) ;/*closure _,object k_734923, object str1_73342_733042, object str2_73343_733043, object strs_73344_733044_raw, ...*/
static void __lambda_271(void *data, object clo, int argc, object *args) ;/*closure _,object k_734919, object str1_73339_733039, object str2_73340_733040, object strs_73341_733041_raw, ...*/
static void __lambda_270(void *data, object clo, int argc, object *args) ;/*closure _,object k_734915, object str1_73336_733036, object str2_73337_733037, object strs_73338_733038_raw, ...*/
static void __lambda_269(void *data, object clo, int argc, object *args) ;/*closure _,object k_734911, object str1_73333_733033, object str2_73334_733034, object strs_73335_733035_raw, ...*/
static void __lambda_268(void *data, object clo, int argc, object *args) ;/*closure _,object k_734907, object str1_73330_733030, object str2_73331_733031, object strs_73332_733032_raw, ...*/
static void __lambda_267(void *data, object clo, int argc, object *args) ;/*closure _,object k_734903, object c1_73327_733027, object c2_73328_733028, object cs_73329_733029_raw, ...*/
static void __lambda_266(void *data, object clo, int argc, object *args) ;/*closure _,object k_734899, object c1_73324_733024, object c2_73325_733025, object cs_73326_733026_raw, ...*/
static void __lambda_265(void *data, object clo, int argc, object *args) ;/*closure _,object k_734895, object c1_73321_733021, object c2_73322_733022, object cs_73323_733023_raw, ...*/
static void __lambda_264(void *data, object clo, int argc, object *args) ;/*closure _,object k_734891, object c1_73318_733018, object c2_73319_733019, object cs_73320_733020_raw, ...*/
static void __lambda_263(void *data, object clo, int argc, object *args) ;/*closure _,object k_734887, object c1_73315_733015, object c2_73316_733016, object cs_73317_733017_raw, ...*/
static void __lambda_260(void *data, object clo, int argc, object *args) ;/*closure _,object k_734880, object cmp_73310_733010, object c_73311_733011, object cs_73312_733012*/
static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_7313289, object k_734882, object x_73313_733013, object y_73314_733014*/
static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_7313290, object r_734881*/
static void __lambda_258(void *data, object clo, int argc, object *args) ;/*closure _,object k_734872, object cmp_73300_733007, object x_73301_733008, object lst_73302_733009*/
static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_7313288, object r_734874*/
static void __lambda_256(void *data, object clo, int argc, object *args) ;/*closure _,object k_734867, object port_73297_733004, object proc_73298_733005*/
static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_7313287, object result_73299_733006*/
static void __lambda_252(void *data, object clo, int argc, object *args) ;/*closure _,object k_734861, object before_73293_733000, object thunk_73294_733001, object after_73295_733002*/
static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_7313284, object r_734862*/
static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_7313285, object result_73296_733003*/
static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_7313286, object r_734864*/
static void __lambda_250(void *data, object clo, int argc, object *args) ;/*closure _,object k_734849, object producer_73289_732997, object consumer_73290_732998*/
static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_7313283, object x_73291_732999*/
static void __lambda_249(void *data, object clo, int argc, object *args) ;/*closure _,object k_734839, object args_73287_732996_raw, ...*/
static void __lambda_248(void *data, object clo, int argc, object *args) ;/*closure _,object k_734833, object expr_73284_732993, object rename_73285_732994, object compare_73286_732995*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*closure _,object k_734745, object expr_73254_732985, object rename_73255_732986, object compare_73256_732987*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_7313248, object qq_732989*/
static void __lambda_1356(void *data, object clo, int argc, object *args) ;/*object self_7313249, object qq_732989*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_7313250, object k_734749, object x_73257_732991, object d_73258_732992*/
static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_7313280, object r_734827*/
static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_7313277, object r_734822*/
static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_7313278, object r_734824*/
static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_7313279, object r_734823*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_7313251, object r_734818*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_7313252, object r_734751*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_7313256, object r_734815*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_7313257, object r_734762*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_7313264, object r_734812*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_7313265, object r_734779*/
static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_7313269, object r_734789*/
static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_7313272, object r_734799*/
static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_7313273, object r_734800*/
static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_7313274, object r_734801*/
static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_7313270, object r_734792*/
static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_7313271, object r_734794*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_7313275, object k_734805*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_7313276, object r_734808*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_7313266, object r_734780*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_7313267, object r_734785*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_7313268, object r_734782*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_7313261, object r_734770*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_7313262, object r_734775*/
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_7313263, object r_734772*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_7313258, object r_734764*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_7313259, object r_734765*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_7313260, object r_734766*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_7313253, object r_734753*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_7313254, object r_734758*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_7313255, object r_734755*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_7313281, object r_734748*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_7313282, object r_734746*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*closure _,object k_734666, object expr_73227_732977, object rename_73228_732978, object compare_73229_732979*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_7313225, object r_734723*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_7313226, object r_734729*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_7313227, object k_734733, object x_73253_732984*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_7313228, object r_734739*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_7313229, object r_734738*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_7313230, object r_734731*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_7313231, object r_734730*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_7313232, object r_734724*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_7313233, object body_73232_732980*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_7313234, object wrap_73238_732982*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_7313235, object r_734670*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_7313236, object r_734672*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_7313237, object k_734679, object x_73243_732983*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_7313238, object r_734677*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_7313239, object r_734674*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_7313240, object k_734684*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_7313246, object r_734710*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_7313247, object r_734717*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*object self_7313241, object r_734686*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_7313242, object r_734704*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_7313243, object r_734692*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_7313244, object r_734694*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_7313245, object r_734696*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*closure _,object k_734639, object exp_73221_732974, object rename_73222_732975, object compare_73223_732976*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_7313219, object r_734640*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_7313220, object r_734641*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_7313221, object k_734658*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_7313222, object r_734660*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_7313223, object k_734661*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_7313224, object r_734663*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*closure _,object k_734616, object exp_73215_732971, object rename_73216_732972, object compare_73217_732973*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_7313213, object r_734617*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_7313214, object r_734618*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_7313215, object k_734631*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_7313216, object r_734633*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_7313217, object k_734634*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_7313218, object r_734636*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*closure _,object k_734505, object expr_73172_732955, object rename_73173_732956, object compare_73174_732957*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_7313178, object agg_91cond_732961, object body_732962, object clause_732963*/
static void __lambda_1355(void *data, object clo, int argc, object *args) ;/*object self_7313179, object agg_91cond_732961*/
static void __lambda_1354(void *data, object clo, int argc, object *args) ;/*object self_7313180, object body_732962*/
static void __lambda_1353(void *data, object clo, int argc, object *args) ;/*object self_7313181, object clause_732963*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_7313182, object k_734600, object exprs_73175_732967*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_7313183, object r_734611*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_7313184, object r_734603*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_7313186, object r_734609*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_7313185, object r_734606*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_7313187, object r_734599*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_7313188, object r_734506*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_7313189, object k_734579, object tmp_91sym_73189_732968, object lis_73190_732969*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_7313190, object r_734594*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_7313191, object r_734590*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_7313192, object r_734586*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_7313193, object r_734578*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_7313194, object r_734507*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_7313195, object k_734524, object ls_73194_732970*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_7313196, object r_734575*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_7313197, object r_734526*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_7313204, object r_734554*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_7313205, object r_734564*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_7313206, object r_734556*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_7313207, object r_734558*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_7313208, object r_734560*/
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_7313198, object r_734529*/
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_7313199, object r_734539*/
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_7313200, object r_734541*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_7313201, object r_734545*/
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_7313202, object r_734533*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_7313203, object r_734535*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_7313209, object r_734523*/
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_7313210, object r_734508*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_7313211, object r_734518*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_7313212, object r_734513*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*closure _,object k_734441, object expr_73168_732951, object rename_73169_732952, object compare_73170_732953*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_7313158, object r_734502*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_7313159, object cl_73171_732954*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_7313160, object r_734499*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_7313161, object r_734444*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_7313164, object r_734453*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_7313173, object r_734479*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_7313174, object r_734487*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_7313175, object r_734483*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_7313165, object r_734456*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_7313166, object r_734476*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_7313167, object r_734459*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_7313168, object r_734460*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_7313169, object r_734461*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_7313170, object r_734463*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_7313171, object k_734466*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_7313172, object r_734470*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_7313176, object k_734493*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_7313177, object r_734495*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_7313162, object r_734452*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_7313163, object r_734447*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*closure _,object k_734342, object expr_7388_732916, object rename_7389_732917, object compare_7390_732918*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_7313117, object _191lib_117import_91_125filename_732923, object _191lib_117import_91_125library_91name_732924, object _191library_91exists_127_732925, object check_732926*/
static void __lambda_1352(void *data, object clo, int argc, object *args) ;/*object self_7313118, object _191lib_117import_91_125filename_732923*/
static void __lambda_1351(void *data, object clo, int argc, object *args) ;/*object self_7313119, object _191lib_117import_91_125library_91name_732924*/
static void __lambda_1350(void *data, object clo, int argc, object *args) ;/*object self_7313120, object _191library_91exists_127_732925*/
static void __lambda_1349(void *data, object clo, int argc, object *args) ;/*object self_7313121, object check_732926*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_7313122, object k_734433, object import_7391_732931, object ext_7392_732932_raw, ...*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_7313123, object r_734435*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_7313124, object r_734434*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_7313125, object r_734432*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_7313126, object r_734343*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_7313127, object k_734405, object import_7393_732933, object ext_7394_732934_raw, ...*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_7313128, object k_734425, object i_73113_732940*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_7313129, object r_734426*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_7313130, object k_734427*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_7313131, object r_734424*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_7313132, object r_734423*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_7313133, object r_734422*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_7313134, object filename_85_73100_732936*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_7313135, object filename_73103_732937*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_7313136, object r_734409*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_7313137, object r_734410*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_7313138, object k_734413*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_7313139, object r_734404*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_7313140, object r_734344*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_7313141, object k_734388, object import_73121_732941*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_7313142, object r_734387*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_7313143, object r_734345*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_7313144, object k_734370, object x_73139_732945*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_7313146, object r_734386*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_7313145, object r_734378*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_7313147, object r_734369*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_7313148, object r_734346*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_7313149, object ls_73145_732947*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_7313150, object expand_73146_732948*/
static void __lambda_1348(void *data, object clo, int argc, object *args) ;/*object self_7313151, object expand_73146_732948*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_7313152, object k_734350, object ls_73147_732949*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_7313154, object r_734359*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_7313155, object r_734360*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_7313153, object r_734355*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_7313156, object r_734349*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_7313157, object r_734348*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*closure _,object k_734323, object exp_7373_732905, object rename_7374_732906, object compare_7375_732907*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_7313107, object dummy_91bind_732910, object singlet_127_732911*/
static void __lambda_1347(void *data, object clo, int argc, object *args) ;/*object self_7313108, object dummy_91bind_732910*/
static void __lambda_1346(void *data, object clo, int argc, object *args) ;/*object self_7313109, object singlet_127_732911*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_7313110, object k_734337, object l_7376_732914*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_7313111, object r_734336*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_7313112, object r_734324*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_7313113, object k_734328, object exps_7378_732915*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_7313114, object r_734329*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_7313115, object r_734327*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_7313116, object r_734325*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*closure _,object k_734292, object exp_7346_732892, object rename_7347_732893, object compare_7348_732894*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_7313091, object k_734294, object k_7349_732895*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_7313092, object k_734319, object obj_7350_732896*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_7313093, object r_734320*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_7313094, object r_734295*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_7313095, object k_734297*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_7313096, object k_734317, object b_7372_732904*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_7313097, object r_734316*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_7313098, object namings_7357_732899*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_7313099, object names_7360_732900*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_7313100, object k_734313, object binding_7371_732903*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_7313101, object r_734312*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_7313102, object sets_7363_732901*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_7313103, object args_7366_732902*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_7313104, object r_734309*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_7313105, object r_734296*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_7313106, object r_734293*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*closure _,object k_734247, object expr_7336_732888, object rename_7337_732889, object compare_7338_732890*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_7313077, object r_734248*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_7313078, object r_734249*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_7313079, object r_734283*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_7313081, object r_734256*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_7313082, object r_734257*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_7313083, object r_734263*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_7313084, object k_734273*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_7313085, object k_734277, object x_7342_732891*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_7313086, object r_734275*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_7313080, object r_734251*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_7313087, object k_734284*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_7313088, object r_734286*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_7313089, object k_734287*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_7313090, object r_734289*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*closure _,object k_734186, object expr_7323_732881, object rename_7324_732882, object compare_7325_732883*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_7313059, object r_734187*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_7313060, object r_734188*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_7313061, object r_734190*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_7313062, object k_734228, object x_7327_732885*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_7313063, object r_734227*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_7313064, object r_734191*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_7313065, object r_734192*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_7313066, object r_734193*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_7313067, object vars_7328_732886, object vals_7329_732887*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_7313071, object r_734222*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_7313068, object r_734196*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_7313069, object r_734201*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_7313070, object r_734214*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_7313072, object k_734233*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_7313073, object k_734239*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_7313074, object r_734241*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_7313075, object k_734242*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_7313076, object r_734244*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*closure _,object k_734161, object expr_7313_732878, object rename_7314_732879, object compare_7315_732880*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_7313053, object r_734164*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_7313054, object r_734178*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_7313055, object r_734167*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_7313056, object r_734168*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_7313057, object r_734169*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_7313058, object r_734171*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*closure _,object k_734147, object expr_733_732875, object rename_734_732876, object compare_735_732877*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_7313051, object r_734150*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_7313052, object r_734153*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_734144*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*closure _,object k_734140, object sym_732_732874*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_7313050, object r_734141*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*closure _,object k_734119*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_7313042, object feats_731_732873*/
static void __lambda_1345(void *data, object clo, int argc, object *args) ;/*object self_7313043, object feats_731_732873*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_7313044, object r_734120*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_7313045, object r_734128*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_7313046, object r_734126*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_7313047, object k_734129*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_7313048, object r_734134*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_7313049, object r_734131*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k, object f*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_7313041, object _191, object result*/

static void __lambda_1327(void *data, object _, int argc, object *args) /* closure _,object k_738391 */
 {
object k_738391 = args[0];
  Cyc_st_add(data, "scheme/base.sld:lib-init:schemebase");

closureN_type c_7328755;
object e_7328860 [1];
c_7328755.hdr.mark = gc_color_red;
 c_7328755.hdr.grayed = 0;
c_7328755.tag = closureN_tag;
 c_7328755.fn = (function_type)__lambda_1328;
c_7328755.num_args = 1;
c_7328755.num_elements = 1;
c_7328755.elements = (object *)e_7328860;
c_7328755.elements[0] = k_738391;


make_pair(c_7328867,quote_posix,NULL);c_7328867.hdr.immutable = 1;

make_pair(c_7328866,quote_full_91unicode,&c_7328867);c_7328866.hdr.immutable = 1;

make_pair(c_7328865,quote_ieee_91float,&c_7328866);c_7328865.hdr.immutable = 1;

make_pair(c_7328864,quote_r7rs,&c_7328865);c_7328864.hdr.immutable = 1;

object c_7328863 = global_set_cps_id(data,(closure)&c_7328755,"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, &c_7328864);
return_closcall1(data,(closure)&c_7328755,  c_7328863);; 
}

static void __lambda_1328(void *data, object self_7314305, int argc, object *args) /* object self_7314305, object r_738393 */
 {

  
closureN_type c_7328757;
object e_7328856 [1];
c_7328757.hdr.mark = gc_color_red;
 c_7328757.hdr.grayed = 0;
c_7328757.tag = closureN_tag;
 c_7328757.fn = (function_type)__lambda_1329;
c_7328757.num_args = 1;
c_7328757.num_elements = 1;
c_7328757.elements = (object *)e_7328856;
c_7328757.elements[0] = ((closureN)self_7314305)->elements[0];


object c_7328859 = global_set_cps_id(data,(closure)&c_7328757,"__glo_call_91with_91current_91continuation_scheme_base", __glo_call_91with_91current_91continuation_scheme_base, __glo_call_95cc_scheme_base);
return_closcall1(data,(closure)&c_7328757,  c_7328859);; 
}

static void __lambda_1329(void *data, object self_7314306, int argc, object *args) /* object self_7314306, object r_738394 */
 {

  
closureN_type c_7328759;
object e_7328852 [1];
c_7328759.hdr.mark = gc_color_red;
 c_7328759.hdr.grayed = 0;
c_7328759.tag = closureN_tag;
 c_7328759.fn = (function_type)__lambda_1330;
c_7328759.num_args = 1;
c_7328759.num_elements = 1;
c_7328759.elements = (object *)e_7328852;
c_7328759.elements[0] = ((closureN)self_7314306)->elements[0];


port_type c_7328855 = Cyc_stdout();
return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7328759, &c_7328855);; 
}

static void __lambda_1330(void *data, object self_7314307, int argc, object *args) /* object self_7314307, object r_738412 */
 {
 object r_738412 = args[0];
  
closureN_type c_7328761;
object e_7328848 [1];
c_7328761.hdr.mark = gc_color_red;
 c_7328761.hdr.grayed = 0;
c_7328761.tag = closureN_tag;
 c_7328761.fn = (function_type)__lambda_1331;
c_7328761.num_args = 1;
c_7328761.num_elements = 1;
c_7328761.elements = (object *)e_7328848;
c_7328761.elements[0] = ((closureN)self_7314307)->elements[0];


object c_7328851 = global_set_cps_id(data,(closure)&c_7328761,"__glo_current_91output_91port_scheme_base", __glo_current_91output_91port_scheme_base, r_738412);
return_closcall1(data,(closure)&c_7328761,  c_7328851);; 
}

static void __lambda_1331(void *data, object self_7314308, int argc, object *args) /* object self_7314308, object r_738395 */
 {

  
closureN_type c_7328763;
object e_7328844 [1];
c_7328763.hdr.mark = gc_color_red;
 c_7328763.hdr.grayed = 0;
c_7328763.tag = closureN_tag;
 c_7328763.fn = (function_type)__lambda_1332;
c_7328763.num_args = 1;
c_7328763.num_elements = 1;
c_7328763.elements = (object *)e_7328844;
c_7328763.elements[0] = ((closureN)self_7314308)->elements[0];


port_type c_7328847 = Cyc_stdin();
return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7328763, &c_7328847);; 
}

static void __lambda_1332(void *data, object self_7314309, int argc, object *args) /* object self_7314309, object r_738410 */
 {
 object r_738410 = args[0];
  
closureN_type c_7328765;
object e_7328840 [1];
c_7328765.hdr.mark = gc_color_red;
 c_7328765.hdr.grayed = 0;
c_7328765.tag = closureN_tag;
 c_7328765.fn = (function_type)__lambda_1333;
c_7328765.num_args = 1;
c_7328765.num_elements = 1;
c_7328765.elements = (object *)e_7328840;
c_7328765.elements[0] = ((closureN)self_7314309)->elements[0];


object c_7328843 = global_set_cps_id(data,(closure)&c_7328765,"__glo_current_91input_91port_scheme_base", __glo_current_91input_91port_scheme_base, r_738410);
return_closcall1(data,(closure)&c_7328765,  c_7328843);; 
}

static void __lambda_1333(void *data, object self_7314310, int argc, object *args) /* object self_7314310, object r_738396 */
 {

  
closureN_type c_7328767;
object e_7328836 [1];
c_7328767.hdr.mark = gc_color_red;
 c_7328767.hdr.grayed = 0;
c_7328767.tag = closureN_tag;
 c_7328767.fn = (function_type)__lambda_1334;
c_7328767.num_args = 1;
c_7328767.num_elements = 1;
c_7328767.elements = (object *)e_7328836;
c_7328767.elements[0] = ((closureN)self_7314310)->elements[0];


port_type c_7328839 = Cyc_stderr();
return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7328767, &c_7328839);; 
}

static void __lambda_1334(void *data, object self_7314311, int argc, object *args) /* object self_7314311, object r_738408 */
 {
 object r_738408 = args[0];
  
closureN_type c_7328769;
object e_7328832 [1];
c_7328769.hdr.mark = gc_color_red;
 c_7328769.hdr.grayed = 0;
c_7328769.tag = closureN_tag;
 c_7328769.fn = (function_type)__lambda_1335;
c_7328769.num_args = 1;
c_7328769.num_elements = 1;
c_7328769.elements = (object *)e_7328832;
c_7328769.elements[0] = ((closureN)self_7314311)->elements[0];


object c_7328835 = global_set_cps_id(data,(closure)&c_7328769,"__glo_current_91error_91port_scheme_base", __glo_current_91error_91port_scheme_base, r_738408);
return_closcall1(data,(closure)&c_7328769,  c_7328835);; 
}

static void __lambda_1335(void *data, object self_7314312, int argc, object *args) /* object self_7314312, object r_738397 */
 {

  
closureN_type c_7328771;
object e_7328828 [1];
c_7328771.hdr.mark = gc_color_red;
 c_7328771.hdr.grayed = 0;
c_7328771.tag = closureN_tag;
 c_7328771.fn = (function_type)__lambda_1336;
c_7328771.num_args = 1;
c_7328771.num_elements = 1;
c_7328771.elements = (object *)e_7328828;
c_7328771.elements[0] = ((closureN)self_7314312)->elements[0];


object c_7328831 = global_set_cps_id(data,(closure)&c_7328771,"__glo_error_91object_91message_scheme_base", __glo_error_91object_91message_scheme_base, primitive_car);
return_closcall1(data,(closure)&c_7328771,  c_7328831);; 
}

static void __lambda_1336(void *data, object self_7314313, int argc, object *args) /* object self_7314313, object r_738398 */
 {

  
closureN_type c_7328773;
object e_7328824 [1];
c_7328773.hdr.mark = gc_color_red;
 c_7328773.hdr.grayed = 0;
c_7328773.tag = closureN_tag;
 c_7328773.fn = (function_type)__lambda_1337;
c_7328773.num_args = 1;
c_7328773.num_elements = 1;
c_7328773.elements = (object *)e_7328824;
c_7328773.elements[0] = ((closureN)self_7314313)->elements[0];


object c_7328827 = global_set_cps_id(data,(closure)&c_7328773,"__glo_error_91object_91irritants_scheme_base", __glo_error_91object_91irritants_scheme_base, primitive_cdr);
return_closcall1(data,(closure)&c_7328773,  c_7328827);; 
}

static void __lambda_1337(void *data, object self_7314314, int argc, object *args) /* object self_7314314, object r_738399 */
 {

  
closureN_type c_7328775;
object e_7328820 [1];
c_7328775.hdr.mark = gc_color_red;
 c_7328775.hdr.grayed = 0;
c_7328775.tag = closureN_tag;
 c_7328775.fn = (function_type)__lambda_1338;
c_7328775.num_args = 1;
c_7328775.num_elements = 1;
c_7328775.elements = (object *)e_7328820;
c_7328775.elements[0] = ((closureN)self_7314314)->elements[0];


object c_7328823 = global_set_cps_id(data,(closure)&c_7328775,"__glo_rational_127_scheme_base", __glo_rational_127_scheme_base, primitive_number_127);
return_closcall1(data,(closure)&c_7328775,  c_7328823);; 
}

static void __lambda_1338(void *data, object self_7314315, int argc, object *args) /* object self_7314315, object r_738400 */
 {

  
closureN_type c_7328777;
object e_7328816 [1];
c_7328777.hdr.mark = gc_color_red;
 c_7328777.hdr.grayed = 0;
c_7328777.tag = closureN_tag;
 c_7328777.fn = (function_type)__lambda_1339;
c_7328777.num_args = 1;
c_7328777.num_elements = 1;
c_7328777.elements = (object *)e_7328816;
c_7328777.elements[0] = ((closureN)self_7314315)->elements[0];


object c_7328819 = global_set_cps_id(data,(closure)&c_7328777,"__glo_gcd_scheme_base", __glo_gcd_scheme_base, __glo_gcd_95entry_scheme_base);
return_closcall1(data,(closure)&c_7328777,  c_7328819);; 
}

static void __lambda_1339(void *data, object self_7314316, int argc, object *args) /* object self_7314316, object r_738401 */
 {

  
closureN_type c_7328779;
object e_7328812 [1];
c_7328779.hdr.mark = gc_color_red;
 c_7328779.hdr.grayed = 0;
c_7328779.tag = closureN_tag;
 c_7328779.fn = (function_type)__lambda_1340;
c_7328779.num_args = 1;
c_7328779.num_elements = 1;
c_7328779.elements = (object *)e_7328812;
c_7328779.elements[0] = ((closureN)self_7314316)->elements[0];


object c_7328815 = global_set_cps_id(data,(closure)&c_7328779,"__glo_lcm_scheme_base", __glo_lcm_scheme_base, __glo_lcm_95entry_scheme_base);
return_closcall1(data,(closure)&c_7328779,  c_7328815);; 
}

static void __lambda_1340(void *data, object self_7314317, int argc, object *args) /* object self_7314317, object r_738402 */
 {

  
closureN_type c_7328781;
object e_7328808 [1];
c_7328781.hdr.mark = gc_color_red;
 c_7328781.hdr.grayed = 0;
c_7328781.tag = closureN_tag;
 c_7328781.fn = (function_type)__lambda_1341;
c_7328781.num_args = 1;
c_7328781.num_elements = 1;
c_7328781.elements = (object *)e_7328808;
c_7328781.elements[0] = ((closureN)self_7314317)->elements[0];


object c_7328811 = global_set_cps_id(data,(closure)&c_7328781,"__glo_truncate_91quotient_scheme_base", __glo_truncate_91quotient_scheme_base, __glo_quotient_scheme_base);
return_closcall1(data,(closure)&c_7328781,  c_7328811);; 
}

static void __lambda_1341(void *data, object self_7314318, int argc, object *args) /* object self_7314318, object r_738403 */
 {

  
closureN_type c_7328783;
object e_7328804 [1];
c_7328783.hdr.mark = gc_color_red;
 c_7328783.hdr.grayed = 0;
c_7328783.tag = closureN_tag;
 c_7328783.fn = (function_type)__lambda_1342;
c_7328783.num_args = 1;
c_7328783.num_elements = 1;
c_7328783.elements = (object *)e_7328804;
c_7328783.elements[0] = ((closureN)self_7314318)->elements[0];


object c_7328807 = global_set_cps_id(data,(closure)&c_7328783,"__glo_truncate_91remainder_scheme_base", __glo_truncate_91remainder_scheme_base, __glo_remainder_scheme_base);
return_closcall1(data,(closure)&c_7328783,  c_7328807);; 
}

static void __lambda_1342(void *data, object self_7314319, int argc, object *args) /* object self_7314319, object r_738404 */
 {

  
closureN_type c_7328785;
object e_7328800 [1];
c_7328785.hdr.mark = gc_color_red;
 c_7328785.hdr.grayed = 0;
c_7328785.tag = closureN_tag;
 c_7328785.fn = (function_type)__lambda_1343;
c_7328785.num_args = 1;
c_7328785.num_elements = 1;
c_7328785.elements = (object *)e_7328800;
c_7328785.elements[0] = ((closureN)self_7314319)->elements[0];


object c_7328803 = global_set_cps_id(data,(closure)&c_7328785,"__glo_open_91output_91bytevector_scheme_base", __glo_open_91output_91bytevector_scheme_base, __glo_open_91output_91string_scheme_base);
return_closcall1(data,(closure)&c_7328785,  c_7328803);; 
}

static void __lambda_1343(void *data, object self_7314320, int argc, object *args) /* object self_7314320, object r_738405 */
 {

  
closureN_type c_7328787;
object e_7328796 [1];
c_7328787.hdr.mark = gc_color_red;
 c_7328787.hdr.grayed = 0;
c_7328787.tag = closureN_tag;
 c_7328787.fn = (function_type)__lambda_1344;
c_7328787.num_args = 1;
c_7328787.num_elements = 1;
c_7328787.elements = (object *)e_7328796;
c_7328787.elements[0] = ((closureN)self_7314320)->elements[0];


object c_7328799 = global_set_cps_id(data,(closure)&c_7328787,"__glo_identifier_127_scheme_base", __glo_identifier_127_scheme_base, primitive_symbol_127);
return_closcall1(data,(closure)&c_7328787,  c_7328799);; 
}

static void __lambda_1344(void *data, object self_7314321, int argc, object *args) /* object self_7314321, object r_738406 */
 {

  
complex_num_type local_7328795; 

object c_7328792 = global_set_cps_id(data,  ((closureN)self_7314321)->elements[0],"__glo_record_91marker_scheme_base", __glo_record_91marker_scheme_base, ((inline_function_type)
                   ((closure)__glo_make_91record_91marker_191_191inline_191_191_scheme_base)->fn)(data,&local_7328795));
return_direct_with_clo1(data,  ((closureN)self_7314321)->elements[0], (((closure)  ((closureN)self_7314321)->elements[0])->fn),  c_7328792);; 
}

static void __lambda_1269(void *data, object _, int argc, object *args) /* closure _,object k_738077, object expr_732685_732725_732817_734061, object rename_732686_732726_732818_734062, object compare_732687_732727_732819_734063 */
 {
object k_738077 = args[0]; object expr_732685_732725_732817_734061 = args[1]; object rename_732686_732726_732818_734062 = args[2];
  Cyc_st_add(data, "scheme/base.sld:define-values");

closureN_type c_7328013;
object e_7328750 [3];
c_7328013.hdr.mark = gc_color_red;
 c_7328013.hdr.grayed = 0;
c_7328013.tag = closureN_tag;
 c_7328013.fn = (function_type)__lambda_1270;
c_7328013.num_args = 1;
c_7328013.num_elements = 3;
c_7328013.elements = (object *)e_7328750;
c_7328013.elements[0] = expr_732685_732725_732817_734061;
c_7328013.elements[1] = k_738077;
c_7328013.elements[2] = rename_732686_732726_732818_734062;



return_direct_with_clo1(data,(closure)&c_7328013,__lambda_1270,  Cyc_cdr(data, expr_732685_732725_732817_734061));; 
}

static void __lambda_1270(void *data, object self_7314247, int argc, object *args) /* object self_7314247, object v_931_732693_732807_732867_734111 */
 {
 object v_931_732693_732807_732867_734111 = args[0];
  
closureN_type c_7328015;
object e_7328115 [2];
c_7328015.hdr.mark = gc_color_red;
 c_7328015.hdr.grayed = 0;
c_7328015.tag = closureN_tag;
 c_7328015.fn = (function_type)__lambda_1271;
c_7328015.num_args = 0;
c_7328015.num_elements = 2;
c_7328015.elements = (object *)e_7328115;
c_7328015.elements[0] = ((closureN)self_7314247)->elements[2];
c_7328015.elements[1] = v_931_732693_732807_732867_734111;


closureN_type c_7328116;
object e_7328749 [3];
c_7328116.hdr.mark = gc_color_red;
 c_7328116.hdr.grayed = 0;
c_7328116.tag = closureN_tag;
 c_7328116.fn = (function_type)__lambda_1278;
c_7328116.num_args = 1;
c_7328116.num_elements = 3;
c_7328116.elements = (object *)e_7328749;
c_7328116.elements[0] = ((closureN)self_7314247)->elements[0];
c_7328116.elements[1] = ((closureN)self_7314247)->elements[1];
c_7328116.elements[2] = ((closureN)self_7314247)->elements[2];

return_direct_with_clo1(data,(closure)&c_7328015,__lambda_1271,  &c_7328116);; 
}

static void __lambda_1278(void *data, object self_7314248, int argc, object *args) /* object self_7314248, object tmp_732729_732731_732820_734064 */
 {
 object tmp_732729_732731_732820_734064 = args[0];
  
closureN_type c_7328118;
object e_7328742 [3];
c_7328118.hdr.mark = gc_color_red;
 c_7328118.hdr.grayed = 0;
c_7328118.tag = closureN_tag;
 c_7328118.fn = (function_type)__lambda_1279;
c_7328118.num_args = 0;
c_7328118.num_elements = 3;
c_7328118.elements = (object *)e_7328742;
c_7328118.elements[0] = ((closureN)self_7314248)->elements[0];
c_7328118.elements[1] = ((closureN)self_7314248)->elements[2];
c_7328118.elements[2] = tmp_732729_732731_732820_734064;


closureN_type c_7328743;
object e_7328748 [1];
c_7328743.hdr.mark = gc_color_red;
 c_7328743.hdr.grayed = 0;
c_7328743.tag = closureN_tag;
 c_7328743.fn = (function_type)__lambda_1326;
c_7328743.num_args = 1;
c_7328743.num_elements = 1;
c_7328743.elements = (object *)e_7328748;
c_7328743.elements[0] = ((closureN)self_7314248)->elements[1];

return_direct_with_clo1(data,(closure)&c_7328118,__lambda_1279,  &c_7328743);; 
}

static void __lambda_1326(void *data, object self_7314249, int argc, object *args) /* object self_7314249, object r_738078 */
 {
 object r_738078 = args[0];
  

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

static void __lambda_1279(void *data, object self_7314250, int argc, object *args) /* object self_7314250, object k_738080 */
 {
 object k_738080 = args[0];
  if( (boolean_f != ((closureN)self_7314250)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_738080, (((closure)  k_738080)->fn),  ((closureN)self_7314250)->elements[2]);
} else { 
  
closureN_type c_7328123;
object e_7328738 [3];
c_7328123.hdr.mark = gc_color_red;
 c_7328123.hdr.grayed = 0;
c_7328123.tag = closureN_tag;
 c_7328123.fn = (function_type)__lambda_1280;
c_7328123.num_args = 1;
c_7328123.num_elements = 3;
c_7328123.elements = (object *)e_7328738;
c_7328123.elements[0] = ((closureN)self_7314250)->elements[0];
c_7328123.elements[1] = k_738080;
c_7328123.elements[2] = ((closureN)self_7314250)->elements[1];



return_direct_with_clo1(data,(closure)&c_7328123,__lambda_1280,  Cyc_cdr(data, ((closureN)self_7314250)->elements[0]));}
;; 
}

static void __lambda_1280(void *data, object self_7314251, int argc, object *args) /* object self_7314251, object v_936_732698_732793_732858_734102 */
 {
 object v_936_732698_732793_732858_734102 = args[0];
  
closureN_type c_7328125;
object e_7328186 [2];
c_7328125.hdr.mark = gc_color_red;
 c_7328125.hdr.grayed = 0;
c_7328125.tag = closureN_tag;
 c_7328125.fn = (function_type)__lambda_1281;
c_7328125.num_args = 0;
c_7328125.num_elements = 2;
c_7328125.elements = (object *)e_7328186;
c_7328125.elements[0] = ((closureN)self_7314251)->elements[2];
c_7328125.elements[1] = v_936_732698_732793_732858_734102;


closureN_type c_7328187;
object e_7328737 [3];
c_7328187.hdr.mark = gc_color_red;
 c_7328187.hdr.grayed = 0;
c_7328187.tag = closureN_tag;
 c_7328187.fn = (function_type)__lambda_1283;
c_7328187.num_args = 1;
c_7328187.num_elements = 3;
c_7328187.elements = (object *)e_7328737;
c_7328187.elements[0] = ((closureN)self_7314251)->elements[0];
c_7328187.elements[1] = ((closureN)self_7314251)->elements[1];
c_7328187.elements[2] = ((closureN)self_7314251)->elements[2];

return_direct_with_clo1(data,(closure)&c_7328125,__lambda_1281,  &c_7328187);; 
}

static void __lambda_1283(void *data, object self_7314252, int argc, object *args) /* object self_7314252, object tmp_732733_732735_732821_734065 */
 {
 object tmp_732733_732735_732821_734065 = args[0];
  if( (boolean_f != tmp_732733_732735_732821_734065) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314252)->elements[1], (((closure)  ((closureN)self_7314252)->elements[1])->fn),  tmp_732733_732735_732821_734065);
} else { 
  
closureN_type c_7328191;
object e_7328733 [3];
c_7328191.hdr.mark = gc_color_red;
 c_7328191.hdr.grayed = 0;
c_7328191.tag = closureN_tag;
 c_7328191.fn = (function_type)__lambda_1284;
c_7328191.num_args = 1;
c_7328191.num_elements = 3;
c_7328191.elements = (object *)e_7328733;
c_7328191.elements[0] = ((closureN)self_7314252)->elements[0];
c_7328191.elements[1] = ((closureN)self_7314252)->elements[1];
c_7328191.elements[2] = ((closureN)self_7314252)->elements[2];



return_direct_with_clo1(data,(closure)&c_7328191,__lambda_1284,  Cyc_cdr(data, ((closureN)self_7314252)->elements[0]));}
;; 
}

static void __lambda_1284(void *data, object self_7314253, int argc, object *args) /* object self_7314253, object v_9313_732705_732754_732831_734075 */
 {
 object v_9313_732705_732754_732831_734075 = args[0];
  
closureN_type c_7328193;
object e_7328628 [2];
c_7328193.hdr.mark = gc_color_red;
 c_7328193.hdr.grayed = 0;
c_7328193.tag = closureN_tag;
 c_7328193.fn = (function_type)__lambda_1285;
c_7328193.num_args = 0;
c_7328193.num_elements = 2;
c_7328193.elements = (object *)e_7328628;
c_7328193.elements[0] = ((closureN)self_7314253)->elements[2];
c_7328193.elements[1] = v_9313_732705_732754_732831_734075;


closureN_type c_7328629;
object e_7328732 [3];
c_7328629.hdr.mark = gc_color_red;
 c_7328629.hdr.grayed = 0;
c_7328629.tag = closureN_tag;
 c_7328629.fn = (function_type)__lambda_1317;
c_7328629.num_args = 1;
c_7328629.num_elements = 3;
c_7328629.elements = (object *)e_7328732;
c_7328629.elements[0] = ((closureN)self_7314253)->elements[0];
c_7328629.elements[1] = ((closureN)self_7314253)->elements[1];
c_7328629.elements[2] = ((closureN)self_7314253)->elements[2];

return_direct_with_clo1(data,(closure)&c_7328193,__lambda_1285,  &c_7328629);; 
}

static void __lambda_1317(void *data, object self_7314254, int argc, object *args) /* object self_7314254, object tmp_732737_732739_732822_734066 */
 {
 object tmp_732737_732739_732822_734066 = args[0];
  if( (boolean_f != tmp_732737_732739_732822_734066) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314254)->elements[1], (((closure)  ((closureN)self_7314254)->elements[1])->fn),  tmp_732737_732739_732822_734066);
} else { 
  
closureN_type c_7328633;
object e_7328728 [3];
c_7328633.hdr.mark = gc_color_red;
 c_7328633.hdr.grayed = 0;
c_7328633.tag = closureN_tag;
 c_7328633.fn = (function_type)__lambda_1318;
c_7328633.num_args = 1;
c_7328633.num_elements = 3;
c_7328633.elements = (object *)e_7328728;
c_7328633.elements[0] = ((closureN)self_7314254)->elements[0];
c_7328633.elements[1] = ((closureN)self_7314254)->elements[1];
c_7328633.elements[2] = ((closureN)self_7314254)->elements[2];



return_direct_with_clo1(data,(closure)&c_7328633,__lambda_1318,  Cyc_cdr(data, ((closureN)self_7314254)->elements[0]));}
;; 
}

static void __lambda_1318(void *data, object self_7314255, int argc, object *args) /* object self_7314255, object v_9328_732720_732744_732824_734068 */
 {
 object v_9328_732720_732744_732824_734068 = args[0];
  
closureN_type c_7328635;
object e_7328713 [2];
c_7328635.hdr.mark = gc_color_red;
 c_7328635.hdr.grayed = 0;
c_7328635.tag = closureN_tag;
 c_7328635.fn = (function_type)__lambda_1319;
c_7328635.num_args = 0;
c_7328635.num_elements = 2;
c_7328635.elements = (object *)e_7328713;
c_7328635.elements[0] = ((closureN)self_7314255)->elements[2];
c_7328635.elements[1] = v_9328_732720_732744_732824_734068;


closureN_type c_7328714;
object e_7328727 [2];
c_7328714.hdr.mark = gc_color_red;
 c_7328714.hdr.grayed = 0;
c_7328714.tag = closureN_tag;
 c_7328714.fn = (function_type)__lambda_1324;
c_7328714.num_args = 1;
c_7328714.num_elements = 2;
c_7328714.elements = (object *)e_7328727;
c_7328714.elements[0] = ((closureN)self_7314255)->elements[0];
c_7328714.elements[1] = ((closureN)self_7314255)->elements[1];

return_direct_with_clo1(data,(closure)&c_7328635,__lambda_1319,  &c_7328714);; 
}

static void __lambda_1324(void *data, object self_7314256, int argc, object *args) /* object self_7314256, object tmp_732741_732743_732823_734067 */
 {
 object tmp_732741_732743_732823_734067 = args[0];
  if( (boolean_f != tmp_732741_732743_732823_734067) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314256)->elements[1], (((closure)  ((closureN)self_7314256)->elements[1])->fn),  tmp_732741_732743_732823_734067);
} else { 
  
closureN_type c_7328718;
object e_7328724 [1];
c_7328718.hdr.mark = gc_color_red;
 c_7328718.hdr.grayed = 0;
c_7328718.tag = closureN_tag;
 c_7328718.fn = (function_type)__lambda_1325;
c_7328718.num_args = 1;
c_7328718.num_elements = 1;
c_7328718.elements = (object *)e_7328724;
c_7328718.elements[0] = ((closureN)self_7314256)->elements[1];


make_utf8_string_with_len(c_7328725, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7328718, &c_7328725, ((closureN)self_7314256)->elements[0]);}
;; 
}

static void __lambda_1325(void *data, object self_7314257, int argc, object *args) /* object self_7314257, object r_738084 */
 {
 object r_738084 = args[0];
  
pair_type local_7328723; 
return_direct_with_clo1(data,  ((closureN)self_7314257)->elements[0], (((closure)  ((closureN)self_7314257)->elements[0])->fn),  set_pair_as_expr(&local_7328723, r_738084, boolean_f));; 
}

static void __lambda_1319(void *data, object self_7314258, int argc, object *args) /* object self_7314258, object k_738086 */
 {
 object k_738086 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314258)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314258)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314258)->elements[1])))) ){ 
  
closureN_type c_7328653;
object e_7328709 [3];
c_7328653.hdr.mark = gc_color_red;
 c_7328653.hdr.grayed = 0;
c_7328653.tag = closureN_tag;
 c_7328653.fn = (function_type)__lambda_1320;
c_7328653.num_args = 1;
c_7328653.num_elements = 3;
c_7328653.elements = (object *)e_7328709;
c_7328653.elements[0] = k_738086;
c_7328653.elements[1] = ((closureN)self_7314258)->elements[0];
c_7328653.elements[2] = ((closureN)self_7314258)->elements[1];

return_closcall2(data,  ((closureN)self_7314258)->elements[0],  &c_7328653, quote_define);
} else { 
  return_direct_with_clo1(data,  k_738086, (((closure)  k_738086)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738086, (((closure)  k_738086)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738086, (((closure)  k_738086)->fn),  boolean_f);}
;; 
}

static void __lambda_1320(void *data, object self_7314259, int argc, object *args) /* object self_7314259, object r_738095 */
 {
 object r_738095 = args[0];
  
closureN_type c_7328656;
object e_7328708 [4];
c_7328656.hdr.mark = gc_color_red;
 c_7328656.hdr.grayed = 0;
c_7328656.tag = closureN_tag;
 c_7328656.fn = (function_type)__lambda_1321;
c_7328656.num_args = 1;
c_7328656.num_elements = 4;
c_7328656.elements = (object *)e_7328708;
c_7328656.elements[0] = ((closureN)self_7314259)->elements[0];
c_7328656.elements[1] = r_738095;
c_7328656.elements[2] = ((closureN)self_7314259)->elements[1];
c_7328656.elements[3] = ((closureN)self_7314259)->elements[2];

return_closcall2(data,  ((closureN)self_7314259)->elements[1],  &c_7328656, quote_call_91with_91values);; 
}

static void __lambda_1321(void *data, object self_7314260, int argc, object *args) /* object self_7314260, object r_738103 */
 {
 object r_738103 = args[0];
  
closureN_type c_7328659;
object e_7328707 [5];
c_7328659.hdr.mark = gc_color_red;
 c_7328659.hdr.grayed = 0;
c_7328659.tag = closureN_tag;
 c_7328659.fn = (function_type)__lambda_1322;
c_7328659.num_args = 1;
c_7328659.num_elements = 5;
c_7328659.elements = (object *)e_7328707;
c_7328659.elements[0] = ((closureN)self_7314260)->elements[0];
c_7328659.elements[1] = ((closureN)self_7314260)->elements[1];
c_7328659.elements[2] = r_738103;
c_7328659.elements[3] = ((closureN)self_7314260)->elements[2];
c_7328659.elements[4] = ((closureN)self_7314260)->elements[3];

return_closcall2(data,  ((closureN)self_7314260)->elements[2],  &c_7328659, quote_lambda);; 
}

static void __lambda_1322(void *data, object self_7314261, int argc, object *args) /* object self_7314261, object r_738113 */
 {
 object r_738113 = args[0];
  
closureN_type c_7328662;
object e_7328706 [5];
c_7328662.hdr.mark = gc_color_red;
 c_7328662.hdr.grayed = 0;
c_7328662.tag = closureN_tag;
 c_7328662.fn = (function_type)__lambda_1323;
c_7328662.num_args = 1;
c_7328662.num_elements = 5;
c_7328662.elements = (object *)e_7328706;
c_7328662.elements[0] = ((closureN)self_7314261)->elements[0];
c_7328662.elements[1] = ((closureN)self_7314261)->elements[1];
c_7328662.elements[2] = ((closureN)self_7314261)->elements[2];
c_7328662.elements[3] = r_738113;
c_7328662.elements[4] = ((closureN)self_7314261)->elements[4];

return_closcall2(data,  ((closureN)self_7314261)->elements[3],  &c_7328662, quote__list);; 
}

static void __lambda_1323(void *data, object self_7314262, int argc, object *args) /* object self_7314262, object r_738109_7312676_7312685_7312693 */
 {
 object r_738109_7312676_7312685_7312693 = args[0];
  
pair_type local_7328667; 

pair_type local_7328670; 

pair_type local_7328674; 



pair_type local_7328680; 

pair_type local_7328683; 

pair_type local_7328687; 

pair_type local_7328690; 

pair_type local_7328694; 

pair_type local_7328697; 





pair_type local_7328705; 
return_direct_with_clo1(data,  ((closureN)self_7314262)->elements[0], (((closure)  ((closureN)self_7314262)->elements[0])->fn),  set_pair_as_expr(&local_7328667, set_pair_as_expr(&local_7328670, ((closureN)self_7314262)->elements[1], set_pair_as_expr(&local_7328674, Cyc_car(data, ((closureN)self_7314262)->elements[4]), set_pair_as_expr(&local_7328680, set_pair_as_expr(&local_7328683, ((closureN)self_7314262)->elements[2], set_pair_as_expr(&local_7328687, set_pair_as_expr(&local_7328690, ((closureN)self_7314262)->elements[3], set_pair_as_expr(&local_7328694, NULL, set_pair_as_expr(&local_7328697, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314262)->elements[4])), NULL))), set_pair_as_expr(&local_7328705, r_738109_7312676_7312685_7312693, NULL))), NULL))), boolean_f));; 
}

static void __lambda_1285(void *data, object self_7314263, int argc, object *args) /* object self_7314263, object k_738125 */
 {
 object k_738125 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314263)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314263)->elements[1]))) ){ 
  
closureN_type c_7328203;
object e_7328620 [3];
c_7328203.hdr.mark = gc_color_red;
 c_7328203.hdr.grayed = 0;
c_7328203.tag = closureN_tag;
 c_7328203.fn = (function_type)__lambda_1286;
c_7328203.num_args = 1;
c_7328203.num_elements = 3;
c_7328203.elements = (object *)e_7328620;
c_7328203.elements[0] = k_738125;
c_7328203.elements[1] = ((closureN)self_7314263)->elements[0];
c_7328203.elements[2] = ((closureN)self_7314263)->elements[1];





return_direct_with_clo1(data,(closure)&c_7328203,__lambda_1286,  Cyc_car(data, Cyc_car(data, ((closureN)self_7314263)->elements[1])));
} else { 
  return_direct_with_clo1(data,  k_738125, (((closure)  k_738125)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738125, (((closure)  k_738125)->fn),  boolean_f);}
;; 
}

static void __lambda_1286(void *data, object self_7314264, int argc, object *args) /* object self_7314264, object var0_732759_732834_734078 */
 {
 object var0_732759_732834_734078 = args[0];
    
  
  
  
if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314264)->elements[2]))), obj_int2obj(1))) ){ 
  
closureN_type c_7328214;
object e_7328602 [4];
c_7328214.hdr.mark = gc_color_red;
 c_7328214.hdr.grayed = 0;
c_7328214.tag = closureN_tag;
 c_7328214.fn = (function_type)__lambda_1287;
c_7328214.num_args = 3;
c_7328214.num_elements = 4;
c_7328214.elements = (object *)e_7328602;
c_7328214.elements[0] = ((closureN)self_7314264)->elements[0];
c_7328214.elements[1] = ((closureN)self_7314264)->elements[1];
c_7328214.elements[2] = ((closureN)self_7314264)->elements[2];
c_7328214.elements[3] = var0_732759_732834_734078;






complex_num_type local_7328610; 






return_direct_with_clo3(data,(closure)&c_7328214,__lambda_1287,  Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314264)->elements[2])), Cyc_fast_sub(data,&local_7328610, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314264)->elements[2]))), obj_int2obj(1)), NULL);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314264)->elements[0], (((closure)  ((closureN)self_7314264)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1287(void *data, object self_7314265, int argc, object *args) /* object self_7314265, object ls_732689_732764_732837_734081, object i_732691_732765_732838_734082, object res_732690_732766_732839_734083 */
 {
 object ls_732689_732764_732837_734081 = args[0]; object i_732691_732765_732838_734082 = args[1]; object res_732690_732766_732839_734083 = args[2];
  
closureN_type c_7328216;
object e_7328601 [7];
c_7328216.hdr.mark = gc_color_red;
 c_7328216.hdr.grayed = 0;
c_7328216.tag = closureN_tag;
 c_7328216.fn = (function_type)__lambda_1288;
c_7328216.num_args = 1;
c_7328216.num_elements = 7;
c_7328216.elements = (object *)e_7328601;
c_7328216.elements[0] = i_732691_732765_732838_734082;
c_7328216.elements[1] = ((closureN)self_7314265)->elements[0];
c_7328216.elements[2] = ls_732689_732764_732837_734081;
c_7328216.elements[3] = ((closureN)self_7314265)->elements[1];
c_7328216.elements[4] = res_732690_732766_732839_734083;
c_7328216.elements[5] = ((closureN)self_7314265)->elements[2];
c_7328216.elements[6] = ((closureN)self_7314265)->elements[3];

return_direct_with_clo1(data,(closure)&c_7328216,__lambda_1288,  boolean_f);; 
}

static void __lambda_1288(void *data, object self_7314266, int argc, object *args) /* object self_7314266, object lp_9317_732709_732767_732840_734084 */
 {
 object lp_9317_732709_732767_732840_734084 = args[0];
  
closureN_type c_7328218;
object e_7328597 [7];
c_7328218.hdr.mark = gc_color_red;
 c_7328218.hdr.grayed = 0;
c_7328218.tag = closureN_tag;
 c_7328218.fn = (function_type)__lambda_1444;
c_7328218.num_args = 1;
c_7328218.num_elements = 7;
c_7328218.elements = (object *)e_7328597;
c_7328218.elements[0] = ((closureN)self_7314266)->elements[0];
c_7328218.elements[1] = ((closureN)self_7314266)->elements[1];
c_7328218.elements[2] = ((closureN)self_7314266)->elements[2];
c_7328218.elements[3] = ((closureN)self_7314266)->elements[3];
c_7328218.elements[4] = ((closureN)self_7314266)->elements[4];
c_7328218.elements[5] = ((closureN)self_7314266)->elements[5];
c_7328218.elements[6] = ((closureN)self_7314266)->elements[6];


pair_type local_7328600; 
return_direct_with_clo1(data,(closure)&c_7328218,__lambda_1444,  set_cell_as_expr(&local_7328600, lp_9317_732709_732767_732840_734084));; 
}

static void __lambda_1444(void *data, object self_7314267, int argc, object *args) /* object self_7314267, object lp_9317_732709_732767_732840_734084 */
 {
 object lp_9317_732709_732767_732840_734084 = args[0];
  
closureN_type c_7328220;
object e_7328235 [5];
c_7328220.hdr.mark = gc_color_red;
 c_7328220.hdr.grayed = 0;
c_7328220.tag = closureN_tag;
 c_7328220.fn = (function_type)__lambda_1289;
c_7328220.num_args = 1;
c_7328220.num_elements = 5;
c_7328220.elements = (object *)e_7328235;
c_7328220.elements[0] = ((closureN)self_7314267)->elements[0];
c_7328220.elements[1] = ((closureN)self_7314267)->elements[1];
c_7328220.elements[2] = lp_9317_732709_732767_732840_734084;
c_7328220.elements[3] = ((closureN)self_7314267)->elements[2];
c_7328220.elements[4] = ((closureN)self_7314267)->elements[4];


closureN_type c_7328236;
object e_7328596 [4];
c_7328236.hdr.mark = gc_color_red;
 c_7328236.hdr.grayed = 0;
c_7328236.tag = closureN_tag;
 c_7328236.fn = (function_type)__lambda_1291;
c_7328236.num_args = 3;
c_7328236.num_elements = 4;
c_7328236.elements = (object *)e_7328596;
c_7328236.elements[0] = lp_9317_732709_732767_732840_734084;
c_7328236.elements[1] = ((closureN)self_7314267)->elements[3];
c_7328236.elements[2] = ((closureN)self_7314267)->elements[5];
c_7328236.elements[3] = ((closureN)self_7314267)->elements[6];

return_direct_with_clo1(data,(closure)&c_7328220,__lambda_1289,  &c_7328236);; 
}

static void __lambda_1291(void *data, object self_7314268, int argc, object *args) /* object self_7314268, object k_738137, object ls_732689_732768_732841_734085, object i_732691_732769_732842_734086, object res_732690_732770_732843_734087 */
 {
 object k_738137 = args[0]; object ls_732689_732768_732841_734085 = args[1]; object i_732691_732769_732842_734086 = args[2]; object res_732690_732770_732843_734087 = args[3];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, obj_int2obj(0), i_732691_732769_732842_734086)) ){ 
  
closureN_type c_7328240;
object e_7328581 [5];
c_7328240.hdr.mark = gc_color_red;
 c_7328240.hdr.grayed = 0;
c_7328240.tag = closureN_tag;
 c_7328240.fn = (function_type)__lambda_1292;
c_7328240.num_args = 1;
c_7328240.num_elements = 5;
c_7328240.elements = (object *)e_7328581;
c_7328240.elements[0] = k_738137;
c_7328240.elements[1] = ls_732689_732768_732841_734085;
c_7328240.elements[2] = ((closureN)self_7314268)->elements[1];
c_7328240.elements[3] = ((closureN)self_7314268)->elements[2];
c_7328240.elements[4] = ((closureN)self_7314268)->elements[3];

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7328240, primitive_cons, NULL, res_732690_732770_732843_734087);
} else { 
  




complex_num_type local_7328590; 

pair_type local_7328593; 


return_closcall4(data,  car(((closureN)self_7314268)->elements[0]),  k_738137, Cyc_cdr(data, ls_732689_732768_732841_734085), Cyc_fast_sub(data,&local_7328590, i_732691_732769_732842_734086, obj_int2obj(1)), set_pair_as_expr(&local_7328593, Cyc_car(data, ls_732689_732768_732841_734085), res_732690_732770_732843_734087));}
;; 
}

static void __lambda_1292(void *data, object self_7314269, int argc, object *args) /* object self_7314269, object r_738310_7313015 */
 {
 object r_738310_7313015 = args[0];
  
closureN_type c_7328242;
object e_7328573 [4];
c_7328242.hdr.mark = gc_color_red;
 c_7328242.hdr.grayed = 0;
c_7328242.tag = closureN_tag;
 c_7328242.fn = (function_type)__lambda_1293;
c_7328242.num_args = 1;
c_7328242.num_elements = 4;
c_7328242.elements = (object *)e_7328573;
c_7328242.elements[0] = ((closureN)self_7314269)->elements[0];
c_7328242.elements[1] = ((closureN)self_7314269)->elements[2];
c_7328242.elements[2] = ((closureN)self_7314269)->elements[3];
c_7328242.elements[3] = ((closureN)self_7314269)->elements[4];


pair_type local_7328576; 

pair_type local_7328580; 
return_direct_with_clo1(data,(closure)&c_7328242,__lambda_1293,  set_pair_as_expr(&local_7328576, ((closureN)self_7314269)->elements[1], set_pair_as_expr(&local_7328580, r_738310_7313015, NULL)));; 
}

static void __lambda_1293(void *data, object self_7314270, int argc, object *args) /* object self_7314270, object v_9318_732710_732771_732844_734088_7313016 */
 {
 object v_9318_732710_732771_732844_734088_7313016 = args[0];
    
if( (boolean_f != Cyc_is_pair(v_9318_732710_732771_732844_734088_7313016)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, v_9318_732710_732771_732844_734088_7313016))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, v_9318_732710_732771_732844_734088_7313016)))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, v_9318_732710_732771_732844_734088_7313016))) ){ 
    complex_num_type local_7328261; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7328261, Cyc_car(data, Cyc_cdr(data, v_9318_732710_732771_732844_734088_7313016)))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, v_9318_732710_732771_732844_734088_7313016)))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314270)->elements[2]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314270)->elements[2])))) ){ 
  
closureN_type c_7328286;
object e_7328556 [5];
c_7328286.hdr.mark = gc_color_red;
 c_7328286.hdr.grayed = 0;
c_7328286.tag = closureN_tag;
 c_7328286.fn = (function_type)__lambda_1294;
c_7328286.num_args = 1;
c_7328286.num_elements = 5;
c_7328286.elements = (object *)e_7328556;
c_7328286.elements[0] = ((closureN)self_7314270)->elements[0];
c_7328286.elements[1] = ((closureN)self_7314270)->elements[1];
c_7328286.elements[2] = ((closureN)self_7314270)->elements[2];
c_7328286.elements[3] = v_9318_732710_732771_732844_734088_7313016;
c_7328286.elements[4] = ((closureN)self_7314270)->elements[3];

return_closcall2(data,  ((closureN)self_7314270)->elements[1],  &c_7328286, quote_begin);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314270)->elements[0], (((closure)  ((closureN)self_7314270)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314270)->elements[0], (((closure)  ((closureN)self_7314270)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314270)->elements[0], (((closure)  ((closureN)self_7314270)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314270)->elements[0], (((closure)  ((closureN)self_7314270)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314270)->elements[0], (((closure)  ((closureN)self_7314270)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314270)->elements[0], (((closure)  ((closureN)self_7314270)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314270)->elements[0], (((closure)  ((closureN)self_7314270)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314270)->elements[0], (((closure)  ((closureN)self_7314270)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1294(void *data, object self_7314271, int argc, object *args) /* object self_7314271, object r_738158_7313017 */
 {
 object r_738158_7313017 = args[0];
  
closureN_type c_7328289;
object e_7328555 [6];
c_7328289.hdr.mark = gc_color_red;
 c_7328289.hdr.grayed = 0;
c_7328289.tag = closureN_tag;
 c_7328289.fn = (function_type)__lambda_1295;
c_7328289.num_args = 1;
c_7328289.num_elements = 6;
c_7328289.elements = (object *)e_7328555;
c_7328289.elements[0] = ((closureN)self_7314271)->elements[0];
c_7328289.elements[1] = r_738158_7313017;
c_7328289.elements[2] = ((closureN)self_7314271)->elements[1];
c_7328289.elements[3] = ((closureN)self_7314271)->elements[2];
c_7328289.elements[4] = ((closureN)self_7314271)->elements[3];
c_7328289.elements[5] = ((closureN)self_7314271)->elements[4];

return_closcall2(data,  ((closureN)self_7314271)->elements[1],  &c_7328289, quote_define);; 
}

static void __lambda_1295(void *data, object self_7314272, int argc, object *args) /* object self_7314272, object r_738279_7313018 */
 {
 object r_738279_7313018 = args[0];
  
closureN_type c_7328292;
object e_7328554 [7];
c_7328292.hdr.mark = gc_color_red;
 c_7328292.hdr.grayed = 0;
c_7328292.tag = closureN_tag;
 c_7328292.fn = (function_type)__lambda_1296;
c_7328292.num_args = 1;
c_7328292.num_elements = 7;
c_7328292.elements = (object *)e_7328554;
c_7328292.elements[0] = ((closureN)self_7314272)->elements[0];
c_7328292.elements[1] = ((closureN)self_7314272)->elements[1];
c_7328292.elements[2] = r_738279_7313018;
c_7328292.elements[3] = ((closureN)self_7314272)->elements[2];
c_7328292.elements[4] = ((closureN)self_7314272)->elements[3];
c_7328292.elements[5] = ((closureN)self_7314272)->elements[4];
c_7328292.elements[6] = ((closureN)self_7314272)->elements[5];

return_closcall2(data,  ((closureN)self_7314272)->elements[2],  &c_7328292, quote_call_91with_91values);; 
}

static void __lambda_1296(void *data, object self_7314273, int argc, object *args) /* object self_7314273, object r_738287_7313019 */
 {
 object r_738287_7313019 = args[0];
  
closureN_type c_7328295;
object e_7328553 [8];
c_7328295.hdr.mark = gc_color_red;
 c_7328295.hdr.grayed = 0;
c_7328295.tag = closureN_tag;
 c_7328295.fn = (function_type)__lambda_1297;
c_7328295.num_args = 1;
c_7328295.num_elements = 8;
c_7328295.elements = (object *)e_7328553;
c_7328295.elements[0] = ((closureN)self_7314273)->elements[0];
c_7328295.elements[1] = ((closureN)self_7314273)->elements[1];
c_7328295.elements[2] = ((closureN)self_7314273)->elements[2];
c_7328295.elements[3] = r_738287_7313019;
c_7328295.elements[4] = ((closureN)self_7314273)->elements[3];
c_7328295.elements[5] = ((closureN)self_7314273)->elements[4];
c_7328295.elements[6] = ((closureN)self_7314273)->elements[5];
c_7328295.elements[7] = ((closureN)self_7314273)->elements[6];

return_closcall2(data,  ((closureN)self_7314273)->elements[3],  &c_7328295, quote_lambda);; 
}

static void __lambda_1297(void *data, object self_7314274, int argc, object *args) /* object self_7314274, object r_738297_7313020 */
 {
 object r_738297_7313020 = args[0];
  
closureN_type c_7328298;
object e_7328552 [9];
c_7328298.hdr.mark = gc_color_red;
 c_7328298.hdr.grayed = 0;
c_7328298.tag = closureN_tag;
 c_7328298.fn = (function_type)__lambda_1298;
c_7328298.num_args = 1;
c_7328298.num_elements = 9;
c_7328298.elements = (object *)e_7328552;
c_7328298.elements[0] = ((closureN)self_7314274)->elements[0];
c_7328298.elements[1] = ((closureN)self_7314274)->elements[1];
c_7328298.elements[2] = ((closureN)self_7314274)->elements[2];
c_7328298.elements[3] = ((closureN)self_7314274)->elements[3];
c_7328298.elements[4] = r_738297_7313020;
c_7328298.elements[5] = ((closureN)self_7314274)->elements[4];
c_7328298.elements[6] = ((closureN)self_7314274)->elements[5];
c_7328298.elements[7] = ((closureN)self_7314274)->elements[6];
c_7328298.elements[8] = ((closureN)self_7314274)->elements[7];

return_closcall2(data,  ((closureN)self_7314274)->elements[4],  &c_7328298, quote__list);; 
}

static void __lambda_1298(void *data, object self_7314275, int argc, object *args) /* object self_7314275, object r_738293_7311728_7311792_7311855_7313021 */
 {
 object r_738293_7311728_7311792_7311855_7313021 = args[0];
  
closureN_type c_7328300;
object e_7328458 [10];
c_7328300.hdr.mark = gc_color_red;
 c_7328300.hdr.grayed = 0;
c_7328300.tag = closureN_tag;
 c_7328300.fn = (function_type)__lambda_1299;
c_7328300.num_args = 1;
c_7328300.num_elements = 10;
c_7328300.elements = (object *)e_7328458;
c_7328300.elements[0] = ((closureN)self_7314275)->elements[0];
c_7328300.elements[1] = ((closureN)self_7314275)->elements[1];
c_7328300.elements[2] = ((closureN)self_7314275)->elements[2];
c_7328300.elements[3] = ((closureN)self_7314275)->elements[3];
c_7328300.elements[4] = r_738293_7311728_7311792_7311855_7313021;
c_7328300.elements[5] = ((closureN)self_7314275)->elements[4];
c_7328300.elements[6] = ((closureN)self_7314275)->elements[5];
c_7328300.elements[7] = ((closureN)self_7314275)->elements[6];
c_7328300.elements[8] = ((closureN)self_7314275)->elements[7];
c_7328300.elements[9] = ((closureN)self_7314275)->elements[8];


closureN_type c_7328459;
object e_7328551 [2];
c_7328459.hdr.mark = gc_color_red;
 c_7328459.hdr.grayed = 0;
c_7328459.tag = closureN_tag;
 c_7328459.fn = (function_type)__lambda_1309;
c_7328459.num_args = 1;
c_7328459.num_elements = 2;
c_7328459.elements = (object *)e_7328551;
c_7328459.elements[0] = ((closureN)self_7314275)->elements[5];
c_7328459.elements[1] = ((closureN)self_7314275)->elements[8];

return_direct_with_clo1(data,(closure)&c_7328300,__lambda_1299,  &c_7328459);; 
}

static void __lambda_1309(void *data, object self_7314276, int argc, object *args) /* object self_7314276, object k_738224_7311765_7311829_7311892_7311953_7312013_7312072_7312130_7312187_7312243_7313032, object var1_732792_732857_734101_7311766_7311830_7311893_7311954_7312014_7312073_7312131_7312188_7312244_7313033 */
 {
 object k_738224_7311765_7311829_7311892_7311953_7312013_7312072_7312130_7312187_7312243_7313032 = args[0]; object var1_732792_732857_734101_7311766_7311830_7311893_7311954_7312014_7312073_7312131_7312188_7312244_7313033 = args[1];
  
closureN_type c_7328462;
object e_7328550 [4];
c_7328462.hdr.mark = gc_color_red;
 c_7328462.hdr.grayed = 0;
c_7328462.tag = closureN_tag;
 c_7328462.fn = (function_type)__lambda_1310;
c_7328462.num_args = 1;
c_7328462.num_elements = 4;
c_7328462.elements = (object *)e_7328550;
c_7328462.elements[0] = k_738224_7311765_7311829_7311892_7311953_7312013_7312072_7312130_7312187_7312243_7313032;
c_7328462.elements[1] = ((closureN)self_7314276)->elements[0];
c_7328462.elements[2] = ((closureN)self_7314276)->elements[1];
c_7328462.elements[3] = var1_732792_732857_734101_7311766_7311830_7311893_7311954_7312014_7312073_7312131_7312188_7312244_7313033;

return_closcall2(data,  ((closureN)self_7314276)->elements[0],  &c_7328462, quote_define);; 
}

static void __lambda_1310(void *data, object self_7314277, int argc, object *args) /* object self_7314277, object r_738225_7311767_7311831_7311894_7311955_7312015_7312074_7312132_7312189_7312245_7313034 */
 {
 object r_738225_7311767_7311831_7311894_7311955_7312015_7312074_7312132_7312189_7312245_7313034 = args[0];
  
closureN_type c_7328465;
object e_7328549 [5];
c_7328465.hdr.mark = gc_color_red;
 c_7328465.hdr.grayed = 0;
c_7328465.tag = closureN_tag;
 c_7328465.fn = (function_type)__lambda_1311;
c_7328465.num_args = 1;
c_7328465.num_elements = 5;
c_7328465.elements = (object *)e_7328549;
c_7328465.elements[0] = ((closureN)self_7314277)->elements[0];
c_7328465.elements[1] = r_738225_7311767_7311831_7311894_7311955_7312015_7312074_7312132_7312189_7312245_7313034;
c_7328465.elements[2] = ((closureN)self_7314277)->elements[1];
c_7328465.elements[3] = ((closureN)self_7314277)->elements[2];
c_7328465.elements[4] = ((closureN)self_7314277)->elements[3];

return_closcall2(data,  ((closureN)self_7314277)->elements[1],  &c_7328465, quote_let);; 
}

static void __lambda_1311(void *data, object self_7314278, int argc, object *args) /* object self_7314278, object r_738233_7311768_7311832_7311895_7311956_7312016_7312075_7312133_7312190_7312246_7313035 */
 {
 object r_738233_7311768_7311832_7311895_7311956_7312016_7312075_7312133_7312190_7312246_7313035 = args[0];
  
closureN_type c_7328468;
object e_7328548 [6];
c_7328468.hdr.mark = gc_color_red;
 c_7328468.hdr.grayed = 0;
c_7328468.tag = closureN_tag;
 c_7328468.fn = (function_type)__lambda_1312;
c_7328468.num_args = 1;
c_7328468.num_elements = 6;
c_7328468.elements = (object *)e_7328548;
c_7328468.elements[0] = ((closureN)self_7314278)->elements[0];
c_7328468.elements[1] = ((closureN)self_7314278)->elements[1];
c_7328468.elements[2] = r_738233_7311768_7311832_7311895_7311956_7312016_7312075_7312133_7312190_7312246_7313035;
c_7328468.elements[3] = ((closureN)self_7314278)->elements[2];
c_7328468.elements[4] = ((closureN)self_7314278)->elements[3];
c_7328468.elements[5] = ((closureN)self_7314278)->elements[4];

return_closcall2(data,  ((closureN)self_7314278)->elements[2],  &c_7328468, quote_v);; 
}

static void __lambda_1312(void *data, object self_7314279, int argc, object *args) /* object self_7314279, object r_738264_7311769_7311833_7311896_7311957_7312017_7312076_7312134_7312191_7312247_7313036 */
 {
 object r_738264_7311769_7311833_7311896_7311957_7312017_7312076_7312134_7312191_7312247_7313036 = args[0];
  
closureN_type c_7328471;
object e_7328547 [7];
c_7328471.hdr.mark = gc_color_red;
 c_7328471.hdr.grayed = 0;
c_7328471.tag = closureN_tag;
 c_7328471.fn = (function_type)__lambda_1313;
c_7328471.num_args = 1;
c_7328471.num_elements = 7;
c_7328471.elements = (object *)e_7328547;
c_7328471.elements[0] = ((closureN)self_7314279)->elements[0];
c_7328471.elements[1] = ((closureN)self_7314279)->elements[1];
c_7328471.elements[2] = ((closureN)self_7314279)->elements[2];
c_7328471.elements[3] = r_738264_7311769_7311833_7311896_7311957_7312017_7312076_7312134_7312191_7312247_7313036;
c_7328471.elements[4] = ((closureN)self_7314279)->elements[3];
c_7328471.elements[5] = ((closureN)self_7314279)->elements[4];
c_7328471.elements[6] = ((closureN)self_7314279)->elements[5];

return_closcall2(data,  ((closureN)self_7314279)->elements[3],  &c_7328471, quote_cadr);; 
}

static void __lambda_1313(void *data, object self_7314280, int argc, object *args) /* object self_7314280, object r_738270_7311770_7311834_7311897_7311958_7312018_7312077_7312135_7312192_7312248_7313037 */
 {
 object r_738270_7311770_7311834_7311897_7311958_7312018_7312077_7312135_7312192_7312248_7313037 = args[0];
  
closureN_type c_7328474;
object e_7328546 [8];
c_7328474.hdr.mark = gc_color_red;
 c_7328474.hdr.grayed = 0;
c_7328474.tag = closureN_tag;
 c_7328474.fn = (function_type)__lambda_1314;
c_7328474.num_args = 1;
c_7328474.num_elements = 8;
c_7328474.elements = (object *)e_7328546;
c_7328474.elements[0] = ((closureN)self_7314280)->elements[0];
c_7328474.elements[1] = ((closureN)self_7314280)->elements[1];
c_7328474.elements[2] = ((closureN)self_7314280)->elements[2];
c_7328474.elements[3] = ((closureN)self_7314280)->elements[3];
c_7328474.elements[4] = r_738270_7311770_7311834_7311897_7311958_7312018_7312077_7312135_7312192_7312248_7313037;
c_7328474.elements[5] = ((closureN)self_7314280)->elements[4];
c_7328474.elements[6] = ((closureN)self_7314280)->elements[5];
c_7328474.elements[7] = ((closureN)self_7314280)->elements[6];

return_closcall2(data,  ((closureN)self_7314280)->elements[4],  &c_7328474, quote_set_91cdr_67);; 
}

static void __lambda_1314(void *data, object self_7314281, int argc, object *args) /* object self_7314281, object r_738246_7311776_7311840_7311903_7311964_7312024_7312083_7312141_7312198_7312254_7312521_7312539_7312556_7312572_7312587_7313038 */
 {
 object r_738246_7311776_7311840_7311903_7311964_7312024_7312083_7312141_7312198_7312254_7312521_7312539_7312556_7312572_7312587_7313038 = args[0];
  
closureN_type c_7328477;
object e_7328545 [9];
c_7328477.hdr.mark = gc_color_red;
 c_7328477.hdr.grayed = 0;
c_7328477.tag = closureN_tag;
 c_7328477.fn = (function_type)__lambda_1315;
c_7328477.num_args = 1;
c_7328477.num_elements = 9;
c_7328477.elements = (object *)e_7328545;
c_7328477.elements[0] = ((closureN)self_7314281)->elements[0];
c_7328477.elements[1] = ((closureN)self_7314281)->elements[1];
c_7328477.elements[2] = ((closureN)self_7314281)->elements[2];
c_7328477.elements[3] = r_738246_7311776_7311840_7311903_7311964_7312024_7312083_7312141_7312198_7312254_7312521_7312539_7312556_7312572_7312587_7313038;
c_7328477.elements[4] = ((closureN)self_7314281)->elements[3];
c_7328477.elements[5] = ((closureN)self_7314281)->elements[4];
c_7328477.elements[6] = ((closureN)self_7314281)->elements[5];
c_7328477.elements[7] = ((closureN)self_7314281)->elements[6];
c_7328477.elements[8] = ((closureN)self_7314281)->elements[7];

return_closcall2(data,  ((closureN)self_7314281)->elements[5],  &c_7328477, quote_cddr);; 
}

static void __lambda_1315(void *data, object self_7314282, int argc, object *args) /* object self_7314282, object r_738254_7311777_7311841_7311904_7311965_7312025_7312084_7312142_7312199_7312255_7312522_7312540_7312557_7312573_7312588_7313039 */
 {
 object r_738254_7311777_7311841_7311904_7311965_7312025_7312084_7312142_7312199_7312255_7312522_7312540_7312557_7312573_7312588_7313039 = args[0];
  
closureN_type c_7328480;
object e_7328544 [9];
c_7328480.hdr.mark = gc_color_red;
 c_7328480.hdr.grayed = 0;
c_7328480.tag = closureN_tag;
 c_7328480.fn = (function_type)__lambda_1316;
c_7328480.num_args = 1;
c_7328480.num_elements = 9;
c_7328480.elements = (object *)e_7328544;
c_7328480.elements[0] = ((closureN)self_7314282)->elements[0];
c_7328480.elements[1] = ((closureN)self_7314282)->elements[1];
c_7328480.elements[2] = ((closureN)self_7314282)->elements[2];
c_7328480.elements[3] = ((closureN)self_7314282)->elements[3];
c_7328480.elements[4] = r_738254_7311777_7311841_7311904_7311965_7312025_7312084_7312142_7312199_7312255_7312522_7312540_7312557_7312573_7312588_7313039;
c_7328480.elements[5] = ((closureN)self_7314282)->elements[4];
c_7328480.elements[6] = ((closureN)self_7314282)->elements[5];
c_7328480.elements[7] = ((closureN)self_7314282)->elements[7];
c_7328480.elements[8] = ((closureN)self_7314282)->elements[8];

return_closcall2(data,  ((closureN)self_7314282)->elements[6],  &c_7328480, quote_v);; 
}

static void __lambda_1316(void *data, object self_7314283, int argc, object *args) /* object self_7314283, object r_738242_7311783_7311847_7311910_7311971_7312031_7312090_7312148_7312205_7312261_7312528_7312546_7312563_7312579_7312594_7312606_7312617_7312627_7312636_7312644_7313040 */
 {
 object r_738242_7311783_7311847_7311910_7311971_7312031_7312090_7312148_7312205_7312261_7312528_7312546_7312563_7312579_7312594_7312606_7312617_7312627_7312636_7312644_7313040 = args[0];
  
pair_type local_7328485; 

pair_type local_7328489; 

pair_type local_7328493; 

pair_type local_7328496; 

pair_type local_7328500; 

pair_type local_7328503; 

pair_type local_7328506; 

pair_type local_7328510; 

pair_type local_7328513; 

pair_type local_7328517; 

pair_type local_7328521; 

pair_type local_7328524; 

pair_type local_7328528; 

pair_type local_7328532; 

pair_type local_7328535; 

pair_type local_7328539; 

pair_type local_7328543; 
return_direct_with_clo1(data,  ((closureN)self_7314283)->elements[0], (((closure)  ((closureN)self_7314283)->elements[0])->fn),  set_pair_as_expr(&local_7328485, ((closureN)self_7314283)->elements[1], set_pair_as_expr(&local_7328489, ((closureN)self_7314283)->elements[8], set_pair_as_expr(&local_7328493, set_pair_as_expr(&local_7328496, ((closureN)self_7314283)->elements[2], set_pair_as_expr(&local_7328500, set_pair_as_expr(&local_7328503, set_pair_as_expr(&local_7328506, ((closureN)self_7314283)->elements[5], set_pair_as_expr(&local_7328510, set_pair_as_expr(&local_7328513, ((closureN)self_7314283)->elements[6], set_pair_as_expr(&local_7328517, ((closureN)self_7314283)->elements[7], NULL)), NULL)), NULL), set_pair_as_expr(&local_7328521, set_pair_as_expr(&local_7328524, ((closureN)self_7314283)->elements[3], set_pair_as_expr(&local_7328528, ((closureN)self_7314283)->elements[7], set_pair_as_expr(&local_7328532, set_pair_as_expr(&local_7328535, ((closureN)self_7314283)->elements[4], set_pair_as_expr(&local_7328539, ((closureN)self_7314283)->elements[7], NULL)), NULL))), set_pair_as_expr(&local_7328543, r_738242_7311783_7311847_7311910_7311971_7312031_7312090_7312148_7312205_7312261_7312528_7312546_7312563_7312579_7312594_7312606_7312617_7312627_7312636_7312644_7313040, NULL)))), NULL))));; 
}

static void __lambda_1299(void *data, object self_7314284, int argc, object *args) /* object self_7314284, object r_738223_7311735_7311799_7311862_7311923_7311983_7312042_7312100_7312157_7312213_7313022 */
 {
 object r_738223_7311735_7311799_7311862_7311923_7311983_7312042_7312100_7312157_7312213_7313022 = args[0];
  
closureN_type c_7328302;
object e_7328452 [10];
c_7328302.hdr.mark = gc_color_red;
 c_7328302.hdr.grayed = 0;
c_7328302.tag = closureN_tag;
 c_7328302.fn = (function_type)__lambda_1300;
c_7328302.num_args = 1;
c_7328302.num_elements = 10;
c_7328302.elements = (object *)e_7328452;
c_7328302.elements[0] = ((closureN)self_7314284)->elements[0];
c_7328302.elements[1] = ((closureN)self_7314284)->elements[1];
c_7328302.elements[2] = ((closureN)self_7314284)->elements[2];
c_7328302.elements[3] = ((closureN)self_7314284)->elements[3];
c_7328302.elements[4] = ((closureN)self_7314284)->elements[4];
c_7328302.elements[5] = ((closureN)self_7314284)->elements[5];
c_7328302.elements[6] = ((closureN)self_7314284)->elements[6];
c_7328302.elements[7] = ((closureN)self_7314284)->elements[7];
c_7328302.elements[8] = ((closureN)self_7314284)->elements[8];
c_7328302.elements[9] = ((closureN)self_7314284)->elements[9];





return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7328302, r_738223_7311735_7311799_7311862_7311923_7311983_7312042_7312100_7312157_7312213_7313022, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314284)->elements[8])));; 
}

static void __lambda_1300(void *data, object self_7314285, int argc, object *args) /* object self_7314285, object r_738164_7311736_7311800_7311863_7311924_7311984_7312043_7312101_7312158_7312214_7313023 */
 {
 object r_738164_7311736_7311800_7311863_7311924_7311984_7312043_7312101_7312158_7312214_7313023 = args[0];
  
closureN_type c_7328305;
object e_7328451 [11];
c_7328305.hdr.mark = gc_color_red;
 c_7328305.hdr.grayed = 0;
c_7328305.tag = closureN_tag;
 c_7328305.fn = (function_type)__lambda_1301;
c_7328305.num_args = 1;
c_7328305.num_elements = 11;
c_7328305.elements = (object *)e_7328451;
c_7328305.elements[0] = ((closureN)self_7314285)->elements[0];
c_7328305.elements[1] = ((closureN)self_7314285)->elements[1];
c_7328305.elements[2] = r_738164_7311736_7311800_7311863_7311924_7311984_7312043_7312101_7312158_7312214_7313023;
c_7328305.elements[3] = ((closureN)self_7314285)->elements[2];
c_7328305.elements[4] = ((closureN)self_7314285)->elements[3];
c_7328305.elements[5] = ((closureN)self_7314285)->elements[4];
c_7328305.elements[6] = ((closureN)self_7314285)->elements[5];
c_7328305.elements[7] = ((closureN)self_7314285)->elements[6];
c_7328305.elements[8] = ((closureN)self_7314285)->elements[7];
c_7328305.elements[9] = ((closureN)self_7314285)->elements[8];
c_7328305.elements[10] = ((closureN)self_7314285)->elements[9];

return_closcall2(data,  ((closureN)self_7314285)->elements[6],  &c_7328305, quote_define);; 
}

static void __lambda_1301(void *data, object self_7314286, int argc, object *args) /* object self_7314286, object r_738169_7311737_7311801_7311864_7311925_7311985_7312044_7312102_7312159_7312215_7313024 */
 {
 object r_738169_7311737_7311801_7311864_7311925_7311985_7312044_7312102_7312159_7312215_7313024 = args[0];
  
closureN_type c_7328308;
object e_7328450 [12];
c_7328308.hdr.mark = gc_color_red;
 c_7328308.hdr.grayed = 0;
c_7328308.tag = closureN_tag;
 c_7328308.fn = (function_type)__lambda_1302;
c_7328308.num_args = 1;
c_7328308.num_elements = 12;
c_7328308.elements = (object *)e_7328450;
c_7328308.elements[0] = ((closureN)self_7314286)->elements[0];
c_7328308.elements[1] = ((closureN)self_7314286)->elements[1];
c_7328308.elements[2] = ((closureN)self_7314286)->elements[2];
c_7328308.elements[3] = r_738169_7311737_7311801_7311864_7311925_7311985_7312044_7312102_7312159_7312215_7313024;
c_7328308.elements[4] = ((closureN)self_7314286)->elements[3];
c_7328308.elements[5] = ((closureN)self_7314286)->elements[4];
c_7328308.elements[6] = ((closureN)self_7314286)->elements[5];
c_7328308.elements[7] = ((closureN)self_7314286)->elements[6];
c_7328308.elements[8] = ((closureN)self_7314286)->elements[7];
c_7328308.elements[9] = ((closureN)self_7314286)->elements[8];
c_7328308.elements[10] = ((closureN)self_7314286)->elements[9];
c_7328308.elements[11] = ((closureN)self_7314286)->elements[10];

return_closcall2(data,  ((closureN)self_7314286)->elements[7],  &c_7328308, quote_let);; 
}

static void __lambda_1302(void *data, object self_7314287, int argc, object *args) /* object self_7314287, object r_738177_7311738_7311802_7311865_7311926_7311986_7312045_7312103_7312160_7312216_7313025 */
 {
 object r_738177_7311738_7311802_7311865_7311926_7311986_7312045_7312103_7312160_7312216_7313025 = args[0];
  
closureN_type c_7328311;
object e_7328449 [13];
c_7328311.hdr.mark = gc_color_red;
 c_7328311.hdr.grayed = 0;
c_7328311.tag = closureN_tag;
 c_7328311.fn = (function_type)__lambda_1303;
c_7328311.num_args = 1;
c_7328311.num_elements = 13;
c_7328311.elements = (object *)e_7328449;
c_7328311.elements[0] = ((closureN)self_7314287)->elements[0];
c_7328311.elements[1] = ((closureN)self_7314287)->elements[1];
c_7328311.elements[2] = ((closureN)self_7314287)->elements[2];
c_7328311.elements[3] = ((closureN)self_7314287)->elements[3];
c_7328311.elements[4] = r_738177_7311738_7311802_7311865_7311926_7311986_7312045_7312103_7312160_7312216_7313025;
c_7328311.elements[5] = ((closureN)self_7314287)->elements[4];
c_7328311.elements[6] = ((closureN)self_7314287)->elements[5];
c_7328311.elements[7] = ((closureN)self_7314287)->elements[6];
c_7328311.elements[8] = ((closureN)self_7314287)->elements[7];
c_7328311.elements[9] = ((closureN)self_7314287)->elements[8];
c_7328311.elements[10] = ((closureN)self_7314287)->elements[9];
c_7328311.elements[11] = ((closureN)self_7314287)->elements[10];
c_7328311.elements[12] = ((closureN)self_7314287)->elements[11];

return_closcall2(data,  ((closureN)self_7314287)->elements[8],  &c_7328311, quote_v);; 
}

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

return_closcall2(data,  ((closureN)self_7314288)->elements[9],  &c_7328314, quote_cadr);; 
}

static void __lambda_1304(void *data, object self_7314289, int argc, object *args) /* object self_7314289, object r_738214_7311740_7311804_7311867_7311928_7311988_7312047_7312105_7312162_7312218_7313027 */
 {
 object r_738214_7311740_7311804_7311867_7311928_7311988_7312047_7312105_7312162_7312218_7313027 = args[0];
  
closureN_type c_7328317;
object e_7328447 [15];
c_7328317.hdr.mark = gc_color_red;
 c_7328317.hdr.grayed = 0;
c_7328317.tag = closureN_tag;
 c_7328317.fn = (function_type)__lambda_1305;
c_7328317.num_args = 1;
c_7328317.num_elements = 15;
c_7328317.elements = (object *)e_7328447;
c_7328317.elements[0] = ((closureN)self_7314289)->elements[0];
c_7328317.elements[1] = ((closureN)self_7314289)->elements[1];
c_7328317.elements[2] = ((closureN)self_7314289)->elements[2];
c_7328317.elements[3] = ((closureN)self_7314289)->elements[3];
c_7328317.elements[4] = ((closureN)self_7314289)->elements[4];
c_7328317.elements[5] = ((closureN)self_7314289)->elements[5];
c_7328317.elements[6] = r_738214_7311740_7311804_7311867_7311928_7311988_7312047_7312105_7312162_7312218_7313027;
c_7328317.elements[7] = ((closureN)self_7314289)->elements[6];
c_7328317.elements[8] = ((closureN)self_7314289)->elements[7];
c_7328317.elements[9] = ((closureN)self_7314289)->elements[8];
c_7328317.elements[10] = ((closureN)self_7314289)->elements[9];
c_7328317.elements[11] = ((closureN)self_7314289)->elements[10];
c_7328317.elements[12] = ((closureN)self_7314289)->elements[11];
c_7328317.elements[13] = ((closureN)self_7314289)->elements[12];
c_7328317.elements[14] = ((closureN)self_7314289)->elements[13];

return_closcall2(data,  ((closureN)self_7314289)->elements[10],  &c_7328317, quote_set_67);; 
}

static void __lambda_1305(void *data, object self_7314290, int argc, object *args) /* object self_7314290, object r_738190_7311746_7311810_7311873_7311934_7311994_7312053_7312111_7312168_7312224_7312273_7312296_7312318_7312339_7312359_7313028 */
 {
 object r_738190_7311746_7311810_7311873_7311934_7311994_7312053_7312111_7312168_7312224_7312273_7312296_7312318_7312339_7312359_7313028 = args[0];
  
closureN_type c_7328320;
object e_7328446 [16];
c_7328320.hdr.mark = gc_color_red;
 c_7328320.hdr.grayed = 0;
c_7328320.tag = closureN_tag;
 c_7328320.fn = (function_type)__lambda_1306;
c_7328320.num_args = 1;
c_7328320.num_elements = 16;
c_7328320.elements = (object *)e_7328446;
c_7328320.elements[0] = ((closureN)self_7314290)->elements[0];
c_7328320.elements[1] = ((closureN)self_7314290)->elements[1];
c_7328320.elements[2] = ((closureN)self_7314290)->elements[2];
c_7328320.elements[3] = ((closureN)self_7314290)->elements[3];
c_7328320.elements[4] = ((closureN)self_7314290)->elements[4];
c_7328320.elements[5] = r_738190_7311746_7311810_7311873_7311934_7311994_7312053_7312111_7312168_7312224_7312273_7312296_7312318_7312339_7312359_7313028;
c_7328320.elements[6] = ((closureN)self_7314290)->elements[5];
c_7328320.elements[7] = ((closureN)self_7314290)->elements[6];
c_7328320.elements[8] = ((closureN)self_7314290)->elements[7];
c_7328320.elements[9] = ((closureN)self_7314290)->elements[8];
c_7328320.elements[10] = ((closureN)self_7314290)->elements[9];
c_7328320.elements[11] = ((closureN)self_7314290)->elements[10];
c_7328320.elements[12] = ((closureN)self_7314290)->elements[11];
c_7328320.elements[13] = ((closureN)self_7314290)->elements[12];
c_7328320.elements[14] = ((closureN)self_7314290)->elements[13];
c_7328320.elements[15] = ((closureN)self_7314290)->elements[14];

return_closcall2(data,  ((closureN)self_7314290)->elements[11],  &c_7328320, quote_car);; 
}

static void __lambda_1306(void *data, object self_7314291, int argc, object *args) /* object self_7314291, object r_738198_7311747_7311811_7311874_7311935_7311995_7312054_7312112_7312169_7312225_7312274_7312297_7312319_7312340_7312360_7313029 */
 {
 object r_738198_7311747_7311811_7311874_7311935_7311995_7312054_7312112_7312169_7312225_7312274_7312297_7312319_7312340_7312360_7313029 = args[0];
  
closureN_type c_7328323;
object e_7328445 [16];
c_7328323.hdr.mark = gc_color_red;
 c_7328323.hdr.grayed = 0;
c_7328323.tag = closureN_tag;
 c_7328323.fn = (function_type)__lambda_1307;
c_7328323.num_args = 1;
c_7328323.num_elements = 16;
c_7328323.elements = (object *)e_7328445;
c_7328323.elements[0] = ((closureN)self_7314291)->elements[0];
c_7328323.elements[1] = ((closureN)self_7314291)->elements[1];
c_7328323.elements[2] = ((closureN)self_7314291)->elements[2];
c_7328323.elements[3] = ((closureN)self_7314291)->elements[3];
c_7328323.elements[4] = ((closureN)self_7314291)->elements[4];
c_7328323.elements[5] = ((closureN)self_7314291)->elements[5];
c_7328323.elements[6] = r_738198_7311747_7311811_7311874_7311935_7311995_7312054_7312112_7312169_7312225_7312274_7312297_7312319_7312340_7312360_7313029;
c_7328323.elements[7] = ((closureN)self_7314291)->elements[6];
c_7328323.elements[8] = ((closureN)self_7314291)->elements[7];
c_7328323.elements[9] = ((closureN)self_7314291)->elements[8];
c_7328323.elements[10] = ((closureN)self_7314291)->elements[9];
c_7328323.elements[11] = ((closureN)self_7314291)->elements[10];
c_7328323.elements[12] = ((closureN)self_7314291)->elements[11];
c_7328323.elements[13] = ((closureN)self_7314291)->elements[13];
c_7328323.elements[14] = ((closureN)self_7314291)->elements[14];
c_7328323.elements[15] = ((closureN)self_7314291)->elements[15];

return_closcall2(data,  ((closureN)self_7314291)->elements[12],  &c_7328323, quote_v);; 
}

static void __lambda_1307(void *data, object self_7314292, int argc, object *args) /* object self_7314292, object r_738186_7311753_7311817_7311880_7311941_7312001_7312060_7312118_7312175_7312231_7312280_7312303_7312325_7312346_7312366_7312383_7312399_7312414_7312428_7312441_7313030 */
 {
 object r_738186_7311753_7311817_7311880_7311941_7312001_7312060_7312118_7312175_7312231_7312280_7312303_7312325_7312346_7312366_7312383_7312399_7312414_7312428_7312441_7313030 = args[0];
  
closureN_type c_7328325;
object e_7328375 [8];
c_7328325.hdr.mark = gc_color_red;
 c_7328325.hdr.grayed = 0;
c_7328325.tag = closureN_tag;
 c_7328325.fn = (function_type)__lambda_1308;
c_7328325.num_args = 1;
c_7328325.num_elements = 8;
c_7328325.elements = (object *)e_7328375;
c_7328325.elements[0] = ((closureN)self_7314292)->elements[0];
c_7328325.elements[1] = ((closureN)self_7314292)->elements[1];
c_7328325.elements[2] = ((closureN)self_7314292)->elements[9];
c_7328325.elements[3] = ((closureN)self_7314292)->elements[10];
c_7328325.elements[4] = ((closureN)self_7314292)->elements[11];
c_7328325.elements[5] = ((closureN)self_7314292)->elements[12];
c_7328325.elements[6] = ((closureN)self_7314292)->elements[13];
c_7328325.elements[7] = ((closureN)self_7314292)->elements[15];


pair_type local_7328379; 

pair_type local_7328382; 

pair_type local_7328386; 





pair_type local_7328394; 

pair_type local_7328397; 

pair_type local_7328401; 

pair_type local_7328404; 

pair_type local_7328407; 

pair_type local_7328411; 

pair_type local_7328414; 

pair_type local_7328418; 

pair_type local_7328422; 

pair_type local_7328425; 

pair_type local_7328429; 

pair_type local_7328433; 

pair_type local_7328436; 

pair_type local_7328440; 

pair_type local_7328444; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7328325, ((closureN)self_7314292)->elements[2], set_pair_as_expr(&local_7328379, set_pair_as_expr(&local_7328382, ((closureN)self_7314292)->elements[3], set_pair_as_expr(&local_7328386, Cyc_car(data, Cyc_car(data, ((closureN)self_7314292)->elements[14])), set_pair_as_expr(&local_7328394, set_pair_as_expr(&local_7328397, ((closureN)self_7314292)->elements[4], set_pair_as_expr(&local_7328401, set_pair_as_expr(&local_7328404, set_pair_as_expr(&local_7328407, ((closureN)self_7314292)->elements[7], set_pair_as_expr(&local_7328411, set_pair_as_expr(&local_7328414, ((closureN)self_7314292)->elements[8], set_pair_as_expr(&local_7328418, ((closureN)self_7314292)->elements[15], NULL)), NULL)), NULL), set_pair_as_expr(&local_7328422, set_pair_as_expr(&local_7328425, ((closureN)self_7314292)->elements[5], set_pair_as_expr(&local_7328429, ((closureN)self_7314292)->elements[15], set_pair_as_expr(&local_7328433, set_pair_as_expr(&local_7328436, ((closureN)self_7314292)->elements[6], set_pair_as_expr(&local_7328440, ((closureN)self_7314292)->elements[15], NULL)), NULL))), set_pair_as_expr(&local_7328444, r_738186_7311753_7311817_7311880_7311941_7312001_7312060_7312118_7312175_7312231_7312280_7312303_7312325_7312346_7312366_7312383_7312399_7312414_7312428_7312441_7313030, NULL)))), NULL))), NULL));; 
}

static void __lambda_1308(void *data, object self_7314293, int argc, object *args) /* object self_7314293, object r_738162_7311762_7311826_7311889_7311950_7312010_7312069_7312127_7312184_7312240_7312289_7312312_7312334_7312355_7312375_7312392_7312408_7312423_7312437_7312450_7312461_7312471_7312480_7312488_7312495_7312501_7312506_7312510_7313031 */
 {
 object r_738162_7311762_7311826_7311889_7311950_7312010_7312069_7312127_7312184_7312240_7312289_7312312_7312334_7312355_7312375_7312392_7312408_7312423_7312437_7312450_7312461_7312471_7312480_7312488_7312495_7312501_7312506_7312510_7313031 = args[0];
  
pair_type local_7328330; 

pair_type local_7328333; 

pair_type local_7328337; 

pair_type local_7328340; 

pair_type local_7328344; 

pair_type local_7328348; 

pair_type local_7328351; 

pair_type local_7328355; 

pair_type local_7328358; 

pair_type local_7328362; 

pair_type local_7328365; 





pair_type local_7328373; 
return_direct_with_clo1(data,  ((closureN)self_7314293)->elements[0], (((closure)  ((closureN)self_7314293)->elements[0])->fn),  set_pair_as_expr(&local_7328330, set_pair_as_expr(&local_7328333, ((closureN)self_7314293)->elements[1], set_pair_as_expr(&local_7328337, set_pair_as_expr(&local_7328340, ((closureN)self_7314293)->elements[2], set_pair_as_expr(&local_7328344, ((closureN)self_7314293)->elements[7], set_pair_as_expr(&local_7328348, set_pair_as_expr(&local_7328351, ((closureN)self_7314293)->elements[3], set_pair_as_expr(&local_7328355, set_pair_as_expr(&local_7328358, ((closureN)self_7314293)->elements[5], set_pair_as_expr(&local_7328362, NULL, set_pair_as_expr(&local_7328365, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314293)->elements[6])), NULL))), set_pair_as_expr(&local_7328373, ((closureN)self_7314293)->elements[4], NULL))), NULL))), r_738162_7311762_7311826_7311889_7311950_7312010_7312069_7312127_7312184_7312240_7312289_7312312_7312334_7312355_7312375_7312392_7312408_7312423_7312437_7312450_7312461_7312471_7312480_7312488_7312495_7312501_7312506_7312510_7313031)), boolean_f));; 
}

static void __lambda_1289(void *data, object self_7314294, int argc, object *args) /* object self_7314294, object r_738136 */
 {
 object r_738136 = args[0];
  
closureN_type c_7328222;
object e_7328231 [5];
c_7328222.hdr.mark = gc_color_red;
 c_7328222.hdr.grayed = 0;
c_7328222.tag = closureN_tag;
 c_7328222.fn = (function_type)__lambda_1290;
c_7328222.num_args = 1;
c_7328222.num_elements = 5;
c_7328222.elements = (object *)e_7328231;
c_7328222.elements[0] = ((closureN)self_7314294)->elements[0];
c_7328222.elements[1] = ((closureN)self_7314294)->elements[1];
c_7328222.elements[2] = ((closureN)self_7314294)->elements[2];
c_7328222.elements[3] = ((closureN)self_7314294)->elements[3];
c_7328222.elements[4] = ((closureN)self_7314294)->elements[4];



return_direct_with_clo1(data,(closure)&c_7328222,__lambda_1290,  Cyc_set_cell(data, ((closureN)self_7314294)->elements[2], r_738136));; 
}

static void __lambda_1290(void *data, object self_7314295, int argc, object *args) /* object self_7314295, object r_738135 */
 {

  

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

static void __lambda_1281(void *data, object self_7314296, int argc, object *args) /* object self_7314296, object k_738317 */
 {
 object k_738317 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314296)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314296)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314296)->elements[1])))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314296)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314296)->elements[1])))) ){ 
  
closureN_type c_7328155;
object e_7328180 [2];
c_7328155.hdr.mark = gc_color_red;
 c_7328155.hdr.grayed = 0;
c_7328155.tag = closureN_tag;
 c_7328155.fn = (function_type)__lambda_1282;
c_7328155.num_args = 1;
c_7328155.num_elements = 2;
c_7328155.elements = (object *)e_7328180;
c_7328155.elements[0] = k_738317;
c_7328155.elements[1] = ((closureN)self_7314296)->elements[1];

return_closcall2(data,  ((closureN)self_7314296)->elements[0],  &c_7328155, quote_define);
} else { 
  return_direct_with_clo1(data,  k_738317, (((closure)  k_738317)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738317, (((closure)  k_738317)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738317, (((closure)  k_738317)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738317, (((closure)  k_738317)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738317, (((closure)  k_738317)->fn),  boolean_f);}
;; 
}

static void __lambda_1282(void *data, object self_7314297, int argc, object *args) /* object self_7314297, object r_738330 */
 {
 object r_738330 = args[0];
  
pair_type local_7328160; 

pair_type local_7328163; 

pair_type local_7328166; 





pair_type local_7328174; 




return_direct_with_clo1(data,  ((closureN)self_7314297)->elements[0], (((closure)  ((closureN)self_7314297)->elements[0])->fn),  set_pair_as_expr(&local_7328160, set_pair_as_expr(&local_7328163, r_738330, set_pair_as_expr(&local_7328166, Cyc_car(data, Cyc_car(data, ((closureN)self_7314297)->elements[1])), set_pair_as_expr(&local_7328174, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314297)->elements[1])), NULL))), boolean_f));; 
}

static void __lambda_1271(void *data, object self_7314298, int argc, object *args) /* object self_7314298, object k_738339 */
 {
 object k_738339 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314298)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7314298)->elements[1]))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314298)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314298)->elements[1])))) ){ 
  
closureN_type c_7328038;
object e_7328110 [3];
c_7328038.hdr.mark = gc_color_red;
 c_7328038.hdr.grayed = 0;
c_7328038.tag = closureN_tag;
 c_7328038.fn = (function_type)__lambda_1272;
c_7328038.num_args = 1;
c_7328038.num_elements = 3;
c_7328038.elements = (object *)e_7328110;
c_7328038.elements[0] = k_738339;
c_7328038.elements[1] = ((closureN)self_7314298)->elements[0];
c_7328038.elements[2] = ((closureN)self_7314298)->elements[1];

return_closcall2(data,  ((closureN)self_7314298)->elements[0],  &c_7328038, quote_define);
} else { 
  return_direct_with_clo1(data,  k_738339, (((closure)  k_738339)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738339, (((closure)  k_738339)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738339, (((closure)  k_738339)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738339, (((closure)  k_738339)->fn),  boolean_f);}
;; 
}

static void __lambda_1272(void *data, object self_7314299, int argc, object *args) /* object self_7314299, object r_738349 */
 {
 object r_738349 = args[0];
  
closureN_type c_7328041;
object e_7328109 [4];
c_7328041.hdr.mark = gc_color_red;
 c_7328041.hdr.grayed = 0;
c_7328041.tag = closureN_tag;
 c_7328041.fn = (function_type)__lambda_1273;
c_7328041.num_args = 1;
c_7328041.num_elements = 4;
c_7328041.elements = (object *)e_7328109;
c_7328041.elements[0] = ((closureN)self_7314299)->elements[0];
c_7328041.elements[1] = r_738349;
c_7328041.elements[2] = ((closureN)self_7314299)->elements[1];
c_7328041.elements[3] = ((closureN)self_7314299)->elements[2];

return_closcall2(data,  ((closureN)self_7314299)->elements[1],  &c_7328041, quote_dummy);; 
}

static void __lambda_1273(void *data, object self_7314300, int argc, object *args) /* object self_7314300, object r_738352 */
 {
 object r_738352 = args[0];
  
closureN_type c_7328044;
object e_7328108 [5];
c_7328044.hdr.mark = gc_color_red;
 c_7328044.hdr.grayed = 0;
c_7328044.tag = closureN_tag;
 c_7328044.fn = (function_type)__lambda_1274;
c_7328044.num_args = 1;
c_7328044.num_elements = 5;
c_7328044.elements = (object *)e_7328108;
c_7328044.elements[0] = ((closureN)self_7314300)->elements[0];
c_7328044.elements[1] = ((closureN)self_7314300)->elements[1];
c_7328044.elements[2] = r_738352;
c_7328044.elements[3] = ((closureN)self_7314300)->elements[2];
c_7328044.elements[4] = ((closureN)self_7314300)->elements[3];

return_closcall2(data,  ((closureN)self_7314300)->elements[2],  &c_7328044, quote_call_91with_91values);; 
}

static void __lambda_1274(void *data, object self_7314301, int argc, object *args) /* object self_7314301, object r_738358 */
 {
 object r_738358 = args[0];
  
closureN_type c_7328047;
object e_7328107 [6];
c_7328047.hdr.mark = gc_color_red;
 c_7328047.hdr.grayed = 0;
c_7328047.tag = closureN_tag;
 c_7328047.fn = (function_type)__lambda_1275;
c_7328047.num_args = 1;
c_7328047.num_elements = 6;
c_7328047.elements = (object *)e_7328107;
c_7328047.elements[0] = ((closureN)self_7314301)->elements[0];
c_7328047.elements[1] = ((closureN)self_7314301)->elements[1];
c_7328047.elements[2] = ((closureN)self_7314301)->elements[2];
c_7328047.elements[3] = r_738358;
c_7328047.elements[4] = ((closureN)self_7314301)->elements[3];
c_7328047.elements[5] = ((closureN)self_7314301)->elements[4];

return_closcall2(data,  ((closureN)self_7314301)->elements[3],  &c_7328047, quote_lambda);; 
}

static void __lambda_1275(void *data, object self_7314302, int argc, object *args) /* object self_7314302, object r_738377 */
 {
 object r_738377 = args[0];
  
closureN_type c_7328050;
object e_7328106 [7];
c_7328050.hdr.mark = gc_color_red;
 c_7328050.hdr.grayed = 0;
c_7328050.tag = closureN_tag;
 c_7328050.fn = (function_type)__lambda_1276;
c_7328050.num_args = 1;
c_7328050.num_elements = 7;
c_7328050.elements = (object *)e_7328106;
c_7328050.elements[0] = ((closureN)self_7314302)->elements[0];
c_7328050.elements[1] = ((closureN)self_7314302)->elements[1];
c_7328050.elements[2] = ((closureN)self_7314302)->elements[2];
c_7328050.elements[3] = ((closureN)self_7314302)->elements[3];
c_7328050.elements[4] = r_738377;
c_7328050.elements[5] = ((closureN)self_7314302)->elements[4];
c_7328050.elements[6] = ((closureN)self_7314302)->elements[5];

return_closcall2(data,  ((closureN)self_7314302)->elements[4],  &c_7328050, quote_lambda);; 
}

static void __lambda_1276(void *data, object self_7314303, int argc, object *args) /* object self_7314303, object r_738367_7311638_7311651_7311663 */
 {
 object r_738367_7311638_7311651_7311663 = args[0];
  
closureN_type c_7328053;
object e_7328105 [7];
c_7328053.hdr.mark = gc_color_red;
 c_7328053.hdr.grayed = 0;
c_7328053.tag = closureN_tag;
 c_7328053.fn = (function_type)__lambda_1277;
c_7328053.num_args = 1;
c_7328053.num_elements = 7;
c_7328053.elements = (object *)e_7328105;
c_7328053.elements[0] = ((closureN)self_7314303)->elements[0];
c_7328053.elements[1] = ((closureN)self_7314303)->elements[1];
c_7328053.elements[2] = ((closureN)self_7314303)->elements[2];
c_7328053.elements[3] = ((closureN)self_7314303)->elements[3];
c_7328053.elements[4] = r_738367_7311638_7311651_7311663;
c_7328053.elements[5] = ((closureN)self_7314303)->elements[4];
c_7328053.elements[6] = ((closureN)self_7314303)->elements[6];

return_closcall2(data,  ((closureN)self_7314303)->elements[5],  &c_7328053, quote_args);; 
}

static void __lambda_1277(void *data, object self_7314304, int argc, object *args) /* object self_7314304, object r_738370_7311639_7311652_7311664 */
 {
 object r_738370_7311639_7311652_7311664 = args[0];
  
pair_type local_7328058; 

pair_type local_7328061; 

pair_type local_7328065; 

pair_type local_7328069; 

pair_type local_7328072; 

pair_type local_7328076; 

pair_type local_7328079; 

pair_type local_7328083; 

pair_type local_7328086; 





pair_type local_7328094; 

pair_type local_7328097; 

pair_type local_7328101; 

pair_type local_7328104; 
return_direct_with_clo1(data,  ((closureN)self_7314304)->elements[0], (((closure)  ((closureN)self_7314304)->elements[0])->fn),  set_pair_as_expr(&local_7328058, set_pair_as_expr(&local_7328061, ((closureN)self_7314304)->elements[1], set_pair_as_expr(&local_7328065, ((closureN)self_7314304)->elements[2], set_pair_as_expr(&local_7328069, set_pair_as_expr(&local_7328072, ((closureN)self_7314304)->elements[3], set_pair_as_expr(&local_7328076, set_pair_as_expr(&local_7328079, ((closureN)self_7314304)->elements[5], set_pair_as_expr(&local_7328083, NULL, set_pair_as_expr(&local_7328086, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314304)->elements[6])), NULL))), set_pair_as_expr(&local_7328094, set_pair_as_expr(&local_7328097, ((closureN)self_7314304)->elements[4], set_pair_as_expr(&local_7328101, r_738370_7311639_7311652_7311664, set_pair_as_expr(&local_7328104, boolean_f, NULL))), NULL))), NULL))), boolean_f));; 
}

static void __lambda_1238(void *data, object _, int argc, object *args) /* closure _,object k_737908, object expr_732618_734042, object rename_732619_734043, object compare_732620_734044 */
 {
object k_737908 = args[0]; object expr_732618_734042 = args[1]; object rename_732619_734043 = args[2];
  object name_732626_734046;
  Cyc_st_add(data, "scheme/base.sld:define-record-type");
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, expr_732618_734042))) ){ 
  
  
  name_732626_734046 = Cyc_car(data, Cyc_cadr(data, expr_732618_734042));
} else { 
  
  name_732626_734046 = Cyc_cadr(data, expr_732618_734042);}
;
closureN_type c_7327563;
object e_7327576 [1];
c_7327563.hdr.mark = gc_color_red;
 c_7327563.hdr.grayed = 0;
c_7327563.tag = closureN_tag;
 c_7327563.fn = (function_type)__lambda_1239;
c_7327563.num_args = 0;
c_7327563.num_elements = 1;
c_7327563.elements = (object *)e_7327576;
c_7327563.elements[0] = expr_732618_734042;


closureN_type c_7327577;
object e_7328010 [4];
c_7327577.hdr.mark = gc_color_red;
 c_7327577.hdr.grayed = 0;
c_7327577.tag = closureN_tag;
 c_7327577.fn = (function_type)__lambda_1240;
c_7327577.num_args = 1;
c_7327577.num_elements = 4;
c_7327577.elements = (object *)e_7328010;
c_7327577.elements[0] = expr_732618_734042;
c_7327577.elements[1] = k_737908;
c_7327577.elements[2] = name_732626_734046;
c_7327577.elements[3] = rename_732619_734043;

return_direct_with_clo1(data,(closure)&c_7327563,__lambda_1239,  &c_7327577);; 
}

static void __lambda_1240(void *data, object self_7314217, int argc, object *args) /* object self_7314217, object parent_732629_734047 */
 {
 object parent_732629_734047 = args[0];
  
closureN_type c_7327580;
object e_7328009 [5];
c_7327580.hdr.mark = gc_color_red;
 c_7327580.hdr.grayed = 0;
c_7327580.tag = closureN_tag;
 c_7327580.fn = (function_type)__lambda_1241;
c_7327580.num_args = 1;
c_7327580.num_elements = 5;
c_7327580.elements = (object *)e_7328009;
c_7327580.elements[0] = ((closureN)self_7314217)->elements[0];
c_7327580.elements[1] = ((closureN)self_7314217)->elements[1];
c_7327580.elements[2] = ((closureN)self_7314217)->elements[2];
c_7327580.elements[3] = parent_732629_734047;
c_7327580.elements[4] = ((closureN)self_7314217)->elements[3];

return_closcall2(data,  ((closureN)self_7314217)->elements[3],  &c_7327580, quote_define);; 
}

static void __lambda_1241(void *data, object self_7314218, int argc, object *args) /* object self_7314218, object _191define_732647_734053 */
 {
 object _191define_732647_734053 = args[0];
  
closureN_type c_7327583;
object e_7328008 [6];
c_7327583.hdr.mark = gc_color_red;
 c_7327583.hdr.grayed = 0;
c_7327583.tag = closureN_tag;
 c_7327583.fn = (function_type)__lambda_1242;
c_7327583.num_args = 1;
c_7327583.num_elements = 6;
c_7327583.elements = (object *)e_7328008;
c_7327583.elements[0] = _191define_732647_734053;
c_7327583.elements[1] = ((closureN)self_7314218)->elements[0];
c_7327583.elements[2] = ((closureN)self_7314218)->elements[1];
c_7327583.elements[3] = ((closureN)self_7314218)->elements[2];
c_7327583.elements[4] = ((closureN)self_7314218)->elements[3];
c_7327583.elements[5] = ((closureN)self_7314218)->elements[4];

return_closcall2(data,  ((closureN)self_7314218)->elements[4],  &c_7327583, quote_lambda);; 
}

static void __lambda_1242(void *data, object self_7314219, int argc, object *args) /* object self_7314219, object _191lambda_732650_734054 */
 {
 object _191lambda_732650_734054 = args[0];
  
closureN_type c_7327586;
object e_7328007 [7];
c_7327586.hdr.mark = gc_color_red;
 c_7327586.hdr.grayed = 0;
c_7327586.tag = closureN_tag;
 c_7327586.fn = (function_type)__lambda_1243;
c_7327586.num_args = 1;
c_7327586.num_elements = 7;
c_7327586.elements = (object *)e_7328007;
c_7327586.elements[0] = ((closureN)self_7314219)->elements[0];
c_7327586.elements[1] = _191lambda_732650_734054;
c_7327586.elements[2] = ((closureN)self_7314219)->elements[1];
c_7327586.elements[3] = ((closureN)self_7314219)->elements[2];
c_7327586.elements[4] = ((closureN)self_7314219)->elements[3];
c_7327586.elements[5] = ((closureN)self_7314219)->elements[4];
c_7327586.elements[6] = ((closureN)self_7314219)->elements[5];

return_closcall2(data,  ((closureN)self_7314219)->elements[5],  &c_7327586, quote_let);; 
}

static void __lambda_1243(void *data, object self_7314220, int argc, object *args) /* object self_7314220, object _191let_732653_734055 */
 {

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

return_closcall2(data,  ((closureN)self_7314220)->elements[6],  &c_7327589, quote_register_91simple_91type);; 
}

static void __lambda_1244(void *data, object self_7314221, int argc, object *args) /* object self_7314221, object _191register_732656_734056 */
 {
 object _191register_732656_734056 = args[0];
  
closureN_type c_7327592;
object e_7328005 [8];
c_7327592.hdr.mark = gc_color_red;
 c_7327592.hdr.grayed = 0;
c_7327592.tag = closureN_tag;
 c_7327592.fn = (function_type)__lambda_1245;
c_7327592.num_args = 1;
c_7327592.num_elements = 8;
c_7327592.elements = (object *)e_7328005;
c_7327592.elements[0] = ((closureN)self_7314221)->elements[0];
c_7327592.elements[1] = ((closureN)self_7314221)->elements[1];
c_7327592.elements[2] = _191register_732656_734056;
c_7327592.elements[3] = ((closureN)self_7314221)->elements[2];
c_7327592.elements[4] = ((closureN)self_7314221)->elements[3];
c_7327592.elements[5] = ((closureN)self_7314221)->elements[4];
c_7327592.elements[6] = ((closureN)self_7314221)->elements[5];
c_7327592.elements[7] = ((closureN)self_7314221)->elements[6];

return_closcall2(data,  ((closureN)self_7314221)->elements[6],  &c_7327592, quote_slot_91set_67);; 
}

static void __lambda_1245(void *data, object self_7314222, int argc, object *args) /* object self_7314222, object _191slot_91set_67_732659_734057 */
 {

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

return_closcall2(data,  ((closureN)self_7314222)->elements[7],  &c_7327595, quote_type_91slot_91offset);; 
}

static void __lambda_1246(void *data, object self_7314223, int argc, object *args) /* object self_7314223, object _191type_191slot_191offset_732662_734058 */
 {
 object _191type_191slot_191offset_732662_734058 = args[0];
  
closureN_type c_7327597;
object e_7327610 [2];
c_7327597.hdr.mark = gc_color_red;
 c_7327597.hdr.grayed = 0;
c_7327597.tag = closureN_tag;
 c_7327597.fn = (function_type)__lambda_1247;
c_7327597.num_args = 0;
c_7327597.num_elements = 2;
c_7327597.elements = (object *)e_7327610;
c_7327597.elements[0] = ((closureN)self_7314223)->elements[3];
c_7327597.elements[1] = ((closureN)self_7314223)->elements[5];


closureN_type c_7327611;
object e_7328003 [9];
c_7327611.hdr.mark = gc_color_red;
 c_7327611.hdr.grayed = 0;
c_7327611.tag = closureN_tag;
 c_7327611.fn = (function_type)__lambda_1248;
c_7327611.num_args = 1;
c_7327611.num_elements = 9;
c_7327611.elements = (object *)e_7328003;
c_7327611.elements[0] = ((closureN)self_7314223)->elements[0];
c_7327611.elements[1] = ((closureN)self_7314223)->elements[1];
c_7327611.elements[2] = ((closureN)self_7314223)->elements[2];
c_7327611.elements[3] = _191type_191slot_191offset_732662_734058;
c_7327611.elements[4] = ((closureN)self_7314223)->elements[3];
c_7327611.elements[5] = ((closureN)self_7314223)->elements[4];
c_7327611.elements[6] = ((closureN)self_7314223)->elements[5];
c_7327611.elements[7] = ((closureN)self_7314223)->elements[6];
c_7327611.elements[8] = ((closureN)self_7314223)->elements[7];

return_direct_with_clo1(data,(closure)&c_7327597,__lambda_1247,  &c_7327611);; 
}

static void __lambda_1248(void *data, object self_7314224, int argc, object *args) /* object self_7314224, object r_737923 */
 {

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

return_closcall2(data,  ((closureN)self_7314224)->elements[8],  &c_7327614, quote_begin);; 
}

static void __lambda_1249(void *data, object self_7314225, int argc, object *args) /* object self_7314225, object r_737924 */
 {
 object r_737924 = args[0];
  
closureN_type c_7327616;
object e_7327996 [10];
c_7327616.hdr.mark = gc_color_red;
 c_7327616.hdr.grayed = 0;
c_7327616.tag = closureN_tag;
 c_7327616.fn = (function_type)__lambda_1250;
c_7327616.num_args = 1;
c_7327616.num_elements = 10;
c_7327616.elements = (object *)e_7327996;
c_7327616.elements[0] = ((closureN)self_7314225)->elements[0];
c_7327616.elements[1] = ((closureN)self_7314225)->elements[1];
c_7327616.elements[2] = ((closureN)self_7314225)->elements[2];
c_7327616.elements[3] = ((closureN)self_7314225)->elements[3];
c_7327616.elements[4] = ((closureN)self_7314225)->elements[4];
c_7327616.elements[5] = ((closureN)self_7314225)->elements[5];
c_7327616.elements[6] = ((closureN)self_7314225)->elements[6];
c_7327616.elements[7] = ((closureN)self_7314225)->elements[7];
c_7327616.elements[8] = r_737924;
c_7327616.elements[9] = ((closureN)self_7314225)->elements[8];





return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7327616, primitive_car, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314225)->elements[4])));; 
}

static void __lambda_1250(void *data, object self_7314226, int argc, object *args) /* object self_7314226, object r_738057 */
 {
 object r_738057 = args[0];
  
closureN_type c_7327619;
object e_7327995 [11];
c_7327619.hdr.mark = gc_color_red;
 c_7327619.hdr.grayed = 0;
c_7327619.tag = closureN_tag;
 c_7327619.fn = (function_type)__lambda_1251;
c_7327619.num_args = 1;
c_7327619.num_elements = 11;
c_7327619.elements = (object *)e_7327995;
c_7327619.elements[0] = ((closureN)self_7314226)->elements[0];
c_7327619.elements[1] = ((closureN)self_7314226)->elements[1];
c_7327619.elements[2] = ((closureN)self_7314226)->elements[2];
c_7327619.elements[3] = ((closureN)self_7314226)->elements[3];
c_7327619.elements[4] = ((closureN)self_7314226)->elements[4];
c_7327619.elements[5] = ((closureN)self_7314226)->elements[5];
c_7327619.elements[6] = ((closureN)self_7314226)->elements[6];
c_7327619.elements[7] = ((closureN)self_7314226)->elements[7];
c_7327619.elements[8] = ((closureN)self_7314226)->elements[8];
c_7327619.elements[9] = r_738057;
c_7327619.elements[10] = ((closureN)self_7314226)->elements[9];

return_closcall2(data,  ((closureN)self_7314226)->elements[9],  &c_7327619, quote_make_91type_91predicate);; 
}

static void __lambda_1251(void *data, object self_7314227, int argc, object *args) /* object self_7314227, object r_738036 */
 {
 object r_738036 = args[0];
  
closureN_type c_7327621;
object e_7327916 [12];
c_7327621.hdr.mark = gc_color_red;
 c_7327621.hdr.grayed = 0;
c_7327621.tag = closureN_tag;
 c_7327621.fn = (function_type)__lambda_1252;
c_7327621.num_args = 1;
c_7327621.num_elements = 12;
c_7327621.elements = (object *)e_7327916;
c_7327621.elements[0] = ((closureN)self_7314227)->elements[0];
c_7327621.elements[1] = ((closureN)self_7314227)->elements[1];
c_7327621.elements[2] = ((closureN)self_7314227)->elements[2];
c_7327621.elements[3] = ((closureN)self_7314227)->elements[3];
c_7327621.elements[4] = ((closureN)self_7314227)->elements[4];
c_7327621.elements[5] = ((closureN)self_7314227)->elements[5];
c_7327621.elements[6] = ((closureN)self_7314227)->elements[6];
c_7327621.elements[7] = ((closureN)self_7314227)->elements[7];
c_7327621.elements[8] = ((closureN)self_7314227)->elements[8];
c_7327621.elements[9] = r_738036;
c_7327621.elements[10] = ((closureN)self_7314227)->elements[9];
c_7327621.elements[11] = ((closureN)self_7314227)->elements[10];


closureN_type c_7327917;
object e_7327994 [4];
c_7327917.hdr.mark = gc_color_red;
 c_7327917.hdr.grayed = 0;
c_7327917.tag = closureN_tag;
 c_7327917.fn = (function_type)__lambda_1266;
c_7327917.num_args = 1;
c_7327917.num_elements = 4;
c_7327917.elements = (object *)e_7327994;
c_7327917.elements[0] = ((closureN)self_7314227)->elements[0];
c_7327917.elements[1] = ((closureN)self_7314227)->elements[3];
c_7327917.elements[2] = ((closureN)self_7314227)->elements[6];
c_7327917.elements[3] = ((closureN)self_7314227)->elements[10];

return_direct_with_clo1(data,(closure)&c_7327621,__lambda_1252,  &c_7327917);; 
}

static void __lambda_1266(void *data, object self_7314228, int argc, object *args) /* object self_7314228, object k_738002, object f_732667_734059 */
 {
 object k_738002 = args[0]; object f_732667_734059 = args[1];
    
if( (boolean_f != Cyc_is_pair(f_732667_734059)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732667_734059))) ){ 
  
closureN_type c_7327926;
object e_7327991 [5];
c_7327926.hdr.mark = gc_color_red;
 c_7327926.hdr.grayed = 0;
c_7327926.tag = closureN_tag;
 c_7327926.fn = (function_type)__lambda_1267;
c_7327926.num_args = 1;
c_7327926.num_elements = 5;
c_7327926.elements = (object *)e_7327991;
c_7327926.elements[0] = ((closureN)self_7314228)->elements[0];
c_7327926.elements[1] = ((closureN)self_7314228)->elements[1];
c_7327926.elements[2] = f_732667_734059;
c_7327926.elements[3] = k_738002;
c_7327926.elements[4] = ((closureN)self_7314228)->elements[2];

return_closcall2(data,  ((closureN)self_7314228)->elements[3],  &c_7327926, quote_make_91getter);
} else { 
  return_direct_with_clo1(data,  k_738002, (((closure)  k_738002)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_738002, (((closure)  k_738002)->fn),  boolean_f);}
;; 
}

static void __lambda_1267(void *data, object self_7314229, int argc, object *args) /* object self_7314229, object r_738010 */
 {
 object r_738010 = args[0];
  
closureN_type c_7327928;
object e_7327984 [6];
c_7327928.hdr.mark = gc_color_red;
 c_7327928.hdr.grayed = 0;
c_7327928.tag = closureN_tag;
 c_7327928.fn = (function_type)__lambda_1268;
c_7327928.num_args = 1;
c_7327928.num_elements = 6;
c_7327928.elements = (object *)e_7327984;
c_7327928.elements[0] = ((closureN)self_7314229)->elements[0];
c_7327928.elements[1] = ((closureN)self_7314229)->elements[1];
c_7327928.elements[2] = ((closureN)self_7314229)->elements[2];
c_7327928.elements[3] = ((closureN)self_7314229)->elements[3];
c_7327928.elements[4] = ((closureN)self_7314229)->elements[4];
c_7327928.elements[5] = r_738010;




object c_7327987 = Cyc_symbol2string(data,(closure)&c_7327928,Cyc_cadr(data, ((closureN)self_7314229)->elements[2]));
return_closcall1(data,(closure)&c_7327928,  c_7327987);; 
}

static void __lambda_1268(void *data, object self_7314230, int argc, object *args) /* object self_7314230, object r_738012 */
 {
 object r_738012 = args[0];
  
pair_type local_7327933; 

pair_type local_7327937; 



pair_type local_7327943; 

pair_type local_7327946; 

pair_type local_7327950; 

pair_type local_7327953; 

pair_type local_7327956; 

pair_type local_7327959; 

pair_type local_7327963; 

pair_type local_7327966; 

pair_type local_7327970; 

pair_type local_7327974; 

pair_type local_7327977; 

pair_type local_7327980; 


return_direct_with_clo1(data,  ((closureN)self_7314230)->elements[3], (((closure)  ((closureN)self_7314230)->elements[3])->fn),  set_pair_as_expr(&local_7327933, ((closureN)self_7314230)->elements[0], set_pair_as_expr(&local_7327937, Cyc_cadr(data, ((closureN)self_7314230)->elements[2]), set_pair_as_expr(&local_7327943, set_pair_as_expr(&local_7327946, ((closureN)self_7314230)->elements[5], set_pair_as_expr(&local_7327950, r_738012, set_pair_as_expr(&local_7327953, set_pair_as_expr(&local_7327956, quote_quote, set_pair_as_expr(&local_7327959, ((closureN)self_7314230)->elements[4], NULL)), set_pair_as_expr(&local_7327963, set_pair_as_expr(&local_7327966, ((closureN)self_7314230)->elements[1], set_pair_as_expr(&local_7327970, ((closureN)self_7314230)->elements[4], set_pair_as_expr(&local_7327974, set_pair_as_expr(&local_7327977, quote_quote, set_pair_as_expr(&local_7327980, Cyc_car(data, ((closureN)self_7314230)->elements[2]), NULL)), NULL))), NULL)))), NULL))));; 
}

static void __lambda_1252(void *data, object self_7314231, int argc, object *args) /* object self_7314231, object r_738001 */
 {
 object r_738001 = args[0];
  
closureN_type c_7327623;
object e_7327910 [12];
c_7327623.hdr.mark = gc_color_red;
 c_7327623.hdr.grayed = 0;
c_7327623.tag = closureN_tag;
 c_7327623.fn = (function_type)__lambda_1253;
c_7327623.num_args = 1;
c_7327623.num_elements = 12;
c_7327623.elements = (object *)e_7327910;
c_7327623.elements[0] = ((closureN)self_7314231)->elements[0];
c_7327623.elements[1] = ((closureN)self_7314231)->elements[1];
c_7327623.elements[2] = ((closureN)self_7314231)->elements[2];
c_7327623.elements[3] = ((closureN)self_7314231)->elements[3];
c_7327623.elements[4] = ((closureN)self_7314231)->elements[4];
c_7327623.elements[5] = ((closureN)self_7314231)->elements[5];
c_7327623.elements[6] = ((closureN)self_7314231)->elements[6];
c_7327623.elements[7] = ((closureN)self_7314231)->elements[7];
c_7327623.elements[8] = ((closureN)self_7314231)->elements[8];
c_7327623.elements[9] = ((closureN)self_7314231)->elements[9];
c_7327623.elements[10] = ((closureN)self_7314231)->elements[10];
c_7327623.elements[11] = ((closureN)self_7314231)->elements[11];





return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7327623, r_738001, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314231)->elements[4])));; 
}

static void __lambda_1253(void *data, object self_7314232, int argc, object *args) /* object self_7314232, object r_737930 */
 {
 object r_737930 = args[0];
  
closureN_type c_7327625;
object e_7327822 [12];
c_7327625.hdr.mark = gc_color_red;
 c_7327625.hdr.grayed = 0;
c_7327625.tag = closureN_tag;
 c_7327625.fn = (function_type)__lambda_1254;
c_7327625.num_args = 1;
c_7327625.num_elements = 12;
c_7327625.elements = (object *)e_7327822;
c_7327625.elements[0] = ((closureN)self_7314232)->elements[0];
c_7327625.elements[1] = ((closureN)self_7314232)->elements[1];
c_7327625.elements[2] = ((closureN)self_7314232)->elements[2];
c_7327625.elements[3] = ((closureN)self_7314232)->elements[4];
c_7327625.elements[4] = ((closureN)self_7314232)->elements[5];
c_7327625.elements[5] = ((closureN)self_7314232)->elements[6];
c_7327625.elements[6] = ((closureN)self_7314232)->elements[7];
c_7327625.elements[7] = ((closureN)self_7314232)->elements[8];
c_7327625.elements[8] = r_737930;
c_7327625.elements[9] = ((closureN)self_7314232)->elements[9];
c_7327625.elements[10] = ((closureN)self_7314232)->elements[10];
c_7327625.elements[11] = ((closureN)self_7314232)->elements[11];


closureN_type c_7327823;
object e_7327909 [4];
c_7327823.hdr.mark = gc_color_red;
 c_7327823.hdr.grayed = 0;
c_7327823.tag = closureN_tag;
 c_7327823.fn = (function_type)__lambda_1263;
c_7327823.num_args = 1;
c_7327823.num_elements = 4;
c_7327823.elements = (object *)e_7327909;
c_7327823.elements[0] = ((closureN)self_7314232)->elements[0];
c_7327823.elements[1] = ((closureN)self_7314232)->elements[3];
c_7327823.elements[2] = ((closureN)self_7314232)->elements[6];
c_7327823.elements[3] = ((closureN)self_7314232)->elements[11];

return_direct_with_clo1(data,(closure)&c_7327625,__lambda_1254,  &c_7327823);; 
}

static void __lambda_1263(void *data, object self_7314233, int argc, object *args) /* object self_7314233, object k_737967, object f_732673_734060 */
 {
 object k_737967 = args[0]; object f_732673_734060 = args[1];
    
if( (boolean_f != Cyc_is_pair(f_732673_734060)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732673_734060))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, f_732673_734060))) ){ 
  
closureN_type c_7327836;
object e_7327905 [5];
c_7327836.hdr.mark = gc_color_red;
 c_7327836.hdr.grayed = 0;
c_7327836.tag = closureN_tag;
 c_7327836.fn = (function_type)__lambda_1264;
c_7327836.num_args = 1;
c_7327836.num_elements = 5;
c_7327836.elements = (object *)e_7327905;
c_7327836.elements[0] = ((closureN)self_7314233)->elements[0];
c_7327836.elements[1] = ((closureN)self_7314233)->elements[1];
c_7327836.elements[2] = f_732673_734060;
c_7327836.elements[3] = k_737967;
c_7327836.elements[4] = ((closureN)self_7314233)->elements[2];

return_closcall2(data,  ((closureN)self_7314233)->elements[3],  &c_7327836, quote_make_91setter);
} else { 
  return_direct_with_clo1(data,  k_737967, (((closure)  k_737967)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737967, (((closure)  k_737967)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737967, (((closure)  k_737967)->fn),  boolean_f);}
;; 
}

static void __lambda_1264(void *data, object self_7314234, int argc, object *args) /* object self_7314234, object r_737976 */
 {
 object r_737976 = args[0];
  
closureN_type c_7327838;
object e_7327896 [6];
c_7327838.hdr.mark = gc_color_red;
 c_7327838.hdr.grayed = 0;
c_7327838.tag = closureN_tag;
 c_7327838.fn = (function_type)__lambda_1265;
c_7327838.num_args = 1;
c_7327838.num_elements = 6;
c_7327838.elements = (object *)e_7327896;
c_7327838.elements[0] = ((closureN)self_7314234)->elements[0];
c_7327838.elements[1] = ((closureN)self_7314234)->elements[1];
c_7327838.elements[2] = ((closureN)self_7314234)->elements[2];
c_7327838.elements[3] = ((closureN)self_7314234)->elements[3];
c_7327838.elements[4] = ((closureN)self_7314234)->elements[4];
c_7327838.elements[5] = r_737976;






object c_7327899 = Cyc_symbol2string(data,(closure)&c_7327838,Cyc_car(data, Cyc_cddr(data, ((closureN)self_7314234)->elements[2])));
return_closcall1(data,(closure)&c_7327838,  c_7327899);; 
}

static void __lambda_1265(void *data, object self_7314235, int argc, object *args) /* object self_7314235, object r_737978 */
 {
 object r_737978 = args[0];
  
pair_type local_7327843; 

pair_type local_7327847; 





pair_type local_7327855; 

pair_type local_7327858; 

pair_type local_7327862; 

pair_type local_7327865; 

pair_type local_7327868; 

pair_type local_7327871; 

pair_type local_7327875; 

pair_type local_7327878; 

pair_type local_7327882; 

pair_type local_7327886; 

pair_type local_7327889; 

pair_type local_7327892; 


return_direct_with_clo1(data,  ((closureN)self_7314235)->elements[3], (((closure)  ((closureN)self_7314235)->elements[3])->fn),  set_pair_as_expr(&local_7327843, ((closureN)self_7314235)->elements[0], set_pair_as_expr(&local_7327847, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7314235)->elements[2])), set_pair_as_expr(&local_7327855, set_pair_as_expr(&local_7327858, ((closureN)self_7314235)->elements[5], set_pair_as_expr(&local_7327862, r_737978, set_pair_as_expr(&local_7327865, set_pair_as_expr(&local_7327868, quote_quote, set_pair_as_expr(&local_7327871, ((closureN)self_7314235)->elements[4], NULL)), set_pair_as_expr(&local_7327875, set_pair_as_expr(&local_7327878, ((closureN)self_7314235)->elements[1], set_pair_as_expr(&local_7327882, ((closureN)self_7314235)->elements[4], set_pair_as_expr(&local_7327886, set_pair_as_expr(&local_7327889, quote_quote, set_pair_as_expr(&local_7327892, Cyc_car(data, ((closureN)self_7314235)->elements[2]), NULL)), NULL))), NULL)))), NULL))));; 
}

static void __lambda_1254(void *data, object self_7314236, int argc, object *args) /* object self_7314236, object r_737966 */
 {
 object r_737966 = args[0];
  
closureN_type c_7327627;
object e_7327816 [12];
c_7327627.hdr.mark = gc_color_red;
 c_7327627.hdr.grayed = 0;
c_7327627.tag = closureN_tag;
 c_7327627.fn = (function_type)__lambda_1255;
c_7327627.num_args = 1;
c_7327627.num_elements = 12;
c_7327627.elements = (object *)e_7327816;
c_7327627.elements[0] = ((closureN)self_7314236)->elements[0];
c_7327627.elements[1] = ((closureN)self_7314236)->elements[1];
c_7327627.elements[2] = ((closureN)self_7314236)->elements[2];
c_7327627.elements[3] = ((closureN)self_7314236)->elements[3];
c_7327627.elements[4] = ((closureN)self_7314236)->elements[4];
c_7327627.elements[5] = ((closureN)self_7314236)->elements[5];
c_7327627.elements[6] = ((closureN)self_7314236)->elements[6];
c_7327627.elements[7] = ((closureN)self_7314236)->elements[7];
c_7327627.elements[8] = ((closureN)self_7314236)->elements[8];
c_7327627.elements[9] = ((closureN)self_7314236)->elements[9];
c_7327627.elements[10] = ((closureN)self_7314236)->elements[10];
c_7327627.elements[11] = ((closureN)self_7314236)->elements[11];





return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7327627, r_737966, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314236)->elements[3])));; 
}

static void __lambda_1255(void *data, object self_7314237, int argc, object *args) /* object self_7314237, object r_737932 */
 {
 object r_737932 = args[0];
  
closureN_type c_7327630;
object e_7327815 [13];
c_7327630.hdr.mark = gc_color_red;
 c_7327630.hdr.grayed = 0;
c_7327630.tag = closureN_tag;
 c_7327630.fn = (function_type)__lambda_1256;
c_7327630.num_args = 1;
c_7327630.num_elements = 13;
c_7327630.elements = (object *)e_7327815;
c_7327630.elements[0] = ((closureN)self_7314237)->elements[0];
c_7327630.elements[1] = ((closureN)self_7314237)->elements[1];
c_7327630.elements[2] = ((closureN)self_7314237)->elements[2];
c_7327630.elements[3] = ((closureN)self_7314237)->elements[3];
c_7327630.elements[4] = ((closureN)self_7314237)->elements[4];
c_7327630.elements[5] = ((closureN)self_7314237)->elements[5];
c_7327630.elements[6] = ((closureN)self_7314237)->elements[6];
c_7327630.elements[7] = ((closureN)self_7314237)->elements[7];
c_7327630.elements[8] = ((closureN)self_7314237)->elements[8];
c_7327630.elements[9] = r_737932;
c_7327630.elements[10] = ((closureN)self_7314237)->elements[9];
c_7327630.elements[11] = ((closureN)self_7314237)->elements[10];
c_7327630.elements[12] = ((closureN)self_7314237)->elements[11];

return_closcall2(data,  ((closureN)self_7314237)->elements[11],  &c_7327630, quote_vector);; 
}

static void __lambda_1256(void *data, object self_7314238, int argc, object *args) /* object self_7314238, object r_737944 */
 {
 object r_737944 = args[0];
  
closureN_type c_7327633;
object e_7327814 [13];
c_7327633.hdr.mark = gc_color_red;
 c_7327633.hdr.grayed = 0;
c_7327633.tag = closureN_tag;
 c_7327633.fn = (function_type)__lambda_1257;
c_7327633.num_args = 1;
c_7327633.num_elements = 13;
c_7327633.elements = (object *)e_7327814;
c_7327633.elements[0] = ((closureN)self_7314238)->elements[0];
c_7327633.elements[1] = ((closureN)self_7314238)->elements[1];
c_7327633.elements[2] = ((closureN)self_7314238)->elements[2];
c_7327633.elements[3] = ((closureN)self_7314238)->elements[3];
c_7327633.elements[4] = ((closureN)self_7314238)->elements[4];
c_7327633.elements[5] = ((closureN)self_7314238)->elements[5];
c_7327633.elements[6] = ((closureN)self_7314238)->elements[6];
c_7327633.elements[7] = ((closureN)self_7314238)->elements[7];
c_7327633.elements[8] = ((closureN)self_7314238)->elements[8];
c_7327633.elements[9] = ((closureN)self_7314238)->elements[9];
c_7327633.elements[10] = r_737944;
c_7327633.elements[11] = ((closureN)self_7314238)->elements[10];
c_7327633.elements[12] = ((closureN)self_7314238)->elements[11];

return_closcall2(data,  ((closureN)self_7314238)->elements[12],  &c_7327633, quote_vector);; 
}

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


complex_num_type local_7327801; 










return_direct_with_clo2(data,  __glo_make_91list_scheme_base, (((closure)  __glo_make_91list_scheme_base)->fn),  &c_7327635, Cyc_fast_sub(data,&local_7327801, Cyc_length(data, Cyc_cddddr(data, ((closureN)self_7314239)->elements[3])), Cyc_length(data, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314239)->elements[3])))));; 
}

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





return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7327637, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314240)->elements[3])), r_737954);; 
}

static void __lambda_1259(void *data, object self_7314241, int argc, object *args) /* object self_7314241, object r_737953 */
 {
 object r_737953 = args[0];
  
closureN_type c_7327639;
object e_7327730 [10];
c_7327639.hdr.mark = gc_color_red;
 c_7327639.hdr.grayed = 0;
c_7327639.tag = closureN_tag;
 c_7327639.fn = (function_type)__lambda_1260;
c_7327639.num_args = 1;
c_7327639.num_elements = 10;
c_7327639.elements = (object *)e_7327730;
c_7327639.elements[0] = ((closureN)self_7314241)->elements[0];
c_7327639.elements[1] = ((closureN)self_7314241)->elements[2];
c_7327639.elements[2] = ((closureN)self_7314241)->elements[3];
c_7327639.elements[3] = ((closureN)self_7314241)->elements[4];
c_7327639.elements[4] = ((closureN)self_7314241)->elements[5];
c_7327639.elements[5] = ((closureN)self_7314241)->elements[6];
c_7327639.elements[6] = ((closureN)self_7314241)->elements[7];
c_7327639.elements[7] = ((closureN)self_7314241)->elements[8];
c_7327639.elements[8] = ((closureN)self_7314241)->elements[12];
c_7327639.elements[9] = ((closureN)self_7314241)->elements[13];


pair_type local_7327734; 

pair_type local_7327737; 

pair_type local_7327741; 





pair_type local_7327749; 

pair_type local_7327752; 

pair_type local_7327756; 





pair_type local_7327764; 

pair_type local_7327767; 

pair_type local_7327771; 

pair_type local_7327774; 

pair_type local_7327777; 

pair_type local_7327780; 

pair_type local_7327783; 

pair_type local_7327787; 

pair_type local_7327790; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7327639, ((closureN)self_7314241)->elements[9], set_pair_as_expr(&local_7327734, set_pair_as_expr(&local_7327737, ((closureN)self_7314241)->elements[0], set_pair_as_expr(&local_7327741, Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7314241)->elements[3])), set_pair_as_expr(&local_7327749, set_pair_as_expr(&local_7327752, ((closureN)self_7314241)->elements[1], set_pair_as_expr(&local_7327756, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314241)->elements[3])), set_pair_as_expr(&local_7327764, set_pair_as_expr(&local_7327767, ((closureN)self_7314241)->elements[10], set_pair_as_expr(&local_7327771, set_pair_as_expr(&local_7327774, quote_make_91record_91marker, NULL), set_pair_as_expr(&local_7327777, set_pair_as_expr(&local_7327780, quote_quote, set_pair_as_expr(&local_7327783, ((closureN)self_7314241)->elements[5], NULL)), set_pair_as_expr(&local_7327787, set_pair_as_expr(&local_7327790, ((closureN)self_7314241)->elements[11], r_737953), NULL)))), NULL))), NULL))), NULL));; 
}

static void __lambda_1260(void *data, object self_7314242, int argc, object *args) /* object self_7314242, object r_737931 */
 {
 object r_737931 = args[0];
  
closureN_type c_7327641;
object e_7327728 [9];
c_7327641.hdr.mark = gc_color_red;
 c_7327641.hdr.grayed = 0;
c_7327641.tag = closureN_tag;
 c_7327641.fn = (function_type)__lambda_1261;
c_7327641.num_args = 1;
c_7327641.num_elements = 9;
c_7327641.elements = (object *)e_7327728;
c_7327641.elements[0] = ((closureN)self_7314242)->elements[0];
c_7327641.elements[1] = ((closureN)self_7314242)->elements[1];
c_7327641.elements[2] = ((closureN)self_7314242)->elements[2];
c_7327641.elements[3] = ((closureN)self_7314242)->elements[3];
c_7327641.elements[4] = ((closureN)self_7314242)->elements[4];
c_7327641.elements[5] = ((closureN)self_7314242)->elements[5];
c_7327641.elements[6] = ((closureN)self_7314242)->elements[6];
c_7327641.elements[7] = ((closureN)self_7314242)->elements[8];
c_7327641.elements[8] = ((closureN)self_7314242)->elements[9];

return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7327641, ((closureN)self_7314242)->elements[7], r_737931);; 
}

static void __lambda_1261(void *data, object self_7314243, int argc, object *args) /* object self_7314243, object r_737929 */
 {
 object r_737929 = args[0];
  
closureN_type c_7327643;
object e_7327692 [7];
c_7327643.hdr.mark = gc_color_red;
 c_7327643.hdr.grayed = 0;
c_7327643.tag = closureN_tag;
 c_7327643.fn = (function_type)__lambda_1262;
c_7327643.num_args = 1;
c_7327643.num_elements = 7;
c_7327643.elements = (object *)e_7327692;
c_7327643.elements[0] = ((closureN)self_7314243)->elements[0];
c_7327643.elements[1] = ((closureN)self_7314243)->elements[1];
c_7327643.elements[2] = ((closureN)self_7314243)->elements[3];
c_7327643.elements[3] = ((closureN)self_7314243)->elements[4];
c_7327643.elements[4] = ((closureN)self_7314243)->elements[5];
c_7327643.elements[5] = ((closureN)self_7314243)->elements[6];
c_7327643.elements[6] = ((closureN)self_7314243)->elements[8];


pair_type local_7327695; 

pair_type local_7327698; 

pair_type local_7327702; 





pair_type local_7327710; 

pair_type local_7327713; 

pair_type local_7327717; 

pair_type local_7327720; 

pair_type local_7327723; 

pair_type local_7327726; 
return_direct_with_clo1(data,(closure)&c_7327643,__lambda_1262,  set_pair_as_expr(&local_7327695, set_pair_as_expr(&local_7327698, ((closureN)self_7314243)->elements[0], set_pair_as_expr(&local_7327702, Cyc_cadr(data, Cyc_cddr(data, ((closureN)self_7314243)->elements[2])), set_pair_as_expr(&local_7327710, set_pair_as_expr(&local_7327713, ((closureN)self_7314243)->elements[7], set_pair_as_expr(&local_7327717, obj_int2obj(0), set_pair_as_expr(&local_7327720, set_pair_as_expr(&local_7327723, quote_quote, set_pair_as_expr(&local_7327726, ((closureN)self_7314243)->elements[4], NULL)), NULL))), NULL))), r_737929));; 
}

static void __lambda_1262(void *data, object self_7314244, int argc, object *args) /* object self_7314244, object r_737927 */
 {
 object r_737927 = args[0];
  
pair_type local_7327648; 

pair_type local_7327652; 

pair_type local_7327655; 

pair_type local_7327659; 

pair_type local_7327663; 

pair_type local_7327666; 

pair_type local_7327670; 

pair_type local_7327673; 

pair_type local_7327676; 

pair_type local_7327680; 

pair_type local_7327684; 

pair_type local_7327687; 

pair_type local_7327690; 
return_direct_with_clo1(data,  ((closureN)self_7314244)->elements[2], (((closure)  ((closureN)self_7314244)->elements[2])->fn),  set_pair_as_expr(&local_7327648, ((closureN)self_7314244)->elements[5], set_pair_as_expr(&local_7327652, set_pair_as_expr(&local_7327655, ((closureN)self_7314244)->elements[0], set_pair_as_expr(&local_7327659, ((closureN)self_7314244)->elements[3], set_pair_as_expr(&local_7327663, set_pair_as_expr(&local_7327666, ((closureN)self_7314244)->elements[1], set_pair_as_expr(&local_7327670, set_pair_as_expr(&local_7327673, quote_quote, set_pair_as_expr(&local_7327676, ((closureN)self_7314244)->elements[3], NULL)), set_pair_as_expr(&local_7327680, ((closureN)self_7314244)->elements[4], set_pair_as_expr(&local_7327684, set_pair_as_expr(&local_7327687, quote_quote, set_pair_as_expr(&local_7327690, ((closureN)self_7314244)->elements[6], NULL)), NULL)))), NULL))), r_737927)));; 
}

static void __lambda_1247(void *data, object self_7314245, int argc, object *args) /* object self_7314245, object k_738063 */
 {
 object k_738063 = args[0];
    
  
  
if( (boolean_f != Cyc_eq(((closureN)self_7314245)->elements[1], Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7314245)->elements[0])))) ){ 
  
make_utf8_string_with_len(c_7327607, "same binding for record rtd and constructor", 43, 43);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_738063, &c_7327607, ((closureN)self_7314245)->elements[1]);
} else { 
  return_direct_with_clo1(data,  k_738063, (((closure)  k_738063)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_1239(void *data, object self_7314246, int argc, object *args) /* object self_7314246, object k_738071 */
 {
 object k_738071 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, ((closureN)self_7314246)->elements[0]))) ){ 
  



return_direct_with_clo1(data,  k_738071,__lambda_1240,  Cyc_cadr(data, Cyc_cadr(data, ((closureN)self_7314246)->elements[0])));
} else { 
  return_direct_with_clo1(data,  k_738071,__lambda_1240,  boolean_f);}
;; 
}

static void __lambda_1235(void *data, object _, int argc, object *args) /* closure _,object k_737901, object obj_732614_734040, object rtype_732615_734041 */
 {
object k_737901 = args[0]; object obj_732614_734040 = args[1]; object rtype_732615_734041 = args[2];
  Cyc_st_add(data, "scheme/base.sld:is-a?");

closureN_type c_7327528;
object e_7327547 [3];
c_7327528.hdr.mark = gc_color_red;
 c_7327528.hdr.grayed = 0;
c_7327528.tag = closureN_tag;
 c_7327528.fn = (function_type)__lambda_1236;
c_7327528.num_args = 1;
c_7327528.num_elements = 3;
c_7327528.elements = (object *)e_7327547;
c_7327528.elements[0] = k_737901;
c_7327528.elements[1] = obj_732614_734040;
c_7327528.elements[2] = rtype_732615_734041;

return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7327528, obj_732614_734040);; 
}

static void __lambda_1236(void *data, object self_7314215, int argc, object *args) /* object self_7314215, object r_737902 */
 {
 object r_737902 = args[0];
  if( (boolean_f != r_737902) ){ 
  
closureN_type c_7327530;
object e_7327543 [3];
c_7327530.hdr.mark = gc_color_red;
 c_7327530.hdr.grayed = 0;
c_7327530.tag = closureN_tag;
 c_7327530.fn = (function_type)__lambda_1237;
c_7327530.num_args = 1;
c_7327530.num_elements = 3;
c_7327530.elements = (object *)e_7327543;
c_7327530.elements[0] = ((closureN)self_7314215)->elements[0];
c_7327530.elements[1] = ((closureN)self_7314215)->elements[1];
c_7327530.elements[2] = ((closureN)self_7314215)->elements[2];

return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7327530, ((closureN)self_7314215)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314215)->elements[0], (((closure)  ((closureN)self_7314215)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1237(void *data, object self_7314216, int argc, object *args) /* object self_7314216, object r_737903 */
 {
 object r_737903 = args[0];
  if( (boolean_f != r_737903) ){ 
  





return_direct_with_clo1(data,  ((closureN)self_7314216)->elements[0], (((closure)  ((closureN)self_7314216)->elements[0])->fn),  equalp(Cyc_vector_ref(data, ((closureN)self_7314216)->elements[1], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_7314216)->elements[2], obj_int2obj(1))));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314216)->elements[0], (((closure)  ((closureN)self_7314216)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1514(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k, Cyc_is_record(obj));  }
static void __lambda_1229(void *data, object _, int argc, object *args) /* closure _,object k_737890, object e_732605_734033, object lst1_732606_734034 */
 {
object k_737890 = args[0]; object e_732605_734033 = args[1]; object lst1_732606_734034 = args[2];
  Cyc_st_add(data, "scheme/base.sld:_list-index");

closureN_type c_7327479;
object e_7327524 [2];
c_7327479.hdr.mark = gc_color_red;
 c_7327479.hdr.grayed = 0;
c_7327479.tag = closureN_tag;
 c_7327479.fn = (function_type)__lambda_1230;
c_7327479.num_args = 1;
c_7327479.num_elements = 2;
c_7327479.elements = (object *)e_7327524;
c_7327479.elements[0] = e_732605_734033;
c_7327479.elements[1] = k_737890;

return_direct_with_clo1(data,(closure)&c_7327479,__lambda_1230,  lst1_732606_734034);; 
}

static void __lambda_1230(void *data, object self_7314209, int argc, object *args) /* object self_7314209, object lis_732608_734035 */
 {
 object lis_732608_734035 = args[0];
  
closureN_type c_7327481;
object e_7327523 [3];
c_7327481.hdr.mark = gc_color_red;
 c_7327481.hdr.grayed = 0;
c_7327481.tag = closureN_tag;
 c_7327481.fn = (function_type)__lambda_1231;
c_7327481.num_args = 1;
c_7327481.num_elements = 3;
c_7327481.elements = (object *)e_7327523;
c_7327481.elements[0] = ((closureN)self_7314209)->elements[0];
c_7327481.elements[1] = ((closureN)self_7314209)->elements[1];
c_7327481.elements[2] = lis_732608_734035;

return_direct_with_clo1(data,(closure)&c_7327481,__lambda_1231,  boolean_f);; 
}

static void __lambda_1231(void *data, object self_7314210, int argc, object *args) /* object self_7314210, object lp_732610_734037 */
 {
 object lp_732610_734037 = args[0];
  
closureN_type c_7327483;
object e_7327519 [3];
c_7327483.hdr.mark = gc_color_red;
 c_7327483.hdr.grayed = 0;
c_7327483.tag = closureN_tag;
 c_7327483.fn = (function_type)__lambda_1443;
c_7327483.num_args = 1;
c_7327483.num_elements = 3;
c_7327483.elements = (object *)e_7327519;
c_7327483.elements[0] = ((closureN)self_7314210)->elements[0];
c_7327483.elements[1] = ((closureN)self_7314210)->elements[1];
c_7327483.elements[2] = ((closureN)self_7314210)->elements[2];


pair_type local_7327522; 
return_direct_with_clo1(data,(closure)&c_7327483,__lambda_1443,  set_cell_as_expr(&local_7327522, lp_732610_734037));; 
}

static void __lambda_1443(void *data, object self_7314211, int argc, object *args) /* object self_7314211, object lp_732610_734037 */
 {
 object lp_732610_734037 = args[0];
  
closureN_type c_7327485;
object e_7327498 [3];
c_7327485.hdr.mark = gc_color_red;
 c_7327485.hdr.grayed = 0;
c_7327485.tag = closureN_tag;
 c_7327485.fn = (function_type)__lambda_1232;
c_7327485.num_args = 1;
c_7327485.num_elements = 3;
c_7327485.elements = (object *)e_7327498;
c_7327485.elements[0] = ((closureN)self_7314211)->elements[1];
c_7327485.elements[1] = ((closureN)self_7314211)->elements[2];
c_7327485.elements[2] = lp_732610_734037;


closureN_type c_7327499;
object e_7327518 [2];
c_7327499.hdr.mark = gc_color_red;
 c_7327499.hdr.grayed = 0;
c_7327499.tag = closureN_tag;
 c_7327499.fn = (function_type)__lambda_1234;
c_7327499.num_args = 2;
c_7327499.num_elements = 2;
c_7327499.elements = (object *)e_7327518;
c_7327499.elements[0] = ((closureN)self_7314211)->elements[0];
c_7327499.elements[1] = lp_732610_734037;

return_direct_with_clo1(data,(closure)&c_7327485,__lambda_1232,  &c_7327499);; 
}

static void __lambda_1234(void *data, object self_7314212, int argc, object *args) /* object self_7314212, object k_737893, object lis_732611_734038, object n_732612_734039 */
 {
 object k_737893 = args[0]; object lis_732611_734038 = args[1]; object n_732612_734039 = args[2];
    
if( (boolean_f != Cyc_is_null(lis_732611_734038)) ){ 
  return_direct_with_clo1(data,  k_737893, (((closure)  k_737893)->fn),  boolean_f);
} else { 
    
  
if( (boolean_f != Cyc_eq(((closureN)self_7314212)->elements[0], Cyc_car(data, lis_732611_734038))) ){ 
  return_direct_with_clo1(data,  k_737893, (((closure)  k_737893)->fn),  n_732612_734039);
} else { 
  




complex_num_type local_7327517; 
return_closcall3(data,  car(((closureN)self_7314212)->elements[1]),  k_737893, Cyc_cdr(data, lis_732611_734038), Cyc_fast_sum(data,&local_7327517, n_732612_734039, obj_int2obj(1)));}
;}
;; 
}

static void __lambda_1232(void *data, object self_7314213, int argc, object *args) /* object self_7314213, object r_737892 */
 {
 object r_737892 = args[0];
  
closureN_type c_7327487;
object e_7327494 [3];
c_7327487.hdr.mark = gc_color_red;
 c_7327487.hdr.grayed = 0;
c_7327487.tag = closureN_tag;
 c_7327487.fn = (function_type)__lambda_1233;
c_7327487.num_args = 1;
c_7327487.num_elements = 3;
c_7327487.elements = (object *)e_7327494;
c_7327487.elements[0] = ((closureN)self_7314213)->elements[0];
c_7327487.elements[1] = ((closureN)self_7314213)->elements[1];
c_7327487.elements[2] = ((closureN)self_7314213)->elements[2];



return_direct_with_clo1(data,(closure)&c_7327487,__lambda_1233,  Cyc_set_cell(data, ((closureN)self_7314213)->elements[2], r_737892));; 
}

static void __lambda_1233(void *data, object self_7314214, int argc, object *args) /* object self_7314214, object r_737891 */
 {

  

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

static void __lambda_1225(void *data, object _, int argc, object *args) /* closure _,object k_737882, object sym_732600_734028, object name_732601_734029, object idx_732602_734030 */
 {
object k_737882 = args[0]; object name_732601_734029 = args[2]; object idx_732602_734030 = args[3];
  Cyc_st_add(data, "scheme/base.sld:make-setter");

closureN_type c_7327449;
object e_7327476 [2];
c_7327449.hdr.mark = gc_color_red;
 c_7327449.hdr.grayed = 0;
c_7327449.tag = closureN_tag;
 c_7327449.fn = (function_type)__lambda_1226;
c_7327449.num_args = 2;
c_7327449.num_elements = 2;
c_7327449.elements = (object *)e_7327476;
c_7327449.elements[0] = idx_732602_734030;
c_7327449.elements[1] = name_732601_734029;

return_direct_with_clo1(data,  k_737882, (((closure)  k_737882)->fn),  &c_7327449);; 
}

static void __lambda_1226(void *data, object self_7314206, int argc, object *args) /* object self_7314206, object k_737883, object obj_732603_734031, object val_732604_734032 */
 {
 object k_737883 = args[0]; object obj_732603_734031 = args[1]; object val_732604_734032 = args[2];
  
closureN_type c_7327451;
object e_7327473 [5];
c_7327451.hdr.mark = gc_color_red;
 c_7327451.hdr.grayed = 0;
c_7327451.tag = closureN_tag;
 c_7327451.fn = (function_type)__lambda_1227;
c_7327451.num_args = 1;
c_7327451.num_elements = 5;
c_7327451.elements = (object *)e_7327473;
c_7327451.elements[0] = ((closureN)self_7314206)->elements[0];
c_7327451.elements[1] = k_737883;
c_7327451.elements[2] = ((closureN)self_7314206)->elements[1];
c_7327451.elements[3] = obj_732603_734031;
c_7327451.elements[4] = val_732604_734032;



return_direct_with_clo1(data,(closure)&c_7327451,__lambda_1227,  Cyc_vector_ref(data, obj_732603_734031, obj_int2obj(1)));; 
}

static void __lambda_1227(void *data, object self_7314207, int argc, object *args) /* object self_7314207, object r_737887 */
 {
 object r_737887 = args[0];
    
if( (boolean_f != Cyc_eq(r_737887, ((closureN)self_7314207)->elements[2])) ){ 
  
closureN_type c_7327456;
object e_7327464 [3];
c_7327456.hdr.mark = gc_color_red;
 c_7327456.hdr.grayed = 0;
c_7327456.tag = closureN_tag;
 c_7327456.fn = (function_type)__lambda_1228;
c_7327456.num_args = 1;
c_7327456.num_elements = 3;
c_7327456.elements = (object *)e_7327464;
c_7327456.elements[0] = ((closureN)self_7314207)->elements[0];
c_7327456.elements[1] = ((closureN)self_7314207)->elements[1];
c_7327456.elements[2] = ((closureN)self_7314207)->elements[4];



return_direct_with_clo1(data,(closure)&c_7327456,__lambda_1228,  Cyc_vector_ref(data, ((closureN)self_7314207)->elements[3], obj_int2obj(2)));
} else { 
  
make_utf8_string_with_len(c_7327470, "Invalid type", 12, 12);
return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7314207)->elements[1], &c_7327470, ((closureN)self_7314207)->elements[3], quote_expected, ((closureN)self_7314207)->elements[2]);}
;; 
}

static void __lambda_1228(void *data, object self_7314208, int argc, object *args) /* object self_7314208, object r_737885 */
 {
 object r_737885 = args[0];
  
object c_7327461 = Cyc_vector_set_cps(data,  ((closureN)self_7314208)->elements[1],r_737885, ((closureN)self_7314208)->elements[0], ((closureN)self_7314208)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_7314208)->elements[1], (((closure)  ((closureN)self_7314208)->elements[1])->fn),  c_7327461);; 
}

static void __lambda_1223(void *data, object _, int argc, object *args) /* closure _,object k_737874, object sym_732596_734024, object name_732597_734025, object idx_732598_734026 */
 {
object k_737874 = args[0]; object name_732597_734025 = args[2]; object idx_732598_734026 = args[3];
  Cyc_st_add(data, "scheme/base.sld:make-getter");

closureN_type c_7327431;
object e_7327446 [2];
c_7327431.hdr.mark = gc_color_red;
 c_7327431.hdr.grayed = 0;
c_7327431.tag = closureN_tag;
 c_7327431.fn = (function_type)__lambda_1224;
c_7327431.num_args = 1;
c_7327431.num_elements = 2;
c_7327431.elements = (object *)e_7327446;
c_7327431.elements[0] = idx_732598_734026;
c_7327431.elements[1] = name_732597_734025;

return_direct_with_clo1(data,  k_737874, (((closure)  k_737874)->fn),  &c_7327431);; 
}

static void __lambda_1224(void *data, object self_7314205, int argc, object *args) /* object self_7314205, object k_737875, object obj_732599_734027 */
 {
 object k_737875 = args[0]; object obj_732599_734027 = args[1];
    
  
if( (boolean_f != Cyc_eq(Cyc_vector_ref(data, obj_732599_734027, obj_int2obj(1)), ((closureN)self_7314205)->elements[1])) ){ 
  



return_direct_with_clo1(data,  k_737875, (((closure)  k_737875)->fn),  Cyc_vector_ref(data, Cyc_vector_ref(data, obj_732599_734027, obj_int2obj(2)), ((closureN)self_7314205)->elements[0]));
} else { 
  
make_utf8_string_with_len(c_7327444, "Invalid type", 12, 12);
return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_737875, &c_7327444, obj_732599_734027, quote_expected, ((closureN)self_7314205)->elements[1]);}
;; 
}

static void __lambda_1220(void *data, object _, int argc, object *args) /* closure _,object k_737867, object name_732585_734020, object obj_732586_734021, object field_732587_734022 */
 {
object k_737867 = args[0]; object name_732585_734020 = args[1]; object obj_732586_734021 = args[2]; object field_732587_734022 = args[3];
  Cyc_st_add(data, "scheme/base.sld:slot-ref");

closureN_type c_7327408;
object e_7327419 [2];
c_7327408.hdr.mark = gc_color_red;
 c_7327408.hdr.grayed = 0;
c_7327408.tag = closureN_tag;
 c_7327408.fn = (function_type)__lambda_1221;
c_7327408.num_args = 0;
c_7327408.num_elements = 2;
c_7327408.elements = (object *)e_7327419;
c_7327408.elements[0] = field_732587_734022;
c_7327408.elements[1] = name_732585_734020;


closureN_type c_7327420;
object e_7327428 [2];
c_7327420.hdr.mark = gc_color_red;
 c_7327420.hdr.grayed = 0;
c_7327420.tag = closureN_tag;
 c_7327420.fn = (function_type)__lambda_1222;
c_7327420.num_args = 1;
c_7327420.num_elements = 2;
c_7327420.elements = (object *)e_7327428;
c_7327420.elements[0] = k_737867;
c_7327420.elements[1] = obj_732586_734021;

return_direct_with_clo1(data,(closure)&c_7327408,__lambda_1221,  &c_7327420);; 
}

static void __lambda_1222(void *data, object self_7314203, int argc, object *args) /* object self_7314203, object idx_732590_734023 */
 {
 object idx_732590_734023 = args[0];
  



return_direct_with_clo1(data,  ((closureN)self_7314203)->elements[0], (((closure)  ((closureN)self_7314203)->elements[0])->fn),  Cyc_vector_ref(data, Cyc_vector_ref(data, ((closureN)self_7314203)->elements[1], obj_int2obj(2)), idx_732590_734023));; 
}

static void __lambda_1221(void *data, object self_7314204, int argc, object *args) /* object self_7314204, object k_737870 */
 {
 object k_737870 = args[0];
    
if( (boolean_f != Cyc_is_symbol(((closureN)self_7314204)->elements[0])) ){ 
  

return_direct_with_clo3(data,  __glo__191list_91index_scheme_base, (((closure)  __glo__191list_91index_scheme_base)->fn),  k_737870, ((closureN)self_7314204)->elements[0], Cyc_vector_ref(data, ((closureN)self_7314204)->elements[1], obj_int2obj(2)));
} else { 
  return_direct_with_clo1(data,  k_737870, (((closure)  k_737870)->fn),  ((closureN)self_7314204)->elements[0]);}
;; 
}

static void __lambda_1217(void *data, object _, int argc, object *args) /* closure _,object k_737863, object name_732580_734015, object obj_732581_734016, object idx_732582_734017, object val_732583_734018 */
 {
object k_737863 = args[0]; object obj_732581_734016 = args[2]; object idx_732582_734017 = args[3]; object val_732583_734018 = args[4];
  Cyc_st_add(data, "scheme/base.sld:slot-set!");

closureN_type c_7327392;
object e_7327405 [3];
c_7327392.hdr.mark = gc_color_red;
 c_7327392.hdr.grayed = 0;
c_7327392.tag = closureN_tag;
 c_7327392.fn = (function_type)__lambda_1218;
c_7327392.num_args = 1;
c_7327392.num_elements = 3;
c_7327392.elements = (object *)e_7327405;
c_7327392.elements[0] = idx_732582_734017;
c_7327392.elements[1] = k_737863;
c_7327392.elements[2] = val_732583_734018;

return_direct_with_clo1(data,(closure)&c_7327392,__lambda_1218,  obj_732581_734016);; 
}

static void __lambda_1218(void *data, object self_7314201, int argc, object *args) /* object self_7314201, object vec_732584_734019 */
 {
 object vec_732584_734019 = args[0];
  
closureN_type c_7327394;
object e_7327402 [3];
c_7327394.hdr.mark = gc_color_red;
 c_7327394.hdr.grayed = 0;
c_7327394.tag = closureN_tag;
 c_7327394.fn = (function_type)__lambda_1219;
c_7327394.num_args = 1;
c_7327394.num_elements = 3;
c_7327394.elements = (object *)e_7327402;
c_7327394.elements[0] = ((closureN)self_7314201)->elements[0];
c_7327394.elements[1] = ((closureN)self_7314201)->elements[1];
c_7327394.elements[2] = ((closureN)self_7314201)->elements[2];



return_direct_with_clo1(data,(closure)&c_7327394,__lambda_1219,  Cyc_vector_ref(data, vec_732584_734019, obj_int2obj(2)));; 
}

static void __lambda_1219(void *data, object self_7314202, int argc, object *args) /* object self_7314202, object r_737864 */
 {
 object r_737864 = args[0];
  
object c_7327399 = Cyc_vector_set_cps(data,  ((closureN)self_7314202)->elements[1],r_737864, ((closureN)self_7314202)->elements[0], ((closureN)self_7314202)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_7314202)->elements[1], (((closure)  ((closureN)self_7314202)->elements[1])->fn),  c_7327399);; 
}

static void __lambda_1216(void *data, object _, int argc, object *args) /* closure _,object k_737859, object name_732577_734012, object sym_732578_734013 */
 {
object k_737859 = args[0]; object name_732577_734012 = args[1]; object sym_732578_734013 = args[2];
  Cyc_st_add(data, "scheme/base.sld:type-slot-offset");


return_direct_with_clo3(data,  __glo__191list_91index_scheme_base, (((closure)  __glo__191list_91index_scheme_base)->fn),  k_737859, sym_732578_734013, Cyc_vector_ref(data, name_732577_734012, obj_int2obj(2)));; 
}

static void __lambda_1211(void *data, object _, int argc, object *args) /* closure _,object k_737848, object make_732567_734007, object name_732568_734008 */
 {
object k_737848 = args[0]; object name_732568_734008 = args[2];
  Cyc_st_add(data, "scheme/base.sld:make-constructor/args");

closureN_type c_7327352;
object e_7327385 [1];
c_7327352.hdr.mark = gc_color_red;
 c_7327352.hdr.grayed = 0;
c_7327352.tag = closureN_tag;
 c_7327352.fn = (function_type)__lambda_1212;
c_7327352.num_args = 0;
c_7327352.num_elements = 1;
c_7327352.elements = (object *)e_7327385;
c_7327352.elements[0] = name_732568_734008;

return_direct_with_clo1(data,  k_737848, (((closure)  k_737848)->fn),  &c_7327352);; 
}

static void __lambda_1212(void *data, object self_7314197, int argc, object *args) /* object self_7314197, object k_737849, object args_732569_734009_raw, ... */
 {
 object k_737849 = args[0];
load_varargs(args_732569_734009, args, 1, argc - 1);
  
closureN_type c_7327354;
object e_7327381 [3];
c_7327354.hdr.mark = gc_color_red;
 c_7327354.hdr.grayed = 0;
c_7327354.tag = closureN_tag;
 c_7327354.fn = (function_type)__lambda_1213;
c_7327354.num_args = 1;
c_7327354.num_elements = 3;
c_7327354.elements = (object *)e_7327381;
c_7327354.elements[0] = args_732569_734009;
c_7327354.elements[1] = k_737849;
c_7327354.elements[2] = ((closureN)self_7314197)->elements[0];


object c_7327384 = Cyc_list2vector(data,(closure)&c_7327354,args_732569_734009);
return_closcall1(data,(closure)&c_7327354,  c_7327384);; 
}

static void __lambda_1213(void *data, object self_7314198, int argc, object *args) /* object self_7314198, object field_91values_732575_734011 */
 {
 object field_91values_732575_734011 = args[0];
  
closureN_type c_7327356;
object e_7327371 [3];
c_7327356.hdr.mark = gc_color_red;
 c_7327356.hdr.grayed = 0;
c_7327356.tag = closureN_tag;
 c_7327356.fn = (function_type)__lambda_1214;
c_7327356.num_args = 0;
c_7327356.num_elements = 3;
c_7327356.elements = (object *)e_7327371;
c_7327356.elements[0] = ((closureN)self_7314198)->elements[0];
c_7327356.elements[1] = field_91values_732575_734011;
c_7327356.elements[2] = ((closureN)self_7314198)->elements[2];


closureN_type c_7327372;
object e_7327380 [3];
c_7327372.hdr.mark = gc_color_red;
 c_7327372.hdr.grayed = 0;
c_7327372.tag = closureN_tag;
 c_7327372.fn = (function_type)__lambda_1215;
c_7327372.num_args = 1;
c_7327372.num_elements = 3;
c_7327372.elements = (object *)e_7327380;
c_7327372.elements[0] = field_91values_732575_734011;
c_7327372.elements[1] = ((closureN)self_7314198)->elements[1];
c_7327372.elements[2] = ((closureN)self_7314198)->elements[2];

return_direct_with_clo1(data,(closure)&c_7327356,__lambda_1214,  &c_7327372);; 
}

static void __lambda_1215(void *data, object self_7314199, int argc, object *args) /* object self_7314199, object r_737852 */
 {

  
vector_3_type local_7327377; 
return_direct_with_clo1(data,  ((closureN)self_7314199)->elements[1], (((closure)  ((closureN)self_7314199)->elements[1])->fn),  Cyc_fast_vector_3(&local_7327377, __glo_record_91marker_scheme_base, ((closureN)self_7314199)->elements[2], ((closureN)self_7314199)->elements[0]));; 
}

static void __lambda_1214(void *data, object self_7314200, int argc, object *args) /* object self_7314200, object k_737853 */
 {
 object k_737853 = args[0];
    
  
  
  
if( (boolean_f != equalp(Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7314200)->elements[2], obj_int2obj(2))), Cyc_vector_length(data, ((closureN)self_7314200)->elements[1]))) ){ 
  return_direct_with_clo1(data,  k_737853, (((closure)  k_737853)->fn),  Cyc_VOID);
} else { 
  
make_utf8_string_with_len(c_7327369, "invalid number of arguments passed to record type constructor", 61, 61);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_737853, &c_7327369, ((closureN)self_7314200)->elements[0]);}
;; 
}

static void __lambda_1208(void *data, object _, int argc, object *args) /* closure _,object k_737841, object make_732557_734002, object name_732558_734003 */
 {
object k_737841 = args[0]; object name_732558_734003 = args[2];
  Cyc_st_add(data, "scheme/base.sld:make-constructor");

closureN_type c_7327331;
object e_7327349 [1];
c_7327331.hdr.mark = gc_color_red;
 c_7327331.hdr.grayed = 0;
c_7327331.tag = closureN_tag;
 c_7327331.fn = (function_type)__lambda_1209;
c_7327331.num_args = 0;
c_7327331.num_elements = 1;
c_7327331.elements = (object *)e_7327349;
c_7327331.elements[0] = name_732558_734003;

return_direct_with_clo1(data,  k_737841, (((closure)  k_737841)->fn),  &c_7327331);; 
}

static void __lambda_1209(void *data, object self_7314195, int argc, object *args) /* object self_7314195, object k_737842, object args_732559_734004_raw, ... */
 {
 object k_737842 = args[0];
load_varargs(args_732559_734004, args, 1, argc - 1);
  
closureN_type c_7327333;
object e_7327340 [2];
c_7327333.hdr.mark = gc_color_red;
 c_7327333.hdr.grayed = 0;
c_7327333.tag = closureN_tag;
 c_7327333.fn = (function_type)__lambda_1210;
c_7327333.num_args = 1;
c_7327333.num_elements = 2;
c_7327333.elements = (object *)e_7327340;
c_7327333.elements[0] = k_737842;
c_7327333.elements[1] = ((closureN)self_7314195)->elements[0];






object c_7327343 = Cyc_make_vector(data,(closure)&c_7327333,2,Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7314195)->elements[0], obj_int2obj(2))), boolean_f);
return_closcall1(data,(closure)&c_7327333,  c_7327343);; 
}

static void __lambda_1210(void *data, object self_7314196, int argc, object *args) /* object self_7314196, object field_91values_732565_734006 */
 {
 object field_91values_732565_734006 = args[0];
  
vector_3_type local_7327338; 
return_direct_with_clo1(data,  ((closureN)self_7314196)->elements[0], (((closure)  ((closureN)self_7314196)->elements[0])->fn),  Cyc_fast_vector_3(&local_7327338, __glo_record_91marker_scheme_base, ((closureN)self_7314196)->elements[1], field_91values_732565_734006));; 
}

static void __lambda_1205(void *data, object _, int argc, object *args) /* closure _,object k_737835, object pred_732553_733999, object name_732554_734000 */
 {
object k_737835 = args[0]; object name_732554_734000 = args[2];
  Cyc_st_add(data, "scheme/base.sld:make-type-predicate");

closureN_type c_7327314;
object e_7327328 [1];
c_7327314.hdr.mark = gc_color_red;
 c_7327314.hdr.grayed = 0;
c_7327314.tag = closureN_tag;
 c_7327314.fn = (function_type)__lambda_1206;
c_7327314.num_args = 1;
c_7327314.num_elements = 1;
c_7327314.elements = (object *)e_7327328;
c_7327314.elements[0] = name_732554_734000;

return_direct_with_clo1(data,  k_737835, (((closure)  k_737835)->fn),  &c_7327314);; 
}

static void __lambda_1206(void *data, object self_7314193, int argc, object *args) /* object self_7314193, object k_737836, object obj_732555_734001 */
 {
 object k_737836 = args[0]; object obj_732555_734001 = args[1];
  
closureN_type c_7327316;
object e_7327327 [3];
c_7327316.hdr.mark = gc_color_red;
 c_7327316.hdr.grayed = 0;
c_7327316.tag = closureN_tag;
 c_7327316.fn = (function_type)__lambda_1207;
c_7327316.num_args = 1;
c_7327316.num_elements = 3;
c_7327316.elements = (object *)e_7327327;
c_7327316.elements[0] = k_737836;
c_7327316.elements[1] = ((closureN)self_7314193)->elements[0];
c_7327316.elements[2] = obj_732555_734001;

return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7327316, obj_732555_734001);; 
}

static void __lambda_1207(void *data, object self_7314194, int argc, object *args) /* object self_7314194, object r_737837 */
 {
 object r_737837 = args[0];
  if( (boolean_f != r_737837) ){ 
  



return_direct_with_clo1(data,  ((closureN)self_7314194)->elements[0], (((closure)  ((closureN)self_7314194)->elements[0])->fn),  equalp(Cyc_vector_ref(data, ((closureN)self_7314194)->elements[2], obj_int2obj(1)), ((closureN)self_7314194)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314194)->elements[0], (((closure)  ((closureN)self_7314194)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1204(void *data, object _, int argc, object *args) /* closure _,object k_737832, object name_732550_733996, object parent_732551_733997, object field_91tags_732552_733998 */
 {
object k_737832 = args[0]; object name_732550_733996 = args[1]; object field_91tags_732552_733998 = args[3];
  Cyc_st_add(data, "scheme/base.sld:register-simple-type");

vector_3_type local_7327311; 
return_direct_with_clo1(data,  k_737832, (((closure)  k_737832)->fn),  Cyc_fast_vector_3(&local_7327311, __glo_record_91marker_scheme_base, name_732550_733996, field_91tags_732552_733998));; 
}

static void __lambda_1153(void *data, object _, int argc, object *args) /* closure _,object k_737527, object expr_732192_732269_732444_733890, object rename_732193_732270_732445_733891, object compare_732194_732271_732446_733892 */
 {
object k_737527 = args[0]; object expr_732192_732269_732444_733890 = args[1]; object rename_732193_732270_732445_733891 = args[2]; object compare_732194_732271_732446_733892 = args[3];
  Cyc_st_add(data, "scheme/base.sld:guard-aux");

closureN_type c_7326288;
object e_7327304 [4];
c_7326288.hdr.mark = gc_color_red;
 c_7326288.hdr.grayed = 0;
c_7326288.tag = closureN_tag;
 c_7326288.fn = (function_type)__lambda_1154;
c_7326288.num_args = 1;
c_7326288.num_elements = 4;
c_7326288.elements = (object *)e_7327304;
c_7326288.elements[0] = compare_732194_732271_732446_733892;
c_7326288.elements[1] = expr_732192_732269_732444_733890;
c_7326288.elements[2] = k_737527;
c_7326288.elements[3] = rename_732193_732270_732445_733891;



return_direct_with_clo1(data,(closure)&c_7326288,__lambda_1154,  Cyc_cdr(data, expr_732192_732269_732444_733890));; 
}

static void __lambda_1154(void *data, object self_7314143, int argc, object *args) /* object self_7314143, object v_931_732200_732425_732538_733984 */
 {
 object v_931_732200_732425_732538_733984 = args[0];
  
closureN_type c_7326290;
object e_7326397 [3];
c_7326290.hdr.mark = gc_color_red;
 c_7326290.hdr.grayed = 0;
c_7326290.tag = closureN_tag;
 c_7326290.fn = (function_type)__lambda_1155;
c_7326290.num_args = 0;
c_7326290.num_elements = 3;
c_7326290.elements = (object *)e_7326397;
c_7326290.elements[0] = ((closureN)self_7314143)->elements[0];
c_7326290.elements[1] = ((closureN)self_7314143)->elements[3];
c_7326290.elements[2] = v_931_732200_732425_732538_733984;


closureN_type c_7326398;
object e_7327303 [4];
c_7326398.hdr.mark = gc_color_red;
 c_7326398.hdr.grayed = 0;
c_7326398.tag = closureN_tag;
 c_7326398.fn = (function_type)__lambda_1159;
c_7326398.num_args = 1;
c_7326398.num_elements = 4;
c_7326398.elements = (object *)e_7327303;
c_7326398.elements[0] = ((closureN)self_7314143)->elements[0];
c_7326398.elements[1] = ((closureN)self_7314143)->elements[1];
c_7326398.elements[2] = ((closureN)self_7314143)->elements[2];
c_7326398.elements[3] = ((closureN)self_7314143)->elements[3];

return_direct_with_clo1(data,(closure)&c_7326290,__lambda_1155,  &c_7326398);; 
}

static void __lambda_1159(void *data, object self_7314144, int argc, object *args) /* object self_7314144, object tmp_732273_732275_732447_733893 */
 {
 object tmp_732273_732275_732447_733893 = args[0];
  
closureN_type c_7326400;
object e_7327296 [4];
c_7326400.hdr.mark = gc_color_red;
 c_7326400.hdr.grayed = 0;
c_7326400.tag = closureN_tag;
 c_7326400.fn = (function_type)__lambda_1160;
c_7326400.num_args = 0;
c_7326400.num_elements = 4;
c_7326400.elements = (object *)e_7327296;
c_7326400.elements[0] = ((closureN)self_7314144)->elements[0];
c_7326400.elements[1] = ((closureN)self_7314144)->elements[1];
c_7326400.elements[2] = ((closureN)self_7314144)->elements[3];
c_7326400.elements[3] = tmp_732273_732275_732447_733893;


closureN_type c_7327297;
object e_7327302 [1];
c_7327297.hdr.mark = gc_color_red;
 c_7327297.hdr.grayed = 0;
c_7327297.tag = closureN_tag;
 c_7327297.fn = (function_type)__lambda_1203;
c_7327297.num_args = 1;
c_7327297.num_elements = 1;
c_7327297.elements = (object *)e_7327302;
c_7327297.elements[0] = ((closureN)self_7314144)->elements[2];

return_direct_with_clo1(data,(closure)&c_7326400,__lambda_1160,  &c_7327297);; 
}

static void __lambda_1203(void *data, object self_7314145, int argc, object *args) /* object self_7314145, object r_737528 */
 {
 object r_737528 = args[0];
  

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

static void __lambda_1160(void *data, object self_7314146, int argc, object *args) /* object self_7314146, object k_737530 */
 {
 object k_737530 = args[0];
  if( (boolean_f != ((closureN)self_7314146)->elements[3]) ){ 
  return_direct_with_clo1(data,  k_737530, (((closure)  k_737530)->fn),  ((closureN)self_7314146)->elements[3]);
} else { 
  
closureN_type c_7326405;
object e_7327292 [4];
c_7326405.hdr.mark = gc_color_red;
 c_7326405.hdr.grayed = 0;
c_7326405.tag = closureN_tag;
 c_7326405.fn = (function_type)__lambda_1161;
c_7326405.num_args = 1;
c_7326405.num_elements = 4;
c_7326405.elements = (object *)e_7327292;
c_7326405.elements[0] = ((closureN)self_7314146)->elements[0];
c_7326405.elements[1] = ((closureN)self_7314146)->elements[1];
c_7326405.elements[2] = k_737530;
c_7326405.elements[3] = ((closureN)self_7314146)->elements[2];



return_direct_with_clo1(data,(closure)&c_7326405,__lambda_1161,  Cyc_cdr(data, ((closureN)self_7314146)->elements[1]));}
;; 
}

static void __lambda_1161(void *data, object self_7314147, int argc, object *args) /* object self_7314147, object v_9310_732209_732403_732524_733970 */
 {
 object v_9310_732209_732403_732524_733970 = args[0];
  
closureN_type c_7326407;
object e_7326578 [3];
c_7326407.hdr.mark = gc_color_red;
 c_7326407.hdr.grayed = 0;
c_7326407.tag = closureN_tag;
 c_7326407.fn = (function_type)__lambda_1162;
c_7326407.num_args = 0;
c_7326407.num_elements = 3;
c_7326407.elements = (object *)e_7326578;
c_7326407.elements[0] = ((closureN)self_7314147)->elements[0];
c_7326407.elements[1] = ((closureN)self_7314147)->elements[3];
c_7326407.elements[2] = v_9310_732209_732403_732524_733970;


closureN_type c_7326579;
object e_7327291 [4];
c_7326579.hdr.mark = gc_color_red;
 c_7326579.hdr.grayed = 0;
c_7326579.tag = closureN_tag;
 c_7326579.fn = (function_type)__lambda_1170;
c_7326579.num_args = 1;
c_7326579.num_elements = 4;
c_7326579.elements = (object *)e_7327291;
c_7326579.elements[0] = ((closureN)self_7314147)->elements[0];
c_7326579.elements[1] = ((closureN)self_7314147)->elements[1];
c_7326579.elements[2] = ((closureN)self_7314147)->elements[2];
c_7326579.elements[3] = ((closureN)self_7314147)->elements[3];

return_direct_with_clo1(data,(closure)&c_7326407,__lambda_1162,  &c_7326579);; 
}

static void __lambda_1170(void *data, object self_7314148, int argc, object *args) /* object self_7314148, object tmp_732277_732279_732448_733894 */
 {
 object tmp_732277_732279_732448_733894 = args[0];
  if( (boolean_f != tmp_732277_732279_732448_733894) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314148)->elements[2], (((closure)  ((closureN)self_7314148)->elements[2])->fn),  tmp_732277_732279_732448_733894);
} else { 
  
closureN_type c_7326583;
object e_7327287 [4];
c_7326583.hdr.mark = gc_color_red;
 c_7326583.hdr.grayed = 0;
c_7326583.tag = closureN_tag;
 c_7326583.fn = (function_type)__lambda_1171;
c_7326583.num_args = 1;
c_7326583.num_elements = 4;
c_7326583.elements = (object *)e_7327287;
c_7326583.elements[0] = ((closureN)self_7314148)->elements[0];
c_7326583.elements[1] = ((closureN)self_7314148)->elements[1];
c_7326583.elements[2] = ((closureN)self_7314148)->elements[2];
c_7326583.elements[3] = ((closureN)self_7314148)->elements[3];



return_direct_with_clo1(data,(closure)&c_7326583,__lambda_1171,  Cyc_cdr(data, ((closureN)self_7314148)->elements[1]));}
;; 
}

static void __lambda_1171(void *data, object self_7314149, int argc, object *args) /* object self_7314149, object v_9321_732220_732376_732506_733952 */
 {
 object v_9321_732220_732376_732506_733952 = args[0];
  
closureN_type c_7326585;
object e_7326796 [3];
c_7326585.hdr.mark = gc_color_red;
 c_7326585.hdr.grayed = 0;
c_7326585.tag = closureN_tag;
 c_7326585.fn = (function_type)__lambda_1172;
c_7326585.num_args = 0;
c_7326585.num_elements = 3;
c_7326585.elements = (object *)e_7326796;
c_7326585.elements[0] = ((closureN)self_7314149)->elements[0];
c_7326585.elements[1] = ((closureN)self_7314149)->elements[3];
c_7326585.elements[2] = v_9321_732220_732376_732506_733952;


closureN_type c_7326797;
object e_7327286 [3];
c_7326797.hdr.mark = gc_color_red;
 c_7326797.hdr.grayed = 0;
c_7326797.tag = closureN_tag;
 c_7326797.fn = (function_type)__lambda_1181;
c_7326797.num_args = 1;
c_7326797.num_elements = 3;
c_7326797.elements = (object *)e_7327286;
c_7326797.elements[0] = ((closureN)self_7314149)->elements[1];
c_7326797.elements[1] = ((closureN)self_7314149)->elements[2];
c_7326797.elements[2] = ((closureN)self_7314149)->elements[3];

return_direct_with_clo1(data,(closure)&c_7326585,__lambda_1172,  &c_7326797);; 
}

static void __lambda_1181(void *data, object self_7314150, int argc, object *args) /* object self_7314150, object tmp_732281_732283_732449_733895 */
 {
 object tmp_732281_732283_732449_733895 = args[0];
  if( (boolean_f != tmp_732281_732283_732449_733895) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314150)->elements[1], (((closure)  ((closureN)self_7314150)->elements[1])->fn),  tmp_732281_732283_732449_733895);
} else { 
  
closureN_type c_7326801;
object e_7327282 [3];
c_7326801.hdr.mark = gc_color_red;
 c_7326801.hdr.grayed = 0;
c_7326801.tag = closureN_tag;
 c_7326801.fn = (function_type)__lambda_1182;
c_7326801.num_args = 1;
c_7326801.num_elements = 3;
c_7326801.elements = (object *)e_7327282;
c_7326801.elements[0] = ((closureN)self_7314150)->elements[0];
c_7326801.elements[1] = ((closureN)self_7314150)->elements[1];
c_7326801.elements[2] = ((closureN)self_7314150)->elements[2];



return_direct_with_clo1(data,(closure)&c_7326801,__lambda_1182,  Cyc_cdr(data, ((closureN)self_7314150)->elements[0]));}
;; 
}

static void __lambda_1182(void *data, object self_7314151, int argc, object *args) /* object self_7314151, object v_9334_732233_732362_732497_733943 */
 {
 object v_9334_732233_732362_732497_733943 = args[0];
  
closureN_type c_7326803;
object e_7326868 [2];
c_7326803.hdr.mark = gc_color_red;
 c_7326803.hdr.grayed = 0;
c_7326803.tag = closureN_tag;
 c_7326803.fn = (function_type)__lambda_1183;
c_7326803.num_args = 0;
c_7326803.num_elements = 2;
c_7326803.elements = (object *)e_7326868;
c_7326803.elements[0] = ((closureN)self_7314151)->elements[2];
c_7326803.elements[1] = v_9334_732233_732362_732497_733943;


closureN_type c_7326869;
object e_7327281 [3];
c_7326869.hdr.mark = gc_color_red;
 c_7326869.hdr.grayed = 0;
c_7326869.tag = closureN_tag;
 c_7326869.fn = (function_type)__lambda_1185;
c_7326869.num_args = 1;
c_7326869.num_elements = 3;
c_7326869.elements = (object *)e_7327281;
c_7326869.elements[0] = ((closureN)self_7314151)->elements[0];
c_7326869.elements[1] = ((closureN)self_7314151)->elements[1];
c_7326869.elements[2] = ((closureN)self_7314151)->elements[2];

return_direct_with_clo1(data,(closure)&c_7326803,__lambda_1183,  &c_7326869);; 
}

static void __lambda_1185(void *data, object self_7314152, int argc, object *args) /* object self_7314152, object tmp_732285_732287_732450_733896 */
 {
 object tmp_732285_732287_732450_733896 = args[0];
  if( (boolean_f != tmp_732285_732287_732450_733896) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314152)->elements[1], (((closure)  ((closureN)self_7314152)->elements[1])->fn),  tmp_732285_732287_732450_733896);
} else { 
  
closureN_type c_7326873;
object e_7327277 [3];
c_7326873.hdr.mark = gc_color_red;
 c_7326873.hdr.grayed = 0;
c_7326873.tag = closureN_tag;
 c_7326873.fn = (function_type)__lambda_1186;
c_7326873.num_args = 1;
c_7326873.num_elements = 3;
c_7326873.elements = (object *)e_7327277;
c_7326873.elements[0] = ((closureN)self_7314152)->elements[0];
c_7326873.elements[1] = ((closureN)self_7314152)->elements[1];
c_7326873.elements[2] = ((closureN)self_7314152)->elements[2];



return_direct_with_clo1(data,(closure)&c_7326873,__lambda_1186,  Cyc_cdr(data, ((closureN)self_7314152)->elements[0]));}
;; 
}

static void __lambda_1186(void *data, object self_7314153, int argc, object *args) /* object self_7314153, object v_9341_732240_732343_732484_733930 */
 {
 object v_9341_732240_732343_732484_733930 = args[0];
  
closureN_type c_7326875;
object e_7326979 [2];
c_7326875.hdr.mark = gc_color_red;
 c_7326875.hdr.grayed = 0;
c_7326875.tag = closureN_tag;
 c_7326875.fn = (function_type)__lambda_1187;
c_7326875.num_args = 0;
c_7326875.num_elements = 2;
c_7326875.elements = (object *)e_7326979;
c_7326875.elements[0] = ((closureN)self_7314153)->elements[2];
c_7326875.elements[1] = v_9341_732240_732343_732484_733930;


closureN_type c_7326980;
object e_7327276 [3];
c_7326980.hdr.mark = gc_color_red;
 c_7326980.hdr.grayed = 0;
c_7326980.tag = closureN_tag;
 c_7326980.fn = (function_type)__lambda_1190;
c_7326980.num_args = 1;
c_7326980.num_elements = 3;
c_7326980.elements = (object *)e_7327276;
c_7326980.elements[0] = ((closureN)self_7314153)->elements[0];
c_7326980.elements[1] = ((closureN)self_7314153)->elements[1];
c_7326980.elements[2] = ((closureN)self_7314153)->elements[2];

return_direct_with_clo1(data,(closure)&c_7326875,__lambda_1187,  &c_7326980);; 
}

static void __lambda_1190(void *data, object self_7314154, int argc, object *args) /* object self_7314154, object tmp_732289_732291_732451_733897 */
 {
 object tmp_732289_732291_732451_733897 = args[0];
  if( (boolean_f != tmp_732289_732291_732451_733897) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314154)->elements[1], (((closure)  ((closureN)self_7314154)->elements[1])->fn),  tmp_732289_732291_732451_733897);
} else { 
  
closureN_type c_7326984;
object e_7327272 [3];
c_7326984.hdr.mark = gc_color_red;
 c_7326984.hdr.grayed = 0;
c_7326984.tag = closureN_tag;
 c_7326984.fn = (function_type)__lambda_1191;
c_7326984.num_args = 1;
c_7326984.num_elements = 3;
c_7326984.elements = (object *)e_7327272;
c_7326984.elements[0] = ((closureN)self_7314154)->elements[0];
c_7326984.elements[1] = ((closureN)self_7314154)->elements[1];
c_7326984.elements[2] = ((closureN)self_7314154)->elements[2];



return_direct_with_clo1(data,(closure)&c_7326984,__lambda_1191,  Cyc_cdr(data, ((closureN)self_7314154)->elements[0]));}
;; 
}

static void __lambda_1191(void *data, object self_7314155, int argc, object *args) /* object self_7314155, object v_9350_732249_732324_732471_733917 */
 {
 object v_9350_732249_732324_732471_733917 = args[0];
  
closureN_type c_7326986;
object e_7327096 [2];
c_7326986.hdr.mark = gc_color_red;
 c_7326986.hdr.grayed = 0;
c_7326986.tag = closureN_tag;
 c_7326986.fn = (function_type)__lambda_1192;
c_7326986.num_args = 0;
c_7326986.num_elements = 2;
c_7326986.elements = (object *)e_7327096;
c_7326986.elements[0] = ((closureN)self_7314155)->elements[2];
c_7326986.elements[1] = v_9350_732249_732324_732471_733917;


closureN_type c_7327097;
object e_7327271 [3];
c_7327097.hdr.mark = gc_color_red;
 c_7327097.hdr.grayed = 0;
c_7327097.tag = closureN_tag;
 c_7327097.fn = (function_type)__lambda_1195;
c_7327097.num_args = 1;
c_7327097.num_elements = 3;
c_7327097.elements = (object *)e_7327271;
c_7327097.elements[0] = ((closureN)self_7314155)->elements[0];
c_7327097.elements[1] = ((closureN)self_7314155)->elements[1];
c_7327097.elements[2] = ((closureN)self_7314155)->elements[2];

return_direct_with_clo1(data,(closure)&c_7326986,__lambda_1192,  &c_7327097);; 
}

static void __lambda_1195(void *data, object self_7314156, int argc, object *args) /* object self_7314156, object tmp_732293_732295_732452_733898 */
 {
 object tmp_732293_732295_732452_733898 = args[0];
  if( (boolean_f != tmp_732293_732295_732452_733898) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314156)->elements[1], (((closure)  ((closureN)self_7314156)->elements[1])->fn),  tmp_732293_732295_732452_733898);
} else { 
  
closureN_type c_7327101;
object e_7327267 [3];
c_7327101.hdr.mark = gc_color_red;
 c_7327101.hdr.grayed = 0;
c_7327101.tag = closureN_tag;
 c_7327101.fn = (function_type)__lambda_1196;
c_7327101.num_args = 1;
c_7327101.num_elements = 3;
c_7327101.elements = (object *)e_7327267;
c_7327101.elements[0] = ((closureN)self_7314156)->elements[0];
c_7327101.elements[1] = ((closureN)self_7314156)->elements[1];
c_7327101.elements[2] = ((closureN)self_7314156)->elements[2];



return_direct_with_clo1(data,(closure)&c_7327101,__lambda_1196,  Cyc_cdr(data, ((closureN)self_7314156)->elements[0]));}
;; 
}

static void __lambda_1196(void *data, object self_7314157, int argc, object *args) /* object self_7314157, object v_9359_732258_732300_732454_733900 */
 {
 object v_9359_732258_732300_732454_733900 = args[0];
  
closureN_type c_7327103;
object e_7327252 [2];
c_7327103.hdr.mark = gc_color_red;
 c_7327103.hdr.grayed = 0;
c_7327103.tag = closureN_tag;
 c_7327103.fn = (function_type)__lambda_1197;
c_7327103.num_args = 0;
c_7327103.num_elements = 2;
c_7327103.elements = (object *)e_7327252;
c_7327103.elements[0] = ((closureN)self_7314157)->elements[2];
c_7327103.elements[1] = v_9359_732258_732300_732454_733900;


closureN_type c_7327253;
object e_7327266 [2];
c_7327253.hdr.mark = gc_color_red;
 c_7327253.hdr.grayed = 0;
c_7327253.tag = closureN_tag;
 c_7327253.fn = (function_type)__lambda_1201;
c_7327253.num_args = 1;
c_7327253.num_elements = 2;
c_7327253.elements = (object *)e_7327266;
c_7327253.elements[0] = ((closureN)self_7314157)->elements[0];
c_7327253.elements[1] = ((closureN)self_7314157)->elements[1];

return_direct_with_clo1(data,(closure)&c_7327103,__lambda_1197,  &c_7327253);; 
}

static void __lambda_1201(void *data, object self_7314158, int argc, object *args) /* object self_7314158, object tmp_732297_732299_732453_733899 */
 {
 object tmp_732297_732299_732453_733899 = args[0];
  if( (boolean_f != tmp_732297_732299_732453_733899) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314158)->elements[1], (((closure)  ((closureN)self_7314158)->elements[1])->fn),  tmp_732297_732299_732453_733899);
} else { 
  
closureN_type c_7327257;
object e_7327263 [1];
c_7327257.hdr.mark = gc_color_red;
 c_7327257.hdr.grayed = 0;
c_7327257.tag = closureN_tag;
 c_7327257.fn = (function_type)__lambda_1202;
c_7327257.num_args = 1;
c_7327257.num_elements = 1;
c_7327257.elements = (object *)e_7327263;
c_7327257.elements[0] = ((closureN)self_7314158)->elements[1];


make_utf8_string_with_len(c_7327264, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7327257, &c_7327264, ((closureN)self_7314158)->elements[0]);}
;; 
}

static void __lambda_1202(void *data, object self_7314159, int argc, object *args) /* object self_7314159, object r_737537 */
 {
 object r_737537 = args[0];
  
pair_type local_7327262; 
return_direct_with_clo1(data,  ((closureN)self_7314159)->elements[0], (((closure)  ((closureN)self_7314159)->elements[0])->fn),  set_pair_as_expr(&local_7327262, r_737537, boolean_f));; 
}

static void __lambda_1197(void *data, object self_7314160, int argc, object *args) /* object self_7314160, object k_737539 */
 {
 object k_737539 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314160)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314160)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1]))))) ){ 
    complex_num_type local_7327130; 
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7327130, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1])))))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1])))) ){ 
    complex_num_type local_7327149; 
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7327149, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314160)->elements[1]))))) ){ 
  
closureN_type c_7327159;
object e_7327244 [3];
c_7327159.hdr.mark = gc_color_red;
 c_7327159.hdr.grayed = 0;
c_7327159.tag = closureN_tag;
 c_7327159.fn = (function_type)__lambda_1198;
c_7327159.num_args = 1;
c_7327159.num_elements = 3;
c_7327159.elements = (object *)e_7327244;
c_7327159.elements[0] = k_737539;
c_7327159.elements[1] = ((closureN)self_7314160)->elements[0];
c_7327159.elements[2] = ((closureN)self_7314160)->elements[1];

return_closcall2(data,  ((closureN)self_7314160)->elements[0],  &c_7327159, quote__if);
} else { 
  return_direct_with_clo1(data,  k_737539, (((closure)  k_737539)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737539, (((closure)  k_737539)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737539, (((closure)  k_737539)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737539, (((closure)  k_737539)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737539, (((closure)  k_737539)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737539, (((closure)  k_737539)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737539, (((closure)  k_737539)->fn),  boolean_f);}
;; 
}

static void __lambda_1198(void *data, object self_7314161, int argc, object *args) /* object self_7314161, object r_737558 */
 {
 object r_737558 = args[0];
  
closureN_type c_7327162;
object e_7327243 [4];
c_7327162.hdr.mark = gc_color_red;
 c_7327162.hdr.grayed = 0;
c_7327162.tag = closureN_tag;
 c_7327162.fn = (function_type)__lambda_1199;
c_7327162.num_args = 1;
c_7327162.num_elements = 4;
c_7327162.elements = (object *)e_7327243;
c_7327162.elements[0] = ((closureN)self_7314161)->elements[0];
c_7327162.elements[1] = r_737558;
c_7327162.elements[2] = ((closureN)self_7314161)->elements[1];
c_7327162.elements[3] = ((closureN)self_7314161)->elements[2];

return_closcall2(data,  ((closureN)self_7314161)->elements[1],  &c_7327162, quote_begin);; 
}

static void __lambda_1199(void *data, object self_7314162, int argc, object *args) /* object self_7314162, object r_737576 */
 {
 object r_737576 = args[0];
  
closureN_type c_7327165;
object e_7327242 [4];
c_7327165.hdr.mark = gc_color_red;
 c_7327165.hdr.grayed = 0;
c_7327165.tag = closureN_tag;
 c_7327165.fn = (function_type)__lambda_1200;
c_7327165.num_args = 1;
c_7327165.num_elements = 4;
c_7327165.elements = (object *)e_7327242;
c_7327165.elements[0] = ((closureN)self_7314162)->elements[0];
c_7327165.elements[1] = ((closureN)self_7314162)->elements[1];
c_7327165.elements[2] = r_737576;
c_7327165.elements[3] = ((closureN)self_7314162)->elements[3];

return_closcall2(data,  ((closureN)self_7314162)->elements[2],  &c_7327165, quote_guard_91aux);; 
}

static void __lambda_1200(void *data, object self_7314163, int argc, object *args) /* object self_7314163, object r_737569_7311590_7311599 */
 {
 object r_737569_7311590_7311599 = args[0];
  
pair_type local_7327170; 

pair_type local_7327173; 

pair_type local_7327177; 







pair_type local_7327187; 

pair_type local_7327190; 

pair_type local_7327194; 

















pair_type local_7327215; 

pair_type local_7327218; 

pair_type local_7327221; 



pair_type local_7327227; 












return_direct_with_clo1(data,  ((closureN)self_7314163)->elements[0], (((closure)  ((closureN)self_7314163)->elements[0])->fn),  set_pair_as_expr(&local_7327170, set_pair_as_expr(&local_7327173, ((closureN)self_7314163)->elements[1], set_pair_as_expr(&local_7327177, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3]))), set_pair_as_expr(&local_7327187, set_pair_as_expr(&local_7327190, ((closureN)self_7314163)->elements[2], set_pair_as_expr(&local_7327194, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3])))))), set_pair_as_expr(&local_7327215, set_pair_as_expr(&local_7327218, r_737569_7311590_7311599, set_pair_as_expr(&local_7327221, Cyc_car(data, ((closureN)self_7314163)->elements[3]), set_pair_as_expr(&local_7327227, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314163)->elements[3])))))), NULL)))), boolean_f));; 
}

static void __lambda_1192(void *data, object self_7314164, int argc, object *args) /* object self_7314164, object k_737583 */
 {
 object k_737583 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314164)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314164)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314164)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314164)->elements[1]))))) ){ 
    complex_num_type local_7327013; 
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7327013, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314164)->elements[1])))))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314164)->elements[1])))) ){ 
  
closureN_type c_7327032;
object e_7327089 [3];
c_7327032.hdr.mark = gc_color_red;
 c_7327032.hdr.grayed = 0;
c_7327032.tag = closureN_tag;
 c_7327032.fn = (function_type)__lambda_1193;
c_7327032.num_args = 1;
c_7327032.num_elements = 3;
c_7327032.elements = (object *)e_7327089;
c_7327032.elements[0] = k_737583;
c_7327032.elements[1] = ((closureN)self_7314164)->elements[0];
c_7327032.elements[2] = ((closureN)self_7314164)->elements[1];

return_closcall2(data,  ((closureN)self_7314164)->elements[0],  &c_7327032, quote__if);
} else { 
  return_direct_with_clo1(data,  k_737583, (((closure)  k_737583)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737583, (((closure)  k_737583)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737583, (((closure)  k_737583)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737583, (((closure)  k_737583)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737583, (((closure)  k_737583)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737583, (((closure)  k_737583)->fn),  boolean_f);}
;; 
}

static void __lambda_1193(void *data, object self_7314165, int argc, object *args) /* object self_7314165, object r_737599 */
 {
 object r_737599 = args[0];
  
closureN_type c_7327035;
object e_7327088 [3];
c_7327035.hdr.mark = gc_color_red;
 c_7327035.hdr.grayed = 0;
c_7327035.tag = closureN_tag;
 c_7327035.fn = (function_type)__lambda_1194;
c_7327035.num_args = 1;
c_7327035.num_elements = 3;
c_7327035.elements = (object *)e_7327088;
c_7327035.elements[0] = ((closureN)self_7314165)->elements[0];
c_7327035.elements[1] = r_737599;
c_7327035.elements[2] = ((closureN)self_7314165)->elements[2];

return_closcall2(data,  ((closureN)self_7314165)->elements[1],  &c_7327035, quote_begin);; 
}

static void __lambda_1194(void *data, object self_7314166, int argc, object *args) /* object self_7314166, object r_737609 */
 {
 object r_737609 = args[0];
  
pair_type local_7327040; 

pair_type local_7327043; 

pair_type local_7327047; 







pair_type local_7327057; 

pair_type local_7327060; 

pair_type local_7327063; 

















pair_type local_7327084; 


return_direct_with_clo1(data,  ((closureN)self_7314166)->elements[0], (((closure)  ((closureN)self_7314166)->elements[0])->fn),  set_pair_as_expr(&local_7327040, set_pair_as_expr(&local_7327043, ((closureN)self_7314166)->elements[1], set_pair_as_expr(&local_7327047, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314166)->elements[2]))), set_pair_as_expr(&local_7327057, set_pair_as_expr(&local_7327060, r_737609, set_pair_as_expr(&local_7327063, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314166)->elements[2])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314166)->elements[2])))))), set_pair_as_expr(&local_7327084, Cyc_car(data, ((closureN)self_7314166)->elements[2]), NULL)))), boolean_f));; 
}

static void __lambda_1187(void *data, object self_7314167, int argc, object *args) /* object self_7314167, object k_737616 */
 {
 object k_737616 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314167)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314167)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314167)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314167)->elements[1]))))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314167)->elements[1])))) ){ 
    complex_num_type local_7326909; 
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326909, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314167)->elements[1]))))) ){ 
  
closureN_type c_7326919;
object e_7326972 [3];
c_7326919.hdr.mark = gc_color_red;
 c_7326919.hdr.grayed = 0;
c_7326919.tag = closureN_tag;
 c_7326919.fn = (function_type)__lambda_1188;
c_7326919.num_args = 1;
c_7326919.num_elements = 3;
c_7326919.elements = (object *)e_7326972;
c_7326919.elements[0] = k_737616;
c_7326919.elements[1] = ((closureN)self_7314167)->elements[0];
c_7326919.elements[2] = ((closureN)self_7314167)->elements[1];

return_closcall2(data,  ((closureN)self_7314167)->elements[0],  &c_7326919, quote_or);
} else { 
  return_direct_with_clo1(data,  k_737616, (((closure)  k_737616)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737616, (((closure)  k_737616)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737616, (((closure)  k_737616)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737616, (((closure)  k_737616)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737616, (((closure)  k_737616)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737616, (((closure)  k_737616)->fn),  boolean_f);}
;; 
}

static void __lambda_1188(void *data, object self_7314168, int argc, object *args) /* object self_7314168, object r_737632 */
 {
 object r_737632 = args[0];
  
closureN_type c_7326922;
object e_7326971 [3];
c_7326922.hdr.mark = gc_color_red;
 c_7326922.hdr.grayed = 0;
c_7326922.tag = closureN_tag;
 c_7326922.fn = (function_type)__lambda_1189;
c_7326922.num_args = 1;
c_7326922.num_elements = 3;
c_7326922.elements = (object *)e_7326971;
c_7326922.elements[0] = ((closureN)self_7314168)->elements[0];
c_7326922.elements[1] = r_737632;
c_7326922.elements[2] = ((closureN)self_7314168)->elements[2];

return_closcall2(data,  ((closureN)self_7314168)->elements[1],  &c_7326922, quote_guard_91aux);; 
}

static void __lambda_1189(void *data, object self_7314169, int argc, object *args) /* object self_7314169, object r_737640 */
 {
 object r_737640 = args[0];
  
pair_type local_7326927; 

pair_type local_7326930; 

pair_type local_7326934; 







pair_type local_7326944; 

pair_type local_7326947; 

pair_type local_7326950; 



pair_type local_7326956; 












return_direct_with_clo1(data,  ((closureN)self_7314169)->elements[0], (((closure)  ((closureN)self_7314169)->elements[0])->fn),  set_pair_as_expr(&local_7326927, set_pair_as_expr(&local_7326930, ((closureN)self_7314169)->elements[1], set_pair_as_expr(&local_7326934, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314169)->elements[2]))), set_pair_as_expr(&local_7326944, set_pair_as_expr(&local_7326947, r_737640, set_pair_as_expr(&local_7326950, Cyc_car(data, ((closureN)self_7314169)->elements[2]), set_pair_as_expr(&local_7326956, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314169)->elements[2]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314169)->elements[2])))))), NULL))), boolean_f));; 
}

static void __lambda_1183(void *data, object self_7314170, int argc, object *args) /* object self_7314170, object k_737649 */
 {
 object k_737649 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314170)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314170)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314170)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314170)->elements[1]))))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314170)->elements[1])))) ){ 
  
closureN_type c_7326837;
object e_7326862 [2];
c_7326837.hdr.mark = gc_color_red;
 c_7326837.hdr.grayed = 0;
c_7326837.tag = closureN_tag;
 c_7326837.fn = (function_type)__lambda_1184;
c_7326837.num_args = 1;
c_7326837.num_elements = 2;
c_7326837.elements = (object *)e_7326862;
c_7326837.elements[0] = k_737649;
c_7326837.elements[1] = ((closureN)self_7314170)->elements[1];

return_closcall2(data,  ((closureN)self_7314170)->elements[0],  &c_7326837, quote_or);
} else { 
  return_direct_with_clo1(data,  k_737649, (((closure)  k_737649)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737649, (((closure)  k_737649)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737649, (((closure)  k_737649)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737649, (((closure)  k_737649)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737649, (((closure)  k_737649)->fn),  boolean_f);}
;; 
}

static void __lambda_1184(void *data, object self_7314171, int argc, object *args) /* object self_7314171, object r_737662 */
 {
 object r_737662 = args[0];
  
pair_type local_7326842; 

pair_type local_7326845; 

pair_type local_7326848; 







pair_type local_7326858; 


return_direct_with_clo1(data,  ((closureN)self_7314171)->elements[0], (((closure)  ((closureN)self_7314171)->elements[0])->fn),  set_pair_as_expr(&local_7326842, set_pair_as_expr(&local_7326845, r_737662, set_pair_as_expr(&local_7326848, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314171)->elements[1]))), set_pair_as_expr(&local_7326858, Cyc_car(data, ((closureN)self_7314171)->elements[1]), NULL))), boolean_f));; 
}

static void __lambda_1172(void *data, object self_7314172, int argc, object *args) /* object self_7314172, object k_737671 */
 {
 object k_737671 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314172)->elements[2])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314172)->elements[2]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314172)->elements[2])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314172)->elements[2]))))) ){ 
  
closureN_type c_7326612;
object e_7326791 [4];
c_7326612.hdr.mark = gc_color_red;
 c_7326612.hdr.grayed = 0;
c_7326612.tag = closureN_tag;
 c_7326612.fn = (function_type)__lambda_1173;
c_7326612.num_args = 1;
c_7326612.num_elements = 4;
c_7326612.elements = (object *)e_7326791;
c_7326612.elements[0] = ((closureN)self_7314172)->elements[0];
c_7326612.elements[1] = k_737671;
c_7326612.elements[2] = ((closureN)self_7314172)->elements[1];
c_7326612.elements[3] = ((closureN)self_7314172)->elements[2];

return_closcall2(data,  ((closureN)self_7314172)->elements[1],  &c_7326612, quote__123_125);
} else { 
  return_direct_with_clo1(data,  k_737671, (((closure)  k_737671)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737671, (((closure)  k_737671)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737671, (((closure)  k_737671)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737671, (((closure)  k_737671)->fn),  boolean_f);}
;; 
}

static void __lambda_1173(void *data, object self_7314173, int argc, object *args) /* object self_7314173, object r_737740 */
 {
 object r_737740 = args[0];
  
closureN_type c_7326615;
object e_7326781 [3];
c_7326615.hdr.mark = gc_color_red;
 c_7326615.hdr.grayed = 0;
c_7326615.tag = closureN_tag;
 c_7326615.fn = (function_type)__lambda_1174;
c_7326615.num_args = 1;
c_7326615.num_elements = 3;
c_7326615.elements = (object *)e_7326781;
c_7326615.elements[0] = ((closureN)self_7314173)->elements[1];
c_7326615.elements[1] = ((closureN)self_7314173)->elements[2];
c_7326615.elements[2] = ((closureN)self_7314173)->elements[3];









return_closcall3(data,  ((closureN)self_7314173)->elements[0],  &c_7326615, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314173)->elements[3])))), r_737740);; 
}

static void __lambda_1174(void *data, object self_7314174, int argc, object *args) /* object self_7314174, object r_737682 */
 {
 object r_737682 = args[0];
  if( (boolean_f != r_737682) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314174)->elements[2])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314174)->elements[2]))))))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314174)->elements[2])))) ){ 
    complex_num_type local_7326649; 
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326649, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314174)->elements[2]))))) ){ 
  
closureN_type c_7326659;
object e_7326770 [3];
c_7326659.hdr.mark = gc_color_red;
 c_7326659.hdr.grayed = 0;
c_7326659.tag = closureN_tag;
 c_7326659.fn = (function_type)__lambda_1175;
c_7326659.num_args = 1;
c_7326659.num_elements = 3;
c_7326659.elements = (object *)e_7326770;
c_7326659.elements[0] = ((closureN)self_7314174)->elements[0];
c_7326659.elements[1] = ((closureN)self_7314174)->elements[1];
c_7326659.elements[2] = ((closureN)self_7314174)->elements[2];

return_closcall2(data,  ((closureN)self_7314174)->elements[1],  &c_7326659, quote_let);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314174)->elements[0], (((closure)  ((closureN)self_7314174)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314174)->elements[0], (((closure)  ((closureN)self_7314174)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314174)->elements[0], (((closure)  ((closureN)self_7314174)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314174)->elements[0], (((closure)  ((closureN)self_7314174)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314174)->elements[0], (((closure)  ((closureN)self_7314174)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1175(void *data, object self_7314175, int argc, object *args) /* object self_7314175, object r_737694 */
 {
 object r_737694 = args[0];
  
closureN_type c_7326662;
object e_7326769 [4];
c_7326662.hdr.mark = gc_color_red;
 c_7326662.hdr.grayed = 0;
c_7326662.tag = closureN_tag;
 c_7326662.fn = (function_type)__lambda_1176;
c_7326662.num_args = 1;
c_7326662.num_elements = 4;
c_7326662.elements = (object *)e_7326769;
c_7326662.elements[0] = ((closureN)self_7314175)->elements[0];
c_7326662.elements[1] = r_737694;
c_7326662.elements[2] = ((closureN)self_7314175)->elements[1];
c_7326662.elements[3] = ((closureN)self_7314175)->elements[2];

return_closcall2(data,  ((closureN)self_7314175)->elements[1],  &c_7326662, quote_temp);; 
}

static void __lambda_1176(void *data, object self_7314176, int argc, object *args) /* object self_7314176, object r_737733 */
 {
 object r_737733 = args[0];
  
closureN_type c_7326665;
object e_7326768 [5];
c_7326665.hdr.mark = gc_color_red;
 c_7326665.hdr.grayed = 0;
c_7326665.tag = closureN_tag;
 c_7326665.fn = (function_type)__lambda_1177;
c_7326665.num_args = 1;
c_7326665.num_elements = 5;
c_7326665.elements = (object *)e_7326768;
c_7326665.elements[0] = ((closureN)self_7314176)->elements[0];
c_7326665.elements[1] = ((closureN)self_7314176)->elements[1];
c_7326665.elements[2] = r_737733;
c_7326665.elements[3] = ((closureN)self_7314176)->elements[2];
c_7326665.elements[4] = ((closureN)self_7314176)->elements[3];

return_closcall2(data,  ((closureN)self_7314176)->elements[2],  &c_7326665, quote__if);; 
}

static void __lambda_1177(void *data, object self_7314177, int argc, object *args) /* object self_7314177, object r_737703_7311409_7311427_7311444 */
 {
 object r_737703_7311409_7311427_7311444 = args[0];
  
closureN_type c_7326668;
object e_7326767 [6];
c_7326668.hdr.mark = gc_color_red;
 c_7326668.hdr.grayed = 0;
c_7326668.tag = closureN_tag;
 c_7326668.fn = (function_type)__lambda_1178;
c_7326668.num_args = 1;
c_7326668.num_elements = 6;
c_7326668.elements = (object *)e_7326767;
c_7326668.elements[0] = ((closureN)self_7314177)->elements[0];
c_7326668.elements[1] = ((closureN)self_7314177)->elements[1];
c_7326668.elements[2] = r_737703_7311409_7311427_7311444;
c_7326668.elements[3] = ((closureN)self_7314177)->elements[2];
c_7326668.elements[4] = ((closureN)self_7314177)->elements[3];
c_7326668.elements[5] = ((closureN)self_7314177)->elements[4];

return_closcall2(data,  ((closureN)self_7314177)->elements[3],  &c_7326668, quote_temp);; 
}

static void __lambda_1178(void *data, object self_7314178, int argc, object *args) /* object self_7314178, object r_737706_7311410_7311428_7311445 */
 {
 object r_737706_7311410_7311428_7311445 = args[0];
  
closureN_type c_7326671;
object e_7326766 [7];
c_7326671.hdr.mark = gc_color_red;
 c_7326671.hdr.grayed = 0;
c_7326671.tag = closureN_tag;
 c_7326671.fn = (function_type)__lambda_1179;
c_7326671.num_args = 1;
c_7326671.num_elements = 7;
c_7326671.elements = (object *)e_7326766;
c_7326671.elements[0] = ((closureN)self_7314178)->elements[0];
c_7326671.elements[1] = ((closureN)self_7314178)->elements[1];
c_7326671.elements[2] = ((closureN)self_7314178)->elements[2];
c_7326671.elements[3] = r_737706_7311410_7311428_7311445;
c_7326671.elements[4] = ((closureN)self_7314178)->elements[3];
c_7326671.elements[5] = ((closureN)self_7314178)->elements[4];
c_7326671.elements[6] = ((closureN)self_7314178)->elements[5];

return_closcall2(data,  ((closureN)self_7314178)->elements[4],  &c_7326671, quote_temp);; 
}

static void __lambda_1179(void *data, object self_7314179, int argc, object *args) /* object self_7314179, object r_737724_7311411_7311429_7311446 */
 {
 object r_737724_7311411_7311429_7311446 = args[0];
  
closureN_type c_7326674;
object e_7326765 [7];
c_7326674.hdr.mark = gc_color_red;
 c_7326674.hdr.grayed = 0;
c_7326674.tag = closureN_tag;
 c_7326674.fn = (function_type)__lambda_1180;
c_7326674.num_args = 1;
c_7326674.num_elements = 7;
c_7326674.elements = (object *)e_7326765;
c_7326674.elements[0] = ((closureN)self_7314179)->elements[0];
c_7326674.elements[1] = ((closureN)self_7314179)->elements[1];
c_7326674.elements[2] = ((closureN)self_7314179)->elements[2];
c_7326674.elements[3] = ((closureN)self_7314179)->elements[3];
c_7326674.elements[4] = r_737724_7311411_7311429_7311446;
c_7326674.elements[5] = ((closureN)self_7314179)->elements[4];
c_7326674.elements[6] = ((closureN)self_7314179)->elements[6];

return_closcall2(data,  ((closureN)self_7314179)->elements[5],  &c_7326674, quote_guard_91aux);; 
}

static void __lambda_1180(void *data, object self_7314180, int argc, object *args) /* object self_7314180, object r_737715_7311414_7311432_7311449_7311462_7311474 */
 {
 object r_737715_7311414_7311432_7311449_7311462_7311474 = args[0];
  
pair_type local_7326679; 

pair_type local_7326682; 

pair_type local_7326686; 

pair_type local_7326689; 

pair_type local_7326692; 

pair_type local_7326696; 







pair_type local_7326706; 

pair_type local_7326709; 

pair_type local_7326713; 

pair_type local_7326717; 

pair_type local_7326720; 











pair_type local_7326734; 

pair_type local_7326738; 

pair_type local_7326741; 

pair_type local_7326744; 



pair_type local_7326750; 












return_direct_with_clo1(data,  ((closureN)self_7314180)->elements[0], (((closure)  ((closureN)self_7314180)->elements[0])->fn),  set_pair_as_expr(&local_7326679, set_pair_as_expr(&local_7326682, ((closureN)self_7314180)->elements[1], set_pair_as_expr(&local_7326686, set_pair_as_expr(&local_7326689, set_pair_as_expr(&local_7326692, ((closureN)self_7314180)->elements[5], set_pair_as_expr(&local_7326696, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314180)->elements[6]))), NULL)), NULL), set_pair_as_expr(&local_7326706, set_pair_as_expr(&local_7326709, ((closureN)self_7314180)->elements[2], set_pair_as_expr(&local_7326713, ((closureN)self_7314180)->elements[3], set_pair_as_expr(&local_7326717, set_pair_as_expr(&local_7326720, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314180)->elements[6]))))), set_pair_as_expr(&local_7326734, ((closureN)self_7314180)->elements[4], NULL)), set_pair_as_expr(&local_7326738, set_pair_as_expr(&local_7326741, r_737715_7311414_7311432_7311449_7311462_7311474, set_pair_as_expr(&local_7326744, Cyc_car(data, ((closureN)self_7314180)->elements[6]), set_pair_as_expr(&local_7326750, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314180)->elements[6]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314180)->elements[6])))))), NULL)))), NULL))), boolean_f));; 
}

static void __lambda_1162(void *data, object self_7314181, int argc, object *args) /* object self_7314181, object k_737743 */
 {
 object k_737743 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314181)->elements[2])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314181)->elements[2]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314181)->elements[2])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314181)->elements[2]))))) ){ 
  
closureN_type c_7326434;
object e_7326573 [4];
c_7326434.hdr.mark = gc_color_red;
 c_7326434.hdr.grayed = 0;
c_7326434.tag = closureN_tag;
 c_7326434.fn = (function_type)__lambda_1163;
c_7326434.num_args = 1;
c_7326434.num_elements = 4;
c_7326434.elements = (object *)e_7326573;
c_7326434.elements[0] = ((closureN)self_7314181)->elements[0];
c_7326434.elements[1] = k_737743;
c_7326434.elements[2] = ((closureN)self_7314181)->elements[1];
c_7326434.elements[3] = ((closureN)self_7314181)->elements[2];

return_closcall2(data,  ((closureN)self_7314181)->elements[1],  &c_7326434, quote__123_125);
} else { 
  return_direct_with_clo1(data,  k_737743, (((closure)  k_737743)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737743, (((closure)  k_737743)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737743, (((closure)  k_737743)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737743, (((closure)  k_737743)->fn),  boolean_f);}
;; 
}

static void __lambda_1163(void *data, object self_7314182, int argc, object *args) /* object self_7314182, object r_737801 */
 {
 object r_737801 = args[0];
  
closureN_type c_7326437;
object e_7326563 [3];
c_7326437.hdr.mark = gc_color_red;
 c_7326437.hdr.grayed = 0;
c_7326437.tag = closureN_tag;
 c_7326437.fn = (function_type)__lambda_1164;
c_7326437.num_args = 1;
c_7326437.num_elements = 3;
c_7326437.elements = (object *)e_7326563;
c_7326437.elements[0] = ((closureN)self_7314182)->elements[1];
c_7326437.elements[1] = ((closureN)self_7314182)->elements[2];
c_7326437.elements[2] = ((closureN)self_7314182)->elements[3];









return_closcall3(data,  ((closureN)self_7314182)->elements[0],  &c_7326437, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314182)->elements[3])))), r_737801);; 
}

static void __lambda_1164(void *data, object self_7314183, int argc, object *args) /* object self_7314183, object r_737754 */
 {
 object r_737754 = args[0];
  if( (boolean_f != r_737754) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314183)->elements[2])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314183)->elements[2]))))))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314183)->elements[2])))) ){ 
  
closureN_type c_7326471;
object e_7326554 [3];
c_7326471.hdr.mark = gc_color_red;
 c_7326471.hdr.grayed = 0;
c_7326471.tag = closureN_tag;
 c_7326471.fn = (function_type)__lambda_1165;
c_7326471.num_args = 1;
c_7326471.num_elements = 3;
c_7326471.elements = (object *)e_7326554;
c_7326471.elements[0] = ((closureN)self_7314183)->elements[0];
c_7326471.elements[1] = ((closureN)self_7314183)->elements[1];
c_7326471.elements[2] = ((closureN)self_7314183)->elements[2];

return_closcall2(data,  ((closureN)self_7314183)->elements[1],  &c_7326471, quote_let);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314183)->elements[0], (((closure)  ((closureN)self_7314183)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314183)->elements[0], (((closure)  ((closureN)self_7314183)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314183)->elements[0], (((closure)  ((closureN)self_7314183)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314183)->elements[0], (((closure)  ((closureN)self_7314183)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1165(void *data, object self_7314184, int argc, object *args) /* object self_7314184, object r_737763 */
 {
 object r_737763 = args[0];
  
closureN_type c_7326474;
object e_7326553 [4];
c_7326474.hdr.mark = gc_color_red;
 c_7326474.hdr.grayed = 0;
c_7326474.tag = closureN_tag;
 c_7326474.fn = (function_type)__lambda_1166;
c_7326474.num_args = 1;
c_7326474.num_elements = 4;
c_7326474.elements = (object *)e_7326553;
c_7326474.elements[0] = ((closureN)self_7314184)->elements[0];
c_7326474.elements[1] = r_737763;
c_7326474.elements[2] = ((closureN)self_7314184)->elements[1];
c_7326474.elements[3] = ((closureN)self_7314184)->elements[2];

return_closcall2(data,  ((closureN)self_7314184)->elements[1],  &c_7326474, quote_temp);; 
}

static void __lambda_1166(void *data, object self_7314185, int argc, object *args) /* object self_7314185, object r_737794 */
 {
 object r_737794 = args[0];
  
closureN_type c_7326477;
object e_7326552 [5];
c_7326477.hdr.mark = gc_color_red;
 c_7326477.hdr.grayed = 0;
c_7326477.tag = closureN_tag;
 c_7326477.fn = (function_type)__lambda_1167;
c_7326477.num_args = 1;
c_7326477.num_elements = 5;
c_7326477.elements = (object *)e_7326552;
c_7326477.elements[0] = ((closureN)self_7314185)->elements[0];
c_7326477.elements[1] = ((closureN)self_7314185)->elements[1];
c_7326477.elements[2] = r_737794;
c_7326477.elements[3] = ((closureN)self_7314185)->elements[2];
c_7326477.elements[4] = ((closureN)self_7314185)->elements[3];

return_closcall2(data,  ((closureN)self_7314185)->elements[2],  &c_7326477, quote__if);; 
}

static void __lambda_1167(void *data, object self_7314186, int argc, object *args) /* object self_7314186, object r_737772_7311322_7311336_7311349 */
 {
 object r_737772_7311322_7311336_7311349 = args[0];
  
closureN_type c_7326480;
object e_7326551 [6];
c_7326480.hdr.mark = gc_color_red;
 c_7326480.hdr.grayed = 0;
c_7326480.tag = closureN_tag;
 c_7326480.fn = (function_type)__lambda_1168;
c_7326480.num_args = 1;
c_7326480.num_elements = 6;
c_7326480.elements = (object *)e_7326551;
c_7326480.elements[0] = ((closureN)self_7314186)->elements[0];
c_7326480.elements[1] = ((closureN)self_7314186)->elements[1];
c_7326480.elements[2] = r_737772_7311322_7311336_7311349;
c_7326480.elements[3] = ((closureN)self_7314186)->elements[2];
c_7326480.elements[4] = ((closureN)self_7314186)->elements[3];
c_7326480.elements[5] = ((closureN)self_7314186)->elements[4];

return_closcall2(data,  ((closureN)self_7314186)->elements[3],  &c_7326480, quote_temp);; 
}

static void __lambda_1168(void *data, object self_7314187, int argc, object *args) /* object self_7314187, object r_737775_7311323_7311337_7311350 */
 {
 object r_737775_7311323_7311337_7311350 = args[0];
  
closureN_type c_7326483;
object e_7326550 [6];
c_7326483.hdr.mark = gc_color_red;
 c_7326483.hdr.grayed = 0;
c_7326483.tag = closureN_tag;
 c_7326483.fn = (function_type)__lambda_1169;
c_7326483.num_args = 1;
c_7326483.num_elements = 6;
c_7326483.elements = (object *)e_7326550;
c_7326483.elements[0] = ((closureN)self_7314187)->elements[0];
c_7326483.elements[1] = ((closureN)self_7314187)->elements[1];
c_7326483.elements[2] = ((closureN)self_7314187)->elements[2];
c_7326483.elements[3] = r_737775_7311323_7311337_7311350;
c_7326483.elements[4] = ((closureN)self_7314187)->elements[3];
c_7326483.elements[5] = ((closureN)self_7314187)->elements[5];

return_closcall2(data,  ((closureN)self_7314187)->elements[4],  &c_7326483, quote_temp);; 
}

static void __lambda_1169(void *data, object self_7314188, int argc, object *args) /* object self_7314188, object r_737785_7311324_7311338_7311351 */
 {
 object r_737785_7311324_7311338_7311351 = args[0];
  
pair_type local_7326488; 

pair_type local_7326491; 

pair_type local_7326495; 

pair_type local_7326498; 

pair_type local_7326501; 

pair_type local_7326505; 







pair_type local_7326515; 

pair_type local_7326518; 

pair_type local_7326522; 

pair_type local_7326526; 

pair_type local_7326529; 











pair_type local_7326543; 

pair_type local_7326546; 


return_direct_with_clo1(data,  ((closureN)self_7314188)->elements[0], (((closure)  ((closureN)self_7314188)->elements[0])->fn),  set_pair_as_expr(&local_7326488, set_pair_as_expr(&local_7326491, ((closureN)self_7314188)->elements[1], set_pair_as_expr(&local_7326495, set_pair_as_expr(&local_7326498, set_pair_as_expr(&local_7326501, ((closureN)self_7314188)->elements[4], set_pair_as_expr(&local_7326505, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314188)->elements[5]))), NULL)), NULL), set_pair_as_expr(&local_7326515, set_pair_as_expr(&local_7326518, ((closureN)self_7314188)->elements[2], set_pair_as_expr(&local_7326522, ((closureN)self_7314188)->elements[3], set_pair_as_expr(&local_7326526, set_pair_as_expr(&local_7326529, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314188)->elements[5]))))), set_pair_as_expr(&local_7326543, r_737785_7311324_7311338_7311351, NULL)), set_pair_as_expr(&local_7326546, Cyc_car(data, ((closureN)self_7314188)->elements[5]), NULL)))), NULL))), boolean_f));; 
}

static void __lambda_1155(void *data, object self_7314189, int argc, object *args) /* object self_7314189, object k_737804 */
 {
 object k_737804 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314189)->elements[2])) ){ 
  
  Cyc_car(data, ((closureN)self_7314189)->elements[2]);  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314189)->elements[2]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314189)->elements[2])))) ){ 
  
closureN_type c_7326309;
object e_7326390 [4];
c_7326309.hdr.mark = gc_color_red;
 c_7326309.hdr.grayed = 0;
c_7326309.tag = closureN_tag;
 c_7326309.fn = (function_type)__lambda_1156;
c_7326309.num_args = 1;
c_7326309.num_elements = 4;
c_7326309.elements = (object *)e_7326390;
c_7326309.elements[0] = ((closureN)self_7314189)->elements[0];
c_7326309.elements[1] = k_737804;
c_7326309.elements[2] = ((closureN)self_7314189)->elements[1];
c_7326309.elements[3] = ((closureN)self_7314189)->elements[2];

return_closcall2(data,  ((closureN)self_7314189)->elements[1],  &c_7326309, quote__else);
} else { 
  return_direct_with_clo1(data,  k_737804, (((closure)  k_737804)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737804, (((closure)  k_737804)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737804, (((closure)  k_737804)->fn),  boolean_f);}
;; 
}

static void __lambda_1156(void *data, object self_7314190, int argc, object *args) /* object self_7314190, object r_737826 */
 {
 object r_737826 = args[0];
  
closureN_type c_7326312;
object e_7326382 [3];
c_7326312.hdr.mark = gc_color_red;
 c_7326312.hdr.grayed = 0;
c_7326312.tag = closureN_tag;
 c_7326312.fn = (function_type)__lambda_1157;
c_7326312.num_args = 1;
c_7326312.num_elements = 3;
c_7326312.elements = (object *)e_7326382;
c_7326312.elements[0] = ((closureN)self_7314190)->elements[1];
c_7326312.elements[1] = ((closureN)self_7314190)->elements[2];
c_7326312.elements[2] = ((closureN)self_7314190)->elements[3];







return_closcall3(data,  ((closureN)self_7314190)->elements[0],  &c_7326312, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314190)->elements[3]))), r_737826);; 
}

static void __lambda_1157(void *data, object self_7314191, int argc, object *args) /* object self_7314191, object r_737812 */
 {
 object r_737812 = args[0];
  if( (boolean_f != r_737812) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314191)->elements[2]))))) ){ 
    complex_num_type local_7326324; 
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326324, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314191)->elements[2])))))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314191)->elements[2])))) ){ 
  
closureN_type c_7326343;
object e_7326373 [2];
c_7326343.hdr.mark = gc_color_red;
 c_7326343.hdr.grayed = 0;
c_7326343.tag = closureN_tag;
 c_7326343.fn = (function_type)__lambda_1158;
c_7326343.num_args = 1;
c_7326343.num_elements = 2;
c_7326343.elements = (object *)e_7326373;
c_7326343.elements[0] = ((closureN)self_7314191)->elements[0];
c_7326343.elements[1] = ((closureN)self_7314191)->elements[2];

return_closcall2(data,  ((closureN)self_7314191)->elements[1],  &c_7326343, quote_begin);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314191)->elements[0], (((closure)  ((closureN)self_7314191)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314191)->elements[0], (((closure)  ((closureN)self_7314191)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314191)->elements[0], (((closure)  ((closureN)self_7314191)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7314191)->elements[0], (((closure)  ((closureN)self_7314191)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1158(void *data, object self_7314192, int argc, object *args) /* object self_7314192, object r_737821 */
 {
 object r_737821 = args[0];
  
pair_type local_7326348; 

pair_type local_7326351; 

pair_type local_7326354; 
















return_direct_with_clo1(data,  ((closureN)self_7314192)->elements[0], (((closure)  ((closureN)self_7314192)->elements[0])->fn),  set_pair_as_expr(&local_7326348, set_pair_as_expr(&local_7326351, r_737821, set_pair_as_expr(&local_7326354, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314192)->elements[1])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314192)->elements[1])))))), boolean_f));; 
}

static void __lambda_1121(void *data, object _, int argc, object *args) /* closure _,object k_737314, object expr_732135_732150_732173_733875, object rename_732136_732151_732174_733876, object compare_732137_732152_732175_733877 */
 {
object k_737314 = args[0]; object expr_732135_732150_732173_733875 = args[1]; object rename_732136_732151_732174_733876 = args[2];
  Cyc_st_add(data, "scheme/base.sld:guard");

closureN_type c_7325901;
object e_7326283 [3];
c_7325901.hdr.mark = gc_color_red;
 c_7325901.hdr.grayed = 0;
c_7325901.tag = closureN_tag;
 c_7325901.fn = (function_type)__lambda_1122;
c_7325901.num_args = 1;
c_7325901.num_elements = 3;
c_7325901.elements = (object *)e_7326283;
c_7325901.elements[0] = expr_732135_732150_732173_733875;
c_7325901.elements[1] = k_737314;
c_7325901.elements[2] = rename_732136_732151_732174_733876;



return_direct_with_clo1(data,(closure)&c_7325901,__lambda_1122,  Cyc_cdr(data, expr_732135_732150_732173_733875));; 
}

static void __lambda_1122(void *data, object self_7314112, int argc, object *args) /* object self_7314112, object v_931_732143_732157_732177_733879 */
 {
 object v_931_732143_732157_732177_733879 = args[0];
  
closureN_type c_7325903;
object e_7326258 [2];
c_7325903.hdr.mark = gc_color_red;
 c_7325903.hdr.grayed = 0;
c_7325903.tag = closureN_tag;
 c_7325903.fn = (function_type)__lambda_1123;
c_7325903.num_args = 0;
c_7325903.num_elements = 2;
c_7325903.elements = (object *)e_7326258;
c_7325903.elements[0] = ((closureN)self_7314112)->elements[2];
c_7325903.elements[1] = v_931_732143_732157_732177_733879;


closureN_type c_7326259;
object e_7326282 [2];
c_7326259.hdr.mark = gc_color_red;
 c_7326259.hdr.grayed = 0;
c_7326259.tag = closureN_tag;
 c_7326259.fn = (function_type)__lambda_1149;
c_7326259.num_args = 1;
c_7326259.num_elements = 2;
c_7326259.elements = (object *)e_7326282;
c_7326259.elements[0] = ((closureN)self_7314112)->elements[0];
c_7326259.elements[1] = ((closureN)self_7314112)->elements[1];

return_direct_with_clo1(data,(closure)&c_7325903,__lambda_1123,  &c_7326259);; 
}

static void __lambda_1149(void *data, object self_7314113, int argc, object *args) /* object self_7314113, object tmp_732154_732156_732176_733878 */
 {
 object tmp_732154_732156_732176_733878 = args[0];
  
closureN_type c_7326261;
object e_7326275 [2];
c_7326261.hdr.mark = gc_color_red;
 c_7326261.hdr.grayed = 0;
c_7326261.tag = closureN_tag;
 c_7326261.fn = (function_type)__lambda_1150;
c_7326261.num_args = 0;
c_7326261.num_elements = 2;
c_7326261.elements = (object *)e_7326275;
c_7326261.elements[0] = ((closureN)self_7314113)->elements[0];
c_7326261.elements[1] = tmp_732154_732156_732176_733878;


closureN_type c_7326276;
object e_7326281 [1];
c_7326276.hdr.mark = gc_color_red;
 c_7326276.hdr.grayed = 0;
c_7326276.tag = closureN_tag;
 c_7326276.fn = (function_type)__lambda_1152;
c_7326276.num_args = 1;
c_7326276.num_elements = 1;
c_7326276.elements = (object *)e_7326281;
c_7326276.elements[0] = ((closureN)self_7314113)->elements[1];

return_direct_with_clo1(data,(closure)&c_7326261,__lambda_1150,  &c_7326276);; 
}

static void __lambda_1152(void *data, object self_7314114, int argc, object *args) /* object self_7314114, object r_737315 */
 {
 object r_737315 = args[0];
  

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

static void __lambda_1150(void *data, object self_7314115, int argc, object *args) /* object self_7314115, object k_737317 */
 {
 object k_737317 = args[0];
  if( (boolean_f != ((closureN)self_7314115)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_737317, (((closure)  k_737317)->fn),  ((closureN)self_7314115)->elements[1]);
} else { 
  
closureN_type c_7326266;
object e_7326272 [1];
c_7326266.hdr.mark = gc_color_red;
 c_7326266.hdr.grayed = 0;
c_7326266.tag = closureN_tag;
 c_7326266.fn = (function_type)__lambda_1151;
c_7326266.num_args = 1;
c_7326266.num_elements = 1;
c_7326266.elements = (object *)e_7326272;
c_7326266.elements[0] = k_737317;


make_utf8_string_with_len(c_7326273, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7326266, &c_7326273, ((closureN)self_7314115)->elements[0]);}
;; 
}

static void __lambda_1151(void *data, object self_7314116, int argc, object *args) /* object self_7314116, object r_737318 */
 {
 object r_737318 = args[0];
  
pair_type local_7326271; 
return_direct_with_clo1(data,  ((closureN)self_7314116)->elements[0], (((closure)  ((closureN)self_7314116)->elements[0])->fn),  set_pair_as_expr(&local_7326271, r_737318, boolean_f));; 
}

static void __lambda_1123(void *data, object self_7314117, int argc, object *args) /* object self_7314117, object k_737320 */
 {
 object k_737320 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314117)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314117)->elements[1]))) ){ 
    complex_num_type local_7325914; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325914, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314117)->elements[1])))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314117)->elements[1]))) ){ 
    complex_num_type local_7325927; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325927, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314117)->elements[1])))) ){ 
  
closureN_type c_7325935;
object e_7326252 [3];
c_7325935.hdr.mark = gc_color_red;
 c_7325935.hdr.grayed = 0;
c_7325935.tag = closureN_tag;
 c_7325935.fn = (function_type)__lambda_1124;
c_7325935.num_args = 1;
c_7325935.num_elements = 3;
c_7325935.elements = (object *)e_7326252;
c_7325935.elements[0] = k_737320;
c_7325935.elements[1] = ((closureN)self_7314117)->elements[0];
c_7325935.elements[2] = ((closureN)self_7314117)->elements[1];

return_closcall2(data,  ((closureN)self_7314117)->elements[0],  &c_7325935, quote_call_91with_91current_91continuation);
} else { 
  return_direct_with_clo1(data,  k_737320, (((closure)  k_737320)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737320, (((closure)  k_737320)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737320, (((closure)  k_737320)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737320, (((closure)  k_737320)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737320, (((closure)  k_737320)->fn),  boolean_f);}
;; 
}

static void __lambda_1124(void *data, object self_7314118, int argc, object *args) /* object self_7314118, object r_737336 */
 {
 object r_737336 = args[0];
  
closureN_type c_7325938;
object e_7326251 [4];
c_7325938.hdr.mark = gc_color_red;
 c_7325938.hdr.grayed = 0;
c_7325938.tag = closureN_tag;
 c_7325938.fn = (function_type)__lambda_1125;
c_7325938.num_args = 1;
c_7325938.num_elements = 4;
c_7325938.elements = (object *)e_7326251;
c_7325938.elements[0] = ((closureN)self_7314118)->elements[0];
c_7325938.elements[1] = r_737336;
c_7325938.elements[2] = ((closureN)self_7314118)->elements[1];
c_7325938.elements[3] = ((closureN)self_7314118)->elements[2];

return_closcall2(data,  ((closureN)self_7314118)->elements[1],  &c_7325938, quote_lambda);; 
}

static void __lambda_1125(void *data, object self_7314119, int argc, object *args) /* object self_7314119, object r_737342 */
 {
 object r_737342 = args[0];
  
closureN_type c_7325941;
object e_7326250 [5];
c_7325941.hdr.mark = gc_color_red;
 c_7325941.hdr.grayed = 0;
c_7325941.tag = closureN_tag;
 c_7325941.fn = (function_type)__lambda_1126;
c_7325941.num_args = 1;
c_7325941.num_elements = 5;
c_7325941.elements = (object *)e_7326250;
c_7325941.elements[0] = ((closureN)self_7314119)->elements[0];
c_7325941.elements[1] = ((closureN)self_7314119)->elements[1];
c_7325941.elements[2] = r_737342;
c_7325941.elements[3] = ((closureN)self_7314119)->elements[2];
c_7325941.elements[4] = ((closureN)self_7314119)->elements[3];

return_closcall2(data,  ((closureN)self_7314119)->elements[2],  &c_7325941, quote_guard_91k);; 
}

static void __lambda_1126(void *data, object self_7314120, int argc, object *args) /* object self_7314120, object r_737519 */
 {
 object r_737519 = args[0];
  
closureN_type c_7325944;
object e_7326249 [6];
c_7325944.hdr.mark = gc_color_red;
 c_7325944.hdr.grayed = 0;
c_7325944.tag = closureN_tag;
 c_7325944.fn = (function_type)__lambda_1127;
c_7325944.num_args = 1;
c_7325944.num_elements = 6;
c_7325944.elements = (object *)e_7326249;
c_7325944.elements[0] = ((closureN)self_7314120)->elements[0];
c_7325944.elements[1] = ((closureN)self_7314120)->elements[1];
c_7325944.elements[2] = ((closureN)self_7314120)->elements[2];
c_7325944.elements[3] = r_737519;
c_7325944.elements[4] = ((closureN)self_7314120)->elements[3];
c_7325944.elements[5] = ((closureN)self_7314120)->elements[4];

return_closcall2(data,  ((closureN)self_7314120)->elements[3],  &c_7325944, quote_with_91exception_91handler);; 
}

static void __lambda_1127(void *data, object self_7314121, int argc, object *args) /* object self_7314121, object r_737351_739374 */
 {
 object r_737351_739374 = args[0];
  
closureN_type c_7325947;
object e_7326248 [7];
c_7325947.hdr.mark = gc_color_red;
 c_7325947.hdr.grayed = 0;
c_7325947.tag = closureN_tag;
 c_7325947.fn = (function_type)__lambda_1128;
c_7325947.num_args = 1;
c_7325947.num_elements = 7;
c_7325947.elements = (object *)e_7326248;
c_7325947.elements[0] = ((closureN)self_7314121)->elements[0];
c_7325947.elements[1] = ((closureN)self_7314121)->elements[1];
c_7325947.elements[2] = ((closureN)self_7314121)->elements[2];
c_7325947.elements[3] = r_737351_739374;
c_7325947.elements[4] = ((closureN)self_7314121)->elements[3];
c_7325947.elements[5] = ((closureN)self_7314121)->elements[4];
c_7325947.elements[6] = ((closureN)self_7314121)->elements[5];

return_closcall2(data,  ((closureN)self_7314121)->elements[4],  &c_7325947, quote_lambda);; 
}

static void __lambda_1128(void *data, object self_7314122, int argc, object *args) /* object self_7314122, object r_737413_739375 */
 {
 object r_737413_739375 = args[0];
  
closureN_type c_7325950;
object e_7326247 [8];
c_7325950.hdr.mark = gc_color_red;
 c_7325950.hdr.grayed = 0;
c_7325950.tag = closureN_tag;
 c_7325950.fn = (function_type)__lambda_1129;
c_7325950.num_args = 1;
c_7325950.num_elements = 8;
c_7325950.elements = (object *)e_7326247;
c_7325950.elements[0] = ((closureN)self_7314122)->elements[0];
c_7325950.elements[1] = ((closureN)self_7314122)->elements[1];
c_7325950.elements[2] = ((closureN)self_7314122)->elements[2];
c_7325950.elements[3] = ((closureN)self_7314122)->elements[3];
c_7325950.elements[4] = r_737413_739375;
c_7325950.elements[5] = ((closureN)self_7314122)->elements[4];
c_7325950.elements[6] = ((closureN)self_7314122)->elements[5];
c_7325950.elements[7] = ((closureN)self_7314122)->elements[6];

return_closcall2(data,  ((closureN)self_7314122)->elements[5],  &c_7325950, quote_condition);; 
}

static void __lambda_1129(void *data, object self_7314123, int argc, object *args) /* object self_7314123, object r_737513_739376 */
 {
 object r_737513_739376 = args[0];
  
closureN_type c_7325953;
object e_7326246 [9];
c_7325953.hdr.mark = gc_color_red;
 c_7325953.hdr.grayed = 0;
c_7325953.tag = closureN_tag;
 c_7325953.fn = (function_type)__lambda_1130;
c_7325953.num_args = 1;
c_7325953.num_elements = 9;
c_7325953.elements = (object *)e_7326246;
c_7325953.elements[0] = ((closureN)self_7314123)->elements[0];
c_7325953.elements[1] = ((closureN)self_7314123)->elements[1];
c_7325953.elements[2] = ((closureN)self_7314123)->elements[2];
c_7325953.elements[3] = ((closureN)self_7314123)->elements[3];
c_7325953.elements[4] = ((closureN)self_7314123)->elements[4];
c_7325953.elements[5] = r_737513_739376;
c_7325953.elements[6] = ((closureN)self_7314123)->elements[5];
c_7325953.elements[7] = ((closureN)self_7314123)->elements[6];
c_7325953.elements[8] = ((closureN)self_7314123)->elements[7];

return_closcall2(data,  ((closureN)self_7314123)->elements[6],  &c_7325953, quote_call_91with_91current_91continuation);; 
}

static void __lambda_1130(void *data, object self_7314124, int argc, object *args) /* object self_7314124, object r_737425_739378_739453 */
 {
 object r_737425_739378_739453 = args[0];
  
closureN_type c_7325956;
object e_7326245 [10];
c_7325956.hdr.mark = gc_color_red;
 c_7325956.hdr.grayed = 0;
c_7325956.tag = closureN_tag;
 c_7325956.fn = (function_type)__lambda_1131;
c_7325956.num_args = 1;
c_7325956.num_elements = 10;
c_7325956.elements = (object *)e_7326245;
c_7325956.elements[0] = ((closureN)self_7314124)->elements[0];
c_7325956.elements[1] = ((closureN)self_7314124)->elements[1];
c_7325956.elements[2] = ((closureN)self_7314124)->elements[2];
c_7325956.elements[3] = ((closureN)self_7314124)->elements[3];
c_7325956.elements[4] = ((closureN)self_7314124)->elements[4];
c_7325956.elements[5] = r_737425_739378_739453;
c_7325956.elements[6] = ((closureN)self_7314124)->elements[5];
c_7325956.elements[7] = ((closureN)self_7314124)->elements[6];
c_7325956.elements[8] = ((closureN)self_7314124)->elements[7];
c_7325956.elements[9] = ((closureN)self_7314124)->elements[8];

return_closcall2(data,  ((closureN)self_7314124)->elements[7],  &c_7325956, quote_lambda);; 
}

static void __lambda_1131(void *data, object self_7314125, int argc, object *args) /* object self_7314125, object r_737431_739379_739454 */
 {
 object r_737431_739379_739454 = args[0];
  
closureN_type c_7325959;
object e_7326244 [11];
c_7325959.hdr.mark = gc_color_red;
 c_7325959.hdr.grayed = 0;
c_7325959.tag = closureN_tag;
 c_7325959.fn = (function_type)__lambda_1132;
c_7325959.num_args = 1;
c_7325959.num_elements = 11;
c_7325959.elements = (object *)e_7326244;
c_7325959.elements[0] = ((closureN)self_7314125)->elements[0];
c_7325959.elements[1] = ((closureN)self_7314125)->elements[1];
c_7325959.elements[2] = ((closureN)self_7314125)->elements[2];
c_7325959.elements[3] = ((closureN)self_7314125)->elements[3];
c_7325959.elements[4] = ((closureN)self_7314125)->elements[4];
c_7325959.elements[5] = ((closureN)self_7314125)->elements[5];
c_7325959.elements[6] = r_737431_739379_739454;
c_7325959.elements[7] = ((closureN)self_7314125)->elements[6];
c_7325959.elements[8] = ((closureN)self_7314125)->elements[7];
c_7325959.elements[9] = ((closureN)self_7314125)->elements[8];
c_7325959.elements[10] = ((closureN)self_7314125)->elements[9];

return_closcall2(data,  ((closureN)self_7314125)->elements[8],  &c_7325959, quote_handler_91k);; 
}

static void __lambda_1132(void *data, object self_7314126, int argc, object *args) /* object self_7314126, object r_737507_739380_739455 */
 {
 object r_737507_739380_739455 = args[0];
  
closureN_type c_7325962;
object e_7326243 [12];
c_7325962.hdr.mark = gc_color_red;
 c_7325962.hdr.grayed = 0;
c_7325962.tag = closureN_tag;
 c_7325962.fn = (function_type)__lambda_1133;
c_7325962.num_args = 1;
c_7325962.num_elements = 12;
c_7325962.elements = (object *)e_7326243;
c_7325962.elements[0] = ((closureN)self_7314126)->elements[0];
c_7325962.elements[1] = ((closureN)self_7314126)->elements[1];
c_7325962.elements[2] = ((closureN)self_7314126)->elements[2];
c_7325962.elements[3] = ((closureN)self_7314126)->elements[3];
c_7325962.elements[4] = ((closureN)self_7314126)->elements[4];
c_7325962.elements[5] = ((closureN)self_7314126)->elements[5];
c_7325962.elements[6] = ((closureN)self_7314126)->elements[6];
c_7325962.elements[7] = r_737507_739380_739455;
c_7325962.elements[8] = ((closureN)self_7314126)->elements[7];
c_7325962.elements[9] = ((closureN)self_7314126)->elements[8];
c_7325962.elements[10] = ((closureN)self_7314126)->elements[9];
c_7325962.elements[11] = ((closureN)self_7314126)->elements[10];

return_closcall2(data,  ((closureN)self_7314126)->elements[9],  &c_7325962, quote_guard_91k);; 
}

static void __lambda_1133(void *data, object self_7314127, int argc, object *args) /* object self_7314127, object r_737440_739382_739457_739528 */
 {
 object r_737440_739382_739457_739528 = args[0];
  
closureN_type c_7325965;
object e_7326242 [13];
c_7325965.hdr.mark = gc_color_red;
 c_7325965.hdr.grayed = 0;
c_7325965.tag = closureN_tag;
 c_7325965.fn = (function_type)__lambda_1134;
c_7325965.num_args = 1;
c_7325965.num_elements = 13;
c_7325965.elements = (object *)e_7326242;
c_7325965.elements[0] = ((closureN)self_7314127)->elements[0];
c_7325965.elements[1] = ((closureN)self_7314127)->elements[1];
c_7325965.elements[2] = ((closureN)self_7314127)->elements[2];
c_7325965.elements[3] = ((closureN)self_7314127)->elements[3];
c_7325965.elements[4] = ((closureN)self_7314127)->elements[4];
c_7325965.elements[5] = ((closureN)self_7314127)->elements[5];
c_7325965.elements[6] = ((closureN)self_7314127)->elements[6];
c_7325965.elements[7] = r_737440_739382_739457_739528;
c_7325965.elements[8] = ((closureN)self_7314127)->elements[7];
c_7325965.elements[9] = ((closureN)self_7314127)->elements[8];
c_7325965.elements[10] = ((closureN)self_7314127)->elements[9];
c_7325965.elements[11] = ((closureN)self_7314127)->elements[10];
c_7325965.elements[12] = ((closureN)self_7314127)->elements[11];

return_closcall2(data,  ((closureN)self_7314127)->elements[10],  &c_7325965, quote_lambda);; 
}

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

return_closcall2(data,  ((closureN)self_7314128)->elements[11],  &c_7325968, quote_let);; 
}

static void __lambda_1135(void *data, object self_7314129, int argc, object *args) /* object self_7314129, object r_737455_739384_739459_739530 */
 {
 object r_737455_739384_739459_739530 = args[0];
  
closureN_type c_7325971;
object e_7326240 [15];
c_7325971.hdr.mark = gc_color_red;
 c_7325971.hdr.grayed = 0;
c_7325971.tag = closureN_tag;
 c_7325971.fn = (function_type)__lambda_1136;
c_7325971.num_args = 1;
c_7325971.num_elements = 15;
c_7325971.elements = (object *)e_7326240;
c_7325971.elements[0] = ((closureN)self_7314129)->elements[0];
c_7325971.elements[1] = ((closureN)self_7314129)->elements[1];
c_7325971.elements[2] = ((closureN)self_7314129)->elements[2];
c_7325971.elements[3] = ((closureN)self_7314129)->elements[3];
c_7325971.elements[4] = ((closureN)self_7314129)->elements[4];
c_7325971.elements[5] = ((closureN)self_7314129)->elements[5];
c_7325971.elements[6] = ((closureN)self_7314129)->elements[6];
c_7325971.elements[7] = ((closureN)self_7314129)->elements[7];
c_7325971.elements[8] = ((closureN)self_7314129)->elements[8];
c_7325971.elements[9] = r_737455_739384_739459_739530;
c_7325971.elements[10] = ((closureN)self_7314129)->elements[9];
c_7325971.elements[11] = ((closureN)self_7314129)->elements[10];
c_7325971.elements[12] = ((closureN)self_7314129)->elements[11];
c_7325971.elements[13] = ((closureN)self_7314129)->elements[12];
c_7325971.elements[14] = ((closureN)self_7314129)->elements[13];

return_closcall2(data,  ((closureN)self_7314129)->elements[12],  &c_7325971, quote_condition);; 
}

static void __lambda_1136(void *data, object self_7314130, int argc, object *args) /* object self_7314130, object r_737500_739385_739460_739531 */
 {
 object r_737500_739385_739460_739531 = args[0];
  
closureN_type c_7325974;
object e_7326239 [16];
c_7325974.hdr.mark = gc_color_red;
 c_7325974.hdr.grayed = 0;
c_7325974.tag = closureN_tag;
 c_7325974.fn = (function_type)__lambda_1137;
c_7325974.num_args = 1;
c_7325974.num_elements = 16;
c_7325974.elements = (object *)e_7326239;
c_7325974.elements[0] = ((closureN)self_7314130)->elements[0];
c_7325974.elements[1] = ((closureN)self_7314130)->elements[1];
c_7325974.elements[2] = ((closureN)self_7314130)->elements[2];
c_7325974.elements[3] = ((closureN)self_7314130)->elements[3];
c_7325974.elements[4] = ((closureN)self_7314130)->elements[4];
c_7325974.elements[5] = ((closureN)self_7314130)->elements[5];
c_7325974.elements[6] = ((closureN)self_7314130)->elements[6];
c_7325974.elements[7] = ((closureN)self_7314130)->elements[7];
c_7325974.elements[8] = ((closureN)self_7314130)->elements[8];
c_7325974.elements[9] = ((closureN)self_7314130)->elements[9];
c_7325974.elements[10] = r_737500_739385_739460_739531;
c_7325974.elements[11] = ((closureN)self_7314130)->elements[10];
c_7325974.elements[12] = ((closureN)self_7314130)->elements[11];
c_7325974.elements[13] = ((closureN)self_7314130)->elements[12];
c_7325974.elements[14] = ((closureN)self_7314130)->elements[13];
c_7325974.elements[15] = ((closureN)self_7314130)->elements[14];

return_closcall2(data,  ((closureN)self_7314130)->elements[13],  &c_7325974, quote_guard_91aux);; 
}

static void __lambda_1137(void *data, object self_7314131, int argc, object *args) /* object self_7314131, object r_737464_739389_739464_739535_739601_739666_739730 */
 {
 object r_737464_739389_739464_739535_739601_739666_739730 = args[0];
  
closureN_type c_7325977;
object e_7326238 [17];
c_7325977.hdr.mark = gc_color_red;
 c_7325977.hdr.grayed = 0;
c_7325977.tag = closureN_tag;
 c_7325977.fn = (function_type)__lambda_1138;
c_7325977.num_args = 1;
c_7325977.num_elements = 17;
c_7325977.elements = (object *)e_7326238;
c_7325977.elements[0] = ((closureN)self_7314131)->elements[0];
c_7325977.elements[1] = ((closureN)self_7314131)->elements[1];
c_7325977.elements[2] = ((closureN)self_7314131)->elements[2];
c_7325977.elements[3] = ((closureN)self_7314131)->elements[3];
c_7325977.elements[4] = ((closureN)self_7314131)->elements[4];
c_7325977.elements[5] = ((closureN)self_7314131)->elements[5];
c_7325977.elements[6] = ((closureN)self_7314131)->elements[6];
c_7325977.elements[7] = ((closureN)self_7314131)->elements[7];
c_7325977.elements[8] = ((closureN)self_7314131)->elements[8];
c_7325977.elements[9] = ((closureN)self_7314131)->elements[9];
c_7325977.elements[10] = r_737464_739389_739464_739535_739601_739666_739730;
c_7325977.elements[11] = ((closureN)self_7314131)->elements[10];
c_7325977.elements[12] = ((closureN)self_7314131)->elements[11];
c_7325977.elements[13] = ((closureN)self_7314131)->elements[12];
c_7325977.elements[14] = ((closureN)self_7314131)->elements[13];
c_7325977.elements[15] = ((closureN)self_7314131)->elements[14];
c_7325977.elements[16] = ((closureN)self_7314131)->elements[15];

return_closcall2(data,  ((closureN)self_7314131)->elements[14],  &c_7325977, quote_handler_91k);; 
}

static void __lambda_1138(void *data, object self_7314132, int argc, object *args) /* object self_7314132, object r_737469_739390_739465_739536_739602_739667_739731 */
 {
 object r_737469_739390_739465_739536_739602_739667_739731 = args[0];
  
closureN_type c_7325980;
object e_7326237 [18];
c_7325980.hdr.mark = gc_color_red;
 c_7325980.hdr.grayed = 0;
c_7325980.tag = closureN_tag;
 c_7325980.fn = (function_type)__lambda_1139;
c_7325980.num_args = 1;
c_7325980.num_elements = 18;
c_7325980.elements = (object *)e_7326237;
c_7325980.elements[0] = ((closureN)self_7314132)->elements[0];
c_7325980.elements[1] = ((closureN)self_7314132)->elements[1];
c_7325980.elements[2] = ((closureN)self_7314132)->elements[2];
c_7325980.elements[3] = ((closureN)self_7314132)->elements[3];
c_7325980.elements[4] = ((closureN)self_7314132)->elements[4];
c_7325980.elements[5] = ((closureN)self_7314132)->elements[5];
c_7325980.elements[6] = ((closureN)self_7314132)->elements[6];
c_7325980.elements[7] = ((closureN)self_7314132)->elements[7];
c_7325980.elements[8] = ((closureN)self_7314132)->elements[8];
c_7325980.elements[9] = ((closureN)self_7314132)->elements[9];
c_7325980.elements[10] = ((closureN)self_7314132)->elements[10];
c_7325980.elements[11] = r_737469_739390_739465_739536_739602_739667_739731;
c_7325980.elements[12] = ((closureN)self_7314132)->elements[11];
c_7325980.elements[13] = ((closureN)self_7314132)->elements[12];
c_7325980.elements[14] = ((closureN)self_7314132)->elements[13];
c_7325980.elements[15] = ((closureN)self_7314132)->elements[14];
c_7325980.elements[16] = ((closureN)self_7314132)->elements[15];
c_7325980.elements[17] = ((closureN)self_7314132)->elements[16];

return_closcall2(data,  ((closureN)self_7314132)->elements[15],  &c_7325980, quote_lambda);; 
}

static void __lambda_1139(void *data, object self_7314133, int argc, object *args) /* object self_7314133, object r_737475_739391_739466_739537_739603_739668_739732 */
 {
 object r_737475_739391_739466_739537_739603_739668_739732 = args[0];
  
closureN_type c_7325983;
object e_7326236 [19];
c_7325983.hdr.mark = gc_color_red;
 c_7325983.hdr.grayed = 0;
c_7325983.tag = closureN_tag;
 c_7325983.fn = (function_type)__lambda_1140;
c_7325983.num_args = 1;
c_7325983.num_elements = 19;
c_7325983.elements = (object *)e_7326236;
c_7325983.elements[0] = ((closureN)self_7314133)->elements[0];
c_7325983.elements[1] = ((closureN)self_7314133)->elements[1];
c_7325983.elements[2] = ((closureN)self_7314133)->elements[2];
c_7325983.elements[3] = ((closureN)self_7314133)->elements[3];
c_7325983.elements[4] = ((closureN)self_7314133)->elements[4];
c_7325983.elements[5] = ((closureN)self_7314133)->elements[5];
c_7325983.elements[6] = ((closureN)self_7314133)->elements[6];
c_7325983.elements[7] = ((closureN)self_7314133)->elements[7];
c_7325983.elements[8] = ((closureN)self_7314133)->elements[8];
c_7325983.elements[9] = ((closureN)self_7314133)->elements[9];
c_7325983.elements[10] = ((closureN)self_7314133)->elements[10];
c_7325983.elements[11] = ((closureN)self_7314133)->elements[11];
c_7325983.elements[12] = r_737475_739391_739466_739537_739603_739668_739732;
c_7325983.elements[13] = ((closureN)self_7314133)->elements[12];
c_7325983.elements[14] = ((closureN)self_7314133)->elements[13];
c_7325983.elements[15] = ((closureN)self_7314133)->elements[14];
c_7325983.elements[16] = ((closureN)self_7314133)->elements[15];
c_7325983.elements[17] = ((closureN)self_7314133)->elements[16];
c_7325983.elements[18] = ((closureN)self_7314133)->elements[17];

return_closcall2(data,  ((closureN)self_7314133)->elements[16],  &c_7325983, quote_raise_91continuable);; 
}

static void __lambda_1140(void *data, object self_7314134, int argc, object *args) /* object self_7314134, object r_737484_739392_739467_739538_739604_739669_739733 */
 {
 object r_737484_739392_739467_739538_739604_739669_739733 = args[0];
  
closureN_type c_7325986;
object e_7326235 [20];
c_7325986.hdr.mark = gc_color_red;
 c_7325986.hdr.grayed = 0;
c_7325986.tag = closureN_tag;
 c_7325986.fn = (function_type)__lambda_1141;
c_7325986.num_args = 1;
c_7325986.num_elements = 20;
c_7325986.elements = (object *)e_7326235;
c_7325986.elements[0] = ((closureN)self_7314134)->elements[0];
c_7325986.elements[1] = ((closureN)self_7314134)->elements[1];
c_7325986.elements[2] = ((closureN)self_7314134)->elements[2];
c_7325986.elements[3] = ((closureN)self_7314134)->elements[3];
c_7325986.elements[4] = ((closureN)self_7314134)->elements[4];
c_7325986.elements[5] = ((closureN)self_7314134)->elements[5];
c_7325986.elements[6] = ((closureN)self_7314134)->elements[6];
c_7325986.elements[7] = ((closureN)self_7314134)->elements[7];
c_7325986.elements[8] = ((closureN)self_7314134)->elements[8];
c_7325986.elements[9] = ((closureN)self_7314134)->elements[9];
c_7325986.elements[10] = ((closureN)self_7314134)->elements[10];
c_7325986.elements[11] = ((closureN)self_7314134)->elements[11];
c_7325986.elements[12] = ((closureN)self_7314134)->elements[12];
c_7325986.elements[13] = r_737484_739392_739467_739538_739604_739669_739733;
c_7325986.elements[14] = ((closureN)self_7314134)->elements[13];
c_7325986.elements[15] = ((closureN)self_7314134)->elements[14];
c_7325986.elements[16] = ((closureN)self_7314134)->elements[15];
c_7325986.elements[17] = ((closureN)self_7314134)->elements[16];
c_7325986.elements[18] = ((closureN)self_7314134)->elements[17];
c_7325986.elements[19] = ((closureN)self_7314134)->elements[18];

return_closcall2(data,  ((closureN)self_7314134)->elements[17],  &c_7325986, quote_condition);; 
}

static void __lambda_1141(void *data, object self_7314135, int argc, object *args) /* object self_7314135, object r_737487_739393_739468_739539_739605_739670_739734 */
 {
 object r_737487_739393_739468_739539_739605_739670_739734 = args[0];
  
closureN_type c_7325989;
object e_7326234 [21];
c_7325989.hdr.mark = gc_color_red;
 c_7325989.hdr.grayed = 0;
c_7325989.tag = closureN_tag;
 c_7325989.fn = (function_type)__lambda_1142;
c_7325989.num_args = 1;
c_7325989.num_elements = 21;
c_7325989.elements = (object *)e_7326234;
c_7325989.elements[0] = ((closureN)self_7314135)->elements[0];
c_7325989.elements[1] = ((closureN)self_7314135)->elements[1];
c_7325989.elements[2] = ((closureN)self_7314135)->elements[2];
c_7325989.elements[3] = ((closureN)self_7314135)->elements[3];
c_7325989.elements[4] = ((closureN)self_7314135)->elements[4];
c_7325989.elements[5] = ((closureN)self_7314135)->elements[5];
c_7325989.elements[6] = ((closureN)self_7314135)->elements[6];
c_7325989.elements[7] = ((closureN)self_7314135)->elements[7];
c_7325989.elements[8] = ((closureN)self_7314135)->elements[8];
c_7325989.elements[9] = ((closureN)self_7314135)->elements[9];
c_7325989.elements[10] = ((closureN)self_7314135)->elements[10];
c_7325989.elements[11] = ((closureN)self_7314135)->elements[11];
c_7325989.elements[12] = ((closureN)self_7314135)->elements[12];
c_7325989.elements[13] = ((closureN)self_7314135)->elements[13];
c_7325989.elements[14] = r_737487_739393_739468_739539_739605_739670_739734;
c_7325989.elements[15] = ((closureN)self_7314135)->elements[14];
c_7325989.elements[16] = ((closureN)self_7314135)->elements[15];
c_7325989.elements[17] = ((closureN)self_7314135)->elements[16];
c_7325989.elements[18] = ((closureN)self_7314135)->elements[17];
c_7325989.elements[19] = ((closureN)self_7314135)->elements[18];
c_7325989.elements[20] = ((closureN)self_7314135)->elements[19];

return_closcall2(data,  ((closureN)self_7314135)->elements[18],  &c_7325989, quote_lambda);; 
}

static void __lambda_1142(void *data, object self_7314136, int argc, object *args) /* object self_7314136, object r_737360_739420_739495_739566_739632_739697_739761_739819_739876_739932_739987_7310041_7310094_7310146_7310197_7310247_7310296_7310344_7310391_7310437_7310482_7310526_7310569_7310611_7310652_7310692_7310731_7310769_7310806_7310842_7310877_7310911_7310944 */
 {
 object r_737360_739420_739495_739566_739632_739697_739761_739819_739876_739932_739987_7310041_7310094_7310146_7310197_7310247_7310296_7310344_7310391_7310437_7310482_7310526_7310569_7310611_7310652_7310692_7310731_7310769_7310806_7310842_7310877_7310911_7310944 = args[0];
  
closureN_type c_7325992;
object e_7326233 [22];
c_7325992.hdr.mark = gc_color_red;
 c_7325992.hdr.grayed = 0;
c_7325992.tag = closureN_tag;
 c_7325992.fn = (function_type)__lambda_1143;
c_7325992.num_args = 1;
c_7325992.num_elements = 22;
c_7325992.elements = (object *)e_7326233;
c_7325992.elements[0] = ((closureN)self_7314136)->elements[0];
c_7325992.elements[1] = ((closureN)self_7314136)->elements[1];
c_7325992.elements[2] = ((closureN)self_7314136)->elements[2];
c_7325992.elements[3] = ((closureN)self_7314136)->elements[3];
c_7325992.elements[4] = r_737360_739420_739495_739566_739632_739697_739761_739819_739876_739932_739987_7310041_7310094_7310146_7310197_7310247_7310296_7310344_7310391_7310437_7310482_7310526_7310569_7310611_7310652_7310692_7310731_7310769_7310806_7310842_7310877_7310911_7310944;
c_7325992.elements[5] = ((closureN)self_7314136)->elements[4];
c_7325992.elements[6] = ((closureN)self_7314136)->elements[5];
c_7325992.elements[7] = ((closureN)self_7314136)->elements[6];
c_7325992.elements[8] = ((closureN)self_7314136)->elements[7];
c_7325992.elements[9] = ((closureN)self_7314136)->elements[8];
c_7325992.elements[10] = ((closureN)self_7314136)->elements[9];
c_7325992.elements[11] = ((closureN)self_7314136)->elements[10];
c_7325992.elements[12] = ((closureN)self_7314136)->elements[11];
c_7325992.elements[13] = ((closureN)self_7314136)->elements[12];
c_7325992.elements[14] = ((closureN)self_7314136)->elements[13];
c_7325992.elements[15] = ((closureN)self_7314136)->elements[14];
c_7325992.elements[16] = ((closureN)self_7314136)->elements[15];
c_7325992.elements[17] = ((closureN)self_7314136)->elements[16];
c_7325992.elements[18] = ((closureN)self_7314136)->elements[17];
c_7325992.elements[19] = ((closureN)self_7314136)->elements[18];
c_7325992.elements[20] = ((closureN)self_7314136)->elements[19];
c_7325992.elements[21] = ((closureN)self_7314136)->elements[20];

return_closcall2(data,  ((closureN)self_7314136)->elements[19],  &c_7325992, quote_let);; 
}

static void __lambda_1143(void *data, object self_7314137, int argc, object *args) /* object self_7314137, object r_737369_739421_739496_739567_739633_739698_739762_739820_739877_739933_739988_7310042_7310095_7310147_7310198_7310248_7310297_7310345_7310392_7310438_7310483_7310527_7310570_7310612_7310653_7310693_7310732_7310770_7310807_7310843_7310878_7310912_7310945 */
 {
 object r_737369_739421_739496_739567_739633_739698_739762_739820_739877_739933_739988_7310042_7310095_7310147_7310198_7310248_7310297_7310345_7310392_7310438_7310483_7310527_7310570_7310612_7310653_7310693_7310732_7310770_7310807_7310843_7310878_7310912_7310945 = args[0];
  
closureN_type c_7325995;
object e_7326232 [23];
c_7325995.hdr.mark = gc_color_red;
 c_7325995.hdr.grayed = 0;
c_7325995.tag = closureN_tag;
 c_7325995.fn = (function_type)__lambda_1144;
c_7325995.num_args = 1;
c_7325995.num_elements = 23;
c_7325995.elements = (object *)e_7326232;
c_7325995.elements[0] = ((closureN)self_7314137)->elements[0];
c_7325995.elements[1] = ((closureN)self_7314137)->elements[1];
c_7325995.elements[2] = ((closureN)self_7314137)->elements[2];
c_7325995.elements[3] = ((closureN)self_7314137)->elements[3];
c_7325995.elements[4] = ((closureN)self_7314137)->elements[4];
c_7325995.elements[5] = r_737369_739421_739496_739567_739633_739698_739762_739820_739877_739933_739988_7310042_7310095_7310147_7310198_7310248_7310297_7310345_7310392_7310438_7310483_7310527_7310570_7310612_7310653_7310693_7310732_7310770_7310807_7310843_7310878_7310912_7310945;
c_7325995.elements[6] = ((closureN)self_7314137)->elements[5];
c_7325995.elements[7] = ((closureN)self_7314137)->elements[6];
c_7325995.elements[8] = ((closureN)self_7314137)->elements[7];
c_7325995.elements[9] = ((closureN)self_7314137)->elements[8];
c_7325995.elements[10] = ((closureN)self_7314137)->elements[9];
c_7325995.elements[11] = ((closureN)self_7314137)->elements[10];
c_7325995.elements[12] = ((closureN)self_7314137)->elements[11];
c_7325995.elements[13] = ((closureN)self_7314137)->elements[12];
c_7325995.elements[14] = ((closureN)self_7314137)->elements[13];
c_7325995.elements[15] = ((closureN)self_7314137)->elements[14];
c_7325995.elements[16] = ((closureN)self_7314137)->elements[15];
c_7325995.elements[17] = ((closureN)self_7314137)->elements[16];
c_7325995.elements[18] = ((closureN)self_7314137)->elements[17];
c_7325995.elements[19] = ((closureN)self_7314137)->elements[18];
c_7325995.elements[20] = ((closureN)self_7314137)->elements[19];
c_7325995.elements[21] = ((closureN)self_7314137)->elements[20];
c_7325995.elements[22] = ((closureN)self_7314137)->elements[21];

return_closcall2(data,  ((closureN)self_7314137)->elements[20],  &c_7325995, quote_res);; 
}

static void __lambda_1144(void *data, object self_7314138, int argc, object *args) /* object self_7314138, object r_737399_739422_739497_739568_739634_739699_739763_739821_739878_739934_739989_7310043_7310096_7310148_7310199_7310249_7310298_7310346_7310393_7310439_7310484_7310528_7310571_7310613_7310654_7310694_7310733_7310771_7310808_7310844_7310879_7310913_7310946 */
 {
 object r_737399_739422_739497_739568_739634_739699_739763_739821_739878_739934_739989_7310043_7310096_7310148_7310199_7310249_7310298_7310346_7310393_7310439_7310484_7310528_7310571_7310613_7310654_7310694_7310733_7310771_7310808_7310844_7310879_7310913_7310946 = args[0];
  
closureN_type c_7325998;
object e_7326231 [24];
c_7325998.hdr.mark = gc_color_red;
 c_7325998.hdr.grayed = 0;
c_7325998.tag = closureN_tag;
 c_7325998.fn = (function_type)__lambda_1145;
c_7325998.num_args = 1;
c_7325998.num_elements = 24;
c_7325998.elements = (object *)e_7326231;
c_7325998.elements[0] = ((closureN)self_7314138)->elements[0];
c_7325998.elements[1] = ((closureN)self_7314138)->elements[1];
c_7325998.elements[2] = ((closureN)self_7314138)->elements[2];
c_7325998.elements[3] = ((closureN)self_7314138)->elements[3];
c_7325998.elements[4] = ((closureN)self_7314138)->elements[4];
c_7325998.elements[5] = ((closureN)self_7314138)->elements[5];
c_7325998.elements[6] = r_737399_739422_739497_739568_739634_739699_739763_739821_739878_739934_739989_7310043_7310096_7310148_7310199_7310249_7310298_7310346_7310393_7310439_7310484_7310528_7310571_7310613_7310654_7310694_7310733_7310771_7310808_7310844_7310879_7310913_7310946;
c_7325998.elements[7] = ((closureN)self_7314138)->elements[6];
c_7325998.elements[8] = ((closureN)self_7314138)->elements[7];
c_7325998.elements[9] = ((closureN)self_7314138)->elements[8];
c_7325998.elements[10] = ((closureN)self_7314138)->elements[9];
c_7325998.elements[11] = ((closureN)self_7314138)->elements[10];
c_7325998.elements[12] = ((closureN)self_7314138)->elements[11];
c_7325998.elements[13] = ((closureN)self_7314138)->elements[12];
c_7325998.elements[14] = ((closureN)self_7314138)->elements[13];
c_7325998.elements[15] = ((closureN)self_7314138)->elements[14];
c_7325998.elements[16] = ((closureN)self_7314138)->elements[15];
c_7325998.elements[17] = ((closureN)self_7314138)->elements[16];
c_7325998.elements[18] = ((closureN)self_7314138)->elements[17];
c_7325998.elements[19] = ((closureN)self_7314138)->elements[18];
c_7325998.elements[20] = ((closureN)self_7314138)->elements[19];
c_7325998.elements[21] = ((closureN)self_7314138)->elements[20];
c_7325998.elements[22] = ((closureN)self_7314138)->elements[21];
c_7325998.elements[23] = ((closureN)self_7314138)->elements[22];

return_closcall2(data,  ((closureN)self_7314138)->elements[21],  &c_7325998, quote_begin);; 
}

static void __lambda_1145(void *data, object self_7314139, int argc, object *args) /* object self_7314139, object r_737405_739423_739498_739569_739635_739700_739764_739822_739879_739935_739990_7310044_7310097_7310149_7310200_7310250_7310299_7310347_7310394_7310440_7310485_7310529_7310572_7310614_7310655_7310695_7310734_7310772_7310809_7310845_7310880_7310914_7310947 */
 {
 object r_737405_739423_739498_739569_739635_739700_739764_739822_739879_739935_739990_7310044_7310097_7310149_7310200_7310250_7310299_7310347_7310394_7310440_7310485_7310529_7310572_7310614_7310655_7310695_7310734_7310772_7310809_7310845_7310880_7310914_7310947 = args[0];
  
closureN_type c_7326001;
object e_7326230 [25];
c_7326001.hdr.mark = gc_color_red;
 c_7326001.hdr.grayed = 0;
c_7326001.tag = closureN_tag;
 c_7326001.fn = (function_type)__lambda_1146;
c_7326001.num_args = 1;
c_7326001.num_elements = 25;
c_7326001.elements = (object *)e_7326230;
c_7326001.elements[0] = ((closureN)self_7314139)->elements[0];
c_7326001.elements[1] = ((closureN)self_7314139)->elements[1];
c_7326001.elements[2] = ((closureN)self_7314139)->elements[2];
c_7326001.elements[3] = ((closureN)self_7314139)->elements[3];
c_7326001.elements[4] = ((closureN)self_7314139)->elements[4];
c_7326001.elements[5] = ((closureN)self_7314139)->elements[5];
c_7326001.elements[6] = ((closureN)self_7314139)->elements[6];
c_7326001.elements[7] = r_737405_739423_739498_739569_739635_739700_739764_739822_739879_739935_739990_7310044_7310097_7310149_7310200_7310250_7310299_7310347_7310394_7310440_7310485_7310529_7310572_7310614_7310655_7310695_7310734_7310772_7310809_7310845_7310880_7310914_7310947;
c_7326001.elements[8] = ((closureN)self_7314139)->elements[7];
c_7326001.elements[9] = ((closureN)self_7314139)->elements[8];
c_7326001.elements[10] = ((closureN)self_7314139)->elements[9];
c_7326001.elements[11] = ((closureN)self_7314139)->elements[10];
c_7326001.elements[12] = ((closureN)self_7314139)->elements[11];
c_7326001.elements[13] = ((closureN)self_7314139)->elements[12];
c_7326001.elements[14] = ((closureN)self_7314139)->elements[13];
c_7326001.elements[15] = ((closureN)self_7314139)->elements[14];
c_7326001.elements[16] = ((closureN)self_7314139)->elements[15];
c_7326001.elements[17] = ((closureN)self_7314139)->elements[16];
c_7326001.elements[18] = ((closureN)self_7314139)->elements[17];
c_7326001.elements[19] = ((closureN)self_7314139)->elements[18];
c_7326001.elements[20] = ((closureN)self_7314139)->elements[19];
c_7326001.elements[21] = ((closureN)self_7314139)->elements[20];
c_7326001.elements[22] = ((closureN)self_7314139)->elements[21];
c_7326001.elements[23] = ((closureN)self_7314139)->elements[22];
c_7326001.elements[24] = ((closureN)self_7314139)->elements[23];

return_closcall2(data,  ((closureN)self_7314139)->elements[22],  &c_7326001, quote_guard_91k);; 
}

static void __lambda_1146(void *data, object self_7314140, int argc, object *args) /* object self_7314140, object r_737378_739429_739504_739575_739641_739706_739770_739828_739885_739941_739996_7310050_7310103_7310155_7310206_7310256_7310305_7310353_7310400_7310446_7310491_7310535_7310578_7310620_7310661_7310701_7310740_7310778_7310815_7310851_7310886_7310920_7310953_7310981_7311008_7311034_7311059_7311083 */
 {
 object r_737378_739429_739504_739575_739641_739706_739770_739828_739885_739941_739996_7310050_7310103_7310155_7310206_7310256_7310305_7310353_7310400_7310446_7310491_7310535_7310578_7310620_7310661_7310701_7310740_7310778_7310815_7310851_7310886_7310920_7310953_7310981_7311008_7311034_7311059_7311083 = args[0];
  
closureN_type c_7326004;
object e_7326229 [26];
c_7326004.hdr.mark = gc_color_red;
 c_7326004.hdr.grayed = 0;
c_7326004.tag = closureN_tag;
 c_7326004.fn = (function_type)__lambda_1147;
c_7326004.num_args = 1;
c_7326004.num_elements = 26;
c_7326004.elements = (object *)e_7326229;
c_7326004.elements[0] = ((closureN)self_7314140)->elements[0];
c_7326004.elements[1] = ((closureN)self_7314140)->elements[1];
c_7326004.elements[2] = ((closureN)self_7314140)->elements[2];
c_7326004.elements[3] = ((closureN)self_7314140)->elements[3];
c_7326004.elements[4] = ((closureN)self_7314140)->elements[4];
c_7326004.elements[5] = ((closureN)self_7314140)->elements[5];
c_7326004.elements[6] = r_737378_739429_739504_739575_739641_739706_739770_739828_739885_739941_739996_7310050_7310103_7310155_7310206_7310256_7310305_7310353_7310400_7310446_7310491_7310535_7310578_7310620_7310661_7310701_7310740_7310778_7310815_7310851_7310886_7310920_7310953_7310981_7311008_7311034_7311059_7311083;
c_7326004.elements[7] = ((closureN)self_7314140)->elements[6];
c_7326004.elements[8] = ((closureN)self_7314140)->elements[7];
c_7326004.elements[9] = ((closureN)self_7314140)->elements[8];
c_7326004.elements[10] = ((closureN)self_7314140)->elements[9];
c_7326004.elements[11] = ((closureN)self_7314140)->elements[10];
c_7326004.elements[12] = ((closureN)self_7314140)->elements[11];
c_7326004.elements[13] = ((closureN)self_7314140)->elements[12];
c_7326004.elements[14] = ((closureN)self_7314140)->elements[13];
c_7326004.elements[15] = ((closureN)self_7314140)->elements[14];
c_7326004.elements[16] = ((closureN)self_7314140)->elements[15];
c_7326004.elements[17] = ((closureN)self_7314140)->elements[16];
c_7326004.elements[18] = ((closureN)self_7314140)->elements[17];
c_7326004.elements[19] = ((closureN)self_7314140)->elements[18];
c_7326004.elements[20] = ((closureN)self_7314140)->elements[19];
c_7326004.elements[21] = ((closureN)self_7314140)->elements[20];
c_7326004.elements[22] = ((closureN)self_7314140)->elements[21];
c_7326004.elements[23] = ((closureN)self_7314140)->elements[22];
c_7326004.elements[24] = ((closureN)self_7314140)->elements[23];
c_7326004.elements[25] = ((closureN)self_7314140)->elements[24];

return_closcall2(data,  ((closureN)self_7314140)->elements[23],  &c_7326004, quote_lambda);; 
}

static void __lambda_1147(void *data, object self_7314141, int argc, object *args) /* object self_7314141, object r_737384_739430_739505_739576_739642_739707_739771_739829_739886_739942_739997_7310051_7310104_7310156_7310207_7310257_7310306_7310354_7310401_7310447_7310492_7310536_7310579_7310621_7310662_7310702_7310741_7310779_7310816_7310852_7310887_7310921_7310954_7310982_7311009_7311035_7311060_7311084 */
 {
 object r_737384_739430_739505_739576_739642_739707_739771_739829_739886_739942_739997_7310051_7310104_7310156_7310207_7310257_7310306_7310354_7310401_7310447_7310492_7310536_7310579_7310621_7310662_7310702_7310741_7310779_7310816_7310852_7310887_7310921_7310954_7310982_7311009_7311035_7311060_7311084 = args[0];
  
closureN_type c_7326007;
object e_7326228 [26];
c_7326007.hdr.mark = gc_color_red;
 c_7326007.hdr.grayed = 0;
c_7326007.tag = closureN_tag;
 c_7326007.fn = (function_type)__lambda_1148;
c_7326007.num_args = 1;
c_7326007.num_elements = 26;
c_7326007.elements = (object *)e_7326228;
c_7326007.elements[0] = ((closureN)self_7314141)->elements[0];
c_7326007.elements[1] = ((closureN)self_7314141)->elements[1];
c_7326007.elements[2] = ((closureN)self_7314141)->elements[2];
c_7326007.elements[3] = ((closureN)self_7314141)->elements[3];
c_7326007.elements[4] = ((closureN)self_7314141)->elements[4];
c_7326007.elements[5] = ((closureN)self_7314141)->elements[5];
c_7326007.elements[6] = ((closureN)self_7314141)->elements[6];
c_7326007.elements[7] = r_737384_739430_739505_739576_739642_739707_739771_739829_739886_739942_739997_7310051_7310104_7310156_7310207_7310257_7310306_7310354_7310401_7310447_7310492_7310536_7310579_7310621_7310662_7310702_7310741_7310779_7310816_7310852_7310887_7310921_7310954_7310982_7311009_7311035_7311060_7311084;
c_7326007.elements[8] = ((closureN)self_7314141)->elements[7];
c_7326007.elements[9] = ((closureN)self_7314141)->elements[8];
c_7326007.elements[10] = ((closureN)self_7314141)->elements[9];
c_7326007.elements[11] = ((closureN)self_7314141)->elements[10];
c_7326007.elements[12] = ((closureN)self_7314141)->elements[11];
c_7326007.elements[13] = ((closureN)self_7314141)->elements[12];
c_7326007.elements[14] = ((closureN)self_7314141)->elements[13];
c_7326007.elements[15] = ((closureN)self_7314141)->elements[14];
c_7326007.elements[16] = ((closureN)self_7314141)->elements[15];
c_7326007.elements[17] = ((closureN)self_7314141)->elements[16];
c_7326007.elements[18] = ((closureN)self_7314141)->elements[17];
c_7326007.elements[19] = ((closureN)self_7314141)->elements[18];
c_7326007.elements[20] = ((closureN)self_7314141)->elements[19];
c_7326007.elements[21] = ((closureN)self_7314141)->elements[20];
c_7326007.elements[22] = ((closureN)self_7314141)->elements[21];
c_7326007.elements[23] = ((closureN)self_7314141)->elements[22];
c_7326007.elements[24] = ((closureN)self_7314141)->elements[23];
c_7326007.elements[25] = ((closureN)self_7314141)->elements[25];

return_closcall2(data,  ((closureN)self_7314141)->elements[24],  &c_7326007, quote_res);; 
}

static void __lambda_1148(void *data, object self_7314142, int argc, object *args) /* object self_7314142, object r_737390_739431_739506_739577_739643_739708_739772_739830_739887_739943_739998_7310052_7310105_7310157_7310208_7310258_7310307_7310355_7310402_7310448_7310493_7310537_7310580_7310622_7310663_7310703_7310742_7310780_7310817_7310853_7310888_7310922_7310955_7310983_7311010_7311036_7311061_7311085 */
 {
 object r_737390_739431_739506_739577_739643_739708_739772_739830_739887_739943_739998_7310052_7310105_7310157_7310208_7310258_7310307_7310355_7310402_7310448_7310493_7310537_7310580_7310622_7310663_7310703_7310742_7310780_7310817_7310853_7310888_7310922_7310955_7310983_7311010_7311036_7311061_7311085 = args[0];
  
pair_type local_7326012; 

pair_type local_7326015; 

pair_type local_7326018; 

pair_type local_7326022; 

pair_type local_7326025; 

pair_type local_7326029; 

pair_type local_7326032; 

pair_type local_7326036; 

pair_type local_7326039; 

pair_type local_7326043; 

pair_type local_7326046; 

pair_type local_7326050; 

pair_type local_7326053; 

pair_type local_7326057; 

pair_type local_7326060; 

pair_type local_7326063; 

pair_type local_7326067; 

pair_type local_7326070; 

pair_type local_7326074; 

pair_type local_7326077; 

pair_type local_7326081; 

pair_type local_7326084; 

pair_type local_7326088; 

pair_type local_7326091; 

pair_type local_7326095; 

pair_type local_7326098; 

pair_type local_7326101; 

pair_type local_7326105; 

pair_type local_7326108; 

pair_type local_7326111; 





pair_type local_7326119; 

pair_type local_7326123; 

pair_type local_7326126; 

pair_type local_7326130; 

pair_type local_7326133; 

pair_type local_7326137; 

pair_type local_7326140; 

pair_type local_7326144; 

pair_type local_7326147; 

pair_type local_7326150; 

pair_type local_7326154; 





pair_type local_7326163; 

pair_type local_7326166; 

pair_type local_7326170; 

pair_type local_7326173; 

pair_type local_7326176; 

pair_type local_7326180; 

pair_type local_7326183; 

pair_type local_7326186; 

pair_type local_7326190; 

pair_type local_7326193; 

pair_type local_7326197; 









pair_type local_7326210; 

pair_type local_7326213; 

pair_type local_7326217; 

pair_type local_7326220; 

pair_type local_7326224; 

pair_type local_7326227; 
return_direct_with_clo1(data,  ((closureN)self_7314142)->elements[0], (((closure)  ((closureN)self_7314142)->elements[0])->fn),  set_pair_as_expr(&local_7326012, set_pair_as_expr(&local_7326015, set_pair_as_expr(&local_7326018, ((closureN)self_7314142)->elements[1], set_pair_as_expr(&local_7326022, set_pair_as_expr(&local_7326025, ((closureN)self_7314142)->elements[2], set_pair_as_expr(&local_7326029, set_pair_as_expr(&local_7326032, ((closureN)self_7314142)->elements[24], NULL), set_pair_as_expr(&local_7326036, set_pair_as_expr(&local_7326039, ((closureN)self_7314142)->elements[3], set_pair_as_expr(&local_7326043, set_pair_as_expr(&local_7326046, ((closureN)self_7314142)->elements[10], set_pair_as_expr(&local_7326050, set_pair_as_expr(&local_7326053, ((closureN)self_7314142)->elements[23], NULL), set_pair_as_expr(&local_7326057, set_pair_as_expr(&local_7326060, set_pair_as_expr(&local_7326063, ((closureN)self_7314142)->elements[11], set_pair_as_expr(&local_7326067, set_pair_as_expr(&local_7326070, ((closureN)self_7314142)->elements[12], set_pair_as_expr(&local_7326074, set_pair_as_expr(&local_7326077, ((closureN)self_7314142)->elements[22], NULL), set_pair_as_expr(&local_7326081, set_pair_as_expr(&local_7326084, ((closureN)self_7314142)->elements[13], set_pair_as_expr(&local_7326088, set_pair_as_expr(&local_7326091, ((closureN)self_7314142)->elements[14], set_pair_as_expr(&local_7326095, NULL, set_pair_as_expr(&local_7326098, set_pair_as_expr(&local_7326101, ((closureN)self_7314142)->elements[15], set_pair_as_expr(&local_7326105, set_pair_as_expr(&local_7326108, set_pair_as_expr(&local_7326111, Cyc_car(data, Cyc_car(data, ((closureN)self_7314142)->elements[25])), set_pair_as_expr(&local_7326119, ((closureN)self_7314142)->elements[21], NULL)), NULL), set_pair_as_expr(&local_7326123, set_pair_as_expr(&local_7326126, ((closureN)self_7314142)->elements[16], set_pair_as_expr(&local_7326130, set_pair_as_expr(&local_7326133, ((closureN)self_7314142)->elements[17], set_pair_as_expr(&local_7326137, set_pair_as_expr(&local_7326140, ((closureN)self_7314142)->elements[18], set_pair_as_expr(&local_7326144, NULL, set_pair_as_expr(&local_7326147, set_pair_as_expr(&local_7326150, ((closureN)self_7314142)->elements[19], set_pair_as_expr(&local_7326154, ((closureN)self_7314142)->elements[20], NULL)), NULL))), NULL)), Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314142)->elements[25])))), NULL))), NULL))), NULL)), NULL))), NULL)), NULL), NULL))), set_pair_as_expr(&local_7326163, set_pair_as_expr(&local_7326166, ((closureN)self_7314142)->elements[4], set_pair_as_expr(&local_7326170, NULL, set_pair_as_expr(&local_7326173, set_pair_as_expr(&local_7326176, ((closureN)self_7314142)->elements[5], set_pair_as_expr(&local_7326180, set_pair_as_expr(&local_7326183, set_pair_as_expr(&local_7326186, ((closureN)self_7314142)->elements[8], set_pair_as_expr(&local_7326190, set_pair_as_expr(&local_7326193, ((closureN)self_7314142)->elements[9], set_pair_as_expr(&local_7326197, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314142)->elements[25])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314142)->elements[25])))), NULL)), NULL), set_pair_as_expr(&local_7326210, set_pair_as_expr(&local_7326213, ((closureN)self_7314142)->elements[6], set_pair_as_expr(&local_7326217, set_pair_as_expr(&local_7326220, ((closureN)self_7314142)->elements[7], set_pair_as_expr(&local_7326224, NULL, set_pair_as_expr(&local_7326227, r_737390_739431_739506_739577_739643_739708_739772_739830_739887_739943_739998_7310052_7310105_7310157_7310208_7310258_7310307_7310355_7310402_7310448_7310493_7310537_7310580_7310622_7310663_7310703_7310742_7310780_7310817_7310853_7310888_7310922_7310955_7310983_7311010_7311036_7311061_7311085, NULL))), NULL)), NULL))), NULL))), NULL))), NULL))), NULL)), NULL), boolean_f));; 
}

static void __lambda_1066(void *data, object _, int argc, object *args) /* closure _,object k_736966, object expr_731740_731824_732014_733758, object rename_731741_731825_732015_733759, object compare_731742_731826_732016_733760 */
 {
object k_736966 = args[0]; object expr_731740_731824_732014_733758 = args[1]; object rename_731741_731825_732015_733759 = args[2];
  Cyc_st_add(data, "scheme/base.sld:let-values");

closureN_type c_7324652;
object e_7325896 [3];
c_7324652.hdr.mark = gc_color_red;
 c_7324652.hdr.grayed = 0;
c_7324652.tag = closureN_tag;
 c_7324652.fn = (function_type)__lambda_1067;
c_7324652.num_args = 1;
c_7324652.num_elements = 3;
c_7324652.elements = (object *)e_7325896;
c_7324652.elements[0] = expr_731740_731824_732014_733758;
c_7324652.elements[1] = k_736966;
c_7324652.elements[2] = rename_731741_731825_732015_733759;



return_direct_with_clo1(data,(closure)&c_7324652,__lambda_1067,  Cyc_cdr(data, expr_731740_731824_732014_733758));; 
}

static void __lambda_1067(void *data, object self_7314058, int argc, object *args) /* object self_7314058, object v_931_731748_732002_732123_733867 */
 {
 object v_931_731748_732002_732123_733867 = args[0];
  
closureN_type c_7324654;
object e_7324736 [2];
c_7324654.hdr.mark = gc_color_red;
 c_7324654.hdr.grayed = 0;
c_7324654.tag = closureN_tag;
 c_7324654.fn = (function_type)__lambda_1068;
c_7324654.num_args = 0;
c_7324654.num_elements = 2;
c_7324654.elements = (object *)e_7324736;
c_7324654.elements[0] = ((closureN)self_7314058)->elements[2];
c_7324654.elements[1] = v_931_731748_732002_732123_733867;


closureN_type c_7324737;
object e_7325895 [3];
c_7324737.hdr.mark = gc_color_red;
 c_7324737.hdr.grayed = 0;
c_7324737.tag = closureN_tag;
 c_7324737.fn = (function_type)__lambda_1071;
c_7324737.num_args = 1;
c_7324737.num_elements = 3;
c_7324737.elements = (object *)e_7325895;
c_7324737.elements[0] = ((closureN)self_7314058)->elements[0];
c_7324737.elements[1] = ((closureN)self_7314058)->elements[1];
c_7324737.elements[2] = ((closureN)self_7314058)->elements[2];

return_direct_with_clo1(data,(closure)&c_7324654,__lambda_1068,  &c_7324737);; 
}

static void __lambda_1071(void *data, object self_7314059, int argc, object *args) /* object self_7314059, object tmp_731828_731830_732017_733761 */
 {
 object tmp_731828_731830_732017_733761 = args[0];
  
closureN_type c_7324739;
object e_7325888 [3];
c_7324739.hdr.mark = gc_color_red;
 c_7324739.hdr.grayed = 0;
c_7324739.tag = closureN_tag;
 c_7324739.fn = (function_type)__lambda_1072;
c_7324739.num_args = 0;
c_7324739.num_elements = 3;
c_7324739.elements = (object *)e_7325888;
c_7324739.elements[0] = ((closureN)self_7314059)->elements[0];
c_7324739.elements[1] = ((closureN)self_7314059)->elements[2];
c_7324739.elements[2] = tmp_731828_731830_732017_733761;


closureN_type c_7325889;
object e_7325894 [1];
c_7325889.hdr.mark = gc_color_red;
 c_7325889.hdr.grayed = 0;
c_7325889.tag = closureN_tag;
 c_7325889.fn = (function_type)__lambda_1120;
c_7325889.num_args = 1;
c_7325889.num_elements = 1;
c_7325889.elements = (object *)e_7325894;
c_7325889.elements[0] = ((closureN)self_7314059)->elements[1];

return_direct_with_clo1(data,(closure)&c_7324739,__lambda_1072,  &c_7325889);; 
}

static void __lambda_1120(void *data, object self_7314060, int argc, object *args) /* object self_7314060, object r_736967 */
 {
 object r_736967 = args[0];
  

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

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



return_direct_with_clo1(data,(closure)&c_7324744,__lambda_1073,  Cyc_cdr(data, ((closureN)self_7314061)->elements[0]));}
;; 
}

static void __lambda_1073(void *data, object self_7314062, int argc, object *args) /* object self_7314062, object v_936_731753_731984_732112_733856 */
 {
 object v_936_731753_731984_732112_733856 = args[0];
  
closureN_type c_7324746;
object e_7324836 [2];
c_7324746.hdr.mark = gc_color_red;
 c_7324746.hdr.grayed = 0;
c_7324746.tag = closureN_tag;
 c_7324746.fn = (function_type)__lambda_1074;
c_7324746.num_args = 0;
c_7324746.num_elements = 2;
c_7324746.elements = (object *)e_7324836;
c_7324746.elements[0] = ((closureN)self_7314062)->elements[2];
c_7324746.elements[1] = v_936_731753_731984_732112_733856;


closureN_type c_7324837;
object e_7325883 [3];
c_7324837.hdr.mark = gc_color_red;
 c_7324837.hdr.grayed = 0;
c_7324837.tag = closureN_tag;
 c_7324837.fn = (function_type)__lambda_1076;
c_7324837.num_args = 1;
c_7324837.num_elements = 3;
c_7324837.elements = (object *)e_7325883;
c_7324837.elements[0] = ((closureN)self_7314062)->elements[0];
c_7324837.elements[1] = ((closureN)self_7314062)->elements[1];
c_7324837.elements[2] = ((closureN)self_7314062)->elements[2];

return_direct_with_clo1(data,(closure)&c_7324746,__lambda_1074,  &c_7324837);; 
}

static void __lambda_1076(void *data, object self_7314063, int argc, object *args) /* object self_7314063, object tmp_731832_731834_732018_733762 */
 {
 object tmp_731832_731834_732018_733762 = args[0];
  if( (boolean_f != tmp_731832_731834_732018_733762) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314063)->elements[1], (((closure)  ((closureN)self_7314063)->elements[1])->fn),  tmp_731832_731834_732018_733762);
} else { 
  
closureN_type c_7324841;
object e_7325879 [3];
c_7324841.hdr.mark = gc_color_red;
 c_7324841.hdr.grayed = 0;
c_7324841.tag = closureN_tag;
 c_7324841.fn = (function_type)__lambda_1077;
c_7324841.num_args = 1;
c_7324841.num_elements = 3;
c_7324841.elements = (object *)e_7325879;
c_7324841.elements[0] = ((closureN)self_7314063)->elements[0];
c_7324841.elements[1] = ((closureN)self_7314063)->elements[1];
c_7324841.elements[2] = ((closureN)self_7314063)->elements[2];



return_direct_with_clo1(data,(closure)&c_7324841,__lambda_1077,  Cyc_cdr(data, ((closureN)self_7314063)->elements[0]));}
;; 
}

static void __lambda_1077(void *data, object self_7314064, int argc, object *args) /* object self_7314064, object v_9315_731762_731953_732092_733836 */
 {
 object v_9315_731762_731953_732092_733836 = args[0];
  
closureN_type c_7324843;
object e_7325023 [2];
c_7324843.hdr.mark = gc_color_red;
 c_7324843.hdr.grayed = 0;
c_7324843.tag = closureN_tag;
 c_7324843.fn = (function_type)__lambda_1078;
c_7324843.num_args = 0;
c_7324843.num_elements = 2;
c_7324843.elements = (object *)e_7325023;
c_7324843.elements[0] = ((closureN)self_7314064)->elements[2];
c_7324843.elements[1] = v_9315_731762_731953_732092_733836;


closureN_type c_7325024;
object e_7325878 [3];
c_7325024.hdr.mark = gc_color_red;
 c_7325024.hdr.grayed = 0;
c_7325024.tag = closureN_tag;
 c_7325024.fn = (function_type)__lambda_1080;
c_7325024.num_args = 1;
c_7325024.num_elements = 3;
c_7325024.elements = (object *)e_7325878;
c_7325024.elements[0] = ((closureN)self_7314064)->elements[0];
c_7325024.elements[1] = ((closureN)self_7314064)->elements[1];
c_7325024.elements[2] = ((closureN)self_7314064)->elements[2];

return_direct_with_clo1(data,(closure)&c_7324843,__lambda_1078,  &c_7325024);; 
}

static void __lambda_1080(void *data, object self_7314065, int argc, object *args) /* object self_7314065, object tmp_731836_731838_732019_733763 */
 {
 object tmp_731836_731838_732019_733763 = args[0];
  if( (boolean_f != tmp_731836_731838_732019_733763) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314065)->elements[1], (((closure)  ((closureN)self_7314065)->elements[1])->fn),  tmp_731836_731838_732019_733763);
} else { 
  
closureN_type c_7325028;
object e_7325874 [3];
c_7325028.hdr.mark = gc_color_red;
 c_7325028.hdr.grayed = 0;
c_7325028.tag = closureN_tag;
 c_7325028.fn = (function_type)__lambda_1081;
c_7325028.num_args = 1;
c_7325028.num_elements = 3;
c_7325028.elements = (object *)e_7325874;
c_7325028.elements[0] = ((closureN)self_7314065)->elements[0];
c_7325028.elements[1] = ((closureN)self_7314065)->elements[1];
c_7325028.elements[2] = ((closureN)self_7314065)->elements[2];



return_direct_with_clo1(data,(closure)&c_7325028,__lambda_1081,  Cyc_cdr(data, ((closureN)self_7314065)->elements[0]));}
;; 
}

static void __lambda_1081(void *data, object self_7314066, int argc, object *args) /* object self_7314066, object v_9330_731777_731923_732072_733816 */
 {
 object v_9330_731777_731923_732072_733816 = args[0];
  
closureN_type c_7325030;
object e_7325256 [2];
c_7325030.hdr.mark = gc_color_red;
 c_7325030.hdr.grayed = 0;
c_7325030.tag = closureN_tag;
 c_7325030.fn = (function_type)__lambda_1082;
c_7325030.num_args = 0;
c_7325030.num_elements = 2;
c_7325030.elements = (object *)e_7325256;
c_7325030.elements[0] = ((closureN)self_7314066)->elements[2];
c_7325030.elements[1] = v_9330_731777_731923_732072_733816;


closureN_type c_7325257;
object e_7325873 [3];
c_7325257.hdr.mark = gc_color_red;
 c_7325257.hdr.grayed = 0;
c_7325257.tag = closureN_tag;
 c_7325257.fn = (function_type)__lambda_1087;
c_7325257.num_args = 1;
c_7325257.num_elements = 3;
c_7325257.elements = (object *)e_7325873;
c_7325257.elements[0] = ((closureN)self_7314066)->elements[0];
c_7325257.elements[1] = ((closureN)self_7314066)->elements[1];
c_7325257.elements[2] = ((closureN)self_7314066)->elements[2];

return_direct_with_clo1(data,(closure)&c_7325030,__lambda_1082,  &c_7325257);; 
}

static void __lambda_1087(void *data, object self_7314067, int argc, object *args) /* object self_7314067, object tmp_731840_731842_732020_733764 */
 {
 object tmp_731840_731842_732020_733764 = args[0];
  if( (boolean_f != tmp_731840_731842_732020_733764) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314067)->elements[1], (((closure)  ((closureN)self_7314067)->elements[1])->fn),  tmp_731840_731842_732020_733764);
} else { 
  
closureN_type c_7325261;
object e_7325869 [3];
c_7325261.hdr.mark = gc_color_red;
 c_7325261.hdr.grayed = 0;
c_7325261.tag = closureN_tag;
 c_7325261.fn = (function_type)__lambda_1088;
c_7325261.num_args = 1;
c_7325261.num_elements = 3;
c_7325261.elements = (object *)e_7325869;
c_7325261.elements[0] = ((closureN)self_7314067)->elements[0];
c_7325261.elements[1] = ((closureN)self_7314067)->elements[1];
c_7325261.elements[2] = ((closureN)self_7314067)->elements[2];



return_direct_with_clo1(data,(closure)&c_7325261,__lambda_1088,  Cyc_cdr(data, ((closureN)self_7314067)->elements[0]));}
;; 
}

static void __lambda_1088(void *data, object self_7314068, int argc, object *args) /* object self_7314068, object v_9345_731792_731885_732046_733790 */
 {
 object v_9345_731792_731885_732046_733790 = args[0];
  
closureN_type c_7325263;
object e_7325546 [2];
c_7325263.hdr.mark = gc_color_red;
 c_7325263.hdr.grayed = 0;
c_7325263.tag = closureN_tag;
 c_7325263.fn = (function_type)__lambda_1089;
c_7325263.num_args = 0;
c_7325263.num_elements = 2;
c_7325263.elements = (object *)e_7325546;
c_7325263.elements[0] = ((closureN)self_7314068)->elements[2];
c_7325263.elements[1] = v_9345_731792_731885_732046_733790;


closureN_type c_7325547;
object e_7325868 [3];
c_7325547.hdr.mark = gc_color_red;
 c_7325547.hdr.grayed = 0;
c_7325547.tag = closureN_tag;
 c_7325547.fn = (function_type)__lambda_1101;
c_7325547.num_args = 1;
c_7325547.num_elements = 3;
c_7325547.elements = (object *)e_7325868;
c_7325547.elements[0] = ((closureN)self_7314068)->elements[0];
c_7325547.elements[1] = ((closureN)self_7314068)->elements[1];
c_7325547.elements[2] = ((closureN)self_7314068)->elements[2];

return_direct_with_clo1(data,(closure)&c_7325263,__lambda_1089,  &c_7325547);; 
}

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



return_direct_with_clo1(data,(closure)&c_7325551,__lambda_1102,  Cyc_cdr(data, ((closureN)self_7314069)->elements[0]));}
;; 
}

static void __lambda_1102(void *data, object self_7314070, int argc, object *args) /* object self_7314070, object v_9362_731809_731851_732023_733767 */
 {
 object v_9362_731809_731851_732023_733767 = args[0];
  
closureN_type c_7325553;
object e_7325849 [2];
c_7325553.hdr.mark = gc_color_red;
 c_7325553.hdr.grayed = 0;
c_7325553.tag = closureN_tag;
 c_7325553.fn = (function_type)__lambda_1103;
c_7325553.num_args = 0;
c_7325553.num_elements = 2;
c_7325553.elements = (object *)e_7325849;
c_7325553.elements[0] = ((closureN)self_7314070)->elements[2];
c_7325553.elements[1] = v_9362_731809_731851_732023_733767;


closureN_type c_7325850;
object e_7325863 [2];
c_7325850.hdr.mark = gc_color_red;
 c_7325850.hdr.grayed = 0;
c_7325850.tag = closureN_tag;
 c_7325850.fn = (function_type)__lambda_1118;
c_7325850.num_args = 1;
c_7325850.num_elements = 2;
c_7325850.elements = (object *)e_7325863;
c_7325850.elements[0] = ((closureN)self_7314070)->elements[0];
c_7325850.elements[1] = ((closureN)self_7314070)->elements[1];

return_direct_with_clo1(data,(closure)&c_7325553,__lambda_1103,  &c_7325850);; 
}

static void __lambda_1118(void *data, object self_7314071, int argc, object *args) /* object self_7314071, object tmp_731848_731850_732022_733766 */
 {
 object tmp_731848_731850_732022_733766 = args[0];
  if( (boolean_f != tmp_731848_731850_732022_733766) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314071)->elements[1], (((closure)  ((closureN)self_7314071)->elements[1])->fn),  tmp_731848_731850_732022_733766);
} else { 
  
closureN_type c_7325854;
object e_7325860 [1];
c_7325854.hdr.mark = gc_color_red;
 c_7325854.hdr.grayed = 0;
c_7325854.tag = closureN_tag;
 c_7325854.fn = (function_type)__lambda_1119;
c_7325854.num_args = 1;
c_7325854.num_elements = 1;
c_7325854.elements = (object *)e_7325860;
c_7325854.elements[0] = ((closureN)self_7314071)->elements[1];


make_utf8_string_with_len(c_7325861, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7325854, &c_7325861, ((closureN)self_7314071)->elements[0]);}
;; 
}

static void __lambda_1119(void *data, object self_7314072, int argc, object *args) /* object self_7314072, object r_736975 */
 {
 object r_736975 = args[0];
  
pair_type local_7325859; 
return_direct_with_clo1(data,  ((closureN)self_7314072)->elements[0], (((closure)  ((closureN)self_7314072)->elements[0])->fn),  set_pair_as_expr(&local_7325859, r_736975, boolean_f));; 
}

static void __lambda_1103(void *data, object self_7314073, int argc, object *args) /* object self_7314073, object k_736977 */
 {
 object k_736977 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314073)->elements[1])) ){ 
    
  
  make_utf8_string_with_len(c_7325562, "mktmp", 5, 5);
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314073)->elements[1]), &c_7325562)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314073)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1]))))) ){ 
    complex_num_type local_7325586; 
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325586, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1]))))))) ){ 
    complex_num_type local_7325622; 
  
  
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325622, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))))))) ){ 
    
  
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1])))))))) ){ 
    
  
  
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314073)->elements[1]))))))))) ){ 
  
closureN_type c_7325670;
object e_7325837 [3];
c_7325670.hdr.mark = gc_color_red;
 c_7325670.hdr.grayed = 0;
c_7325670.tag = closureN_tag;
 c_7325670.fn = (function_type)__lambda_1104;
c_7325670.num_args = 1;
c_7325670.num_elements = 3;
c_7325670.elements = (object *)e_7325837;
c_7325670.elements[0] = k_736977;
c_7325670.elements[1] = ((closureN)self_7314073)->elements[0];
c_7325670.elements[2] = ((closureN)self_7314073)->elements[1];

return_closcall2(data,  ((closureN)self_7314073)->elements[0],  &c_7325670, quote_call_91with_91values);
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736977, (((closure)  k_736977)->fn),  boolean_f);}
;; 
}

static void __lambda_1104(void *data, object self_7314074, int argc, object *args) /* object self_7314074, object r_737004 */
 {
 object r_737004 = args[0];
  
closureN_type c_7325673;
object e_7325836 [4];
c_7325673.hdr.mark = gc_color_red;
 c_7325673.hdr.grayed = 0;
c_7325673.tag = closureN_tag;
 c_7325673.fn = (function_type)__lambda_1105;
c_7325673.num_args = 1;
c_7325673.num_elements = 4;
c_7325673.elements = (object *)e_7325836;
c_7325673.elements[0] = ((closureN)self_7314074)->elements[0];
c_7325673.elements[1] = r_737004;
c_7325673.elements[2] = ((closureN)self_7314074)->elements[1];
c_7325673.elements[3] = ((closureN)self_7314074)->elements[2];

return_closcall2(data,  ((closureN)self_7314074)->elements[1],  &c_7325673, quote_lambda);; 
}

static void __lambda_1105(void *data, object self_7314075, int argc, object *args) /* object self_7314075, object r_737054 */
 {
 object r_737054 = args[0];
  
closureN_type c_7325676;
object e_7325835 [5];
c_7325676.hdr.mark = gc_color_red;
 c_7325676.hdr.grayed = 0;
c_7325676.tag = closureN_tag;
 c_7325676.fn = (function_type)__lambda_1106;
c_7325676.num_args = 1;
c_7325676.num_elements = 5;
c_7325676.elements = (object *)e_7325835;
c_7325676.elements[0] = ((closureN)self_7314075)->elements[0];
c_7325676.elements[1] = ((closureN)self_7314075)->elements[1];
c_7325676.elements[2] = r_737054;
c_7325676.elements[3] = ((closureN)self_7314075)->elements[2];
c_7325676.elements[4] = ((closureN)self_7314075)->elements[3];

return_closcall2(data,  ((closureN)self_7314075)->elements[2],  &c_7325676, quote_lambda);; 
}

static void __lambda_1106(void *data, object self_7314076, int argc, object *args) /* object self_7314076, object r_737013_739178_739208_739237 */
 {
 object r_737013_739178_739208_739237 = args[0];
  
closureN_type c_7325678;
object e_7325832 [6];
c_7325678.hdr.mark = gc_color_red;
 c_7325678.hdr.grayed = 0;
c_7325678.tag = closureN_tag;
 c_7325678.fn = (function_type)__lambda_1107;
c_7325678.num_args = 1;
c_7325678.num_elements = 6;
c_7325678.elements = (object *)e_7325832;
c_7325678.elements[0] = ((closureN)self_7314076)->elements[0];
c_7325678.elements[1] = ((closureN)self_7314076)->elements[1];
c_7325678.elements[2] = r_737013_739178_739208_739237;
c_7325678.elements[3] = ((closureN)self_7314076)->elements[2];
c_7325678.elements[4] = ((closureN)self_7314076)->elements[3];
c_7325678.elements[5] = ((closureN)self_7314076)->elements[4];


mmacro(c_7325833, (function_type)__lambda_1117);c_7325833.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7325678,__lambda_1107,  &c_7325833);; 
}

static void __lambda_1117(void *data, object self_7314077, int argc, object *args) /* object self_7314077, object k_737052_739204_739234_739263, object arg_731883_732044_733788_739205_739235_739264 */
 {
 object k_737052_739204_739234_739263 = args[0]; object arg_731883_732044_733788_739205_739235_739264 = args[1];
  return_direct_with_clo1(data,  k_737052_739204_739234_739263, (((closure)  k_737052_739204_739234_739263)->fn),  arg_731883_732044_733788_739205_739235_739264);; 
}

static void __lambda_1107(void *data, object self_7314078, int argc, object *args) /* object self_7314078, object r_737051_739179_739209_739238 */
 {
 object r_737051_739179_739209_739238 = args[0];
  
closureN_type c_7325680;
object e_7325822 [6];
c_7325680.hdr.mark = gc_color_red;
 c_7325680.hdr.grayed = 0;
c_7325680.tag = closureN_tag;
 c_7325680.fn = (function_type)__lambda_1108;
c_7325680.num_args = 1;
c_7325680.num_elements = 6;
c_7325680.elements = (object *)e_7325822;
c_7325680.elements[0] = ((closureN)self_7314078)->elements[0];
c_7325680.elements[1] = ((closureN)self_7314078)->elements[1];
c_7325680.elements[2] = ((closureN)self_7314078)->elements[2];
c_7325680.elements[3] = ((closureN)self_7314078)->elements[3];
c_7325680.elements[4] = ((closureN)self_7314078)->elements[4];
c_7325680.elements[5] = ((closureN)self_7314078)->elements[5];









return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7325680, r_737051_739179_739209_739238, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314078)->elements[5])))));; 
}

static void __lambda_1108(void *data, object self_7314079, int argc, object *args) /* object self_7314079, object r_737048_739180_739210_739239 */
 {
 object r_737048_739180_739210_739239 = args[0];
  
closureN_type c_7325683;
object e_7325821 [7];
c_7325683.hdr.mark = gc_color_red;
 c_7325683.hdr.grayed = 0;
c_7325683.tag = closureN_tag;
 c_7325683.fn = (function_type)__lambda_1109;
c_7325683.num_args = 1;
c_7325683.num_elements = 7;
c_7325683.elements = (object *)e_7325821;
c_7325683.elements[0] = ((closureN)self_7314079)->elements[0];
c_7325683.elements[1] = ((closureN)self_7314079)->elements[1];
c_7325683.elements[2] = ((closureN)self_7314079)->elements[2];
c_7325683.elements[3] = r_737048_739180_739210_739239;
c_7325683.elements[4] = ((closureN)self_7314079)->elements[3];
c_7325683.elements[5] = ((closureN)self_7314079)->elements[4];
c_7325683.elements[6] = ((closureN)self_7314079)->elements[5];

return_closcall2(data,  ((closureN)self_7314079)->elements[4],  &c_7325683, quote_x);; 
}

static void __lambda_1109(void *data, object self_7314080, int argc, object *args) /* object self_7314080, object r_737049_739181_739211_739240 */
 {
 object r_737049_739181_739211_739240 = args[0];
  
closureN_type c_7325685;
object e_7325819 [6];
c_7325685.hdr.mark = gc_color_red;
 c_7325685.hdr.grayed = 0;
c_7325685.tag = closureN_tag;
 c_7325685.fn = (function_type)__lambda_1110;
c_7325685.num_args = 1;
c_7325685.num_elements = 6;
c_7325685.elements = (object *)e_7325819;
c_7325685.elements[0] = ((closureN)self_7314080)->elements[0];
c_7325685.elements[1] = ((closureN)self_7314080)->elements[1];
c_7325685.elements[2] = ((closureN)self_7314080)->elements[2];
c_7325685.elements[3] = ((closureN)self_7314080)->elements[4];
c_7325685.elements[4] = ((closureN)self_7314080)->elements[5];
c_7325685.elements[5] = ((closureN)self_7314080)->elements[6];

return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7325685, ((closureN)self_7314080)->elements[3], r_737049_739181_739211_739240);; 
}

static void __lambda_1110(void *data, object self_7314081, int argc, object *args) /* object self_7314081, object r_737016_739182_739212_739241 */
 {
 object r_737016_739182_739212_739241 = args[0];
  
closureN_type c_7325688;
object e_7325818 [7];
c_7325688.hdr.mark = gc_color_red;
 c_7325688.hdr.grayed = 0;
c_7325688.tag = closureN_tag;
 c_7325688.fn = (function_type)__lambda_1111;
c_7325688.num_args = 1;
c_7325688.num_elements = 7;
c_7325688.elements = (object *)e_7325818;
c_7325688.elements[0] = ((closureN)self_7314081)->elements[0];
c_7325688.elements[1] = ((closureN)self_7314081)->elements[1];
c_7325688.elements[2] = ((closureN)self_7314081)->elements[2];
c_7325688.elements[3] = r_737016_739182_739212_739241;
c_7325688.elements[4] = ((closureN)self_7314081)->elements[3];
c_7325688.elements[5] = ((closureN)self_7314081)->elements[4];
c_7325688.elements[6] = ((closureN)self_7314081)->elements[5];

return_closcall2(data,  ((closureN)self_7314081)->elements[4],  &c_7325688, quote_let_91values);; 
}

static void __lambda_1111(void *data, object self_7314082, int argc, object *args) /* object self_7314082, object r_737022_739183_739213_739242 */
 {
 object r_737022_739183_739213_739242 = args[0];
  
closureN_type c_7325690;
object e_7325815 [8];
c_7325690.hdr.mark = gc_color_red;
 c_7325690.hdr.grayed = 0;
c_7325690.tag = closureN_tag;
 c_7325690.fn = (function_type)__lambda_1112;
c_7325690.num_args = 1;
c_7325690.num_elements = 8;
c_7325690.elements = (object *)e_7325815;
c_7325690.elements[0] = ((closureN)self_7314082)->elements[0];
c_7325690.elements[1] = ((closureN)self_7314082)->elements[1];
c_7325690.elements[2] = ((closureN)self_7314082)->elements[2];
c_7325690.elements[3] = ((closureN)self_7314082)->elements[3];
c_7325690.elements[4] = r_737022_739183_739213_739242;
c_7325690.elements[5] = ((closureN)self_7314082)->elements[4];
c_7325690.elements[6] = ((closureN)self_7314082)->elements[5];
c_7325690.elements[7] = ((closureN)self_7314082)->elements[6];


mmacro(c_7325816, (function_type)__lambda_1116);c_7325816.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7325690,__lambda_1112,  &c_7325816);; 
}

static void __lambda_1116(void *data, object self_7314083, int argc, object *args) /* object self_7314083, object k_737046_739202_739232_739261, object tmp_731884_732045_733789_739203_739233_739262 */
 {
 object k_737046_739202_739232_739261 = args[0]; object tmp_731884_732045_733789_739203_739233_739262 = args[1];
  return_direct_with_clo1(data,  k_737046_739202_739232_739261, (((closure)  k_737046_739202_739232_739261)->fn),  tmp_731884_732045_733789_739203_739233_739262);; 
}

static void __lambda_1112(void *data, object self_7314084, int argc, object *args) /* object self_7314084, object r_737045_739184_739214_739243 */
 {
 object r_737045_739184_739214_739243 = args[0];
  
closureN_type c_7325692;
object e_7325801 [8];
c_7325692.hdr.mark = gc_color_red;
 c_7325692.hdr.grayed = 0;
c_7325692.tag = closureN_tag;
 c_7325692.fn = (function_type)__lambda_1113;
c_7325692.num_args = 1;
c_7325692.num_elements = 8;
c_7325692.elements = (object *)e_7325801;
c_7325692.elements[0] = ((closureN)self_7314084)->elements[0];
c_7325692.elements[1] = ((closureN)self_7314084)->elements[1];
c_7325692.elements[2] = ((closureN)self_7314084)->elements[2];
c_7325692.elements[3] = ((closureN)self_7314084)->elements[3];
c_7325692.elements[4] = ((closureN)self_7314084)->elements[4];
c_7325692.elements[5] = ((closureN)self_7314084)->elements[5];
c_7325692.elements[6] = ((closureN)self_7314084)->elements[6];
c_7325692.elements[7] = ((closureN)self_7314084)->elements[7];













return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7325692, r_737045_739184_739214_739243, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314084)->elements[7])))))));; 
}

static void __lambda_1113(void *data, object self_7314085, int argc, object *args) /* object self_7314085, object r_737034_739185_739215_739244 */
 {
 object r_737034_739185_739215_739244 = args[0];
  
closureN_type c_7325695;
object e_7325800 [8];
c_7325695.hdr.mark = gc_color_red;
 c_7325695.hdr.grayed = 0;
c_7325695.tag = closureN_tag;
 c_7325695.fn = (function_type)__lambda_1114;
c_7325695.num_args = 1;
c_7325695.num_elements = 8;
c_7325695.elements = (object *)e_7325800;
c_7325695.elements[0] = ((closureN)self_7314085)->elements[0];
c_7325695.elements[1] = ((closureN)self_7314085)->elements[1];
c_7325695.elements[2] = ((closureN)self_7314085)->elements[2];
c_7325695.elements[3] = ((closureN)self_7314085)->elements[3];
c_7325695.elements[4] = ((closureN)self_7314085)->elements[4];
c_7325695.elements[5] = r_737034_739185_739215_739244;
c_7325695.elements[6] = ((closureN)self_7314085)->elements[5];
c_7325695.elements[7] = ((closureN)self_7314085)->elements[7];

return_closcall2(data,  ((closureN)self_7314085)->elements[6],  &c_7325695, quote_x);; 
}

static void __lambda_1114(void *data, object self_7314086, int argc, object *args) /* object self_7314086, object r_737041_739186_739216_739245 */
 {
 object r_737041_739186_739216_739245 = args[0];
  
closureN_type c_7325697;
object e_7325784 [7];
c_7325697.hdr.mark = gc_color_red;
 c_7325697.hdr.grayed = 0;
c_7325697.tag = closureN_tag;
 c_7325697.fn = (function_type)__lambda_1115;
c_7325697.num_args = 1;
c_7325697.num_elements = 7;
c_7325697.elements = (object *)e_7325784;
c_7325697.elements[0] = ((closureN)self_7314086)->elements[0];
c_7325697.elements[1] = ((closureN)self_7314086)->elements[1];
c_7325697.elements[2] = ((closureN)self_7314086)->elements[2];
c_7325697.elements[3] = ((closureN)self_7314086)->elements[3];
c_7325697.elements[4] = ((closureN)self_7314086)->elements[4];
c_7325697.elements[5] = ((closureN)self_7314086)->elements[6];
c_7325697.elements[6] = ((closureN)self_7314086)->elements[7];


pair_type local_7325788; 

pair_type local_7325791; 





pair_type local_7325799; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7325697, ((closureN)self_7314086)->elements[5], set_pair_as_expr(&local_7325788, set_pair_as_expr(&local_7325791, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314086)->elements[7])), set_pair_as_expr(&local_7325799, r_737041_739186_739216_739245, NULL)), NULL));; 
}

static void __lambda_1115(void *data, object self_7314087, int argc, object *args) /* object self_7314087, object r_737029_739190_739220_739249_739268_739282_739295 */
 {
 object r_737029_739190_739220_739249_739268_739282_739295 = args[0];
  
pair_type local_7325702; 

pair_type local_7325705; 

pair_type local_7325709; 

pair_type local_7325712; 

pair_type local_7325716; 

pair_type local_7325719; 







pair_type local_7325729; 

pair_type local_7325732; 

pair_type local_7325736; 

pair_type local_7325740; 

pair_type local_7325743; 

pair_type local_7325747; 

make_utf8_string_with_len(c_7325748, "bind", 4, 4);

pair_type local_7325751; 











pair_type local_7325765; 

pair_type local_7325768; 














return_direct_with_clo1(data,  ((closureN)self_7314087)->elements[0], (((closure)  ((closureN)self_7314087)->elements[0])->fn),  set_pair_as_expr(&local_7325702, set_pair_as_expr(&local_7325705, ((closureN)self_7314087)->elements[1], set_pair_as_expr(&local_7325709, set_pair_as_expr(&local_7325712, ((closureN)self_7314087)->elements[5], set_pair_as_expr(&local_7325716, NULL, set_pair_as_expr(&local_7325719, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314087)->elements[6]))), NULL))), set_pair_as_expr(&local_7325729, set_pair_as_expr(&local_7325732, ((closureN)self_7314087)->elements[2], set_pair_as_expr(&local_7325736, ((closureN)self_7314087)->elements[3], set_pair_as_expr(&local_7325740, set_pair_as_expr(&local_7325743, ((closureN)self_7314087)->elements[4], set_pair_as_expr(&local_7325747, &c_7325748, set_pair_as_expr(&local_7325751, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314087)->elements[6]))))), set_pair_as_expr(&local_7325765, r_737029_739190_739220_739249_739268_739282_739295, set_pair_as_expr(&local_7325768, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314087)->elements[6]))))))), NULL))))), NULL))), NULL))), boolean_f));; 
}

static void __lambda_1089(void *data, object self_7314088, int argc, object *args) /* object self_7314088, object k_737065 */
 {
 object k_737065 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314088)->elements[1])) ){ 
    
  
  make_utf8_string_with_len(c_7325272, "mktmp", 5, 5);
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314088)->elements[1]), &c_7325272)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314088)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1]))))) ){ 
    complex_num_type local_7325303; 
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325303, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1]))))))) ){ 
    complex_num_type local_7325339; 
  
  
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325339, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))))))) ){ 
    
  
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1])))))))) ){ 
    
  
  
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[1]))))))))) ){ 
  
closureN_type c_7325387;
object e_7325533 [3];
c_7325387.hdr.mark = gc_color_red;
 c_7325387.hdr.grayed = 0;
c_7325387.tag = closureN_tag;
 c_7325387.fn = (function_type)__lambda_1090;
c_7325387.num_args = 1;
c_7325387.num_elements = 3;
c_7325387.elements = (object *)e_7325533;
c_7325387.elements[0] = k_737065;
c_7325387.elements[1] = ((closureN)self_7314088)->elements[0];
c_7325387.elements[2] = ((closureN)self_7314088)->elements[1];

return_closcall2(data,  ((closureN)self_7314088)->elements[0],  &c_7325387, quote_let_91values);
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737065, (((closure)  k_737065)->fn),  boolean_f);}
;; 
}

static void __lambda_1090(void *data, object self_7314089, int argc, object *args) /* object self_7314089, object r_737095 */
 {
 object r_737095 = args[0];
  
closureN_type c_7325389;
object e_7325530 [4];
c_7325389.hdr.mark = gc_color_red;
 c_7325389.hdr.grayed = 0;
c_7325389.tag = closureN_tag;
 c_7325389.fn = (function_type)__lambda_1091;
c_7325389.num_args = 1;
c_7325389.num_elements = 4;
c_7325389.elements = (object *)e_7325530;
c_7325389.elements[0] = ((closureN)self_7314089)->elements[0];
c_7325389.elements[1] = r_737095;
c_7325389.elements[2] = ((closureN)self_7314089)->elements[1];
c_7325389.elements[3] = ((closureN)self_7314089)->elements[2];


mmacro(c_7325531, (function_type)__lambda_1100);c_7325531.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7325389,__lambda_1091,  &c_7325531);; 
}

static void __lambda_1100(void *data, object self_7314090, int argc, object *args) /* object self_7314090, object k_737134, object arg_731921_732070_733814 */
 {
 object k_737134 = args[0]; object arg_731921_732070_733814 = args[1];
  return_direct_with_clo1(data,  k_737134, (((closure)  k_737134)->fn),  arg_731921_732070_733814);; 
}

static void __lambda_1091(void *data, object self_7314091, int argc, object *args) /* object self_7314091, object r_737133 */
 {
 object r_737133 = args[0];
  
closureN_type c_7325391;
object e_7325520 [4];
c_7325391.hdr.mark = gc_color_red;
 c_7325391.hdr.grayed = 0;
c_7325391.tag = closureN_tag;
 c_7325391.fn = (function_type)__lambda_1092;
c_7325391.num_args = 1;
c_7325391.num_elements = 4;
c_7325391.elements = (object *)e_7325520;
c_7325391.elements[0] = ((closureN)self_7314091)->elements[0];
c_7325391.elements[1] = ((closureN)self_7314091)->elements[1];
c_7325391.elements[2] = ((closureN)self_7314091)->elements[2];
c_7325391.elements[3] = ((closureN)self_7314091)->elements[3];









return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7325391, r_737133, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314091)->elements[3])))));; 
}

static void __lambda_1092(void *data, object self_7314092, int argc, object *args) /* object self_7314092, object r_737127 */
 {
 object r_737127 = args[0];
  
closureN_type c_7325394;
object e_7325519 [5];
c_7325394.hdr.mark = gc_color_red;
 c_7325394.hdr.grayed = 0;
c_7325394.tag = closureN_tag;
 c_7325394.fn = (function_type)__lambda_1093;
c_7325394.num_args = 1;
c_7325394.num_elements = 5;
c_7325394.elements = (object *)e_7325519;
c_7325394.elements[0] = ((closureN)self_7314092)->elements[0];
c_7325394.elements[1] = ((closureN)self_7314092)->elements[1];
c_7325394.elements[2] = r_737127;
c_7325394.elements[3] = ((closureN)self_7314092)->elements[2];
c_7325394.elements[4] = ((closureN)self_7314092)->elements[3];

return_closcall2(data,  ((closureN)self_7314092)->elements[2],  &c_7325394, quote_x);; 
}

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


pair_type local_7325518; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7325396, ((closureN)self_7314093)->elements[2], set_pair_as_expr(&local_7325518, r_737129, NULL));; 
}

static void __lambda_1094(void *data, object self_7314094, int argc, object *args) /* object self_7314094, object r_737104_739088 */
 {
 object r_737104_739088 = args[0];
  
closureN_type c_7325398;
object e_7325511 [5];
c_7325398.hdr.mark = gc_color_red;
 c_7325398.hdr.grayed = 0;
c_7325398.tag = closureN_tag;
 c_7325398.fn = (function_type)__lambda_1095;
c_7325398.num_args = 1;
c_7325398.num_elements = 5;
c_7325398.elements = (object *)e_7325511;
c_7325398.elements[0] = ((closureN)self_7314094)->elements[0];
c_7325398.elements[1] = ((closureN)self_7314094)->elements[1];
c_7325398.elements[2] = r_737104_739088;
c_7325398.elements[3] = ((closureN)self_7314094)->elements[2];
c_7325398.elements[4] = ((closureN)self_7314094)->elements[3];


mmacro(c_7325512, (function_type)__lambda_1099);c_7325512.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7325398,__lambda_1095,  &c_7325512);; 
}

static void __lambda_1099(void *data, object self_7314095, int argc, object *args) /* object self_7314095, object k_737126_739104, object tmp_731922_732071_733815_739105 */
 {
 object k_737126_739104 = args[0]; object tmp_731922_732071_733815_739105 = args[1];
  return_direct_with_clo1(data,  k_737126_739104, (((closure)  k_737126_739104)->fn),  tmp_731922_732071_733815_739105);; 
}

static void __lambda_1095(void *data, object self_7314096, int argc, object *args) /* object self_7314096, object r_737125_739089 */
 {
 object r_737125_739089 = args[0];
  
closureN_type c_7325400;
object e_7325497 [5];
c_7325400.hdr.mark = gc_color_red;
 c_7325400.hdr.grayed = 0;
c_7325400.tag = closureN_tag;
 c_7325400.fn = (function_type)__lambda_1096;
c_7325400.num_args = 1;
c_7325400.num_elements = 5;
c_7325400.elements = (object *)e_7325497;
c_7325400.elements[0] = ((closureN)self_7314096)->elements[0];
c_7325400.elements[1] = ((closureN)self_7314096)->elements[1];
c_7325400.elements[2] = ((closureN)self_7314096)->elements[2];
c_7325400.elements[3] = ((closureN)self_7314096)->elements[3];
c_7325400.elements[4] = ((closureN)self_7314096)->elements[4];













return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7325400, r_737125_739089, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314096)->elements[4])))))));; 
}

static void __lambda_1096(void *data, object self_7314097, int argc, object *args) /* object self_7314097, object r_737114_739090 */
 {
 object r_737114_739090 = args[0];
  
closureN_type c_7325403;
object e_7325496 [5];
c_7325403.hdr.mark = gc_color_red;
 c_7325403.hdr.grayed = 0;
c_7325403.tag = closureN_tag;
 c_7325403.fn = (function_type)__lambda_1097;
c_7325403.num_args = 1;
c_7325403.num_elements = 5;
c_7325403.elements = (object *)e_7325496;
c_7325403.elements[0] = ((closureN)self_7314097)->elements[0];
c_7325403.elements[1] = ((closureN)self_7314097)->elements[1];
c_7325403.elements[2] = ((closureN)self_7314097)->elements[2];
c_7325403.elements[3] = r_737114_739090;
c_7325403.elements[4] = ((closureN)self_7314097)->elements[4];

return_closcall2(data,  ((closureN)self_7314097)->elements[3],  &c_7325403, quote_x);; 
}

static void __lambda_1097(void *data, object self_7314098, int argc, object *args) /* object self_7314098, object r_737121_739091 */
 {
 object r_737121_739091 = args[0];
  
closureN_type c_7325405;
object e_7325478 [4];
c_7325405.hdr.mark = gc_color_red;
 c_7325405.hdr.grayed = 0;
c_7325405.tag = closureN_tag;
 c_7325405.fn = (function_type)__lambda_1098;
c_7325405.num_args = 1;
c_7325405.num_elements = 4;
c_7325405.elements = (object *)e_7325478;
c_7325405.elements[0] = ((closureN)self_7314098)->elements[0];
c_7325405.elements[1] = ((closureN)self_7314098)->elements[1];
c_7325405.elements[2] = ((closureN)self_7314098)->elements[2];
c_7325405.elements[3] = ((closureN)self_7314098)->elements[4];


pair_type local_7325482; 

pair_type local_7325485; 







pair_type local_7325495; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7325405, ((closureN)self_7314098)->elements[3], set_pair_as_expr(&local_7325482, set_pair_as_expr(&local_7325485, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314098)->elements[4]))), set_pair_as_expr(&local_7325495, r_737121_739091, NULL)), NULL));; 
}

static void __lambda_1098(void *data, object self_7314099, int argc, object *args) /* object self_7314099, object r_737109_739095_739109_739120_739130 */
 {
 object r_737109_739095_739109_739120_739130 = args[0];
  
pair_type local_7325410; 

pair_type local_7325413; 

pair_type local_7325417; 

make_utf8_string_with_len(c_7325418, "mktmp", 5, 5);

pair_type local_7325421; 







pair_type local_7325431; 







pair_type local_7325441; 

pair_type local_7325445; 











pair_type local_7325459; 

pair_type local_7325462; 














return_direct_with_clo1(data,  ((closureN)self_7314099)->elements[0], (((closure)  ((closureN)self_7314099)->elements[0])->fn),  set_pair_as_expr(&local_7325410, set_pair_as_expr(&local_7325413, ((closureN)self_7314099)->elements[1], set_pair_as_expr(&local_7325417, &c_7325418, set_pair_as_expr(&local_7325421, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314099)->elements[3]))), set_pair_as_expr(&local_7325431, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314099)->elements[3]))), set_pair_as_expr(&local_7325441, ((closureN)self_7314099)->elements[2], set_pair_as_expr(&local_7325445, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314099)->elements[3]))))), set_pair_as_expr(&local_7325459, r_737109_739095_739109_739120_739130, set_pair_as_expr(&local_7325462, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314099)->elements[3]))))))), NULL)))))))), boolean_f));; 
}

static void __lambda_1082(void *data, object self_7314100, int argc, object *args) /* object self_7314100, object k_737137 */
 {
 object k_737137 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314100)->elements[1])) ){ 
    
  
  make_utf8_string_with_len(c_7325039, "mktmp", 5, 5);
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314100)->elements[1]), &c_7325039)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314100)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1])))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1]))))))) ){ 
    
  
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1])))))))) ){ 
    
  
  
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314100)->elements[1]))))))))) ){ 
  
closureN_type c_7325126;
object e_7325245 [3];
c_7325126.hdr.mark = gc_color_red;
 c_7325126.hdr.grayed = 0;
c_7325126.tag = closureN_tag;
 c_7325126.fn = (function_type)__lambda_1083;
c_7325126.num_args = 1;
c_7325126.num_elements = 3;
c_7325126.elements = (object *)e_7325245;
c_7325126.elements[0] = k_737137;
c_7325126.elements[1] = ((closureN)self_7314100)->elements[0];
c_7325126.elements[2] = ((closureN)self_7314100)->elements[1];

return_closcall2(data,  ((closureN)self_7314100)->elements[0],  &c_7325126, quote_call_91with_91values);
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737137, (((closure)  k_737137)->fn),  boolean_f);}
;; 
}

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

return_closcall2(data,  ((closureN)self_7314101)->elements[1],  &c_7325129, quote_lambda);; 
}

static void __lambda_1084(void *data, object self_7314102, int argc, object *args) /* object self_7314102, object r_737193 */
 {
 object r_737193 = args[0];
  
closureN_type c_7325132;
object e_7325243 [5];
c_7325132.hdr.mark = gc_color_red;
 c_7325132.hdr.grayed = 0;
c_7325132.tag = closureN_tag;
 c_7325132.fn = (function_type)__lambda_1085;
c_7325132.num_args = 1;
c_7325132.num_elements = 5;
c_7325132.elements = (object *)e_7325243;
c_7325132.elements[0] = ((closureN)self_7314102)->elements[0];
c_7325132.elements[1] = ((closureN)self_7314102)->elements[1];
c_7325132.elements[2] = r_737193;
c_7325132.elements[3] = ((closureN)self_7314102)->elements[2];
c_7325132.elements[4] = ((closureN)self_7314102)->elements[3];

return_closcall2(data,  ((closureN)self_7314102)->elements[2],  &c_7325132, quote_lambda);; 
}

static void __lambda_1085(void *data, object self_7314103, int argc, object *args) /* object self_7314103, object r_737172_738979_738994_739008 */
 {
 object r_737172_738979_738994_739008 = args[0];
  
closureN_type c_7325135;
object e_7325242 [5];
c_7325135.hdr.mark = gc_color_red;
 c_7325135.hdr.grayed = 0;
c_7325135.tag = closureN_tag;
 c_7325135.fn = (function_type)__lambda_1086;
c_7325135.num_args = 1;
c_7325135.num_elements = 5;
c_7325135.elements = (object *)e_7325242;
c_7325135.elements[0] = ((closureN)self_7314103)->elements[0];
c_7325135.elements[1] = ((closureN)self_7314103)->elements[1];
c_7325135.elements[2] = r_737172_738979_738994_739008;
c_7325135.elements[3] = ((closureN)self_7314103)->elements[2];
c_7325135.elements[4] = ((closureN)self_7314103)->elements[4];

return_closcall2(data,  ((closureN)self_7314103)->elements[3],  &c_7325135, quote_let_91values);; 
}

static void __lambda_1086(void *data, object self_7314104, int argc, object *args) /* object self_7314104, object r_737180_738980_738995_739009 */
 {
 object r_737180_738980_738995_739009 = args[0];
  
pair_type local_7325140; 

pair_type local_7325143; 

pair_type local_7325147; 

pair_type local_7325150; 

pair_type local_7325154; 

pair_type local_7325157; 







pair_type local_7325167; 

pair_type local_7325170; 

pair_type local_7325174; 









pair_type local_7325186; 

pair_type local_7325189; 

pair_type local_7325192; 

make_utf8_string_with_len(c_7325193, "bind", 4, 4);

pair_type local_7325196; 











pair_type local_7325210; 













pair_type local_7325226; 














return_direct_with_clo1(data,  ((closureN)self_7314104)->elements[0], (((closure)  ((closureN)self_7314104)->elements[0])->fn),  set_pair_as_expr(&local_7325140, set_pair_as_expr(&local_7325143, ((closureN)self_7314104)->elements[1], set_pair_as_expr(&local_7325147, set_pair_as_expr(&local_7325150, ((closureN)self_7314104)->elements[3], set_pair_as_expr(&local_7325154, NULL, set_pair_as_expr(&local_7325157, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4]))), NULL))), set_pair_as_expr(&local_7325167, set_pair_as_expr(&local_7325170, ((closureN)self_7314104)->elements[2], set_pair_as_expr(&local_7325174, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4])))), set_pair_as_expr(&local_7325186, set_pair_as_expr(&local_7325189, r_737180_738980_738995_739009, set_pair_as_expr(&local_7325192, &c_7325193, set_pair_as_expr(&local_7325196, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4]))))), set_pair_as_expr(&local_7325210, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4])))))), set_pair_as_expr(&local_7325226, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[4]))))))), NULL))))), NULL))), NULL))), boolean_f));; 
}

static void __lambda_1078(void *data, object self_7314105, int argc, object *args) /* object self_7314105, object k_737204 */
 {
 object k_737204 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314105)->elements[1])) ){ 
    
  
  make_utf8_string_with_len(c_7324852, "bind", 4, 4);
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314105)->elements[1]), &c_7324852)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))))))) ){ 
    complex_num_type local_7324900; 
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324900, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[1])))))) ){ 
  
closureN_type c_7324937;
object e_7325011 [2];
c_7324937.hdr.mark = gc_color_red;
 c_7324937.hdr.grayed = 0;
c_7324937.tag = closureN_tag;
 c_7324937.fn = (function_type)__lambda_1079;
c_7324937.num_args = 1;
c_7324937.num_elements = 2;
c_7324937.elements = (object *)e_7325011;
c_7324937.elements[0] = k_737204;
c_7324937.elements[1] = ((closureN)self_7314105)->elements[1];

return_closcall2(data,  ((closureN)self_7314105)->elements[0],  &c_7324937, quote_let_91values);
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737204, (((closure)  k_737204)->fn),  boolean_f);}
;; 
}

static void __lambda_1079(void *data, object self_7314106, int argc, object *args) /* object self_7314106, object r_737231 */
 {
 object r_737231 = args[0];
  
pair_type local_7324942; 

pair_type local_7324945; 

pair_type local_7324948; 

make_utf8_string_with_len(c_7324949, "mktmp", 5, 5);

pair_type local_7324952; 









pair_type local_7324964; 











pair_type local_7324978; 

pair_type local_7324981; 







pair_type local_7324991; 







pair_type local_7325001; 








return_direct_with_clo1(data,  ((closureN)self_7314106)->elements[0], (((closure)  ((closureN)self_7314106)->elements[0])->fn),  set_pair_as_expr(&local_7324942, set_pair_as_expr(&local_7324945, r_737231, set_pair_as_expr(&local_7324948, &c_7324949, set_pair_as_expr(&local_7324952, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1])))), set_pair_as_expr(&local_7324964, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1]))))), set_pair_as_expr(&local_7324978, NULL, set_pair_as_expr(&local_7324981, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1]))), set_pair_as_expr(&local_7324991, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1]))), set_pair_as_expr(&local_7325001, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[1])))), NULL)))))))), boolean_f));; 
}

static void __lambda_1074(void *data, object self_7314107, int argc, object *args) /* object self_7314107, object k_737251 */
 {
 object k_737251 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314107)->elements[1])) ){ 
    
  
  make_utf8_string_with_len(c_7324755, "bind", 4, 4);
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7314107)->elements[1]), &c_7324755)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314107)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1])))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1])))))) ){ 
  
closureN_type c_7324797;
object e_7324828 [2];
c_7324797.hdr.mark = gc_color_red;
 c_7324797.hdr.grayed = 0;
c_7324797.tag = closureN_tag;
 c_7324797.fn = (function_type)__lambda_1075;
c_7324797.num_args = 1;
c_7324797.num_elements = 2;
c_7324797.elements = (object *)e_7324828;
c_7324797.elements[0] = k_737251;
c_7324797.elements[1] = ((closureN)self_7314107)->elements[1];

return_closcall2(data,  ((closureN)self_7314107)->elements[0],  &c_7324797, quote_let);
} else { 
  return_direct_with_clo1(data,  k_737251, (((closure)  k_737251)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737251, (((closure)  k_737251)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737251, (((closure)  k_737251)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737251, (((closure)  k_737251)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737251, (((closure)  k_737251)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737251, (((closure)  k_737251)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737251, (((closure)  k_737251)->fn),  boolean_f);}
;; 
}

static void __lambda_1075(void *data, object self_7314108, int argc, object *args) /* object self_7314108, object r_737268 */
 {
 object r_737268 = args[0];
  
pair_type local_7324802; 

pair_type local_7324805; 

pair_type local_7324808; 







pair_type local_7324818; 








return_direct_with_clo1(data,  ((closureN)self_7314108)->elements[0], (((closure)  ((closureN)self_7314108)->elements[0])->fn),  set_pair_as_expr(&local_7324802, set_pair_as_expr(&local_7324805, r_737268, set_pair_as_expr(&local_7324808, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314108)->elements[1]))), set_pair_as_expr(&local_7324818, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314108)->elements[1])))), NULL))), boolean_f));; 
}

static void __lambda_1068(void *data, object self_7314109, int argc, object *args) /* object self_7314109, object k_737277 */
 {
 object k_737277 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314109)->elements[1])) ){ 
    complex_num_type local_7324660; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324660, Cyc_car(data, ((closureN)self_7314109)->elements[1]))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314109)->elements[1]))) ){ 
    complex_num_type local_7324671; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324671, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314109)->elements[1])))) ){ 
  
closureN_type c_7324679;
object e_7324731 [3];
c_7324679.hdr.mark = gc_color_red;
 c_7324679.hdr.grayed = 0;
c_7324679.tag = closureN_tag;
 c_7324679.fn = (function_type)__lambda_1069;
c_7324679.num_args = 1;
c_7324679.num_elements = 3;
c_7324679.elements = (object *)e_7324731;
c_7324679.elements[0] = k_737277;
c_7324679.elements[1] = ((closureN)self_7314109)->elements[0];
c_7324679.elements[2] = ((closureN)self_7314109)->elements[1];

return_closcall2(data,  ((closureN)self_7314109)->elements[0],  &c_7324679, quote_let_91values);
} else { 
  return_direct_with_clo1(data,  k_737277, (((closure)  k_737277)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737277, (((closure)  k_737277)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737277, (((closure)  k_737277)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_737277, (((closure)  k_737277)->fn),  boolean_f);}
;; 
}

static void __lambda_1069(void *data, object self_7314110, int argc, object *args) /* object self_7314110, object r_737287 */
 {
 object r_737287 = args[0];
  
closureN_type c_7324682;
object e_7324730 [3];
c_7324682.hdr.mark = gc_color_red;
 c_7324682.hdr.grayed = 0;
c_7324682.tag = closureN_tag;
 c_7324682.fn = (function_type)__lambda_1070;
c_7324682.num_args = 1;
c_7324682.num_elements = 3;
c_7324682.elements = (object *)e_7324730;
c_7324682.elements[0] = ((closureN)self_7314110)->elements[0];
c_7324682.elements[1] = r_737287;
c_7324682.elements[2] = ((closureN)self_7314110)->elements[2];

return_closcall2(data,  ((closureN)self_7314110)->elements[1],  &c_7324682, quote_lambda);; 
}

static void __lambda_1070(void *data, object self_7314111, int argc, object *args) /* object self_7314111, object r_737303 */
 {
 object r_737303 = args[0];
  
pair_type local_7324687; 

pair_type local_7324690; 

pair_type local_7324694; 

make_utf8_string_with_len(c_7324695, "bind", 4, 4);

pair_type local_7324698; 



pair_type local_7324704; 

pair_type local_7324707; 

pair_type local_7324710; 

pair_type local_7324713; 

pair_type local_7324716; 

pair_type local_7324719; 








return_direct_with_clo1(data,  ((closureN)self_7314111)->elements[0], (((closure)  ((closureN)self_7314111)->elements[0])->fn),  set_pair_as_expr(&local_7324687, set_pair_as_expr(&local_7324690, ((closureN)self_7314111)->elements[1], set_pair_as_expr(&local_7324694, &c_7324695, set_pair_as_expr(&local_7324698, Cyc_car(data, ((closureN)self_7314111)->elements[2]), set_pair_as_expr(&local_7324704, NULL, set_pair_as_expr(&local_7324707, set_pair_as_expr(&local_7324710, set_pair_as_expr(&local_7324713, r_737303, set_pair_as_expr(&local_7324716, NULL, set_pair_as_expr(&local_7324719, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314111)->elements[2])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314111)->elements[2]))))), NULL), NULL))))), boolean_f));; 
}

static void __lambda_1046(void *data, object _, int argc, object *args) /* closure _,object k_736856, object expr_731606_731637_731698_733720, object rename_731607_731638_731699_733721, object compare_731608_731639_731700_733722 */
 {
object k_736856 = args[0]; object expr_731606_731637_731698_733720 = args[1]; object rename_731607_731638_731699_733721 = args[2];
  Cyc_st_add(data, "scheme/base.sld:let*-values");

closureN_type c_7324321;
object e_7324647 [3];
c_7324321.hdr.mark = gc_color_red;
 c_7324321.hdr.grayed = 0;
c_7324321.tag = closureN_tag;
 c_7324321.fn = (function_type)__lambda_1047;
c_7324321.num_args = 1;
c_7324321.num_elements = 3;
c_7324321.elements = (object *)e_7324647;
c_7324321.elements[0] = expr_731606_731637_731698_733720;
c_7324321.elements[1] = k_736856;
c_7324321.elements[2] = rename_731607_731638_731699_733721;



return_direct_with_clo1(data,(closure)&c_7324321,__lambda_1047,  Cyc_cdr(data, expr_731606_731637_731698_733720));; 
}

static void __lambda_1047(void *data, object self_7314039, int argc, object *args) /* object self_7314039, object v_931_731614_731692_731732_733754 */
 {
 object v_931_731614_731692_731732_733754 = args[0];
  
closureN_type c_7324323;
object e_7324349 [2];
c_7324323.hdr.mark = gc_color_red;
 c_7324323.hdr.grayed = 0;
c_7324323.tag = closureN_tag;
 c_7324323.fn = (function_type)__lambda_1048;
c_7324323.num_args = 0;
c_7324323.num_elements = 2;
c_7324323.elements = (object *)e_7324349;
c_7324323.elements[0] = ((closureN)self_7314039)->elements[2];
c_7324323.elements[1] = v_931_731614_731692_731732_733754;


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

return_direct_with_clo1(data,(closure)&c_7324323,__lambda_1048,  &c_7324350);; 
}

static void __lambda_1050(void *data, object self_7314040, int argc, object *args) /* object self_7314040, object tmp_731641_731643_731701_733723 */
 {
 object tmp_731641_731643_731701_733723 = args[0];
  
closureN_type c_7324352;
object e_7324639 [3];
c_7324352.hdr.mark = gc_color_red;
 c_7324352.hdr.grayed = 0;
c_7324352.tag = closureN_tag;
 c_7324352.fn = (function_type)__lambda_1051;
c_7324352.num_args = 0;
c_7324352.num_elements = 3;
c_7324352.elements = (object *)e_7324639;
c_7324352.elements[0] = ((closureN)self_7314040)->elements[0];
c_7324352.elements[1] = ((closureN)self_7314040)->elements[2];
c_7324352.elements[2] = tmp_731641_731643_731701_733723;


closureN_type c_7324640;
object e_7324645 [1];
c_7324640.hdr.mark = gc_color_red;
 c_7324640.hdr.grayed = 0;
c_7324640.tag = closureN_tag;
 c_7324640.fn = (function_type)__lambda_1065;
c_7324640.num_args = 1;
c_7324640.num_elements = 1;
c_7324640.elements = (object *)e_7324645;
c_7324640.elements[0] = ((closureN)self_7314040)->elements[1];

return_direct_with_clo1(data,(closure)&c_7324352,__lambda_1051,  &c_7324640);; 
}

static void __lambda_1065(void *data, object self_7314041, int argc, object *args) /* object self_7314041, object r_736857 */
 {
 object r_736857 = args[0];
  

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

static void __lambda_1051(void *data, object self_7314042, int argc, object *args) /* object self_7314042, object k_736859 */
 {
 object k_736859 = args[0];
  if( (boolean_f != ((closureN)self_7314042)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_736859, (((closure)  k_736859)->fn),  ((closureN)self_7314042)->elements[2]);
} else { 
  
closureN_type c_7324357;
object e_7324635 [3];
c_7324357.hdr.mark = gc_color_red;
 c_7324357.hdr.grayed = 0;
c_7324357.tag = closureN_tag;
 c_7324357.fn = (function_type)__lambda_1052;
c_7324357.num_args = 1;
c_7324357.num_elements = 3;
c_7324357.elements = (object *)e_7324635;
c_7324357.elements[0] = ((closureN)self_7314042)->elements[0];
c_7324357.elements[1] = k_736859;
c_7324357.elements[2] = ((closureN)self_7314042)->elements[1];



return_direct_with_clo1(data,(closure)&c_7324357,__lambda_1052,  Cyc_cdr(data, ((closureN)self_7314042)->elements[0]));}
;; 
}

static void __lambda_1052(void *data, object self_7314043, int argc, object *args) /* object self_7314043, object v_934_731617_731670_731717_733739 */
 {
 object v_934_731617_731670_731717_733739 = args[0];
  
closureN_type c_7324359;
object e_7324486 [2];
c_7324359.hdr.mark = gc_color_red;
 c_7324359.hdr.grayed = 0;
c_7324359.tag = closureN_tag;
 c_7324359.fn = (function_type)__lambda_1053;
c_7324359.num_args = 0;
c_7324359.num_elements = 2;
c_7324359.elements = (object *)e_7324486;
c_7324359.elements[0] = ((closureN)self_7314043)->elements[2];
c_7324359.elements[1] = v_934_731617_731670_731717_733739;


closureN_type c_7324487;
object e_7324634 [3];
c_7324487.hdr.mark = gc_color_red;
 c_7324487.hdr.grayed = 0;
c_7324487.tag = closureN_tag;
 c_7324487.fn = (function_type)__lambda_1056;
c_7324487.num_args = 1;
c_7324487.num_elements = 3;
c_7324487.elements = (object *)e_7324634;
c_7324487.elements[0] = ((closureN)self_7314043)->elements[0];
c_7324487.elements[1] = ((closureN)self_7314043)->elements[1];
c_7324487.elements[2] = ((closureN)self_7314043)->elements[2];

return_direct_with_clo1(data,(closure)&c_7324359,__lambda_1053,  &c_7324487);; 
}

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



return_direct_with_clo1(data,(closure)&c_7324491,__lambda_1057,  Cyc_cdr(data, ((closureN)self_7314044)->elements[0]));}
;; 
}

static void __lambda_1057(void *data, object self_7314045, int argc, object *args) /* object self_7314045, object v_9315_731628_731652_731704_733726 */
 {
 object v_9315_731628_731652_731704_733726 = args[0];
  
closureN_type c_7324493;
object e_7324615 [2];
c_7324493.hdr.mark = gc_color_red;
 c_7324493.hdr.grayed = 0;
c_7324493.tag = closureN_tag;
 c_7324493.fn = (function_type)__lambda_1058;
c_7324493.num_args = 0;
c_7324493.num_elements = 2;
c_7324493.elements = (object *)e_7324615;
c_7324493.elements[0] = ((closureN)self_7314045)->elements[2];
c_7324493.elements[1] = v_9315_731628_731652_731704_733726;


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

return_direct_with_clo1(data,(closure)&c_7324493,__lambda_1058,  &c_7324616);; 
}

static void __lambda_1063(void *data, object self_7314046, int argc, object *args) /* object self_7314046, object tmp_731649_731651_731703_733725 */
 {
 object tmp_731649_731651_731703_733725 = args[0];
  if( (boolean_f != tmp_731649_731651_731703_733725) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7314046)->elements[1], (((closure)  ((closureN)self_7314046)->elements[1])->fn),  tmp_731649_731651_731703_733725);
} else { 
  
closureN_type c_7324620;
object e_7324626 [1];
c_7324620.hdr.mark = gc_color_red;
 c_7324620.hdr.grayed = 0;
c_7324620.tag = closureN_tag;
 c_7324620.fn = (function_type)__lambda_1064;
c_7324620.num_args = 1;
c_7324620.num_elements = 1;
c_7324620.elements = (object *)e_7324626;
c_7324620.elements[0] = ((closureN)self_7314046)->elements[1];


make_utf8_string_with_len(c_7324627, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7324620, &c_7324627, ((closureN)self_7314046)->elements[0]);}
;; 
}

static void __lambda_1064(void *data, object self_7314047, int argc, object *args) /* object self_7314047, object r_736862 */
 {
 object r_736862 = args[0];
  
pair_type local_7324625; 
return_direct_with_clo1(data,  ((closureN)self_7314047)->elements[0], (((closure)  ((closureN)self_7314047)->elements[0])->fn),  set_pair_as_expr(&local_7324625, r_736862, boolean_f));; 
}

static void __lambda_1058(void *data, object self_7314048, int argc, object *args) /* object self_7314048, object k_736864 */
 {
 object k_736864 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314048)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314048)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7314048)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314048)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314048)->elements[1])))))) ){ 
  
closureN_type c_7324531;
object e_7324609 [3];
c_7324531.hdr.mark = gc_color_red;
 c_7324531.hdr.grayed = 0;
c_7324531.tag = closureN_tag;
 c_7324531.fn = (function_type)__lambda_1059;
c_7324531.num_args = 1;
c_7324531.num_elements = 3;
c_7324531.elements = (object *)e_7324609;
c_7324531.elements[0] = k_736864;
c_7324531.elements[1] = ((closureN)self_7314048)->elements[0];
c_7324531.elements[2] = ((closureN)self_7314048)->elements[1];

return_closcall2(data,  ((closureN)self_7314048)->elements[0],  &c_7324531, quote_call_91with_91values);
} else { 
  return_direct_with_clo1(data,  k_736864, (((closure)  k_736864)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736864, (((closure)  k_736864)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736864, (((closure)  k_736864)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736864, (((closure)  k_736864)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736864, (((closure)  k_736864)->fn),  boolean_f);}
;; 
}

static void __lambda_1059(void *data, object self_7314049, int argc, object *args) /* object self_7314049, object r_736879 */
 {
 object r_736879 = args[0];
  
closureN_type c_7324534;
object e_7324608 [4];
c_7324534.hdr.mark = gc_color_red;
 c_7324534.hdr.grayed = 0;
c_7324534.tag = closureN_tag;
 c_7324534.fn = (function_type)__lambda_1060;
c_7324534.num_args = 1;
c_7324534.num_elements = 4;
c_7324534.elements = (object *)e_7324608;
c_7324534.elements[0] = ((closureN)self_7314049)->elements[0];
c_7324534.elements[1] = r_736879;
c_7324534.elements[2] = ((closureN)self_7314049)->elements[1];
c_7324534.elements[3] = ((closureN)self_7314049)->elements[2];

return_closcall2(data,  ((closureN)self_7314049)->elements[1],  &c_7324534, quote_lambda);; 
}

static void __lambda_1060(void *data, object self_7314050, int argc, object *args) /* object self_7314050, object r_736902 */
 {
 object r_736902 = args[0];
  
closureN_type c_7324537;
object e_7324607 [5];
c_7324537.hdr.mark = gc_color_red;
 c_7324537.hdr.grayed = 0;
c_7324537.tag = closureN_tag;
 c_7324537.fn = (function_type)__lambda_1061;
c_7324537.num_args = 1;
c_7324537.num_elements = 5;
c_7324537.elements = (object *)e_7324607;
c_7324537.elements[0] = ((closureN)self_7314050)->elements[0];
c_7324537.elements[1] = ((closureN)self_7314050)->elements[1];
c_7324537.elements[2] = r_736902;
c_7324537.elements[3] = ((closureN)self_7314050)->elements[2];
c_7324537.elements[4] = ((closureN)self_7314050)->elements[3];

return_closcall2(data,  ((closureN)self_7314050)->elements[2],  &c_7324537, quote_lambda);; 
}

static void __lambda_1061(void *data, object self_7314051, int argc, object *args) /* object self_7314051, object r_736888_738820_738832_738843 */
 {
 object r_736888_738820_738832_738843 = args[0];
  
closureN_type c_7324540;
object e_7324606 [5];
c_7324540.hdr.mark = gc_color_red;
 c_7324540.hdr.grayed = 0;
c_7324540.tag = closureN_tag;
 c_7324540.fn = (function_type)__lambda_1062;
c_7324540.num_args = 1;
c_7324540.num_elements = 5;
c_7324540.elements = (object *)e_7324606;
c_7324540.elements[0] = ((closureN)self_7314051)->elements[0];
c_7324540.elements[1] = ((closureN)self_7314051)->elements[1];
c_7324540.elements[2] = r_736888_738820_738832_738843;
c_7324540.elements[3] = ((closureN)self_7314051)->elements[2];
c_7324540.elements[4] = ((closureN)self_7314051)->elements[4];

return_closcall2(data,  ((closureN)self_7314051)->elements[3],  &c_7324540, quote_let_85_91values);; 
}

static void __lambda_1062(void *data, object self_7314052, int argc, object *args) /* object self_7314052, object r_736896_738821_738833_738844 */
 {
 object r_736896_738821_738833_738844 = args[0];
  
pair_type local_7324545; 

pair_type local_7324548; 

pair_type local_7324552; 

pair_type local_7324555; 

pair_type local_7324559; 

pair_type local_7324562; 









pair_type local_7324574; 

pair_type local_7324577; 

pair_type local_7324581; 







pair_type local_7324591; 

pair_type local_7324594; 

pair_type local_7324597; 






return_direct_with_clo1(data,  ((closureN)self_7314052)->elements[0], (((closure)  ((closureN)self_7314052)->elements[0])->fn),  set_pair_as_expr(&local_7324545, set_pair_as_expr(&local_7324548, ((closureN)self_7314052)->elements[1], set_pair_as_expr(&local_7324552, set_pair_as_expr(&local_7324555, ((closureN)self_7314052)->elements[3], set_pair_as_expr(&local_7324559, NULL, set_pair_as_expr(&local_7324562, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314052)->elements[4])))), NULL))), set_pair_as_expr(&local_7324574, set_pair_as_expr(&local_7324577, ((closureN)self_7314052)->elements[2], set_pair_as_expr(&local_7324581, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314052)->elements[4]))), set_pair_as_expr(&local_7324591, set_pair_as_expr(&local_7324594, r_736896_738821_738833_738844, set_pair_as_expr(&local_7324597, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314052)->elements[4])), Cyc_cdr(data, ((closureN)self_7314052)->elements[4]))), NULL))), NULL))), boolean_f));; 
}

static void __lambda_1053(void *data, object self_7314053, int argc, object *args) /* object self_7314053, object k_736913 */
 {
 object k_736913 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314053)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314053)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1])))))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314053)->elements[1])))))) ){ 
  
closureN_type c_7324417;
object e_7324478 [3];
c_7324417.hdr.mark = gc_color_red;
 c_7324417.hdr.grayed = 0;
c_7324417.tag = closureN_tag;
 c_7324417.fn = (function_type)__lambda_1054;
c_7324417.num_args = 1;
c_7324417.num_elements = 3;
c_7324417.elements = (object *)e_7324478;
c_7324417.elements[0] = k_736913;
c_7324417.elements[1] = ((closureN)self_7314053)->elements[0];
c_7324417.elements[2] = ((closureN)self_7314053)->elements[1];

return_closcall2(data,  ((closureN)self_7314053)->elements[0],  &c_7324417, quote_let);
} else { 
  return_direct_with_clo1(data,  k_736913, (((closure)  k_736913)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736913, (((closure)  k_736913)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736913, (((closure)  k_736913)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736913, (((closure)  k_736913)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736913, (((closure)  k_736913)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736913, (((closure)  k_736913)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736913, (((closure)  k_736913)->fn),  boolean_f);}
;; 
}

static void __lambda_1054(void *data, object self_7314054, int argc, object *args) /* object self_7314054, object r_736932 */
 {
 object r_736932 = args[0];
  
closureN_type c_7324420;
object e_7324477 [3];
c_7324420.hdr.mark = gc_color_red;
 c_7324420.hdr.grayed = 0;
c_7324420.tag = closureN_tag;
 c_7324420.fn = (function_type)__lambda_1055;
c_7324420.num_args = 1;
c_7324420.num_elements = 3;
c_7324420.elements = (object *)e_7324477;
c_7324420.elements[0] = ((closureN)self_7314054)->elements[0];
c_7324420.elements[1] = r_736932;
c_7324420.elements[2] = ((closureN)self_7314054)->elements[2];

return_closcall2(data,  ((closureN)self_7314054)->elements[1],  &c_7324420, quote_let_85_91values);; 
}

static void __lambda_1055(void *data, object self_7314055, int argc, object *args) /* object self_7314055, object r_736941_738781_738789_738796 */
 {
 object r_736941_738781_738789_738796 = args[0];
  
pair_type local_7324425; 

pair_type local_7324428; 

pair_type local_7324432; 

pair_type local_7324435; 

pair_type local_7324438; 









pair_type local_7324450; 









pair_type local_7324462; 

pair_type local_7324465; 

pair_type local_7324468; 






return_direct_with_clo1(data,  ((closureN)self_7314055)->elements[0], (((closure)  ((closureN)self_7314055)->elements[0])->fn),  set_pair_as_expr(&local_7324425, set_pair_as_expr(&local_7324428, ((closureN)self_7314055)->elements[1], set_pair_as_expr(&local_7324432, set_pair_as_expr(&local_7324435, set_pair_as_expr(&local_7324438, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314055)->elements[2])))), set_pair_as_expr(&local_7324450, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7314055)->elements[2])))), NULL)), NULL), set_pair_as_expr(&local_7324462, set_pair_as_expr(&local_7324465, r_736941_738781_738789_738796, set_pair_as_expr(&local_7324468, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314055)->elements[2])), Cyc_cdr(data, ((closureN)self_7314055)->elements[2]))), NULL))), boolean_f));; 
}

static void __lambda_1048(void *data, object self_7314056, int argc, object *args) /* object self_7314056, object k_736955 */
 {
 object k_736955 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314056)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7314056)->elements[1]))) ){ 
  
closureN_type c_7324334;
object e_7324346 [2];
c_7324334.hdr.mark = gc_color_red;
 c_7324334.hdr.grayed = 0;
c_7324334.tag = closureN_tag;
 c_7324334.fn = (function_type)__lambda_1049;
c_7324334.num_args = 1;
c_7324334.num_elements = 2;
c_7324334.elements = (object *)e_7324346;
c_7324334.elements[0] = k_736955;
c_7324334.elements[1] = ((closureN)self_7314056)->elements[1];

return_closcall2(data,  ((closureN)self_7314056)->elements[0],  &c_7324334, quote_begin);
} else { 
  return_direct_with_clo1(data,  k_736955, (((closure)  k_736955)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736955, (((closure)  k_736955)->fn),  boolean_f);}
;; 
}

static void __lambda_1049(void *data, object self_7314057, int argc, object *args) /* object self_7314057, object r_736961 */
 {
 object r_736961 = args[0];
  
pair_type local_7324339; 

pair_type local_7324342; 


return_direct_with_clo1(data,  ((closureN)self_7314057)->elements[0], (((closure)  ((closureN)self_7314057)->elements[0])->fn),  set_pair_as_expr(&local_7324339, set_pair_as_expr(&local_7324342, r_736961, Cyc_cdr(data, ((closureN)self_7314057)->elements[1])), boolean_f));; 
}

static void __lambda_1025(void *data, object _, int argc, object *args) /* closure _,object k_736805, object expr_731521_731541_731576_733694, object rename_731522_731542_731577_733695, object compare_731523_731543_731578_733696 */
 {
object k_736805 = args[0]; object expr_731521_731541_731576_733694 = args[1]; object rename_731522_731542_731577_733695 = args[2];
  Cyc_st_add(data, "scheme/base.sld:letrec*");

closureN_type c_7324142;
object e_7324316 [3];
c_7324142.hdr.mark = gc_color_red;
 c_7324142.hdr.grayed = 0;
c_7324142.tag = closureN_tag;
 c_7324142.fn = (function_type)__lambda_1026;
c_7324142.num_args = 1;
c_7324142.num_elements = 3;
c_7324142.elements = (object *)e_7324316;
c_7324142.elements[0] = expr_731521_731541_731576_733694;
c_7324142.elements[1] = k_736805;
c_7324142.elements[2] = rename_731522_731542_731577_733695;



return_direct_with_clo1(data,(closure)&c_7324142,__lambda_1026,  Cyc_cdr(data, expr_731521_731541_731576_733694));; 
}

static void __lambda_1026(void *data, object self_7314018, int argc, object *args) /* object self_7314018, object v_931_731529_731548_731580_733698 */
 {
 object v_931_731529_731548_731580_733698 = args[0];
  
closureN_type c_7324144;
object e_7324291 [2];
c_7324144.hdr.mark = gc_color_red;
 c_7324144.hdr.grayed = 0;
c_7324144.tag = closureN_tag;
 c_7324144.fn = (function_type)__lambda_1027;
c_7324144.num_args = 0;
c_7324144.num_elements = 2;
c_7324144.elements = (object *)e_7324291;
c_7324144.elements[0] = ((closureN)self_7314018)->elements[2];
c_7324144.elements[1] = v_931_731529_731548_731580_733698;


closureN_type c_7324292;
object e_7324315 [2];
c_7324292.hdr.mark = gc_color_red;
 c_7324292.hdr.grayed = 0;
c_7324292.tag = closureN_tag;
 c_7324292.fn = (function_type)__lambda_1042;
c_7324292.num_args = 1;
c_7324292.num_elements = 2;
c_7324292.elements = (object *)e_7324315;
c_7324292.elements[0] = ((closureN)self_7314018)->elements[0];
c_7324292.elements[1] = ((closureN)self_7314018)->elements[1];

return_direct_with_clo1(data,(closure)&c_7324144,__lambda_1027,  &c_7324292);; 
}

static void __lambda_1042(void *data, object self_7314019, int argc, object *args) /* object self_7314019, object tmp_731545_731547_731579_733697 */
 {
 object tmp_731545_731547_731579_733697 = args[0];
  
closureN_type c_7324294;
object e_7324308 [2];
c_7324294.hdr.mark = gc_color_red;
 c_7324294.hdr.grayed = 0;
c_7324294.tag = closureN_tag;
 c_7324294.fn = (function_type)__lambda_1043;
c_7324294.num_args = 0;
c_7324294.num_elements = 2;
c_7324294.elements = (object *)e_7324308;
c_7324294.elements[0] = ((closureN)self_7314019)->elements[0];
c_7324294.elements[1] = tmp_731545_731547_731579_733697;


closureN_type c_7324309;
object e_7324314 [1];
c_7324309.hdr.mark = gc_color_red;
 c_7324309.hdr.grayed = 0;
c_7324309.tag = closureN_tag;
 c_7324309.fn = (function_type)__lambda_1045;
c_7324309.num_args = 1;
c_7324309.num_elements = 1;
c_7324309.elements = (object *)e_7324314;
c_7324309.elements[0] = ((closureN)self_7314019)->elements[1];

return_direct_with_clo1(data,(closure)&c_7324294,__lambda_1043,  &c_7324309);; 
}

static void __lambda_1045(void *data, object self_7314020, int argc, object *args) /* object self_7314020, object r_736806 */
 {
 object r_736806 = args[0];
  

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

static void __lambda_1043(void *data, object self_7314021, int argc, object *args) /* object self_7314021, object k_736808 */
 {
 object k_736808 = args[0];
  if( (boolean_f != ((closureN)self_7314021)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_736808, (((closure)  k_736808)->fn),  ((closureN)self_7314021)->elements[1]);
} else { 
  
closureN_type c_7324299;
object e_7324305 [1];
c_7324299.hdr.mark = gc_color_red;
 c_7324299.hdr.grayed = 0;
c_7324299.tag = closureN_tag;
 c_7324299.fn = (function_type)__lambda_1044;
c_7324299.num_args = 1;
c_7324299.num_elements = 1;
c_7324299.elements = (object *)e_7324305;
c_7324299.elements[0] = k_736808;


make_utf8_string_with_len(c_7324306, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7324299, &c_7324306, ((closureN)self_7314021)->elements[0]);}
;; 
}

static void __lambda_1044(void *data, object self_7314022, int argc, object *args) /* object self_7314022, object r_736809 */
 {
 object r_736809 = args[0];
  
pair_type local_7324304; 
return_direct_with_clo1(data,  ((closureN)self_7314022)->elements[0], (((closure)  ((closureN)self_7314022)->elements[0])->fn),  set_pair_as_expr(&local_7324304, r_736809, boolean_f));; 
}

static void __lambda_1027(void *data, object self_7314023, int argc, object *args) /* object self_7314023, object k_736811 */
 {
 object k_736811 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7314023)->elements[1])) ){ 
  
closureN_type c_7324149;
object e_7324286 [3];
c_7324149.hdr.mark = gc_color_red;
 c_7324149.hdr.grayed = 0;
c_7324149.tag = closureN_tag;
 c_7324149.fn = (function_type)__lambda_1028;
c_7324149.num_args = 3;
c_7324149.num_elements = 3;
c_7324149.elements = (object *)e_7324286;
c_7324149.elements[0] = k_736811;
c_7324149.elements[1] = ((closureN)self_7314023)->elements[0];
c_7324149.elements[2] = ((closureN)self_7314023)->elements[1];



return_direct_with_clo3(data,(closure)&c_7324149,__lambda_1028,  Cyc_car(data, ((closureN)self_7314023)->elements[1]), NULL, NULL);
} else { 
  return_direct_with_clo1(data,  k_736811, (((closure)  k_736811)->fn),  boolean_f);}
;; 
}

static void __lambda_1028(void *data, object self_7314024, int argc, object *args) /* object self_7314024, object w_933_731531_731552_731582_733700, object var_91ls5_731533_731553_731583_733701, object val_91ls6_731534_731554_731584_733702 */
 {
 object w_933_731531_731552_731582_733700 = args[0]; object var_91ls5_731533_731553_731583_733701 = args[1]; object val_91ls6_731534_731554_731584_733702 = args[2];
  
closureN_type c_7324151;
object e_7324285 [6];
c_7324151.hdr.mark = gc_color_red;
 c_7324151.hdr.grayed = 0;
c_7324151.tag = closureN_tag;
 c_7324151.fn = (function_type)__lambda_1029;
c_7324151.num_args = 1;
c_7324151.num_elements = 6;
c_7324151.elements = (object *)e_7324285;
c_7324151.elements[0] = ((closureN)self_7314024)->elements[0];
c_7324151.elements[1] = ((closureN)self_7314024)->elements[1];
c_7324151.elements[2] = ((closureN)self_7314024)->elements[2];
c_7324151.elements[3] = val_91ls6_731534_731554_731584_733702;
c_7324151.elements[4] = var_91ls5_731533_731553_731583_733701;
c_7324151.elements[5] = w_933_731531_731552_731582_733700;

return_direct_with_clo1(data,(closure)&c_7324151,__lambda_1029,  boolean_f);; 
}

static void __lambda_1029(void *data, object self_7314025, int argc, object *args) /* object self_7314025, object lp_934_731532_731555_731585_733703 */
 {
 object lp_934_731532_731555_731585_733703 = args[0];
  
closureN_type c_7324153;
object e_7324281 [6];
c_7324153.hdr.mark = gc_color_red;
 c_7324153.hdr.grayed = 0;
c_7324153.tag = closureN_tag;
 c_7324153.fn = (function_type)__lambda_1442;
c_7324153.num_args = 1;
c_7324153.num_elements = 6;
c_7324153.elements = (object *)e_7324281;
c_7324153.elements[0] = ((closureN)self_7314025)->elements[0];
c_7324153.elements[1] = ((closureN)self_7314025)->elements[1];
c_7324153.elements[2] = ((closureN)self_7314025)->elements[2];
c_7324153.elements[3] = ((closureN)self_7314025)->elements[3];
c_7324153.elements[4] = ((closureN)self_7314025)->elements[4];
c_7324153.elements[5] = ((closureN)self_7314025)->elements[5];


pair_type local_7324284; 
return_direct_with_clo1(data,(closure)&c_7324153,__lambda_1442,  set_cell_as_expr(&local_7324284, lp_934_731532_731555_731585_733703));; 
}

static void __lambda_1442(void *data, object self_7314026, int argc, object *args) /* object self_7314026, object lp_934_731532_731555_731585_733703 */
 {
 object lp_934_731532_731555_731585_733703 = args[0];
  
closureN_type c_7324155;
object e_7324170 [5];
c_7324155.hdr.mark = gc_color_red;
 c_7324155.hdr.grayed = 0;
c_7324155.tag = closureN_tag;
 c_7324155.fn = (function_type)__lambda_1030;
c_7324155.num_args = 1;
c_7324155.num_elements = 5;
c_7324155.elements = (object *)e_7324170;
c_7324155.elements[0] = ((closureN)self_7314026)->elements[0];
c_7324155.elements[1] = lp_934_731532_731555_731585_733703;
c_7324155.elements[2] = ((closureN)self_7314026)->elements[3];
c_7324155.elements[3] = ((closureN)self_7314026)->elements[4];
c_7324155.elements[4] = ((closureN)self_7314026)->elements[5];


closureN_type c_7324171;
object e_7324280 [3];
c_7324171.hdr.mark = gc_color_red;
 c_7324171.hdr.grayed = 0;
c_7324171.tag = closureN_tag;
 c_7324171.fn = (function_type)__lambda_1032;
c_7324171.num_args = 3;
c_7324171.num_elements = 3;
c_7324171.elements = (object *)e_7324280;
c_7324171.elements[0] = lp_934_731532_731555_731585_733703;
c_7324171.elements[1] = ((closureN)self_7314026)->elements[1];
c_7324171.elements[2] = ((closureN)self_7314026)->elements[2];

return_direct_with_clo1(data,(closure)&c_7324155,__lambda_1030,  &c_7324171);; 
}

static void __lambda_1032(void *data, object self_7314027, int argc, object *args) /* object self_7314027, object k_736818, object w_933_731531_731556_731586_733704, object var_91ls5_731533_731557_731587_733705, object val_91ls6_731534_731558_731588_733706 */
 {
 object k_736818 = args[0]; object w_933_731531_731556_731586_733704 = args[1]; object var_91ls5_731533_731557_731587_733705 = args[2]; object val_91ls6_731534_731558_731588_733706 = args[3];
    
if( (boolean_f != Cyc_is_null(w_933_731531_731556_731586_733704)) ){ 
  
closureN_type c_7324175;
object e_7324233 [4];
c_7324175.hdr.mark = gc_color_red;
 c_7324175.hdr.grayed = 0;
c_7324175.tag = closureN_tag;
 c_7324175.fn = (function_type)__lambda_1033;
c_7324175.num_args = 1;
c_7324175.num_elements = 4;
c_7324175.elements = (object *)e_7324233;
c_7324175.elements[0] = k_736818;
c_7324175.elements[1] = ((closureN)self_7314027)->elements[1];
c_7324175.elements[2] = ((closureN)self_7314027)->elements[2];
c_7324175.elements[3] = val_91ls6_731534_731558_731588_733706;

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7324175, primitive_cons, NULL, var_91ls5_731533_731557_731587_733705);
} else { 
    
if( (boolean_f != Cyc_is_pair(w_933_731531_731556_731586_733704)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_933_731531_731556_731586_733704))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733704)))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733704))))) ){ 
  




pair_type local_7324262; 





pair_type local_7324269; 






return_closcall4(data,  car(((closureN)self_7314027)->elements[0]),  k_736818, Cyc_cdr(data, w_933_731531_731556_731586_733704), set_pair_as_expr(&local_7324262, Cyc_car(data, Cyc_car(data, w_933_731531_731556_731586_733704)), var_91ls5_731533_731557_731587_733705), set_pair_as_expr(&local_7324269, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_933_731531_731556_731586_733704))), val_91ls6_731534_731558_731588_733706));
} else { 
  return_direct_with_clo1(data,  k_736818, (((closure)  k_736818)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736818, (((closure)  k_736818)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736818, (((closure)  k_736818)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736818, (((closure)  k_736818)->fn),  boolean_f);}
;}
;; 
}

static void __lambda_1033(void *data, object self_7314028, int argc, object *args) /* object self_7314028, object r_736820_7312992 */
 {
 object r_736820_7312992 = args[0];
  
closureN_type c_7324177;
object e_7324231 [4];
c_7324177.hdr.mark = gc_color_red;
 c_7324177.hdr.grayed = 0;
c_7324177.tag = closureN_tag;
 c_7324177.fn = (function_type)__lambda_1034;
c_7324177.num_args = 1;
c_7324177.num_elements = 4;
c_7324177.elements = (object *)e_7324231;
c_7324177.elements[0] = ((closureN)self_7314028)->elements[0];
c_7324177.elements[1] = r_736820_7312992;
c_7324177.elements[2] = ((closureN)self_7314028)->elements[1];
c_7324177.elements[3] = ((closureN)self_7314028)->elements[2];

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7324177, primitive_cons, NULL, ((closureN)self_7314028)->elements[3]);; 
}

static void __lambda_1034(void *data, object self_7314029, int argc, object *args) /* object self_7314029, object r_736821_7312993_7313004 */
 {
 object r_736821_7312993_7313004 = args[0];
  
closureN_type c_7324179;
object e_7324229 [3];
c_7324179.hdr.mark = gc_color_red;
 c_7324179.hdr.grayed = 0;
c_7324179.tag = closureN_tag;
 c_7324179.fn = (function_type)__lambda_1035;
c_7324179.num_args = 2;
c_7324179.num_elements = 3;
c_7324179.elements = (object *)e_7324229;
c_7324179.elements[0] = ((closureN)self_7314029)->elements[0];
c_7324179.elements[1] = ((closureN)self_7314029)->elements[2];
c_7324179.elements[2] = ((closureN)self_7314029)->elements[3];

return_direct_with_clo2(data,(closure)&c_7324179,__lambda_1035,  ((closureN)self_7314029)->elements[1], r_736821_7312993_7313004);; 
}

static void __lambda_1035(void *data, object self_7314030, int argc, object *args) /* object self_7314030, object var_731559_731589_733707_7312994_7313005, object val_731560_731590_733708_7312995_7313006 */
 {
 object var_731559_731589_733707_7312994_7313005 = args[0]; object val_731560_731590_733708_7312995_7313006 = args[1];
  
closureN_type c_7324182;
object e_7324228 [5];
c_7324182.hdr.mark = gc_color_red;
 c_7324182.hdr.grayed = 0;
c_7324182.tag = closureN_tag;
 c_7324182.fn = (function_type)__lambda_1036;
c_7324182.num_args = 1;
c_7324182.num_elements = 5;
c_7324182.elements = (object *)e_7324228;
c_7324182.elements[0] = ((closureN)self_7314030)->elements[0];
c_7324182.elements[1] = ((closureN)self_7314030)->elements[1];
c_7324182.elements[2] = ((closureN)self_7314030)->elements[2];
c_7324182.elements[3] = val_731560_731590_733708_7312995_7313006;
c_7324182.elements[4] = var_731559_731589_733707_7312994_7313005;

return_closcall2(data,  ((closureN)self_7314030)->elements[1],  &c_7324182, quote_let);; 
}

static void __lambda_1036(void *data, object self_7314031, int argc, object *args) /* object self_7314031, object r_736824_7312996_7313007 */
 {
 object r_736824_7312996_7313007 = args[0];
  
closureN_type c_7324184;
object e_7324208 [5];
c_7324184.hdr.mark = gc_color_red;
 c_7324184.hdr.grayed = 0;
c_7324184.tag = closureN_tag;
 c_7324184.fn = (function_type)__lambda_1037;
c_7324184.num_args = 1;
c_7324184.num_elements = 5;
c_7324184.elements = (object *)e_7324208;
c_7324184.elements[0] = ((closureN)self_7314031)->elements[0];
c_7324184.elements[1] = r_736824_7312996_7313007;
c_7324184.elements[2] = ((closureN)self_7314031)->elements[2];
c_7324184.elements[3] = ((closureN)self_7314031)->elements[3];
c_7324184.elements[4] = ((closureN)self_7314031)->elements[4];


closureN_type c_7324209;
object e_7324227 [1];
c_7324209.hdr.mark = gc_color_red;
 c_7324209.hdr.grayed = 0;
c_7324209.tag = closureN_tag;
 c_7324209.fn = (function_type)__lambda_1040;
c_7324209.num_args = 2;
c_7324209.num_elements = 1;
c_7324209.elements = (object *)e_7324227;
c_7324209.elements[0] = ((closureN)self_7314031)->elements[1];

return_direct_with_clo1(data,(closure)&c_7324184,__lambda_1037,  &c_7324209);; 
}

static void __lambda_1040(void *data, object self_7314032, int argc, object *args) /* object self_7314032, object k_736832_7313000_7313011, object var_731563_731593_733711_7313001_7313012, object val_731564_731594_733712_7313002_7313013 */
 {
 object k_736832_7313000_7313011 = args[0]; object var_731563_731593_733711_7313001_7313012 = args[1]; object val_731564_731594_733712_7313002_7313013 = args[2];
  
closureN_type c_7324212;
object e_7324226 [3];
c_7324212.hdr.mark = gc_color_red;
 c_7324212.hdr.grayed = 0;
c_7324212.tag = closureN_tag;
 c_7324212.fn = (function_type)__lambda_1041;
c_7324212.num_args = 1;
c_7324212.num_elements = 3;
c_7324212.elements = (object *)e_7324226;
c_7324212.elements[0] = k_736832_7313000_7313011;
c_7324212.elements[1] = val_731564_731594_733712_7313002_7313013;
c_7324212.elements[2] = var_731563_731593_733711_7313001_7313012;

return_closcall2(data,  ((closureN)self_7314032)->elements[0],  &c_7324212, quote_define);; 
}

static void __lambda_1041(void *data, object self_7314033, int argc, object *args) /* object self_7314033, object r_736833_7313003_7313014 */
 {
 object r_736833_7313003_7313014 = args[0];
  
pair_type local_7324217; 

pair_type local_7324220; 

pair_type local_7324224; 
return_direct_with_clo1(data,  ((closureN)self_7314033)->elements[0], (((closure)  ((closureN)self_7314033)->elements[0])->fn),  set_pair_as_expr(&local_7324217, r_736833_7313003_7313014, set_pair_as_expr(&local_7324220, ((closureN)self_7314033)->elements[2], set_pair_as_expr(&local_7324224, ((closureN)self_7314033)->elements[1], NULL))));; 
}

static void __lambda_1037(void *data, object self_7314034, int argc, object *args) /* object self_7314034, object r_736831_7312997_7313008 */
 {
 object r_736831_7312997_7313008 = args[0];
  
closureN_type c_7324186;
object e_7324205 [3];
c_7324186.hdr.mark = gc_color_red;
 c_7324186.hdr.grayed = 0;
c_7324186.tag = closureN_tag;
 c_7324186.fn = (function_type)__lambda_1038;
c_7324186.num_args = 1;
c_7324186.num_elements = 3;
c_7324186.elements = (object *)e_7324205;
c_7324186.elements[0] = ((closureN)self_7314034)->elements[0];
c_7324186.elements[1] = ((closureN)self_7314034)->elements[1];
c_7324186.elements[2] = ((closureN)self_7314034)->elements[2];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7324186, r_736831_7312997_7313008, ((closureN)self_7314034)->elements[4], ((closureN)self_7314034)->elements[3]);; 
}

static void __lambda_1038(void *data, object self_7314035, int argc, object *args) /* object self_7314035, object r_736830_7312998_7313009 */
 {
 object r_736830_7312998_7313009 = args[0];
  
closureN_type c_7324188;
object e_7324201 [2];
c_7324188.hdr.mark = gc_color_red;
 c_7324188.hdr.grayed = 0;
c_7324188.tag = closureN_tag;
 c_7324188.fn = (function_type)__lambda_1039;
c_7324188.num_args = 1;
c_7324188.num_elements = 2;
c_7324188.elements = (object *)e_7324201;
c_7324188.elements[0] = ((closureN)self_7314035)->elements[0];
c_7324188.elements[1] = ((closureN)self_7314035)->elements[1];



return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7324188, r_736830_7312998_7313009, Cyc_cdr(data, ((closureN)self_7314035)->elements[2]));; 
}

static void __lambda_1039(void *data, object self_7314036, int argc, object *args) /* object self_7314036, object r_736828_7312999_7313010 */
 {
 object r_736828_7312999_7313010 = args[0];
  
pair_type local_7324193; 

pair_type local_7324196; 

pair_type local_7324200; 
return_direct_with_clo1(data,  ((closureN)self_7314036)->elements[0], (((closure)  ((closureN)self_7314036)->elements[0])->fn),  set_pair_as_expr(&local_7324193, set_pair_as_expr(&local_7324196, ((closureN)self_7314036)->elements[1], set_pair_as_expr(&local_7324200, NULL, r_736828_7312999_7313010)), boolean_f));; 
}

static void __lambda_1030(void *data, object self_7314037, int argc, object *args) /* object self_7314037, object r_736817 */
 {
 object r_736817 = args[0];
  
closureN_type c_7324157;
object e_7324166 [5];
c_7324157.hdr.mark = gc_color_red;
 c_7324157.hdr.grayed = 0;
c_7324157.tag = closureN_tag;
 c_7324157.fn = (function_type)__lambda_1031;
c_7324157.num_args = 1;
c_7324157.num_elements = 5;
c_7324157.elements = (object *)e_7324166;
c_7324157.elements[0] = ((closureN)self_7314037)->elements[0];
c_7324157.elements[1] = ((closureN)self_7314037)->elements[1];
c_7324157.elements[2] = ((closureN)self_7314037)->elements[2];
c_7324157.elements[3] = ((closureN)self_7314037)->elements[3];
c_7324157.elements[4] = ((closureN)self_7314037)->elements[4];



return_direct_with_clo1(data,(closure)&c_7324157,__lambda_1031,  Cyc_set_cell(data, ((closureN)self_7314037)->elements[1], r_736817));; 
}

static void __lambda_1031(void *data, object self_7314038, int argc, object *args) /* object self_7314038, object r_736816 */
 {

  

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

static void __lambda_810(void *data, object _, int argc, object *args) /* closure _,object k_736347, object expr_731263_733551, object rename_731264_733552, object compare_731265_733553 */
 {
object k_736347 = args[0]; object expr_731263_733551 = args[1]; object rename_731264_733552 = args[2]; object compare_731265_733553 = args[3];
  Cyc_st_add(data, "scheme/base.sld:syntax-rules");

closureN_type c_7322040;
object e_7324137 [4];
c_7322040.hdr.mark = gc_color_red;
 c_7322040.hdr.grayed = 0;
c_7322040.tag = closureN_tag;
 c_7322040.fn = (function_type)__lambda_811;
c_7322040.num_args = 1;
c_7322040.num_elements = 4;
c_7322040.elements = (object *)e_7324137;
c_7322040.elements[0] = compare_731265_733553;
c_7322040.elements[1] = expr_731263_733551;
c_7322040.elements[2] = k_736347;
c_7322040.elements[3] = rename_731264_733552;



return_direct_with_clo1(data,(closure)&c_7322040,__lambda_811,  Cyc_cadr(data, expr_731263_733551));; 
}

static void __lambda_811(void *data, object self_7313786, int argc, object *args) /* object self_7313786, object r_736802 */
 {
 object r_736802 = args[0];
  
closureN_type c_7322042;
object e_7324136 [4];
c_7322042.hdr.mark = gc_color_red;
 c_7322042.hdr.grayed = 0;
c_7322042.tag = closureN_tag;
 c_7322042.fn = (function_type)__lambda_812;
c_7322042.num_args = 1;
c_7322042.num_elements = 4;
c_7322042.elements = (object *)e_7324136;
c_7322042.elements[0] = ((closureN)self_7313786)->elements[0];
c_7322042.elements[1] = ((closureN)self_7313786)->elements[1];
c_7322042.elements[2] = ((closureN)self_7313786)->elements[2];
c_7322042.elements[3] = ((closureN)self_7313786)->elements[3];

return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322042, r_736802);; 
}

static void __lambda_812(void *data, object self_7313787, int argc, object *args) /* object self_7313787, object r_736348 */
 {
 object r_736348 = args[0];
  
closureN_type c_7322045;
object e_7324135 [5];
c_7322045.hdr.mark = gc_color_red;
 c_7322045.hdr.grayed = 0;
c_7322045.tag = closureN_tag;
 c_7322045.fn = (function_type)__lambda_813;
c_7322045.num_args = 1;
c_7322045.num_elements = 5;
c_7322045.elements = (object *)e_7324135;
c_7322045.elements[0] = ((closureN)self_7313787)->elements[0];
c_7322045.elements[1] = ((closureN)self_7313787)->elements[1];
c_7322045.elements[2] = ((closureN)self_7313787)->elements[2];
c_7322045.elements[3] = r_736348;
c_7322045.elements[4] = ((closureN)self_7313787)->elements[3];

return_closcall2(data,  ((closureN)self_7313787)->elements[3],  &c_7322045, quote_er_91macro_91transformer);; 
}

static void __lambda_813(void *data, object self_7313788, int argc, object *args) /* object self_7313788, object r_736349 */
 {
 object r_736349 = args[0];
  
closureN_type c_7322048;
object e_7324134 [6];
c_7322048.hdr.mark = gc_color_red;
 c_7322048.hdr.grayed = 0;
c_7322048.tag = closureN_tag;
 c_7322048.fn = (function_type)__lambda_814;
c_7322048.num_args = 1;
c_7322048.num_elements = 6;
c_7322048.elements = (object *)e_7324134;
c_7322048.elements[0] = ((closureN)self_7313788)->elements[0];
c_7322048.elements[1] = ((closureN)self_7313788)->elements[1];
c_7322048.elements[2] = ((closureN)self_7313788)->elements[2];
c_7322048.elements[3] = ((closureN)self_7313788)->elements[3];
c_7322048.elements[4] = r_736349;
c_7322048.elements[5] = ((closureN)self_7313788)->elements[4];

return_closcall2(data,  ((closureN)self_7313788)->elements[4],  &c_7322048, quote_lambda);; 
}

static void __lambda_814(void *data, object self_7313789, int argc, object *args) /* object self_7313789, object r_736350 */
 {
 object r_736350 = args[0];
  
closureN_type c_7322051;
object e_7324133 [7];
c_7322051.hdr.mark = gc_color_red;
 c_7322051.hdr.grayed = 0;
c_7322051.tag = closureN_tag;
 c_7322051.fn = (function_type)__lambda_815;
c_7322051.num_args = 1;
c_7322051.num_elements = 7;
c_7322051.elements = (object *)e_7324133;
c_7322051.elements[0] = ((closureN)self_7313789)->elements[0];
c_7322051.elements[1] = ((closureN)self_7313789)->elements[1];
c_7322051.elements[2] = ((closureN)self_7313789)->elements[2];
c_7322051.elements[3] = ((closureN)self_7313789)->elements[3];
c_7322051.elements[4] = ((closureN)self_7313789)->elements[4];
c_7322051.elements[5] = r_736350;
c_7322051.elements[6] = ((closureN)self_7313789)->elements[5];

return_closcall2(data,  ((closureN)self_7313789)->elements[5],  &c_7322051, quote_let);; 
}

static void __lambda_815(void *data, object self_7313790, int argc, object *args) /* object self_7313790, object r_736351 */
 {
 object r_736351 = args[0];
  
closureN_type c_7322054;
object e_7324132 [8];
c_7322054.hdr.mark = gc_color_red;
 c_7322054.hdr.grayed = 0;
c_7322054.tag = closureN_tag;
 c_7322054.fn = (function_type)__lambda_816;
c_7322054.num_args = 1;
c_7322054.num_elements = 8;
c_7322054.elements = (object *)e_7324132;
c_7322054.elements[0] = ((closureN)self_7313790)->elements[0];
c_7322054.elements[1] = ((closureN)self_7313790)->elements[1];
c_7322054.elements[2] = ((closureN)self_7313790)->elements[2];
c_7322054.elements[3] = ((closureN)self_7313790)->elements[3];
c_7322054.elements[4] = ((closureN)self_7313790)->elements[4];
c_7322054.elements[5] = ((closureN)self_7313790)->elements[5];
c_7322054.elements[6] = r_736351;
c_7322054.elements[7] = ((closureN)self_7313790)->elements[6];

return_closcall2(data,  ((closureN)self_7313790)->elements[6],  &c_7322054, quote_begin);; 
}

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

return_closcall2(data,  ((closureN)self_7313791)->elements[7],  &c_7322057, quote__if);; 
}

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

return_closcall2(data,  ((closureN)self_7313792)->elements[8],  &c_7322060, quote_and);; 
}

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

return_closcall2(data,  ((closureN)self_7313793)->elements[9],  &c_7322063, quote_or);; 
}

static void __lambda_819(void *data, object self_7313794, int argc, object *args) /* object self_7313794, object r_736355 */
 {
 object r_736355 = args[0];
  
closureN_type c_7322066;
object e_7324128 [12];
c_7322066.hdr.mark = gc_color_red;
 c_7322066.hdr.grayed = 0;
c_7322066.tag = closureN_tag;
 c_7322066.fn = (function_type)__lambda_820;
c_7322066.num_args = 1;
c_7322066.num_elements = 12;
c_7322066.elements = (object *)e_7324128;
c_7322066.elements[0] = ((closureN)self_7313794)->elements[0];
c_7322066.elements[1] = ((closureN)self_7313794)->elements[1];
c_7322066.elements[2] = ((closureN)self_7313794)->elements[2];
c_7322066.elements[3] = ((closureN)self_7313794)->elements[3];
c_7322066.elements[4] = ((closureN)self_7313794)->elements[4];
c_7322066.elements[5] = ((closureN)self_7313794)->elements[5];
c_7322066.elements[6] = ((closureN)self_7313794)->elements[6];
c_7322066.elements[7] = ((closureN)self_7313794)->elements[7];
c_7322066.elements[8] = ((closureN)self_7313794)->elements[8];
c_7322066.elements[9] = ((closureN)self_7313794)->elements[9];
c_7322066.elements[10] = r_736355;
c_7322066.elements[11] = ((closureN)self_7313794)->elements[10];

return_closcall2(data,  ((closureN)self_7313794)->elements[10],  &c_7322066, quote_eq_127);; 
}

static void __lambda_820(void *data, object self_7313795, int argc, object *args) /* object self_7313795, object r_736356 */
 {
 object r_736356 = args[0];
  
closureN_type c_7322069;
object e_7324127 [13];
c_7322069.hdr.mark = gc_color_red;
 c_7322069.hdr.grayed = 0;
c_7322069.tag = closureN_tag;
 c_7322069.fn = (function_type)__lambda_821;
c_7322069.num_args = 1;
c_7322069.num_elements = 13;
c_7322069.elements = (object *)e_7324127;
c_7322069.elements[0] = ((closureN)self_7313795)->elements[0];
c_7322069.elements[1] = ((closureN)self_7313795)->elements[1];
c_7322069.elements[2] = ((closureN)self_7313795)->elements[2];
c_7322069.elements[3] = ((closureN)self_7313795)->elements[3];
c_7322069.elements[4] = ((closureN)self_7313795)->elements[4];
c_7322069.elements[5] = ((closureN)self_7313795)->elements[5];
c_7322069.elements[6] = ((closureN)self_7313795)->elements[6];
c_7322069.elements[7] = ((closureN)self_7313795)->elements[7];
c_7322069.elements[8] = ((closureN)self_7313795)->elements[8];
c_7322069.elements[9] = ((closureN)self_7313795)->elements[9];
c_7322069.elements[10] = ((closureN)self_7313795)->elements[10];
c_7322069.elements[11] = r_736356;
c_7322069.elements[12] = ((closureN)self_7313795)->elements[11];

return_closcall2(data,  ((closureN)self_7313795)->elements[11],  &c_7322069, quote_equal_127);; 
}

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

return_closcall2(data,  ((closureN)self_7313796)->elements[12],  &c_7322072, quote_car);; 
}

static void __lambda_822(void *data, object self_7313797, int argc, object *args) /* object self_7313797, object r_736358 */
 {
 object r_736358 = args[0];
  
closureN_type c_7322075;
object e_7324125 [15];
c_7322075.hdr.mark = gc_color_red;
 c_7322075.hdr.grayed = 0;
c_7322075.tag = closureN_tag;
 c_7322075.fn = (function_type)__lambda_823;
c_7322075.num_args = 1;
c_7322075.num_elements = 15;
c_7322075.elements = (object *)e_7324125;
c_7322075.elements[0] = ((closureN)self_7313797)->elements[0];
c_7322075.elements[1] = ((closureN)self_7313797)->elements[1];
c_7322075.elements[2] = ((closureN)self_7313797)->elements[2];
c_7322075.elements[3] = ((closureN)self_7313797)->elements[3];
c_7322075.elements[4] = ((closureN)self_7313797)->elements[4];
c_7322075.elements[5] = ((closureN)self_7313797)->elements[5];
c_7322075.elements[6] = ((closureN)self_7313797)->elements[6];
c_7322075.elements[7] = ((closureN)self_7313797)->elements[7];
c_7322075.elements[8] = ((closureN)self_7313797)->elements[8];
c_7322075.elements[9] = ((closureN)self_7313797)->elements[9];
c_7322075.elements[10] = ((closureN)self_7313797)->elements[10];
c_7322075.elements[11] = ((closureN)self_7313797)->elements[11];
c_7322075.elements[12] = ((closureN)self_7313797)->elements[12];
c_7322075.elements[13] = r_736358;
c_7322075.elements[14] = ((closureN)self_7313797)->elements[13];

return_closcall2(data,  ((closureN)self_7313797)->elements[13],  &c_7322075, quote_cdr);; 
}

static void __lambda_823(void *data, object self_7313798, int argc, object *args) /* object self_7313798, object r_736359 */
 {
 object r_736359 = args[0];
  
closureN_type c_7322078;
object e_7324124 [16];
c_7322078.hdr.mark = gc_color_red;
 c_7322078.hdr.grayed = 0;
c_7322078.tag = closureN_tag;
 c_7322078.fn = (function_type)__lambda_824;
c_7322078.num_args = 1;
c_7322078.num_elements = 16;
c_7322078.elements = (object *)e_7324124;
c_7322078.elements[0] = ((closureN)self_7313798)->elements[0];
c_7322078.elements[1] = ((closureN)self_7313798)->elements[1];
c_7322078.elements[2] = ((closureN)self_7313798)->elements[2];
c_7322078.elements[3] = ((closureN)self_7313798)->elements[3];
c_7322078.elements[4] = ((closureN)self_7313798)->elements[4];
c_7322078.elements[5] = ((closureN)self_7313798)->elements[5];
c_7322078.elements[6] = ((closureN)self_7313798)->elements[6];
c_7322078.elements[7] = ((closureN)self_7313798)->elements[7];
c_7322078.elements[8] = ((closureN)self_7313798)->elements[8];
c_7322078.elements[9] = ((closureN)self_7313798)->elements[9];
c_7322078.elements[10] = ((closureN)self_7313798)->elements[10];
c_7322078.elements[11] = ((closureN)self_7313798)->elements[11];
c_7322078.elements[12] = ((closureN)self_7313798)->elements[12];
c_7322078.elements[13] = ((closureN)self_7313798)->elements[13];
c_7322078.elements[14] = r_736359;
c_7322078.elements[15] = ((closureN)self_7313798)->elements[14];

return_closcall2(data,  ((closureN)self_7313798)->elements[14],  &c_7322078, quote_cons);; 
}

static void __lambda_824(void *data, object self_7313799, int argc, object *args) /* object self_7313799, object r_736360 */
 {
 object r_736360 = args[0];
  
closureN_type c_7322081;
object e_7324123 [17];
c_7322081.hdr.mark = gc_color_red;
 c_7322081.hdr.grayed = 0;
c_7322081.tag = closureN_tag;
 c_7322081.fn = (function_type)__lambda_825;
c_7322081.num_args = 1;
c_7322081.num_elements = 17;
c_7322081.elements = (object *)e_7324123;
c_7322081.elements[0] = ((closureN)self_7313799)->elements[0];
c_7322081.elements[1] = ((closureN)self_7313799)->elements[1];
c_7322081.elements[2] = ((closureN)self_7313799)->elements[2];
c_7322081.elements[3] = ((closureN)self_7313799)->elements[3];
c_7322081.elements[4] = ((closureN)self_7313799)->elements[4];
c_7322081.elements[5] = ((closureN)self_7313799)->elements[5];
c_7322081.elements[6] = ((closureN)self_7313799)->elements[6];
c_7322081.elements[7] = ((closureN)self_7313799)->elements[7];
c_7322081.elements[8] = ((closureN)self_7313799)->elements[8];
c_7322081.elements[9] = ((closureN)self_7313799)->elements[9];
c_7322081.elements[10] = ((closureN)self_7313799)->elements[10];
c_7322081.elements[11] = ((closureN)self_7313799)->elements[11];
c_7322081.elements[12] = ((closureN)self_7313799)->elements[12];
c_7322081.elements[13] = ((closureN)self_7313799)->elements[13];
c_7322081.elements[14] = ((closureN)self_7313799)->elements[14];
c_7322081.elements[15] = r_736360;
c_7322081.elements[16] = ((closureN)self_7313799)->elements[15];

return_closcall2(data,  ((closureN)self_7313799)->elements[15],  &c_7322081, quote_pair_127);; 
}

static void __lambda_825(void *data, object self_7313800, int argc, object *args) /* object self_7313800, object r_736361 */
 {
 object r_736361 = args[0];
  
closureN_type c_7322084;
object e_7324122 [18];
c_7322084.hdr.mark = gc_color_red;
 c_7322084.hdr.grayed = 0;
c_7322084.tag = closureN_tag;
 c_7322084.fn = (function_type)__lambda_826;
c_7322084.num_args = 1;
c_7322084.num_elements = 18;
c_7322084.elements = (object *)e_7324122;
c_7322084.elements[0] = ((closureN)self_7313800)->elements[0];
c_7322084.elements[1] = ((closureN)self_7313800)->elements[1];
c_7322084.elements[2] = ((closureN)self_7313800)->elements[2];
c_7322084.elements[3] = ((closureN)self_7313800)->elements[3];
c_7322084.elements[4] = ((closureN)self_7313800)->elements[4];
c_7322084.elements[5] = ((closureN)self_7313800)->elements[5];
c_7322084.elements[6] = ((closureN)self_7313800)->elements[6];
c_7322084.elements[7] = ((closureN)self_7313800)->elements[7];
c_7322084.elements[8] = ((closureN)self_7313800)->elements[8];
c_7322084.elements[9] = ((closureN)self_7313800)->elements[9];
c_7322084.elements[10] = ((closureN)self_7313800)->elements[10];
c_7322084.elements[11] = ((closureN)self_7313800)->elements[11];
c_7322084.elements[12] = ((closureN)self_7313800)->elements[12];
c_7322084.elements[13] = ((closureN)self_7313800)->elements[13];
c_7322084.elements[14] = ((closureN)self_7313800)->elements[14];
c_7322084.elements[15] = ((closureN)self_7313800)->elements[15];
c_7322084.elements[16] = r_736361;
c_7322084.elements[17] = ((closureN)self_7313800)->elements[16];

return_closcall2(data,  ((closureN)self_7313800)->elements[16],  &c_7322084, quote_null_127);; 
}

static void __lambda_826(void *data, object self_7313801, int argc, object *args) /* object self_7313801, object r_736362 */
 {
 object r_736362 = args[0];
  
closureN_type c_7322087;
object e_7324121 [19];
c_7322087.hdr.mark = gc_color_red;
 c_7322087.hdr.grayed = 0;
c_7322087.tag = closureN_tag;
 c_7322087.fn = (function_type)__lambda_827;
c_7322087.num_args = 1;
c_7322087.num_elements = 19;
c_7322087.elements = (object *)e_7324121;
c_7322087.elements[0] = ((closureN)self_7313801)->elements[0];
c_7322087.elements[1] = ((closureN)self_7313801)->elements[1];
c_7322087.elements[2] = ((closureN)self_7313801)->elements[2];
c_7322087.elements[3] = ((closureN)self_7313801)->elements[3];
c_7322087.elements[4] = ((closureN)self_7313801)->elements[4];
c_7322087.elements[5] = ((closureN)self_7313801)->elements[5];
c_7322087.elements[6] = ((closureN)self_7313801)->elements[6];
c_7322087.elements[7] = ((closureN)self_7313801)->elements[7];
c_7322087.elements[8] = ((closureN)self_7313801)->elements[8];
c_7322087.elements[9] = ((closureN)self_7313801)->elements[9];
c_7322087.elements[10] = ((closureN)self_7313801)->elements[10];
c_7322087.elements[11] = ((closureN)self_7313801)->elements[11];
c_7322087.elements[12] = ((closureN)self_7313801)->elements[12];
c_7322087.elements[13] = ((closureN)self_7313801)->elements[13];
c_7322087.elements[14] = ((closureN)self_7313801)->elements[14];
c_7322087.elements[15] = ((closureN)self_7313801)->elements[15];
c_7322087.elements[16] = ((closureN)self_7313801)->elements[16];
c_7322087.elements[17] = r_736362;
c_7322087.elements[18] = ((closureN)self_7313801)->elements[17];

return_closcall2(data,  ((closureN)self_7313801)->elements[17],  &c_7322087, quote_expr);; 
}

static void __lambda_827(void *data, object self_7313802, int argc, object *args) /* object self_7313802, object r_736363 */
 {
 object r_736363 = args[0];
  
closureN_type c_7322090;
object e_7324120 [20];
c_7322090.hdr.mark = gc_color_red;
 c_7322090.hdr.grayed = 0;
c_7322090.tag = closureN_tag;
 c_7322090.fn = (function_type)__lambda_828;
c_7322090.num_args = 1;
c_7322090.num_elements = 20;
c_7322090.elements = (object *)e_7324120;
c_7322090.elements[0] = ((closureN)self_7313802)->elements[0];
c_7322090.elements[1] = ((closureN)self_7313802)->elements[1];
c_7322090.elements[2] = ((closureN)self_7313802)->elements[2];
c_7322090.elements[3] = ((closureN)self_7313802)->elements[3];
c_7322090.elements[4] = ((closureN)self_7313802)->elements[4];
c_7322090.elements[5] = ((closureN)self_7313802)->elements[5];
c_7322090.elements[6] = ((closureN)self_7313802)->elements[6];
c_7322090.elements[7] = ((closureN)self_7313802)->elements[7];
c_7322090.elements[8] = ((closureN)self_7313802)->elements[8];
c_7322090.elements[9] = ((closureN)self_7313802)->elements[9];
c_7322090.elements[10] = ((closureN)self_7313802)->elements[10];
c_7322090.elements[11] = ((closureN)self_7313802)->elements[11];
c_7322090.elements[12] = ((closureN)self_7313802)->elements[12];
c_7322090.elements[13] = ((closureN)self_7313802)->elements[13];
c_7322090.elements[14] = ((closureN)self_7313802)->elements[14];
c_7322090.elements[15] = ((closureN)self_7313802)->elements[15];
c_7322090.elements[16] = ((closureN)self_7313802)->elements[16];
c_7322090.elements[17] = ((closureN)self_7313802)->elements[17];
c_7322090.elements[18] = r_736363;
c_7322090.elements[19] = ((closureN)self_7313802)->elements[18];

return_closcall2(data,  ((closureN)self_7313802)->elements[18],  &c_7322090, quote_rename);; 
}

static void __lambda_828(void *data, object self_7313803, int argc, object *args) /* object self_7313803, object r_736364 */
 {
 object r_736364 = args[0];
  
closureN_type c_7322093;
object e_7324119 [21];
c_7322093.hdr.mark = gc_color_red;
 c_7322093.hdr.grayed = 0;
c_7322093.tag = closureN_tag;
 c_7322093.fn = (function_type)__lambda_829;
c_7322093.num_args = 1;
c_7322093.num_elements = 21;
c_7322093.elements = (object *)e_7324119;
c_7322093.elements[0] = ((closureN)self_7313803)->elements[0];
c_7322093.elements[1] = ((closureN)self_7313803)->elements[1];
c_7322093.elements[2] = ((closureN)self_7313803)->elements[2];
c_7322093.elements[3] = ((closureN)self_7313803)->elements[3];
c_7322093.elements[4] = ((closureN)self_7313803)->elements[4];
c_7322093.elements[5] = ((closureN)self_7313803)->elements[5];
c_7322093.elements[6] = ((closureN)self_7313803)->elements[6];
c_7322093.elements[7] = ((closureN)self_7313803)->elements[7];
c_7322093.elements[8] = ((closureN)self_7313803)->elements[8];
c_7322093.elements[9] = ((closureN)self_7313803)->elements[9];
c_7322093.elements[10] = ((closureN)self_7313803)->elements[10];
c_7322093.elements[11] = ((closureN)self_7313803)->elements[11];
c_7322093.elements[12] = ((closureN)self_7313803)->elements[12];
c_7322093.elements[13] = ((closureN)self_7313803)->elements[13];
c_7322093.elements[14] = ((closureN)self_7313803)->elements[14];
c_7322093.elements[15] = ((closureN)self_7313803)->elements[15];
c_7322093.elements[16] = ((closureN)self_7313803)->elements[16];
c_7322093.elements[17] = ((closureN)self_7313803)->elements[17];
c_7322093.elements[18] = ((closureN)self_7313803)->elements[18];
c_7322093.elements[19] = r_736364;
c_7322093.elements[20] = ((closureN)self_7313803)->elements[19];

return_closcall2(data,  ((closureN)self_7313803)->elements[19],  &c_7322093, quote_compare);; 
}

static void __lambda_829(void *data, object self_7313804, int argc, object *args) /* object self_7313804, object r_736365 */
 {
 object r_736365 = args[0];
  
closureN_type c_7322096;
object e_7324118 [22];
c_7322096.hdr.mark = gc_color_red;
 c_7322096.hdr.grayed = 0;
c_7322096.tag = closureN_tag;
 c_7322096.fn = (function_type)__lambda_830;
c_7322096.num_args = 1;
c_7322096.num_elements = 22;
c_7322096.elements = (object *)e_7324118;
c_7322096.elements[0] = ((closureN)self_7313804)->elements[0];
c_7322096.elements[1] = ((closureN)self_7313804)->elements[1];
c_7322096.elements[2] = ((closureN)self_7313804)->elements[2];
c_7322096.elements[3] = ((closureN)self_7313804)->elements[3];
c_7322096.elements[4] = ((closureN)self_7313804)->elements[4];
c_7322096.elements[5] = ((closureN)self_7313804)->elements[5];
c_7322096.elements[6] = ((closureN)self_7313804)->elements[6];
c_7322096.elements[7] = ((closureN)self_7313804)->elements[7];
c_7322096.elements[8] = ((closureN)self_7313804)->elements[8];
c_7322096.elements[9] = ((closureN)self_7313804)->elements[9];
c_7322096.elements[10] = ((closureN)self_7313804)->elements[10];
c_7322096.elements[11] = ((closureN)self_7313804)->elements[11];
c_7322096.elements[12] = ((closureN)self_7313804)->elements[12];
c_7322096.elements[13] = ((closureN)self_7313804)->elements[13];
c_7322096.elements[14] = ((closureN)self_7313804)->elements[14];
c_7322096.elements[15] = ((closureN)self_7313804)->elements[15];
c_7322096.elements[16] = ((closureN)self_7313804)->elements[16];
c_7322096.elements[17] = ((closureN)self_7313804)->elements[17];
c_7322096.elements[18] = ((closureN)self_7313804)->elements[18];
c_7322096.elements[19] = ((closureN)self_7313804)->elements[19];
c_7322096.elements[20] = r_736365;
c_7322096.elements[21] = ((closureN)self_7313804)->elements[20];

return_closcall2(data,  ((closureN)self_7313804)->elements[20],  &c_7322096, quote_quote);; 
}

static void __lambda_830(void *data, object self_7313805, int argc, object *args) /* object self_7313805, object r_736366 */
 {
 object r_736366 = args[0];
  
closureN_type c_7322099;
object e_7324117 [23];
c_7322099.hdr.mark = gc_color_red;
 c_7322099.hdr.grayed = 0;
c_7322099.tag = closureN_tag;
 c_7322099.fn = (function_type)__lambda_831;
c_7322099.num_args = 1;
c_7322099.num_elements = 23;
c_7322099.elements = (object *)e_7324117;
c_7322099.elements[0] = ((closureN)self_7313805)->elements[0];
c_7322099.elements[1] = ((closureN)self_7313805)->elements[1];
c_7322099.elements[2] = ((closureN)self_7313805)->elements[2];
c_7322099.elements[3] = ((closureN)self_7313805)->elements[3];
c_7322099.elements[4] = ((closureN)self_7313805)->elements[4];
c_7322099.elements[5] = ((closureN)self_7313805)->elements[5];
c_7322099.elements[6] = ((closureN)self_7313805)->elements[6];
c_7322099.elements[7] = ((closureN)self_7313805)->elements[7];
c_7322099.elements[8] = ((closureN)self_7313805)->elements[8];
c_7322099.elements[9] = ((closureN)self_7313805)->elements[9];
c_7322099.elements[10] = ((closureN)self_7313805)->elements[10];
c_7322099.elements[11] = ((closureN)self_7313805)->elements[11];
c_7322099.elements[12] = ((closureN)self_7313805)->elements[12];
c_7322099.elements[13] = ((closureN)self_7313805)->elements[13];
c_7322099.elements[14] = ((closureN)self_7313805)->elements[14];
c_7322099.elements[15] = ((closureN)self_7313805)->elements[15];
c_7322099.elements[16] = ((closureN)self_7313805)->elements[16];
c_7322099.elements[17] = ((closureN)self_7313805)->elements[17];
c_7322099.elements[18] = ((closureN)self_7313805)->elements[18];
c_7322099.elements[19] = ((closureN)self_7313805)->elements[19];
c_7322099.elements[20] = ((closureN)self_7313805)->elements[20];
c_7322099.elements[21] = r_736366;
c_7322099.elements[22] = ((closureN)self_7313805)->elements[21];

return_closcall2(data,  ((closureN)self_7313805)->elements[21],  &c_7322099, quote_apply);; 
}

static void __lambda_831(void *data, object self_7313806, int argc, object *args) /* object self_7313806, object r_736367 */
 {
 object r_736367 = args[0];
  
closureN_type c_7322102;
object e_7324116 [24];
c_7322102.hdr.mark = gc_color_red;
 c_7322102.hdr.grayed = 0;
c_7322102.tag = closureN_tag;
 c_7322102.fn = (function_type)__lambda_832;
c_7322102.num_args = 1;
c_7322102.num_elements = 24;
c_7322102.elements = (object *)e_7324116;
c_7322102.elements[0] = ((closureN)self_7313806)->elements[0];
c_7322102.elements[1] = ((closureN)self_7313806)->elements[1];
c_7322102.elements[2] = ((closureN)self_7313806)->elements[2];
c_7322102.elements[3] = ((closureN)self_7313806)->elements[3];
c_7322102.elements[4] = ((closureN)self_7313806)->elements[4];
c_7322102.elements[5] = ((closureN)self_7313806)->elements[5];
c_7322102.elements[6] = ((closureN)self_7313806)->elements[6];
c_7322102.elements[7] = ((closureN)self_7313806)->elements[7];
c_7322102.elements[8] = ((closureN)self_7313806)->elements[8];
c_7322102.elements[9] = ((closureN)self_7313806)->elements[9];
c_7322102.elements[10] = ((closureN)self_7313806)->elements[10];
c_7322102.elements[11] = ((closureN)self_7313806)->elements[11];
c_7322102.elements[12] = ((closureN)self_7313806)->elements[12];
c_7322102.elements[13] = ((closureN)self_7313806)->elements[13];
c_7322102.elements[14] = ((closureN)self_7313806)->elements[14];
c_7322102.elements[15] = ((closureN)self_7313806)->elements[15];
c_7322102.elements[16] = ((closureN)self_7313806)->elements[16];
c_7322102.elements[17] = ((closureN)self_7313806)->elements[17];
c_7322102.elements[18] = ((closureN)self_7313806)->elements[18];
c_7322102.elements[19] = ((closureN)self_7313806)->elements[19];
c_7322102.elements[20] = ((closureN)self_7313806)->elements[20];
c_7322102.elements[21] = ((closureN)self_7313806)->elements[21];
c_7322102.elements[22] = r_736367;
c_7322102.elements[23] = ((closureN)self_7313806)->elements[22];

return_closcall2(data,  ((closureN)self_7313806)->elements[22],  &c_7322102, quote_append);; 
}

static void __lambda_832(void *data, object self_7313807, int argc, object *args) /* object self_7313807, object r_736368 */
 {
 object r_736368 = args[0];
  
closureN_type c_7322105;
object e_7324115 [25];
c_7322105.hdr.mark = gc_color_red;
 c_7322105.hdr.grayed = 0;
c_7322105.tag = closureN_tag;
 c_7322105.fn = (function_type)__lambda_833;
c_7322105.num_args = 1;
c_7322105.num_elements = 25;
c_7322105.elements = (object *)e_7324115;
c_7322105.elements[0] = ((closureN)self_7313807)->elements[0];
c_7322105.elements[1] = ((closureN)self_7313807)->elements[1];
c_7322105.elements[2] = ((closureN)self_7313807)->elements[2];
c_7322105.elements[3] = ((closureN)self_7313807)->elements[3];
c_7322105.elements[4] = ((closureN)self_7313807)->elements[4];
c_7322105.elements[5] = ((closureN)self_7313807)->elements[5];
c_7322105.elements[6] = ((closureN)self_7313807)->elements[6];
c_7322105.elements[7] = ((closureN)self_7313807)->elements[7];
c_7322105.elements[8] = ((closureN)self_7313807)->elements[8];
c_7322105.elements[9] = ((closureN)self_7313807)->elements[9];
c_7322105.elements[10] = ((closureN)self_7313807)->elements[10];
c_7322105.elements[11] = ((closureN)self_7313807)->elements[11];
c_7322105.elements[12] = ((closureN)self_7313807)->elements[12];
c_7322105.elements[13] = ((closureN)self_7313807)->elements[13];
c_7322105.elements[14] = ((closureN)self_7313807)->elements[14];
c_7322105.elements[15] = ((closureN)self_7313807)->elements[15];
c_7322105.elements[16] = ((closureN)self_7313807)->elements[16];
c_7322105.elements[17] = ((closureN)self_7313807)->elements[17];
c_7322105.elements[18] = ((closureN)self_7313807)->elements[18];
c_7322105.elements[19] = ((closureN)self_7313807)->elements[19];
c_7322105.elements[20] = ((closureN)self_7313807)->elements[20];
c_7322105.elements[21] = ((closureN)self_7313807)->elements[21];
c_7322105.elements[22] = ((closureN)self_7313807)->elements[22];
c_7322105.elements[23] = r_736368;
c_7322105.elements[24] = ((closureN)self_7313807)->elements[23];

return_closcall2(data,  ((closureN)self_7313807)->elements[23],  &c_7322105, quote_map);; 
}

static void __lambda_833(void *data, object self_7313808, int argc, object *args) /* object self_7313808, object r_736369 */
 {
 object r_736369 = args[0];
  
closureN_type c_7322108;
object e_7324114 [26];
c_7322108.hdr.mark = gc_color_red;
 c_7322108.hdr.grayed = 0;
c_7322108.tag = closureN_tag;
 c_7322108.fn = (function_type)__lambda_834;
c_7322108.num_args = 1;
c_7322108.num_elements = 26;
c_7322108.elements = (object *)e_7324114;
c_7322108.elements[0] = ((closureN)self_7313808)->elements[0];
c_7322108.elements[1] = ((closureN)self_7313808)->elements[1];
c_7322108.elements[2] = ((closureN)self_7313808)->elements[2];
c_7322108.elements[3] = ((closureN)self_7313808)->elements[3];
c_7322108.elements[4] = ((closureN)self_7313808)->elements[4];
c_7322108.elements[5] = ((closureN)self_7313808)->elements[5];
c_7322108.elements[6] = ((closureN)self_7313808)->elements[6];
c_7322108.elements[7] = ((closureN)self_7313808)->elements[7];
c_7322108.elements[8] = ((closureN)self_7313808)->elements[8];
c_7322108.elements[9] = ((closureN)self_7313808)->elements[9];
c_7322108.elements[10] = ((closureN)self_7313808)->elements[10];
c_7322108.elements[11] = ((closureN)self_7313808)->elements[11];
c_7322108.elements[12] = ((closureN)self_7313808)->elements[12];
c_7322108.elements[13] = ((closureN)self_7313808)->elements[13];
c_7322108.elements[14] = ((closureN)self_7313808)->elements[14];
c_7322108.elements[15] = ((closureN)self_7313808)->elements[15];
c_7322108.elements[16] = ((closureN)self_7313808)->elements[16];
c_7322108.elements[17] = ((closureN)self_7313808)->elements[17];
c_7322108.elements[18] = ((closureN)self_7313808)->elements[18];
c_7322108.elements[19] = ((closureN)self_7313808)->elements[19];
c_7322108.elements[20] = ((closureN)self_7313808)->elements[20];
c_7322108.elements[21] = ((closureN)self_7313808)->elements[21];
c_7322108.elements[22] = ((closureN)self_7313808)->elements[22];
c_7322108.elements[23] = ((closureN)self_7313808)->elements[23];
c_7322108.elements[24] = r_736369;
c_7322108.elements[25] = ((closureN)self_7313808)->elements[24];

return_closcall2(data,  ((closureN)self_7313808)->elements[24],  &c_7322108, quote_vector_127);; 
}

static void __lambda_834(void *data, object self_7313809, int argc, object *args) /* object self_7313809, object r_736370 */
 {
 object r_736370 = args[0];
  
closureN_type c_7322111;
object e_7324113 [27];
c_7322111.hdr.mark = gc_color_red;
 c_7322111.hdr.grayed = 0;
c_7322111.tag = closureN_tag;
 c_7322111.fn = (function_type)__lambda_835;
c_7322111.num_args = 1;
c_7322111.num_elements = 27;
c_7322111.elements = (object *)e_7324113;
c_7322111.elements[0] = ((closureN)self_7313809)->elements[0];
c_7322111.elements[1] = ((closureN)self_7313809)->elements[1];
c_7322111.elements[2] = ((closureN)self_7313809)->elements[2];
c_7322111.elements[3] = ((closureN)self_7313809)->elements[3];
c_7322111.elements[4] = ((closureN)self_7313809)->elements[4];
c_7322111.elements[5] = ((closureN)self_7313809)->elements[5];
c_7322111.elements[6] = ((closureN)self_7313809)->elements[6];
c_7322111.elements[7] = ((closureN)self_7313809)->elements[7];
c_7322111.elements[8] = ((closureN)self_7313809)->elements[8];
c_7322111.elements[9] = ((closureN)self_7313809)->elements[9];
c_7322111.elements[10] = ((closureN)self_7313809)->elements[10];
c_7322111.elements[11] = ((closureN)self_7313809)->elements[11];
c_7322111.elements[12] = ((closureN)self_7313809)->elements[12];
c_7322111.elements[13] = ((closureN)self_7313809)->elements[13];
c_7322111.elements[14] = ((closureN)self_7313809)->elements[14];
c_7322111.elements[15] = ((closureN)self_7313809)->elements[15];
c_7322111.elements[16] = ((closureN)self_7313809)->elements[16];
c_7322111.elements[17] = ((closureN)self_7313809)->elements[17];
c_7322111.elements[18] = ((closureN)self_7313809)->elements[18];
c_7322111.elements[19] = ((closureN)self_7313809)->elements[19];
c_7322111.elements[20] = ((closureN)self_7313809)->elements[20];
c_7322111.elements[21] = ((closureN)self_7313809)->elements[21];
c_7322111.elements[22] = ((closureN)self_7313809)->elements[22];
c_7322111.elements[23] = ((closureN)self_7313809)->elements[23];
c_7322111.elements[24] = ((closureN)self_7313809)->elements[24];
c_7322111.elements[25] = r_736370;
c_7322111.elements[26] = ((closureN)self_7313809)->elements[25];

return_closcall2(data,  ((closureN)self_7313809)->elements[25],  &c_7322111, quote_list_127);; 
}

static void __lambda_835(void *data, object self_7313810, int argc, object *args) /* object self_7313810, object r_736371 */
 {
 object r_736371 = args[0];
  
closureN_type c_7322114;
object e_7324112 [28];
c_7322114.hdr.mark = gc_color_red;
 c_7322114.hdr.grayed = 0;
c_7322114.tag = closureN_tag;
 c_7322114.fn = (function_type)__lambda_836;
c_7322114.num_args = 1;
c_7322114.num_elements = 28;
c_7322114.elements = (object *)e_7324112;
c_7322114.elements[0] = ((closureN)self_7313810)->elements[0];
c_7322114.elements[1] = ((closureN)self_7313810)->elements[1];
c_7322114.elements[2] = ((closureN)self_7313810)->elements[2];
c_7322114.elements[3] = ((closureN)self_7313810)->elements[3];
c_7322114.elements[4] = ((closureN)self_7313810)->elements[4];
c_7322114.elements[5] = ((closureN)self_7313810)->elements[5];
c_7322114.elements[6] = ((closureN)self_7313810)->elements[6];
c_7322114.elements[7] = ((closureN)self_7313810)->elements[7];
c_7322114.elements[8] = ((closureN)self_7313810)->elements[8];
c_7322114.elements[9] = ((closureN)self_7313810)->elements[9];
c_7322114.elements[10] = ((closureN)self_7313810)->elements[10];
c_7322114.elements[11] = ((closureN)self_7313810)->elements[11];
c_7322114.elements[12] = ((closureN)self_7313810)->elements[12];
c_7322114.elements[13] = ((closureN)self_7313810)->elements[13];
c_7322114.elements[14] = ((closureN)self_7313810)->elements[14];
c_7322114.elements[15] = ((closureN)self_7313810)->elements[15];
c_7322114.elements[16] = ((closureN)self_7313810)->elements[16];
c_7322114.elements[17] = ((closureN)self_7313810)->elements[17];
c_7322114.elements[18] = ((closureN)self_7313810)->elements[18];
c_7322114.elements[19] = ((closureN)self_7313810)->elements[19];
c_7322114.elements[20] = ((closureN)self_7313810)->elements[20];
c_7322114.elements[21] = ((closureN)self_7313810)->elements[21];
c_7322114.elements[22] = ((closureN)self_7313810)->elements[22];
c_7322114.elements[23] = ((closureN)self_7313810)->elements[23];
c_7322114.elements[24] = ((closureN)self_7313810)->elements[24];
c_7322114.elements[25] = ((closureN)self_7313810)->elements[25];
c_7322114.elements[26] = r_736371;
c_7322114.elements[27] = ((closureN)self_7313810)->elements[26];

return_closcall2(data,  ((closureN)self_7313810)->elements[26],  &c_7322114, quote_len);; 
}

static void __lambda_836(void *data, object self_7313811, int argc, object *args) /* object self_7313811, object r_736372 */
 {
 object r_736372 = args[0];
  
closureN_type c_7322117;
object e_7324111 [29];
c_7322117.hdr.mark = gc_color_red;
 c_7322117.hdr.grayed = 0;
c_7322117.tag = closureN_tag;
 c_7322117.fn = (function_type)__lambda_837;
c_7322117.num_args = 1;
c_7322117.num_elements = 29;
c_7322117.elements = (object *)e_7324111;
c_7322117.elements[0] = ((closureN)self_7313811)->elements[0];
c_7322117.elements[1] = ((closureN)self_7313811)->elements[1];
c_7322117.elements[2] = ((closureN)self_7313811)->elements[2];
c_7322117.elements[3] = ((closureN)self_7313811)->elements[3];
c_7322117.elements[4] = ((closureN)self_7313811)->elements[4];
c_7322117.elements[5] = ((closureN)self_7313811)->elements[5];
c_7322117.elements[6] = ((closureN)self_7313811)->elements[6];
c_7322117.elements[7] = ((closureN)self_7313811)->elements[7];
c_7322117.elements[8] = ((closureN)self_7313811)->elements[8];
c_7322117.elements[9] = ((closureN)self_7313811)->elements[9];
c_7322117.elements[10] = ((closureN)self_7313811)->elements[10];
c_7322117.elements[11] = ((closureN)self_7313811)->elements[11];
c_7322117.elements[12] = ((closureN)self_7313811)->elements[12];
c_7322117.elements[13] = ((closureN)self_7313811)->elements[13];
c_7322117.elements[14] = ((closureN)self_7313811)->elements[14];
c_7322117.elements[15] = ((closureN)self_7313811)->elements[15];
c_7322117.elements[16] = ((closureN)self_7313811)->elements[16];
c_7322117.elements[17] = ((closureN)self_7313811)->elements[17];
c_7322117.elements[18] = ((closureN)self_7313811)->elements[18];
c_7322117.elements[19] = ((closureN)self_7313811)->elements[19];
c_7322117.elements[20] = ((closureN)self_7313811)->elements[20];
c_7322117.elements[21] = ((closureN)self_7313811)->elements[21];
c_7322117.elements[22] = ((closureN)self_7313811)->elements[22];
c_7322117.elements[23] = ((closureN)self_7313811)->elements[23];
c_7322117.elements[24] = ((closureN)self_7313811)->elements[24];
c_7322117.elements[25] = ((closureN)self_7313811)->elements[25];
c_7322117.elements[26] = ((closureN)self_7313811)->elements[26];
c_7322117.elements[27] = r_736372;
c_7322117.elements[28] = ((closureN)self_7313811)->elements[27];

return_closcall2(data,  ((closureN)self_7313811)->elements[27],  &c_7322117, quote_length);; 
}

static void __lambda_837(void *data, object self_7313812, int argc, object *args) /* object self_7313812, object r_736373 */
 {
 object r_736373 = args[0];
  
closureN_type c_7322120;
object e_7324110 [30];
c_7322120.hdr.mark = gc_color_red;
 c_7322120.hdr.grayed = 0;
c_7322120.tag = closureN_tag;
 c_7322120.fn = (function_type)__lambda_838;
c_7322120.num_args = 1;
c_7322120.num_elements = 30;
c_7322120.elements = (object *)e_7324110;
c_7322120.elements[0] = ((closureN)self_7313812)->elements[0];
c_7322120.elements[1] = ((closureN)self_7313812)->elements[1];
c_7322120.elements[2] = ((closureN)self_7313812)->elements[2];
c_7322120.elements[3] = ((closureN)self_7313812)->elements[3];
c_7322120.elements[4] = ((closureN)self_7313812)->elements[4];
c_7322120.elements[5] = ((closureN)self_7313812)->elements[5];
c_7322120.elements[6] = ((closureN)self_7313812)->elements[6];
c_7322120.elements[7] = ((closureN)self_7313812)->elements[7];
c_7322120.elements[8] = ((closureN)self_7313812)->elements[8];
c_7322120.elements[9] = ((closureN)self_7313812)->elements[9];
c_7322120.elements[10] = ((closureN)self_7313812)->elements[10];
c_7322120.elements[11] = ((closureN)self_7313812)->elements[11];
c_7322120.elements[12] = ((closureN)self_7313812)->elements[12];
c_7322120.elements[13] = ((closureN)self_7313812)->elements[13];
c_7322120.elements[14] = ((closureN)self_7313812)->elements[14];
c_7322120.elements[15] = ((closureN)self_7313812)->elements[15];
c_7322120.elements[16] = ((closureN)self_7313812)->elements[16];
c_7322120.elements[17] = ((closureN)self_7313812)->elements[17];
c_7322120.elements[18] = ((closureN)self_7313812)->elements[18];
c_7322120.elements[19] = ((closureN)self_7313812)->elements[19];
c_7322120.elements[20] = ((closureN)self_7313812)->elements[20];
c_7322120.elements[21] = ((closureN)self_7313812)->elements[21];
c_7322120.elements[22] = ((closureN)self_7313812)->elements[22];
c_7322120.elements[23] = ((closureN)self_7313812)->elements[23];
c_7322120.elements[24] = ((closureN)self_7313812)->elements[24];
c_7322120.elements[25] = ((closureN)self_7313812)->elements[25];
c_7322120.elements[26] = ((closureN)self_7313812)->elements[26];
c_7322120.elements[27] = ((closureN)self_7313812)->elements[27];
c_7322120.elements[28] = r_736373;
c_7322120.elements[29] = ((closureN)self_7313812)->elements[28];

return_closcall2(data,  ((closureN)self_7313812)->elements[28],  &c_7322120, quote__91);; 
}

static void __lambda_838(void *data, object self_7313813, int argc, object *args) /* object self_7313813, object r_736374 */
 {
 object r_736374 = args[0];
  
closureN_type c_7322123;
object e_7324109 [31];
c_7322123.hdr.mark = gc_color_red;
 c_7322123.hdr.grayed = 0;
c_7322123.tag = closureN_tag;
 c_7322123.fn = (function_type)__lambda_839;
c_7322123.num_args = 1;
c_7322123.num_elements = 31;
c_7322123.elements = (object *)e_7324109;
c_7322123.elements[0] = ((closureN)self_7313813)->elements[0];
c_7322123.elements[1] = ((closureN)self_7313813)->elements[1];
c_7322123.elements[2] = ((closureN)self_7313813)->elements[2];
c_7322123.elements[3] = ((closureN)self_7313813)->elements[3];
c_7322123.elements[4] = ((closureN)self_7313813)->elements[4];
c_7322123.elements[5] = ((closureN)self_7313813)->elements[5];
c_7322123.elements[6] = ((closureN)self_7313813)->elements[6];
c_7322123.elements[7] = ((closureN)self_7313813)->elements[7];
c_7322123.elements[8] = ((closureN)self_7313813)->elements[8];
c_7322123.elements[9] = ((closureN)self_7313813)->elements[9];
c_7322123.elements[10] = ((closureN)self_7313813)->elements[10];
c_7322123.elements[11] = ((closureN)self_7313813)->elements[11];
c_7322123.elements[12] = ((closureN)self_7313813)->elements[12];
c_7322123.elements[13] = ((closureN)self_7313813)->elements[13];
c_7322123.elements[14] = ((closureN)self_7313813)->elements[14];
c_7322123.elements[15] = ((closureN)self_7313813)->elements[15];
c_7322123.elements[16] = ((closureN)self_7313813)->elements[16];
c_7322123.elements[17] = ((closureN)self_7313813)->elements[17];
c_7322123.elements[18] = ((closureN)self_7313813)->elements[18];
c_7322123.elements[19] = ((closureN)self_7313813)->elements[19];
c_7322123.elements[20] = ((closureN)self_7313813)->elements[20];
c_7322123.elements[21] = ((closureN)self_7313813)->elements[21];
c_7322123.elements[22] = ((closureN)self_7313813)->elements[22];
c_7322123.elements[23] = ((closureN)self_7313813)->elements[23];
c_7322123.elements[24] = ((closureN)self_7313813)->elements[24];
c_7322123.elements[25] = ((closureN)self_7313813)->elements[25];
c_7322123.elements[26] = ((closureN)self_7313813)->elements[26];
c_7322123.elements[27] = ((closureN)self_7313813)->elements[27];
c_7322123.elements[28] = ((closureN)self_7313813)->elements[28];
c_7322123.elements[29] = r_736374;
c_7322123.elements[30] = ((closureN)self_7313813)->elements[29];

return_closcall2(data,  ((closureN)self_7313813)->elements[29],  &c_7322123, quote__125_123);; 
}

static void __lambda_839(void *data, object self_7313814, int argc, object *args) /* object self_7313814, object r_736375 */
 {
 object r_736375 = args[0];
  
closureN_type c_7322126;
object e_7324108 [32];
c_7322126.hdr.mark = gc_color_red;
 c_7322126.hdr.grayed = 0;
c_7322126.tag = closureN_tag;
 c_7322126.fn = (function_type)__lambda_840;
c_7322126.num_args = 1;
c_7322126.num_elements = 32;
c_7322126.elements = (object *)e_7324108;
c_7322126.elements[0] = ((closureN)self_7313814)->elements[0];
c_7322126.elements[1] = ((closureN)self_7313814)->elements[1];
c_7322126.elements[2] = ((closureN)self_7313814)->elements[2];
c_7322126.elements[3] = ((closureN)self_7313814)->elements[3];
c_7322126.elements[4] = ((closureN)self_7313814)->elements[4];
c_7322126.elements[5] = ((closureN)self_7313814)->elements[5];
c_7322126.elements[6] = ((closureN)self_7313814)->elements[6];
c_7322126.elements[7] = ((closureN)self_7313814)->elements[7];
c_7322126.elements[8] = ((closureN)self_7313814)->elements[8];
c_7322126.elements[9] = ((closureN)self_7313814)->elements[9];
c_7322126.elements[10] = ((closureN)self_7313814)->elements[10];
c_7322126.elements[11] = ((closureN)self_7313814)->elements[11];
c_7322126.elements[12] = ((closureN)self_7313814)->elements[12];
c_7322126.elements[13] = ((closureN)self_7313814)->elements[13];
c_7322126.elements[14] = ((closureN)self_7313814)->elements[14];
c_7322126.elements[15] = ((closureN)self_7313814)->elements[15];
c_7322126.elements[16] = ((closureN)self_7313814)->elements[16];
c_7322126.elements[17] = ((closureN)self_7313814)->elements[17];
c_7322126.elements[18] = ((closureN)self_7313814)->elements[18];
c_7322126.elements[19] = ((closureN)self_7313814)->elements[19];
c_7322126.elements[20] = ((closureN)self_7313814)->elements[20];
c_7322126.elements[21] = ((closureN)self_7313814)->elements[21];
c_7322126.elements[22] = ((closureN)self_7313814)->elements[22];
c_7322126.elements[23] = ((closureN)self_7313814)->elements[23];
c_7322126.elements[24] = ((closureN)self_7313814)->elements[24];
c_7322126.elements[25] = ((closureN)self_7313814)->elements[25];
c_7322126.elements[26] = ((closureN)self_7313814)->elements[26];
c_7322126.elements[27] = ((closureN)self_7313814)->elements[27];
c_7322126.elements[28] = ((closureN)self_7313814)->elements[28];
c_7322126.elements[29] = ((closureN)self_7313814)->elements[29];
c_7322126.elements[30] = r_736375;
c_7322126.elements[31] = ((closureN)self_7313814)->elements[30];

return_closcall2(data,  ((closureN)self_7313814)->elements[30],  &c_7322126, quote_error_95loc);; 
}

static void __lambda_840(void *data, object self_7313815, int argc, object *args) /* object self_7313815, object r_736376 */
 {
 object r_736376 = args[0];
  
closureN_type c_7322129;
object e_7324107 [33];
c_7322129.hdr.mark = gc_color_red;
 c_7322129.hdr.grayed = 0;
c_7322129.tag = closureN_tag;
 c_7322129.fn = (function_type)__lambda_841;
c_7322129.num_args = 1;
c_7322129.num_elements = 33;
c_7322129.elements = (object *)e_7324107;
c_7322129.elements[0] = ((closureN)self_7313815)->elements[0];
c_7322129.elements[1] = ((closureN)self_7313815)->elements[1];
c_7322129.elements[2] = ((closureN)self_7313815)->elements[2];
c_7322129.elements[3] = ((closureN)self_7313815)->elements[3];
c_7322129.elements[4] = ((closureN)self_7313815)->elements[4];
c_7322129.elements[5] = ((closureN)self_7313815)->elements[5];
c_7322129.elements[6] = ((closureN)self_7313815)->elements[6];
c_7322129.elements[7] = ((closureN)self_7313815)->elements[7];
c_7322129.elements[8] = ((closureN)self_7313815)->elements[8];
c_7322129.elements[9] = ((closureN)self_7313815)->elements[9];
c_7322129.elements[10] = ((closureN)self_7313815)->elements[10];
c_7322129.elements[11] = ((closureN)self_7313815)->elements[11];
c_7322129.elements[12] = ((closureN)self_7313815)->elements[12];
c_7322129.elements[13] = ((closureN)self_7313815)->elements[13];
c_7322129.elements[14] = ((closureN)self_7313815)->elements[14];
c_7322129.elements[15] = ((closureN)self_7313815)->elements[15];
c_7322129.elements[16] = ((closureN)self_7313815)->elements[16];
c_7322129.elements[17] = ((closureN)self_7313815)->elements[17];
c_7322129.elements[18] = ((closureN)self_7313815)->elements[18];
c_7322129.elements[19] = ((closureN)self_7313815)->elements[19];
c_7322129.elements[20] = ((closureN)self_7313815)->elements[20];
c_7322129.elements[21] = ((closureN)self_7313815)->elements[21];
c_7322129.elements[22] = ((closureN)self_7313815)->elements[22];
c_7322129.elements[23] = ((closureN)self_7313815)->elements[23];
c_7322129.elements[24] = ((closureN)self_7313815)->elements[24];
c_7322129.elements[25] = ((closureN)self_7313815)->elements[25];
c_7322129.elements[26] = ((closureN)self_7313815)->elements[26];
c_7322129.elements[27] = ((closureN)self_7313815)->elements[27];
c_7322129.elements[28] = ((closureN)self_7313815)->elements[28];
c_7322129.elements[29] = ((closureN)self_7313815)->elements[29];
c_7322129.elements[30] = ((closureN)self_7313815)->elements[30];
c_7322129.elements[31] = r_736376;
c_7322129.elements[32] = ((closureN)self_7313815)->elements[31];

return_closcall2(data,  ((closureN)self_7313815)->elements[31],  &c_7322129, quote_ls);; 
}

static void __lambda_841(void *data, object self_7313816, int argc, object *args) /* object self_7313816, object r_736377 */
 {
 object r_736377 = args[0];
  
closureN_type c_7322132;
object e_7324106 [34];
c_7322132.hdr.mark = gc_color_red;
 c_7322132.hdr.grayed = 0;
c_7322132.tag = closureN_tag;
 c_7322132.fn = (function_type)__lambda_842;
c_7322132.num_args = 1;
c_7322132.num_elements = 34;
c_7322132.elements = (object *)e_7324106;
c_7322132.elements[0] = ((closureN)self_7313816)->elements[0];
c_7322132.elements[1] = ((closureN)self_7313816)->elements[1];
c_7322132.elements[2] = ((closureN)self_7313816)->elements[2];
c_7322132.elements[3] = ((closureN)self_7313816)->elements[3];
c_7322132.elements[4] = ((closureN)self_7313816)->elements[4];
c_7322132.elements[5] = ((closureN)self_7313816)->elements[5];
c_7322132.elements[6] = ((closureN)self_7313816)->elements[6];
c_7322132.elements[7] = ((closureN)self_7313816)->elements[7];
c_7322132.elements[8] = ((closureN)self_7313816)->elements[8];
c_7322132.elements[9] = ((closureN)self_7313816)->elements[9];
c_7322132.elements[10] = ((closureN)self_7313816)->elements[10];
c_7322132.elements[11] = ((closureN)self_7313816)->elements[11];
c_7322132.elements[12] = ((closureN)self_7313816)->elements[12];
c_7322132.elements[13] = ((closureN)self_7313816)->elements[13];
c_7322132.elements[14] = ((closureN)self_7313816)->elements[14];
c_7322132.elements[15] = ((closureN)self_7313816)->elements[15];
c_7322132.elements[16] = ((closureN)self_7313816)->elements[16];
c_7322132.elements[17] = ((closureN)self_7313816)->elements[17];
c_7322132.elements[18] = ((closureN)self_7313816)->elements[18];
c_7322132.elements[19] = ((closureN)self_7313816)->elements[19];
c_7322132.elements[20] = ((closureN)self_7313816)->elements[20];
c_7322132.elements[21] = ((closureN)self_7313816)->elements[21];
c_7322132.elements[22] = ((closureN)self_7313816)->elements[22];
c_7322132.elements[23] = ((closureN)self_7313816)->elements[23];
c_7322132.elements[24] = ((closureN)self_7313816)->elements[24];
c_7322132.elements[25] = ((closureN)self_7313816)->elements[25];
c_7322132.elements[26] = ((closureN)self_7313816)->elements[26];
c_7322132.elements[27] = ((closureN)self_7313816)->elements[27];
c_7322132.elements[28] = ((closureN)self_7313816)->elements[28];
c_7322132.elements[29] = ((closureN)self_7313816)->elements[29];
c_7322132.elements[30] = ((closureN)self_7313816)->elements[30];
c_7322132.elements[31] = ((closureN)self_7313816)->elements[31];
c_7322132.elements[32] = r_736377;
c_7322132.elements[33] = ((closureN)self_7313816)->elements[32];

return_closcall2(data,  ((closureN)self_7313816)->elements[32],  &c_7322132, quote_res);; 
}

static void __lambda_842(void *data, object self_7313817, int argc, object *args) /* object self_7313817, object r_736378 */
 {
 object r_736378 = args[0];
  
closureN_type c_7322135;
object e_7324105 [35];
c_7322135.hdr.mark = gc_color_red;
 c_7322135.hdr.grayed = 0;
c_7322135.tag = closureN_tag;
 c_7322135.fn = (function_type)__lambda_843;
c_7322135.num_args = 1;
c_7322135.num_elements = 35;
c_7322135.elements = (object *)e_7324105;
c_7322135.elements[0] = ((closureN)self_7313817)->elements[0];
c_7322135.elements[1] = ((closureN)self_7313817)->elements[1];
c_7322135.elements[2] = ((closureN)self_7313817)->elements[2];
c_7322135.elements[3] = ((closureN)self_7313817)->elements[3];
c_7322135.elements[4] = ((closureN)self_7313817)->elements[4];
c_7322135.elements[5] = ((closureN)self_7313817)->elements[5];
c_7322135.elements[6] = ((closureN)self_7313817)->elements[6];
c_7322135.elements[7] = ((closureN)self_7313817)->elements[7];
c_7322135.elements[8] = ((closureN)self_7313817)->elements[8];
c_7322135.elements[9] = ((closureN)self_7313817)->elements[9];
c_7322135.elements[10] = ((closureN)self_7313817)->elements[10];
c_7322135.elements[11] = ((closureN)self_7313817)->elements[11];
c_7322135.elements[12] = ((closureN)self_7313817)->elements[12];
c_7322135.elements[13] = ((closureN)self_7313817)->elements[13];
c_7322135.elements[14] = ((closureN)self_7313817)->elements[14];
c_7322135.elements[15] = ((closureN)self_7313817)->elements[15];
c_7322135.elements[16] = ((closureN)self_7313817)->elements[16];
c_7322135.elements[17] = ((closureN)self_7313817)->elements[17];
c_7322135.elements[18] = ((closureN)self_7313817)->elements[18];
c_7322135.elements[19] = ((closureN)self_7313817)->elements[19];
c_7322135.elements[20] = ((closureN)self_7313817)->elements[20];
c_7322135.elements[21] = ((closureN)self_7313817)->elements[21];
c_7322135.elements[22] = ((closureN)self_7313817)->elements[22];
c_7322135.elements[23] = ((closureN)self_7313817)->elements[23];
c_7322135.elements[24] = ((closureN)self_7313817)->elements[24];
c_7322135.elements[25] = ((closureN)self_7313817)->elements[25];
c_7322135.elements[26] = ((closureN)self_7313817)->elements[26];
c_7322135.elements[27] = ((closureN)self_7313817)->elements[27];
c_7322135.elements[28] = ((closureN)self_7313817)->elements[28];
c_7322135.elements[29] = ((closureN)self_7313817)->elements[29];
c_7322135.elements[30] = ((closureN)self_7313817)->elements[30];
c_7322135.elements[31] = ((closureN)self_7313817)->elements[31];
c_7322135.elements[32] = ((closureN)self_7313817)->elements[32];
c_7322135.elements[33] = r_736378;
c_7322135.elements[34] = ((closureN)self_7313817)->elements[33];

return_closcall2(data,  ((closureN)self_7313817)->elements[33],  &c_7322135, quote_i);; 
}

static void __lambda_843(void *data, object self_7313818, int argc, object *args) /* object self_7313818, object r_736379 */
 {
 object r_736379 = args[0];
  
closureN_type c_7322138;
object e_7324104 [36];
c_7322138.hdr.mark = gc_color_red;
 c_7322138.hdr.grayed = 0;
c_7322138.tag = closureN_tag;
 c_7322138.fn = (function_type)__lambda_844;
c_7322138.num_args = 1;
c_7322138.num_elements = 36;
c_7322138.elements = (object *)e_7324104;
c_7322138.elements[0] = ((closureN)self_7313818)->elements[0];
c_7322138.elements[1] = ((closureN)self_7313818)->elements[1];
c_7322138.elements[2] = ((closureN)self_7313818)->elements[2];
c_7322138.elements[3] = ((closureN)self_7313818)->elements[3];
c_7322138.elements[4] = ((closureN)self_7313818)->elements[4];
c_7322138.elements[5] = ((closureN)self_7313818)->elements[5];
c_7322138.elements[6] = ((closureN)self_7313818)->elements[6];
c_7322138.elements[7] = ((closureN)self_7313818)->elements[7];
c_7322138.elements[8] = ((closureN)self_7313818)->elements[8];
c_7322138.elements[9] = ((closureN)self_7313818)->elements[9];
c_7322138.elements[10] = ((closureN)self_7313818)->elements[10];
c_7322138.elements[11] = ((closureN)self_7313818)->elements[11];
c_7322138.elements[12] = ((closureN)self_7313818)->elements[12];
c_7322138.elements[13] = ((closureN)self_7313818)->elements[13];
c_7322138.elements[14] = ((closureN)self_7313818)->elements[14];
c_7322138.elements[15] = ((closureN)self_7313818)->elements[15];
c_7322138.elements[16] = ((closureN)self_7313818)->elements[16];
c_7322138.elements[17] = ((closureN)self_7313818)->elements[17];
c_7322138.elements[18] = ((closureN)self_7313818)->elements[18];
c_7322138.elements[19] = ((closureN)self_7313818)->elements[19];
c_7322138.elements[20] = ((closureN)self_7313818)->elements[20];
c_7322138.elements[21] = ((closureN)self_7313818)->elements[21];
c_7322138.elements[22] = ((closureN)self_7313818)->elements[22];
c_7322138.elements[23] = ((closureN)self_7313818)->elements[23];
c_7322138.elements[24] = ((closureN)self_7313818)->elements[24];
c_7322138.elements[25] = ((closureN)self_7313818)->elements[25];
c_7322138.elements[26] = ((closureN)self_7313818)->elements[26];
c_7322138.elements[27] = ((closureN)self_7313818)->elements[27];
c_7322138.elements[28] = ((closureN)self_7313818)->elements[28];
c_7322138.elements[29] = ((closureN)self_7313818)->elements[29];
c_7322138.elements[30] = ((closureN)self_7313818)->elements[30];
c_7322138.elements[31] = ((closureN)self_7313818)->elements[31];
c_7322138.elements[32] = ((closureN)self_7313818)->elements[32];
c_7322138.elements[33] = ((closureN)self_7313818)->elements[33];
c_7322138.elements[34] = r_736379;
c_7322138.elements[35] = ((closureN)self_7313818)->elements[34];

return_closcall2(data,  ((closureN)self_7313818)->elements[34],  &c_7322138, quote_reverse);; 
}

static void __lambda_844(void *data, object self_7313819, int argc, object *args) /* object self_7313819, object r_736380 */
 {
 object r_736380 = args[0];
  
closureN_type c_7322141;
object e_7324103 [37];
c_7322141.hdr.mark = gc_color_red;
 c_7322141.hdr.grayed = 0;
c_7322141.tag = closureN_tag;
 c_7322141.fn = (function_type)__lambda_845;
c_7322141.num_args = 1;
c_7322141.num_elements = 37;
c_7322141.elements = (object *)e_7324103;
c_7322141.elements[0] = ((closureN)self_7313819)->elements[0];
c_7322141.elements[1] = ((closureN)self_7313819)->elements[1];
c_7322141.elements[2] = ((closureN)self_7313819)->elements[2];
c_7322141.elements[3] = ((closureN)self_7313819)->elements[3];
c_7322141.elements[4] = ((closureN)self_7313819)->elements[4];
c_7322141.elements[5] = ((closureN)self_7313819)->elements[5];
c_7322141.elements[6] = ((closureN)self_7313819)->elements[6];
c_7322141.elements[7] = ((closureN)self_7313819)->elements[7];
c_7322141.elements[8] = ((closureN)self_7313819)->elements[8];
c_7322141.elements[9] = ((closureN)self_7313819)->elements[9];
c_7322141.elements[10] = ((closureN)self_7313819)->elements[10];
c_7322141.elements[11] = ((closureN)self_7313819)->elements[11];
c_7322141.elements[12] = ((closureN)self_7313819)->elements[12];
c_7322141.elements[13] = ((closureN)self_7313819)->elements[13];
c_7322141.elements[14] = ((closureN)self_7313819)->elements[14];
c_7322141.elements[15] = ((closureN)self_7313819)->elements[15];
c_7322141.elements[16] = ((closureN)self_7313819)->elements[16];
c_7322141.elements[17] = ((closureN)self_7313819)->elements[17];
c_7322141.elements[18] = ((closureN)self_7313819)->elements[18];
c_7322141.elements[19] = ((closureN)self_7313819)->elements[19];
c_7322141.elements[20] = ((closureN)self_7313819)->elements[20];
c_7322141.elements[21] = ((closureN)self_7313819)->elements[21];
c_7322141.elements[22] = ((closureN)self_7313819)->elements[22];
c_7322141.elements[23] = ((closureN)self_7313819)->elements[23];
c_7322141.elements[24] = ((closureN)self_7313819)->elements[24];
c_7322141.elements[25] = ((closureN)self_7313819)->elements[25];
c_7322141.elements[26] = ((closureN)self_7313819)->elements[26];
c_7322141.elements[27] = ((closureN)self_7313819)->elements[27];
c_7322141.elements[28] = ((closureN)self_7313819)->elements[28];
c_7322141.elements[29] = ((closureN)self_7313819)->elements[29];
c_7322141.elements[30] = ((closureN)self_7313819)->elements[30];
c_7322141.elements[31] = ((closureN)self_7313819)->elements[31];
c_7322141.elements[32] = ((closureN)self_7313819)->elements[32];
c_7322141.elements[33] = ((closureN)self_7313819)->elements[33];
c_7322141.elements[34] = ((closureN)self_7313819)->elements[34];
c_7322141.elements[35] = r_736380;
c_7322141.elements[36] = ((closureN)self_7313819)->elements[35];

return_closcall2(data,  ((closureN)self_7313819)->elements[35],  &c_7322141, quote_vector_91_125list);; 
}

static void __lambda_845(void *data, object self_7313820, int argc, object *args) /* object self_7313820, object r_736381 */
 {
 object r_736381 = args[0];
  
closureN_type c_7322144;
object e_7324102 [38];
c_7322144.hdr.mark = gc_color_red;
 c_7322144.hdr.grayed = 0;
c_7322144.tag = closureN_tag;
 c_7322144.fn = (function_type)__lambda_846;
c_7322144.num_args = 1;
c_7322144.num_elements = 38;
c_7322144.elements = (object *)e_7324102;
c_7322144.elements[0] = ((closureN)self_7313820)->elements[0];
c_7322144.elements[1] = ((closureN)self_7313820)->elements[1];
c_7322144.elements[2] = ((closureN)self_7313820)->elements[2];
c_7322144.elements[3] = ((closureN)self_7313820)->elements[3];
c_7322144.elements[4] = ((closureN)self_7313820)->elements[4];
c_7322144.elements[5] = ((closureN)self_7313820)->elements[5];
c_7322144.elements[6] = ((closureN)self_7313820)->elements[6];
c_7322144.elements[7] = ((closureN)self_7313820)->elements[7];
c_7322144.elements[8] = ((closureN)self_7313820)->elements[8];
c_7322144.elements[9] = ((closureN)self_7313820)->elements[9];
c_7322144.elements[10] = ((closureN)self_7313820)->elements[10];
c_7322144.elements[11] = ((closureN)self_7313820)->elements[11];
c_7322144.elements[12] = ((closureN)self_7313820)->elements[12];
c_7322144.elements[13] = ((closureN)self_7313820)->elements[13];
c_7322144.elements[14] = ((closureN)self_7313820)->elements[14];
c_7322144.elements[15] = ((closureN)self_7313820)->elements[15];
c_7322144.elements[16] = ((closureN)self_7313820)->elements[16];
c_7322144.elements[17] = ((closureN)self_7313820)->elements[17];
c_7322144.elements[18] = ((closureN)self_7313820)->elements[18];
c_7322144.elements[19] = ((closureN)self_7313820)->elements[19];
c_7322144.elements[20] = ((closureN)self_7313820)->elements[20];
c_7322144.elements[21] = ((closureN)self_7313820)->elements[21];
c_7322144.elements[22] = ((closureN)self_7313820)->elements[22];
c_7322144.elements[23] = ((closureN)self_7313820)->elements[23];
c_7322144.elements[24] = ((closureN)self_7313820)->elements[24];
c_7322144.elements[25] = ((closureN)self_7313820)->elements[25];
c_7322144.elements[26] = ((closureN)self_7313820)->elements[26];
c_7322144.elements[27] = ((closureN)self_7313820)->elements[27];
c_7322144.elements[28] = ((closureN)self_7313820)->elements[28];
c_7322144.elements[29] = ((closureN)self_7313820)->elements[29];
c_7322144.elements[30] = ((closureN)self_7313820)->elements[30];
c_7322144.elements[31] = ((closureN)self_7313820)->elements[31];
c_7322144.elements[32] = ((closureN)self_7313820)->elements[32];
c_7322144.elements[33] = ((closureN)self_7313820)->elements[33];
c_7322144.elements[34] = ((closureN)self_7313820)->elements[34];
c_7322144.elements[35] = ((closureN)self_7313820)->elements[35];
c_7322144.elements[36] = r_736381;
c_7322144.elements[37] = ((closureN)self_7313820)->elements[36];

return_closcall2(data,  ((closureN)self_7313820)->elements[36],  &c_7322144, quote_list_91_125vector);; 
}

static void __lambda_846(void *data, object self_7313821, int argc, object *args) /* object self_7313821, object r_736382 */
 {
 object r_736382 = args[0];
  
closureN_type c_7322147;
object e_7324101 [39];
c_7322147.hdr.mark = gc_color_red;
 c_7322147.hdr.grayed = 0;
c_7322147.tag = closureN_tag;
 c_7322147.fn = (function_type)__lambda_847;
c_7322147.num_args = 1;
c_7322147.num_elements = 39;
c_7322147.elements = (object *)e_7324101;
c_7322147.elements[0] = ((closureN)self_7313821)->elements[0];
c_7322147.elements[1] = ((closureN)self_7313821)->elements[1];
c_7322147.elements[2] = ((closureN)self_7313821)->elements[2];
c_7322147.elements[3] = ((closureN)self_7313821)->elements[3];
c_7322147.elements[4] = ((closureN)self_7313821)->elements[4];
c_7322147.elements[5] = ((closureN)self_7313821)->elements[5];
c_7322147.elements[6] = ((closureN)self_7313821)->elements[6];
c_7322147.elements[7] = ((closureN)self_7313821)->elements[7];
c_7322147.elements[8] = ((closureN)self_7313821)->elements[8];
c_7322147.elements[9] = ((closureN)self_7313821)->elements[9];
c_7322147.elements[10] = ((closureN)self_7313821)->elements[10];
c_7322147.elements[11] = ((closureN)self_7313821)->elements[11];
c_7322147.elements[12] = ((closureN)self_7313821)->elements[12];
c_7322147.elements[13] = ((closureN)self_7313821)->elements[13];
c_7322147.elements[14] = ((closureN)self_7313821)->elements[14];
c_7322147.elements[15] = ((closureN)self_7313821)->elements[15];
c_7322147.elements[16] = ((closureN)self_7313821)->elements[16];
c_7322147.elements[17] = ((closureN)self_7313821)->elements[17];
c_7322147.elements[18] = ((closureN)self_7313821)->elements[18];
c_7322147.elements[19] = ((closureN)self_7313821)->elements[19];
c_7322147.elements[20] = ((closureN)self_7313821)->elements[20];
c_7322147.elements[21] = ((closureN)self_7313821)->elements[21];
c_7322147.elements[22] = ((closureN)self_7313821)->elements[22];
c_7322147.elements[23] = ((closureN)self_7313821)->elements[23];
c_7322147.elements[24] = ((closureN)self_7313821)->elements[24];
c_7322147.elements[25] = ((closureN)self_7313821)->elements[25];
c_7322147.elements[26] = ((closureN)self_7313821)->elements[26];
c_7322147.elements[27] = ((closureN)self_7313821)->elements[27];
c_7322147.elements[28] = ((closureN)self_7313821)->elements[28];
c_7322147.elements[29] = ((closureN)self_7313821)->elements[29];
c_7322147.elements[30] = ((closureN)self_7313821)->elements[30];
c_7322147.elements[31] = ((closureN)self_7313821)->elements[31];
c_7322147.elements[32] = ((closureN)self_7313821)->elements[32];
c_7322147.elements[33] = ((closureN)self_7313821)->elements[33];
c_7322147.elements[34] = ((closureN)self_7313821)->elements[34];
c_7322147.elements[35] = ((closureN)self_7313821)->elements[35];
c_7322147.elements[36] = ((closureN)self_7313821)->elements[36];
c_7322147.elements[37] = r_736382;
c_7322147.elements[38] = ((closureN)self_7313821)->elements[37];

return_closcall2(data,  ((closureN)self_7313821)->elements[37],  &c_7322147, quote_cons_91source);; 
}

static void __lambda_847(void *data, object self_7313822, int argc, object *args) /* object self_7313822, object r_736383 */
 {
 object r_736383 = args[0];
  
closureN_type c_7322149;
object e_7324065 [4];
c_7322149.hdr.mark = gc_color_red;
 c_7322149.hdr.grayed = 0;
c_7322149.tag = closureN_tag;
 c_7322149.fn = (function_type)__lambda_848;
c_7322149.num_args = 37;
c_7322149.num_elements = 4;
c_7322149.elements = (object *)e_7324065;
c_7322149.elements[0] = ((closureN)self_7313822)->elements[0];
c_7322149.elements[1] = ((closureN)self_7313822)->elements[1];
c_7322149.elements[2] = ((closureN)self_7313822)->elements[2];
c_7322149.elements[3] = ((closureN)self_7313822)->elements[38];

return_direct_with_clo37(data,(closure)&c_7322149,__lambda_848,  ((closureN)self_7313822)->elements[3], obj_int2obj(0), ((closureN)self_7313822)->elements[4], ((closureN)self_7313822)->elements[5], ((closureN)self_7313822)->elements[6], ((closureN)self_7313822)->elements[7], ((closureN)self_7313822)->elements[8], ((closureN)self_7313822)->elements[9], ((closureN)self_7313822)->elements[10], ((closureN)self_7313822)->elements[11], ((closureN)self_7313822)->elements[12], ((closureN)self_7313822)->elements[13], ((closureN)self_7313822)->elements[14], ((closureN)self_7313822)->elements[15], ((closureN)self_7313822)->elements[16], ((closureN)self_7313822)->elements[17], ((closureN)self_7313822)->elements[18], ((closureN)self_7313822)->elements[19], ((closureN)self_7313822)->elements[20], ((closureN)self_7313822)->elements[21], ((closureN)self_7313822)->elements[22], ((closureN)self_7313822)->elements[23], ((closureN)self_7313822)->elements[24], ((closureN)self_7313822)->elements[25], ((closureN)self_7313822)->elements[26], ((closureN)self_7313822)->elements[27], ((closureN)self_7313822)->elements[28], ((closureN)self_7313822)->elements[29], ((closureN)self_7313822)->elements[30], ((closureN)self_7313822)->elements[31], ((closureN)self_7313822)->elements[32], ((closureN)self_7313822)->elements[33], ((closureN)self_7313822)->elements[34], ((closureN)self_7313822)->elements[35], ((closureN)self_7313822)->elements[36], ((closureN)self_7313822)->elements[37], r_736383);; 
}

static void __lambda_848(void *data, object self_7313823, int argc, object *args) /* object self_7313823, object ellipsis_91specified_127_731266_733566, object count_731267_733567, object _191er_91macro_91transformer_731268_733568, object _191lambda_731269_733569, object _191let_731270_733570, object _191begin_731271_733571, object _191if_731272_733572, object _191and_731273_733573, object _191or_731274_733574, object _191eq_127_731275_733575, object _191equal_127_731276_733576, object _191car_731277_733577, object _191cdr_731278_733578, object _191cons_731279_733579, object _191pair_127_731280_733580, object _191null_127_731281_733581, object _191expr_731282_733582, object _191rename_731283_733583, object _191compare_731284_733584, object _191quote_731285_733585, object _191apply_731286_733586, object _191append_731287_733587, object _191map_731288_733588, object _191vector_127_731289_733589, object _191list_127_731290_733590, object _191len_731291_733591, object _191length_731292_733592, object _191_91_731293_733593, object _191_125_123_731294_733594, object _191error_731295_733595, object _191ls_731296_733596, object _191res_731297_733597, object _191i_731298_733598, object _191reverse_731299_733599, object _191vector_91_125list_731300_733600, object _191list_91_125vector_731301_733601, object _191cons3_731302_733602 */
 {
 object ellipsis_91specified_127_731266_733566 = args[0]; object count_731267_733567 = args[1]; object _191er_91macro_91transformer_731268_733568 = args[2]; object _191lambda_731269_733569 = args[3]; object _191let_731270_733570 = args[4]; object _191if_731272_733572 = args[6]; object _191and_731273_733573 = args[7]; object _191or_731274_733574 = args[8]; object _191equal_127_731276_733576 = args[10]; object _191car_731277_733577 = args[11]; object _191cdr_731278_733578 = args[12]; object _191cons_731279_733579 = args[13]; object _191pair_127_731280_733580 = args[14]; object _191null_127_731281_733581 = args[15]; object _191expr_731282_733582 = args[16]; object _191rename_731283_733583 = args[17]; object _191compare_731284_733584 = args[18]; object _191quote_731285_733585 = args[19]; object _191apply_731286_733586 = args[20]; object _191append_731287_733587 = args[21]; object _191map_731288_733588 = args[22]; object _191vector_127_731289_733589 = args[23]; object _191list_127_731290_733590 = args[24]; object _191len_731291_733591 = args[25]; object _191length_731292_733592 = args[26]; object _191_91_731293_733593 = args[27]; object _191_125_123_731294_733594 = args[28]; object _191error_731295_733595 = args[29]; object _191ls_731296_733596 = args[30]; object _191res_731297_733597 = args[31]; object _191i_731298_733598 = args[32]; object _191reverse_731299_733599 = args[33]; object _191vector_91_125list_731300_733600 = args[34]; object _191list_91_125vector_731301_733601 = args[35]; object _191cons3_731302_733602 = args[36];
  
closureN_type c_7322151;
object e_7324061 [38];
c_7322151.hdr.mark = gc_color_red;
 c_7322151.hdr.grayed = 0;
c_7322151.tag = closureN_tag;
 c_7322151.fn = (function_type)__lambda_1441;
c_7322151.num_args = 1;
c_7322151.num_elements = 38;
c_7322151.elements = (object *)e_7324061;
c_7322151.elements[0] = _191_91_731293_733593;
c_7322151.elements[1] = _191_125_123_731294_733594;
c_7322151.elements[2] = _191and_731273_733573;
c_7322151.elements[3] = _191append_731287_733587;
c_7322151.elements[4] = _191apply_731286_733586;
c_7322151.elements[5] = _191car_731277_733577;
c_7322151.elements[6] = _191cdr_731278_733578;
c_7322151.elements[7] = _191compare_731284_733584;
c_7322151.elements[8] = _191cons_731279_733579;
c_7322151.elements[9] = _191cons3_731302_733602;
c_7322151.elements[10] = _191equal_127_731276_733576;
c_7322151.elements[11] = _191er_91macro_91transformer_731268_733568;
c_7322151.elements[12] = _191error_731295_733595;
c_7322151.elements[13] = _191expr_731282_733582;
c_7322151.elements[14] = _191i_731298_733598;
c_7322151.elements[15] = _191if_731272_733572;
c_7322151.elements[16] = _191lambda_731269_733569;
c_7322151.elements[17] = _191len_731291_733591;
c_7322151.elements[18] = _191length_731292_733592;
c_7322151.elements[19] = _191let_731270_733570;
c_7322151.elements[20] = _191list_91_125vector_731301_733601;
c_7322151.elements[21] = _191list_127_731290_733590;
c_7322151.elements[22] = _191ls_731296_733596;
c_7322151.elements[23] = _191map_731288_733588;
c_7322151.elements[24] = _191null_127_731281_733581;
c_7322151.elements[25] = _191or_731274_733574;
c_7322151.elements[26] = _191pair_127_731280_733580;
c_7322151.elements[27] = _191quote_731285_733585;
c_7322151.elements[28] = _191rename_731283_733583;
c_7322151.elements[29] = _191res_731297_733597;
c_7322151.elements[30] = _191reverse_731299_733599;
c_7322151.elements[31] = _191vector_91_125list_731300_733600;
c_7322151.elements[32] = _191vector_127_731289_733589;
c_7322151.elements[33] = ((closureN)self_7313823)->elements[0];
c_7322151.elements[34] = ellipsis_91specified_127_731266_733566;
c_7322151.elements[35] = ((closureN)self_7313823)->elements[1];
c_7322151.elements[36] = ((closureN)self_7313823)->elements[2];
c_7322151.elements[37] = ((closureN)self_7313823)->elements[3];


pair_type local_7324064; 
return_direct_with_clo1(data,(closure)&c_7322151,__lambda_1441,  set_cell_as_expr(&local_7324064, count_731267_733567));; 
}

static void __lambda_1441(void *data, object self_7313824, int argc, object *args) /* object self_7313824, object count_731267_733567 */
 {
 object count_731267_733567 = args[0];
  
closureN_type c_7322153;
object e_7324060 [39];
c_7322153.hdr.mark = gc_color_red;
 c_7322153.hdr.grayed = 0;
c_7322153.tag = closureN_tag;
 c_7322153.fn = (function_type)__lambda_849;
c_7322153.num_args = 12;
c_7322153.num_elements = 39;
c_7322153.elements = (object *)e_7324060;
c_7322153.elements[0] = ((closureN)self_7313824)->elements[0];
c_7322153.elements[1] = ((closureN)self_7313824)->elements[1];
c_7322153.elements[2] = ((closureN)self_7313824)->elements[2];
c_7322153.elements[3] = ((closureN)self_7313824)->elements[3];
c_7322153.elements[4] = ((closureN)self_7313824)->elements[4];
c_7322153.elements[5] = ((closureN)self_7313824)->elements[5];
c_7322153.elements[6] = ((closureN)self_7313824)->elements[6];
c_7322153.elements[7] = ((closureN)self_7313824)->elements[7];
c_7322153.elements[8] = ((closureN)self_7313824)->elements[8];
c_7322153.elements[9] = ((closureN)self_7313824)->elements[9];
c_7322153.elements[10] = ((closureN)self_7313824)->elements[10];
c_7322153.elements[11] = ((closureN)self_7313824)->elements[11];
c_7322153.elements[12] = ((closureN)self_7313824)->elements[12];
c_7322153.elements[13] = ((closureN)self_7313824)->elements[13];
c_7322153.elements[14] = ((closureN)self_7313824)->elements[14];
c_7322153.elements[15] = ((closureN)self_7313824)->elements[15];
c_7322153.elements[16] = ((closureN)self_7313824)->elements[16];
c_7322153.elements[17] = ((closureN)self_7313824)->elements[17];
c_7322153.elements[18] = ((closureN)self_7313824)->elements[18];
c_7322153.elements[19] = ((closureN)self_7313824)->elements[19];
c_7322153.elements[20] = ((closureN)self_7313824)->elements[20];
c_7322153.elements[21] = ((closureN)self_7313824)->elements[21];
c_7322153.elements[22] = ((closureN)self_7313824)->elements[22];
c_7322153.elements[23] = ((closureN)self_7313824)->elements[23];
c_7322153.elements[24] = ((closureN)self_7313824)->elements[24];
c_7322153.elements[25] = ((closureN)self_7313824)->elements[25];
c_7322153.elements[26] = ((closureN)self_7313824)->elements[26];
c_7322153.elements[27] = ((closureN)self_7313824)->elements[27];
c_7322153.elements[28] = ((closureN)self_7313824)->elements[28];
c_7322153.elements[29] = ((closureN)self_7313824)->elements[29];
c_7322153.elements[30] = ((closureN)self_7313824)->elements[30];
c_7322153.elements[31] = ((closureN)self_7313824)->elements[31];
c_7322153.elements[32] = ((closureN)self_7313824)->elements[32];
c_7322153.elements[33] = ((closureN)self_7313824)->elements[33];
c_7322153.elements[34] = count_731267_733567;
c_7322153.elements[35] = ((closureN)self_7313824)->elements[34];
c_7322153.elements[36] = ((closureN)self_7313824)->elements[35];
c_7322153.elements[37] = ((closureN)self_7313824)->elements[36];
c_7322153.elements[38] = ((closureN)self_7313824)->elements[37];

return_direct_with_clo12(data,(closure)&c_7322153,__lambda_849,  boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_849(void *data, object self_7313825, int argc, object *args) /* object self_7313825, object ellipsis_733603, object lits_733604, object forms_733605, object next_91symbol_733606, object expand_91pattern_733607, object ellipsis_91escape_127_733608, object ellipsis_127_733609, object ellipsis_91depth_733610, object ellipsis_91tail_733611, object all_91vars_733612, object free_91vars_733613, object expand_91template_733614 */
 {
 object ellipsis_733603 = args[0]; object lits_733604 = args[1]; object forms_733605 = args[2]; object next_91symbol_733606 = args[3]; object expand_91pattern_733607 = args[4]; object ellipsis_91escape_127_733608 = args[5]; object ellipsis_127_733609 = args[6]; object ellipsis_91depth_733610 = args[7]; object ellipsis_91tail_733611 = args[8]; object all_91vars_733612 = args[9]; object free_91vars_733613 = args[10]; object expand_91template_733614 = args[11];
  
closureN_type c_7322155;
object e_7324056 [50];
c_7322155.hdr.mark = gc_color_red;
 c_7322155.hdr.grayed = 0;
c_7322155.tag = closureN_tag;
 c_7322155.fn = (function_type)__lambda_1440;
c_7322155.num_args = 1;
c_7322155.num_elements = 50;
c_7322155.elements = (object *)e_7324056;
c_7322155.elements[0] = ((closureN)self_7313825)->elements[0];
c_7322155.elements[1] = ((closureN)self_7313825)->elements[1];
c_7322155.elements[2] = ((closureN)self_7313825)->elements[2];
c_7322155.elements[3] = ((closureN)self_7313825)->elements[3];
c_7322155.elements[4] = ((closureN)self_7313825)->elements[4];
c_7322155.elements[5] = ((closureN)self_7313825)->elements[5];
c_7322155.elements[6] = ((closureN)self_7313825)->elements[6];
c_7322155.elements[7] = ((closureN)self_7313825)->elements[7];
c_7322155.elements[8] = ((closureN)self_7313825)->elements[8];
c_7322155.elements[9] = ((closureN)self_7313825)->elements[9];
c_7322155.elements[10] = ((closureN)self_7313825)->elements[10];
c_7322155.elements[11] = ((closureN)self_7313825)->elements[11];
c_7322155.elements[12] = ((closureN)self_7313825)->elements[12];
c_7322155.elements[13] = ((closureN)self_7313825)->elements[13];
c_7322155.elements[14] = ((closureN)self_7313825)->elements[14];
c_7322155.elements[15] = ((closureN)self_7313825)->elements[15];
c_7322155.elements[16] = ((closureN)self_7313825)->elements[16];
c_7322155.elements[17] = ((closureN)self_7313825)->elements[17];
c_7322155.elements[18] = ((closureN)self_7313825)->elements[18];
c_7322155.elements[19] = ((closureN)self_7313825)->elements[19];
c_7322155.elements[20] = ((closureN)self_7313825)->elements[20];
c_7322155.elements[21] = ((closureN)self_7313825)->elements[21];
c_7322155.elements[22] = ((closureN)self_7313825)->elements[22];
c_7322155.elements[23] = ((closureN)self_7313825)->elements[23];
c_7322155.elements[24] = ((closureN)self_7313825)->elements[24];
c_7322155.elements[25] = ((closureN)self_7313825)->elements[25];
c_7322155.elements[26] = ((closureN)self_7313825)->elements[26];
c_7322155.elements[27] = ((closureN)self_7313825)->elements[27];
c_7322155.elements[28] = ((closureN)self_7313825)->elements[28];
c_7322155.elements[29] = ((closureN)self_7313825)->elements[29];
c_7322155.elements[30] = ((closureN)self_7313825)->elements[30];
c_7322155.elements[31] = ((closureN)self_7313825)->elements[31];
c_7322155.elements[32] = ((closureN)self_7313825)->elements[32];
c_7322155.elements[33] = all_91vars_733612;
c_7322155.elements[34] = ((closureN)self_7313825)->elements[33];
c_7322155.elements[35] = ((closureN)self_7313825)->elements[34];
c_7322155.elements[36] = ellipsis_91depth_733610;
c_7322155.elements[37] = ellipsis_91escape_127_733608;
c_7322155.elements[38] = ((closureN)self_7313825)->elements[35];
c_7322155.elements[39] = ellipsis_91tail_733611;
c_7322155.elements[40] = ellipsis_127_733609;
c_7322155.elements[41] = expand_91pattern_733607;
c_7322155.elements[42] = expand_91template_733614;
c_7322155.elements[43] = ((closureN)self_7313825)->elements[36];
c_7322155.elements[44] = forms_733605;
c_7322155.elements[45] = free_91vars_733613;
c_7322155.elements[46] = ((closureN)self_7313825)->elements[37];
c_7322155.elements[47] = lits_733604;
c_7322155.elements[48] = next_91symbol_733606;
c_7322155.elements[49] = ((closureN)self_7313825)->elements[38];


pair_type local_7324059; 
return_direct_with_clo1(data,(closure)&c_7322155,__lambda_1440,  set_cell_as_expr(&local_7324059, ellipsis_733603));; 
}

static void __lambda_1440(void *data, object self_7313826, int argc, object *args) /* object self_7313826, object ellipsis_733603 */
 {
 object ellipsis_733603 = args[0];
  
closureN_type c_7322157;
object e_7324051 [50];
c_7322157.hdr.mark = gc_color_red;
 c_7322157.hdr.grayed = 0;
c_7322157.tag = closureN_tag;
 c_7322157.fn = (function_type)__lambda_1439;
c_7322157.num_args = 1;
c_7322157.num_elements = 50;
c_7322157.elements = (object *)e_7324051;
c_7322157.elements[0] = ((closureN)self_7313826)->elements[0];
c_7322157.elements[1] = ((closureN)self_7313826)->elements[1];
c_7322157.elements[2] = ((closureN)self_7313826)->elements[2];
c_7322157.elements[3] = ((closureN)self_7313826)->elements[3];
c_7322157.elements[4] = ((closureN)self_7313826)->elements[4];
c_7322157.elements[5] = ((closureN)self_7313826)->elements[5];
c_7322157.elements[6] = ((closureN)self_7313826)->elements[6];
c_7322157.elements[7] = ((closureN)self_7313826)->elements[7];
c_7322157.elements[8] = ((closureN)self_7313826)->elements[8];
c_7322157.elements[9] = ((closureN)self_7313826)->elements[9];
c_7322157.elements[10] = ((closureN)self_7313826)->elements[10];
c_7322157.elements[11] = ((closureN)self_7313826)->elements[11];
c_7322157.elements[12] = ((closureN)self_7313826)->elements[12];
c_7322157.elements[13] = ((closureN)self_7313826)->elements[13];
c_7322157.elements[14] = ((closureN)self_7313826)->elements[14];
c_7322157.elements[15] = ((closureN)self_7313826)->elements[15];
c_7322157.elements[16] = ((closureN)self_7313826)->elements[16];
c_7322157.elements[17] = ((closureN)self_7313826)->elements[17];
c_7322157.elements[18] = ((closureN)self_7313826)->elements[18];
c_7322157.elements[19] = ((closureN)self_7313826)->elements[19];
c_7322157.elements[20] = ((closureN)self_7313826)->elements[20];
c_7322157.elements[21] = ((closureN)self_7313826)->elements[21];
c_7322157.elements[22] = ((closureN)self_7313826)->elements[22];
c_7322157.elements[23] = ((closureN)self_7313826)->elements[23];
c_7322157.elements[24] = ((closureN)self_7313826)->elements[24];
c_7322157.elements[25] = ((closureN)self_7313826)->elements[25];
c_7322157.elements[26] = ((closureN)self_7313826)->elements[26];
c_7322157.elements[27] = ((closureN)self_7313826)->elements[27];
c_7322157.elements[28] = ((closureN)self_7313826)->elements[28];
c_7322157.elements[29] = ((closureN)self_7313826)->elements[29];
c_7322157.elements[30] = ((closureN)self_7313826)->elements[30];
c_7322157.elements[31] = ((closureN)self_7313826)->elements[31];
c_7322157.elements[32] = ((closureN)self_7313826)->elements[32];
c_7322157.elements[33] = ((closureN)self_7313826)->elements[33];
c_7322157.elements[34] = ((closureN)self_7313826)->elements[34];
c_7322157.elements[35] = ((closureN)self_7313826)->elements[35];
c_7322157.elements[36] = ellipsis_733603;
c_7322157.elements[37] = ((closureN)self_7313826)->elements[36];
c_7322157.elements[38] = ((closureN)self_7313826)->elements[37];
c_7322157.elements[39] = ((closureN)self_7313826)->elements[38];
c_7322157.elements[40] = ((closureN)self_7313826)->elements[39];
c_7322157.elements[41] = ((closureN)self_7313826)->elements[40];
c_7322157.elements[42] = ((closureN)self_7313826)->elements[41];
c_7322157.elements[43] = ((closureN)self_7313826)->elements[42];
c_7322157.elements[44] = ((closureN)self_7313826)->elements[43];
c_7322157.elements[45] = ((closureN)self_7313826)->elements[44];
c_7322157.elements[46] = ((closureN)self_7313826)->elements[45];
c_7322157.elements[47] = ((closureN)self_7313826)->elements[46];
c_7322157.elements[48] = ((closureN)self_7313826)->elements[48];
c_7322157.elements[49] = ((closureN)self_7313826)->elements[49];


pair_type local_7324054; 
return_direct_with_clo1(data,(closure)&c_7322157,__lambda_1439,  set_cell_as_expr(&local_7324054, ((closureN)self_7313826)->elements[47]));; 
}

static void __lambda_1439(void *data, object self_7313827, int argc, object *args) /* object self_7313827, object lits_733604 */
 {
 object lits_733604 = args[0];
  
closureN_type c_7322159;
object e_7324046 [50];
c_7322159.hdr.mark = gc_color_red;
 c_7322159.hdr.grayed = 0;
c_7322159.tag = closureN_tag;
 c_7322159.fn = (function_type)__lambda_1438;
c_7322159.num_args = 1;
c_7322159.num_elements = 50;
c_7322159.elements = (object *)e_7324046;
c_7322159.elements[0] = ((closureN)self_7313827)->elements[0];
c_7322159.elements[1] = ((closureN)self_7313827)->elements[1];
c_7322159.elements[2] = ((closureN)self_7313827)->elements[2];
c_7322159.elements[3] = ((closureN)self_7313827)->elements[3];
c_7322159.elements[4] = ((closureN)self_7313827)->elements[4];
c_7322159.elements[5] = ((closureN)self_7313827)->elements[5];
c_7322159.elements[6] = ((closureN)self_7313827)->elements[6];
c_7322159.elements[7] = ((closureN)self_7313827)->elements[7];
c_7322159.elements[8] = ((closureN)self_7313827)->elements[8];
c_7322159.elements[9] = ((closureN)self_7313827)->elements[9];
c_7322159.elements[10] = ((closureN)self_7313827)->elements[10];
c_7322159.elements[11] = ((closureN)self_7313827)->elements[11];
c_7322159.elements[12] = ((closureN)self_7313827)->elements[12];
c_7322159.elements[13] = ((closureN)self_7313827)->elements[13];
c_7322159.elements[14] = ((closureN)self_7313827)->elements[14];
c_7322159.elements[15] = ((closureN)self_7313827)->elements[15];
c_7322159.elements[16] = ((closureN)self_7313827)->elements[16];
c_7322159.elements[17] = ((closureN)self_7313827)->elements[17];
c_7322159.elements[18] = ((closureN)self_7313827)->elements[18];
c_7322159.elements[19] = ((closureN)self_7313827)->elements[19];
c_7322159.elements[20] = ((closureN)self_7313827)->elements[20];
c_7322159.elements[21] = ((closureN)self_7313827)->elements[21];
c_7322159.elements[22] = ((closureN)self_7313827)->elements[22];
c_7322159.elements[23] = ((closureN)self_7313827)->elements[23];
c_7322159.elements[24] = ((closureN)self_7313827)->elements[24];
c_7322159.elements[25] = ((closureN)self_7313827)->elements[25];
c_7322159.elements[26] = ((closureN)self_7313827)->elements[26];
c_7322159.elements[27] = ((closureN)self_7313827)->elements[27];
c_7322159.elements[28] = ((closureN)self_7313827)->elements[28];
c_7322159.elements[29] = ((closureN)self_7313827)->elements[29];
c_7322159.elements[30] = ((closureN)self_7313827)->elements[30];
c_7322159.elements[31] = ((closureN)self_7313827)->elements[31];
c_7322159.elements[32] = ((closureN)self_7313827)->elements[32];
c_7322159.elements[33] = ((closureN)self_7313827)->elements[33];
c_7322159.elements[34] = ((closureN)self_7313827)->elements[34];
c_7322159.elements[35] = ((closureN)self_7313827)->elements[35];
c_7322159.elements[36] = ((closureN)self_7313827)->elements[36];
c_7322159.elements[37] = ((closureN)self_7313827)->elements[37];
c_7322159.elements[38] = ((closureN)self_7313827)->elements[38];
c_7322159.elements[39] = ((closureN)self_7313827)->elements[39];
c_7322159.elements[40] = ((closureN)self_7313827)->elements[40];
c_7322159.elements[41] = ((closureN)self_7313827)->elements[41];
c_7322159.elements[42] = ((closureN)self_7313827)->elements[42];
c_7322159.elements[43] = ((closureN)self_7313827)->elements[43];
c_7322159.elements[44] = ((closureN)self_7313827)->elements[44];
c_7322159.elements[45] = ((closureN)self_7313827)->elements[46];
c_7322159.elements[46] = ((closureN)self_7313827)->elements[47];
c_7322159.elements[47] = lits_733604;
c_7322159.elements[48] = ((closureN)self_7313827)->elements[48];
c_7322159.elements[49] = ((closureN)self_7313827)->elements[49];


pair_type local_7324049; 
return_direct_with_clo1(data,(closure)&c_7322159,__lambda_1438,  set_cell_as_expr(&local_7324049, ((closureN)self_7313827)->elements[45]));; 
}

static void __lambda_1438(void *data, object self_7313828, int argc, object *args) /* object self_7313828, object forms_733605 */
 {
 object forms_733605 = args[0];
  
closureN_type c_7322161;
object e_7324041 [50];
c_7322161.hdr.mark = gc_color_red;
 c_7322161.hdr.grayed = 0;
c_7322161.tag = closureN_tag;
 c_7322161.fn = (function_type)__lambda_1437;
c_7322161.num_args = 1;
c_7322161.num_elements = 50;
c_7322161.elements = (object *)e_7324041;
c_7322161.elements[0] = ((closureN)self_7313828)->elements[0];
c_7322161.elements[1] = ((closureN)self_7313828)->elements[1];
c_7322161.elements[2] = ((closureN)self_7313828)->elements[2];
c_7322161.elements[3] = ((closureN)self_7313828)->elements[3];
c_7322161.elements[4] = ((closureN)self_7313828)->elements[4];
c_7322161.elements[5] = ((closureN)self_7313828)->elements[5];
c_7322161.elements[6] = ((closureN)self_7313828)->elements[6];
c_7322161.elements[7] = ((closureN)self_7313828)->elements[7];
c_7322161.elements[8] = ((closureN)self_7313828)->elements[8];
c_7322161.elements[9] = ((closureN)self_7313828)->elements[9];
c_7322161.elements[10] = ((closureN)self_7313828)->elements[10];
c_7322161.elements[11] = ((closureN)self_7313828)->elements[11];
c_7322161.elements[12] = ((closureN)self_7313828)->elements[12];
c_7322161.elements[13] = ((closureN)self_7313828)->elements[13];
c_7322161.elements[14] = ((closureN)self_7313828)->elements[14];
c_7322161.elements[15] = ((closureN)self_7313828)->elements[15];
c_7322161.elements[16] = ((closureN)self_7313828)->elements[16];
c_7322161.elements[17] = ((closureN)self_7313828)->elements[17];
c_7322161.elements[18] = ((closureN)self_7313828)->elements[18];
c_7322161.elements[19] = ((closureN)self_7313828)->elements[19];
c_7322161.elements[20] = ((closureN)self_7313828)->elements[20];
c_7322161.elements[21] = ((closureN)self_7313828)->elements[21];
c_7322161.elements[22] = ((closureN)self_7313828)->elements[22];
c_7322161.elements[23] = ((closureN)self_7313828)->elements[23];
c_7322161.elements[24] = ((closureN)self_7313828)->elements[24];
c_7322161.elements[25] = ((closureN)self_7313828)->elements[25];
c_7322161.elements[26] = ((closureN)self_7313828)->elements[26];
c_7322161.elements[27] = ((closureN)self_7313828)->elements[27];
c_7322161.elements[28] = ((closureN)self_7313828)->elements[28];
c_7322161.elements[29] = ((closureN)self_7313828)->elements[29];
c_7322161.elements[30] = ((closureN)self_7313828)->elements[30];
c_7322161.elements[31] = ((closureN)self_7313828)->elements[31];
c_7322161.elements[32] = ((closureN)self_7313828)->elements[32];
c_7322161.elements[33] = ((closureN)self_7313828)->elements[33];
c_7322161.elements[34] = ((closureN)self_7313828)->elements[34];
c_7322161.elements[35] = ((closureN)self_7313828)->elements[35];
c_7322161.elements[36] = ((closureN)self_7313828)->elements[36];
c_7322161.elements[37] = ((closureN)self_7313828)->elements[37];
c_7322161.elements[38] = ((closureN)self_7313828)->elements[38];
c_7322161.elements[39] = ((closureN)self_7313828)->elements[39];
c_7322161.elements[40] = ((closureN)self_7313828)->elements[40];
c_7322161.elements[41] = ((closureN)self_7313828)->elements[41];
c_7322161.elements[42] = ((closureN)self_7313828)->elements[42];
c_7322161.elements[43] = ((closureN)self_7313828)->elements[43];
c_7322161.elements[44] = ((closureN)self_7313828)->elements[44];
c_7322161.elements[45] = forms_733605;
c_7322161.elements[46] = ((closureN)self_7313828)->elements[45];
c_7322161.elements[47] = ((closureN)self_7313828)->elements[46];
c_7322161.elements[48] = ((closureN)self_7313828)->elements[47];
c_7322161.elements[49] = ((closureN)self_7313828)->elements[49];


pair_type local_7324044; 
return_direct_with_clo1(data,(closure)&c_7322161,__lambda_1437,  set_cell_as_expr(&local_7324044, ((closureN)self_7313828)->elements[48]));; 
}

static void __lambda_1437(void *data, object self_7313829, int argc, object *args) /* object self_7313829, object next_91symbol_733606 */
 {
 object next_91symbol_733606 = args[0];
  
closureN_type c_7322163;
object e_7324036 [50];
c_7322163.hdr.mark = gc_color_red;
 c_7322163.hdr.grayed = 0;
c_7322163.tag = closureN_tag;
 c_7322163.fn = (function_type)__lambda_1436;
c_7322163.num_args = 1;
c_7322163.num_elements = 50;
c_7322163.elements = (object *)e_7324036;
c_7322163.elements[0] = ((closureN)self_7313829)->elements[0];
c_7322163.elements[1] = ((closureN)self_7313829)->elements[1];
c_7322163.elements[2] = ((closureN)self_7313829)->elements[2];
c_7322163.elements[3] = ((closureN)self_7313829)->elements[3];
c_7322163.elements[4] = ((closureN)self_7313829)->elements[4];
c_7322163.elements[5] = ((closureN)self_7313829)->elements[5];
c_7322163.elements[6] = ((closureN)self_7313829)->elements[6];
c_7322163.elements[7] = ((closureN)self_7313829)->elements[7];
c_7322163.elements[8] = ((closureN)self_7313829)->elements[8];
c_7322163.elements[9] = ((closureN)self_7313829)->elements[9];
c_7322163.elements[10] = ((closureN)self_7313829)->elements[10];
c_7322163.elements[11] = ((closureN)self_7313829)->elements[11];
c_7322163.elements[12] = ((closureN)self_7313829)->elements[12];
c_7322163.elements[13] = ((closureN)self_7313829)->elements[13];
c_7322163.elements[14] = ((closureN)self_7313829)->elements[14];
c_7322163.elements[15] = ((closureN)self_7313829)->elements[15];
c_7322163.elements[16] = ((closureN)self_7313829)->elements[16];
c_7322163.elements[17] = ((closureN)self_7313829)->elements[17];
c_7322163.elements[18] = ((closureN)self_7313829)->elements[18];
c_7322163.elements[19] = ((closureN)self_7313829)->elements[19];
c_7322163.elements[20] = ((closureN)self_7313829)->elements[20];
c_7322163.elements[21] = ((closureN)self_7313829)->elements[21];
c_7322163.elements[22] = ((closureN)self_7313829)->elements[22];
c_7322163.elements[23] = ((closureN)self_7313829)->elements[23];
c_7322163.elements[24] = ((closureN)self_7313829)->elements[24];
c_7322163.elements[25] = ((closureN)self_7313829)->elements[25];
c_7322163.elements[26] = ((closureN)self_7313829)->elements[26];
c_7322163.elements[27] = ((closureN)self_7313829)->elements[27];
c_7322163.elements[28] = ((closureN)self_7313829)->elements[28];
c_7322163.elements[29] = ((closureN)self_7313829)->elements[29];
c_7322163.elements[30] = ((closureN)self_7313829)->elements[30];
c_7322163.elements[31] = ((closureN)self_7313829)->elements[31];
c_7322163.elements[32] = ((closureN)self_7313829)->elements[32];
c_7322163.elements[33] = ((closureN)self_7313829)->elements[33];
c_7322163.elements[34] = ((closureN)self_7313829)->elements[34];
c_7322163.elements[35] = ((closureN)self_7313829)->elements[35];
c_7322163.elements[36] = ((closureN)self_7313829)->elements[36];
c_7322163.elements[37] = ((closureN)self_7313829)->elements[37];
c_7322163.elements[38] = ((closureN)self_7313829)->elements[38];
c_7322163.elements[39] = ((closureN)self_7313829)->elements[39];
c_7322163.elements[40] = ((closureN)self_7313829)->elements[40];
c_7322163.elements[41] = ((closureN)self_7313829)->elements[41];
c_7322163.elements[42] = ((closureN)self_7313829)->elements[43];
c_7322163.elements[43] = ((closureN)self_7313829)->elements[44];
c_7322163.elements[44] = ((closureN)self_7313829)->elements[45];
c_7322163.elements[45] = ((closureN)self_7313829)->elements[46];
c_7322163.elements[46] = ((closureN)self_7313829)->elements[47];
c_7322163.elements[47] = ((closureN)self_7313829)->elements[48];
c_7322163.elements[48] = next_91symbol_733606;
c_7322163.elements[49] = ((closureN)self_7313829)->elements[49];


pair_type local_7324039; 
return_direct_with_clo1(data,(closure)&c_7322163,__lambda_1436,  set_cell_as_expr(&local_7324039, ((closureN)self_7313829)->elements[42]));; 
}

static void __lambda_1436(void *data, object self_7313830, int argc, object *args) /* object self_7313830, object expand_91pattern_733607 */
 {
 object expand_91pattern_733607 = args[0];
  
closureN_type c_7322165;
object e_7324031 [50];
c_7322165.hdr.mark = gc_color_red;
 c_7322165.hdr.grayed = 0;
c_7322165.tag = closureN_tag;
 c_7322165.fn = (function_type)__lambda_1435;
c_7322165.num_args = 1;
c_7322165.num_elements = 50;
c_7322165.elements = (object *)e_7324031;
c_7322165.elements[0] = ((closureN)self_7313830)->elements[0];
c_7322165.elements[1] = ((closureN)self_7313830)->elements[1];
c_7322165.elements[2] = ((closureN)self_7313830)->elements[2];
c_7322165.elements[3] = ((closureN)self_7313830)->elements[3];
c_7322165.elements[4] = ((closureN)self_7313830)->elements[4];
c_7322165.elements[5] = ((closureN)self_7313830)->elements[5];
c_7322165.elements[6] = ((closureN)self_7313830)->elements[6];
c_7322165.elements[7] = ((closureN)self_7313830)->elements[7];
c_7322165.elements[8] = ((closureN)self_7313830)->elements[8];
c_7322165.elements[9] = ((closureN)self_7313830)->elements[9];
c_7322165.elements[10] = ((closureN)self_7313830)->elements[10];
c_7322165.elements[11] = ((closureN)self_7313830)->elements[11];
c_7322165.elements[12] = ((closureN)self_7313830)->elements[12];
c_7322165.elements[13] = ((closureN)self_7313830)->elements[13];
c_7322165.elements[14] = ((closureN)self_7313830)->elements[14];
c_7322165.elements[15] = ((closureN)self_7313830)->elements[15];
c_7322165.elements[16] = ((closureN)self_7313830)->elements[16];
c_7322165.elements[17] = ((closureN)self_7313830)->elements[17];
c_7322165.elements[18] = ((closureN)self_7313830)->elements[18];
c_7322165.elements[19] = ((closureN)self_7313830)->elements[19];
c_7322165.elements[20] = ((closureN)self_7313830)->elements[20];
c_7322165.elements[21] = ((closureN)self_7313830)->elements[21];
c_7322165.elements[22] = ((closureN)self_7313830)->elements[22];
c_7322165.elements[23] = ((closureN)self_7313830)->elements[23];
c_7322165.elements[24] = ((closureN)self_7313830)->elements[24];
c_7322165.elements[25] = ((closureN)self_7313830)->elements[25];
c_7322165.elements[26] = ((closureN)self_7313830)->elements[26];
c_7322165.elements[27] = ((closureN)self_7313830)->elements[27];
c_7322165.elements[28] = ((closureN)self_7313830)->elements[28];
c_7322165.elements[29] = ((closureN)self_7313830)->elements[29];
c_7322165.elements[30] = ((closureN)self_7313830)->elements[30];
c_7322165.elements[31] = ((closureN)self_7313830)->elements[31];
c_7322165.elements[32] = ((closureN)self_7313830)->elements[32];
c_7322165.elements[33] = ((closureN)self_7313830)->elements[33];
c_7322165.elements[34] = ((closureN)self_7313830)->elements[34];
c_7322165.elements[35] = ((closureN)self_7313830)->elements[35];
c_7322165.elements[36] = ((closureN)self_7313830)->elements[36];
c_7322165.elements[37] = ((closureN)self_7313830)->elements[37];
c_7322165.elements[38] = ((closureN)self_7313830)->elements[39];
c_7322165.elements[39] = ((closureN)self_7313830)->elements[40];
c_7322165.elements[40] = ((closureN)self_7313830)->elements[41];
c_7322165.elements[41] = expand_91pattern_733607;
c_7322165.elements[42] = ((closureN)self_7313830)->elements[42];
c_7322165.elements[43] = ((closureN)self_7313830)->elements[43];
c_7322165.elements[44] = ((closureN)self_7313830)->elements[44];
c_7322165.elements[45] = ((closureN)self_7313830)->elements[45];
c_7322165.elements[46] = ((closureN)self_7313830)->elements[46];
c_7322165.elements[47] = ((closureN)self_7313830)->elements[47];
c_7322165.elements[48] = ((closureN)self_7313830)->elements[48];
c_7322165.elements[49] = ((closureN)self_7313830)->elements[49];


pair_type local_7324034; 
return_direct_with_clo1(data,(closure)&c_7322165,__lambda_1435,  set_cell_as_expr(&local_7324034, ((closureN)self_7313830)->elements[38]));; 
}

static void __lambda_1435(void *data, object self_7313831, int argc, object *args) /* object self_7313831, object ellipsis_91escape_127_733608 */
 {
 object ellipsis_91escape_127_733608 = args[0];
  
closureN_type c_7322167;
object e_7324026 [50];
c_7322167.hdr.mark = gc_color_red;
 c_7322167.hdr.grayed = 0;
c_7322167.tag = closureN_tag;
 c_7322167.fn = (function_type)__lambda_1434;
c_7322167.num_args = 1;
c_7322167.num_elements = 50;
c_7322167.elements = (object *)e_7324026;
c_7322167.elements[0] = ((closureN)self_7313831)->elements[0];
c_7322167.elements[1] = ((closureN)self_7313831)->elements[1];
c_7322167.elements[2] = ((closureN)self_7313831)->elements[2];
c_7322167.elements[3] = ((closureN)self_7313831)->elements[3];
c_7322167.elements[4] = ((closureN)self_7313831)->elements[4];
c_7322167.elements[5] = ((closureN)self_7313831)->elements[5];
c_7322167.elements[6] = ((closureN)self_7313831)->elements[6];
c_7322167.elements[7] = ((closureN)self_7313831)->elements[7];
c_7322167.elements[8] = ((closureN)self_7313831)->elements[8];
c_7322167.elements[9] = ((closureN)self_7313831)->elements[9];
c_7322167.elements[10] = ((closureN)self_7313831)->elements[10];
c_7322167.elements[11] = ((closureN)self_7313831)->elements[11];
c_7322167.elements[12] = ((closureN)self_7313831)->elements[12];
c_7322167.elements[13] = ((closureN)self_7313831)->elements[13];
c_7322167.elements[14] = ((closureN)self_7313831)->elements[14];
c_7322167.elements[15] = ((closureN)self_7313831)->elements[15];
c_7322167.elements[16] = ((closureN)self_7313831)->elements[16];
c_7322167.elements[17] = ((closureN)self_7313831)->elements[17];
c_7322167.elements[18] = ((closureN)self_7313831)->elements[18];
c_7322167.elements[19] = ((closureN)self_7313831)->elements[19];
c_7322167.elements[20] = ((closureN)self_7313831)->elements[20];
c_7322167.elements[21] = ((closureN)self_7313831)->elements[21];
c_7322167.elements[22] = ((closureN)self_7313831)->elements[22];
c_7322167.elements[23] = ((closureN)self_7313831)->elements[23];
c_7322167.elements[24] = ((closureN)self_7313831)->elements[24];
c_7322167.elements[25] = ((closureN)self_7313831)->elements[25];
c_7322167.elements[26] = ((closureN)self_7313831)->elements[26];
c_7322167.elements[27] = ((closureN)self_7313831)->elements[27];
c_7322167.elements[28] = ((closureN)self_7313831)->elements[28];
c_7322167.elements[29] = ((closureN)self_7313831)->elements[29];
c_7322167.elements[30] = ((closureN)self_7313831)->elements[30];
c_7322167.elements[31] = ((closureN)self_7313831)->elements[31];
c_7322167.elements[32] = ((closureN)self_7313831)->elements[32];
c_7322167.elements[33] = ((closureN)self_7313831)->elements[33];
c_7322167.elements[34] = ((closureN)self_7313831)->elements[34];
c_7322167.elements[35] = ((closureN)self_7313831)->elements[35];
c_7322167.elements[36] = ((closureN)self_7313831)->elements[36];
c_7322167.elements[37] = ((closureN)self_7313831)->elements[37];
c_7322167.elements[38] = ellipsis_91escape_127_733608;
c_7322167.elements[39] = ((closureN)self_7313831)->elements[38];
c_7322167.elements[40] = ((closureN)self_7313831)->elements[39];
c_7322167.elements[41] = ((closureN)self_7313831)->elements[41];
c_7322167.elements[42] = ((closureN)self_7313831)->elements[42];
c_7322167.elements[43] = ((closureN)self_7313831)->elements[43];
c_7322167.elements[44] = ((closureN)self_7313831)->elements[44];
c_7322167.elements[45] = ((closureN)self_7313831)->elements[45];
c_7322167.elements[46] = ((closureN)self_7313831)->elements[46];
c_7322167.elements[47] = ((closureN)self_7313831)->elements[47];
c_7322167.elements[48] = ((closureN)self_7313831)->elements[48];
c_7322167.elements[49] = ((closureN)self_7313831)->elements[49];


pair_type local_7324029; 
return_direct_with_clo1(data,(closure)&c_7322167,__lambda_1434,  set_cell_as_expr(&local_7324029, ((closureN)self_7313831)->elements[40]));; 
}

static void __lambda_1434(void *data, object self_7313832, int argc, object *args) /* object self_7313832, object ellipsis_127_733609 */
 {
 object ellipsis_127_733609 = args[0];
  
closureN_type c_7322169;
object e_7324021 [50];
c_7322169.hdr.mark = gc_color_red;
 c_7322169.hdr.grayed = 0;
c_7322169.tag = closureN_tag;
 c_7322169.fn = (function_type)__lambda_1433;
c_7322169.num_args = 1;
c_7322169.num_elements = 50;
c_7322169.elements = (object *)e_7324021;
c_7322169.elements[0] = ((closureN)self_7313832)->elements[0];
c_7322169.elements[1] = ((closureN)self_7313832)->elements[1];
c_7322169.elements[2] = ((closureN)self_7313832)->elements[2];
c_7322169.elements[3] = ((closureN)self_7313832)->elements[3];
c_7322169.elements[4] = ((closureN)self_7313832)->elements[4];
c_7322169.elements[5] = ((closureN)self_7313832)->elements[5];
c_7322169.elements[6] = ((closureN)self_7313832)->elements[6];
c_7322169.elements[7] = ((closureN)self_7313832)->elements[7];
c_7322169.elements[8] = ((closureN)self_7313832)->elements[8];
c_7322169.elements[9] = ((closureN)self_7313832)->elements[9];
c_7322169.elements[10] = ((closureN)self_7313832)->elements[10];
c_7322169.elements[11] = ((closureN)self_7313832)->elements[11];
c_7322169.elements[12] = ((closureN)self_7313832)->elements[12];
c_7322169.elements[13] = ((closureN)self_7313832)->elements[13];
c_7322169.elements[14] = ((closureN)self_7313832)->elements[14];
c_7322169.elements[15] = ((closureN)self_7313832)->elements[15];
c_7322169.elements[16] = ((closureN)self_7313832)->elements[16];
c_7322169.elements[17] = ((closureN)self_7313832)->elements[17];
c_7322169.elements[18] = ((closureN)self_7313832)->elements[18];
c_7322169.elements[19] = ((closureN)self_7313832)->elements[19];
c_7322169.elements[20] = ((closureN)self_7313832)->elements[20];
c_7322169.elements[21] = ((closureN)self_7313832)->elements[21];
c_7322169.elements[22] = ((closureN)self_7313832)->elements[22];
c_7322169.elements[23] = ((closureN)self_7313832)->elements[23];
c_7322169.elements[24] = ((closureN)self_7313832)->elements[24];
c_7322169.elements[25] = ((closureN)self_7313832)->elements[25];
c_7322169.elements[26] = ((closureN)self_7313832)->elements[26];
c_7322169.elements[27] = ((closureN)self_7313832)->elements[27];
c_7322169.elements[28] = ((closureN)self_7313832)->elements[28];
c_7322169.elements[29] = ((closureN)self_7313832)->elements[29];
c_7322169.elements[30] = ((closureN)self_7313832)->elements[30];
c_7322169.elements[31] = ((closureN)self_7313832)->elements[31];
c_7322169.elements[32] = ((closureN)self_7313832)->elements[32];
c_7322169.elements[33] = ((closureN)self_7313832)->elements[33];
c_7322169.elements[34] = ((closureN)self_7313832)->elements[34];
c_7322169.elements[35] = ((closureN)self_7313832)->elements[35];
c_7322169.elements[36] = ((closureN)self_7313832)->elements[36];
c_7322169.elements[37] = ((closureN)self_7313832)->elements[38];
c_7322169.elements[38] = ((closureN)self_7313832)->elements[39];
c_7322169.elements[39] = ((closureN)self_7313832)->elements[40];
c_7322169.elements[40] = ellipsis_127_733609;
c_7322169.elements[41] = ((closureN)self_7313832)->elements[41];
c_7322169.elements[42] = ((closureN)self_7313832)->elements[42];
c_7322169.elements[43] = ((closureN)self_7313832)->elements[43];
c_7322169.elements[44] = ((closureN)self_7313832)->elements[44];
c_7322169.elements[45] = ((closureN)self_7313832)->elements[45];
c_7322169.elements[46] = ((closureN)self_7313832)->elements[46];
c_7322169.elements[47] = ((closureN)self_7313832)->elements[47];
c_7322169.elements[48] = ((closureN)self_7313832)->elements[48];
c_7322169.elements[49] = ((closureN)self_7313832)->elements[49];


pair_type local_7324024; 
return_direct_with_clo1(data,(closure)&c_7322169,__lambda_1433,  set_cell_as_expr(&local_7324024, ((closureN)self_7313832)->elements[37]));; 
}

static void __lambda_1433(void *data, object self_7313833, int argc, object *args) /* object self_7313833, object ellipsis_91depth_733610 */
 {
 object ellipsis_91depth_733610 = args[0];
  
closureN_type c_7322171;
object e_7324016 [50];
c_7322171.hdr.mark = gc_color_red;
 c_7322171.hdr.grayed = 0;
c_7322171.tag = closureN_tag;
 c_7322171.fn = (function_type)__lambda_1432;
c_7322171.num_args = 1;
c_7322171.num_elements = 50;
c_7322171.elements = (object *)e_7324016;
c_7322171.elements[0] = ((closureN)self_7313833)->elements[0];
c_7322171.elements[1] = ((closureN)self_7313833)->elements[1];
c_7322171.elements[2] = ((closureN)self_7313833)->elements[2];
c_7322171.elements[3] = ((closureN)self_7313833)->elements[3];
c_7322171.elements[4] = ((closureN)self_7313833)->elements[4];
c_7322171.elements[5] = ((closureN)self_7313833)->elements[5];
c_7322171.elements[6] = ((closureN)self_7313833)->elements[6];
c_7322171.elements[7] = ((closureN)self_7313833)->elements[7];
c_7322171.elements[8] = ((closureN)self_7313833)->elements[8];
c_7322171.elements[9] = ((closureN)self_7313833)->elements[9];
c_7322171.elements[10] = ((closureN)self_7313833)->elements[10];
c_7322171.elements[11] = ((closureN)self_7313833)->elements[11];
c_7322171.elements[12] = ((closureN)self_7313833)->elements[12];
c_7322171.elements[13] = ((closureN)self_7313833)->elements[13];
c_7322171.elements[14] = ((closureN)self_7313833)->elements[14];
c_7322171.elements[15] = ((closureN)self_7313833)->elements[15];
c_7322171.elements[16] = ((closureN)self_7313833)->elements[16];
c_7322171.elements[17] = ((closureN)self_7313833)->elements[17];
c_7322171.elements[18] = ((closureN)self_7313833)->elements[18];
c_7322171.elements[19] = ((closureN)self_7313833)->elements[19];
c_7322171.elements[20] = ((closureN)self_7313833)->elements[20];
c_7322171.elements[21] = ((closureN)self_7313833)->elements[21];
c_7322171.elements[22] = ((closureN)self_7313833)->elements[22];
c_7322171.elements[23] = ((closureN)self_7313833)->elements[23];
c_7322171.elements[24] = ((closureN)self_7313833)->elements[24];
c_7322171.elements[25] = ((closureN)self_7313833)->elements[25];
c_7322171.elements[26] = ((closureN)self_7313833)->elements[26];
c_7322171.elements[27] = ((closureN)self_7313833)->elements[27];
c_7322171.elements[28] = ((closureN)self_7313833)->elements[28];
c_7322171.elements[29] = ((closureN)self_7313833)->elements[29];
c_7322171.elements[30] = ((closureN)self_7313833)->elements[30];
c_7322171.elements[31] = ((closureN)self_7313833)->elements[31];
c_7322171.elements[32] = ((closureN)self_7313833)->elements[32];
c_7322171.elements[33] = ((closureN)self_7313833)->elements[33];
c_7322171.elements[34] = ((closureN)self_7313833)->elements[34];
c_7322171.elements[35] = ((closureN)self_7313833)->elements[35];
c_7322171.elements[36] = ((closureN)self_7313833)->elements[36];
c_7322171.elements[37] = ellipsis_91depth_733610;
c_7322171.elements[38] = ((closureN)self_7313833)->elements[37];
c_7322171.elements[39] = ((closureN)self_7313833)->elements[38];
c_7322171.elements[40] = ((closureN)self_7313833)->elements[40];
c_7322171.elements[41] = ((closureN)self_7313833)->elements[41];
c_7322171.elements[42] = ((closureN)self_7313833)->elements[42];
c_7322171.elements[43] = ((closureN)self_7313833)->elements[43];
c_7322171.elements[44] = ((closureN)self_7313833)->elements[44];
c_7322171.elements[45] = ((closureN)self_7313833)->elements[45];
c_7322171.elements[46] = ((closureN)self_7313833)->elements[46];
c_7322171.elements[47] = ((closureN)self_7313833)->elements[47];
c_7322171.elements[48] = ((closureN)self_7313833)->elements[48];
c_7322171.elements[49] = ((closureN)self_7313833)->elements[49];


pair_type local_7324019; 
return_direct_with_clo1(data,(closure)&c_7322171,__lambda_1432,  set_cell_as_expr(&local_7324019, ((closureN)self_7313833)->elements[39]));; 
}

static void __lambda_1432(void *data, object self_7313834, int argc, object *args) /* object self_7313834, object ellipsis_91tail_733611 */
 {
 object ellipsis_91tail_733611 = args[0];
  
closureN_type c_7322173;
object e_7324011 [50];
c_7322173.hdr.mark = gc_color_red;
 c_7322173.hdr.grayed = 0;
c_7322173.tag = closureN_tag;
 c_7322173.fn = (function_type)__lambda_1431;
c_7322173.num_args = 1;
c_7322173.num_elements = 50;
c_7322173.elements = (object *)e_7324011;
c_7322173.elements[0] = ((closureN)self_7313834)->elements[0];
c_7322173.elements[1] = ((closureN)self_7313834)->elements[1];
c_7322173.elements[2] = ((closureN)self_7313834)->elements[2];
c_7322173.elements[3] = ((closureN)self_7313834)->elements[3];
c_7322173.elements[4] = ((closureN)self_7313834)->elements[4];
c_7322173.elements[5] = ((closureN)self_7313834)->elements[5];
c_7322173.elements[6] = ((closureN)self_7313834)->elements[6];
c_7322173.elements[7] = ((closureN)self_7313834)->elements[7];
c_7322173.elements[8] = ((closureN)self_7313834)->elements[8];
c_7322173.elements[9] = ((closureN)self_7313834)->elements[9];
c_7322173.elements[10] = ((closureN)self_7313834)->elements[10];
c_7322173.elements[11] = ((closureN)self_7313834)->elements[11];
c_7322173.elements[12] = ((closureN)self_7313834)->elements[12];
c_7322173.elements[13] = ((closureN)self_7313834)->elements[13];
c_7322173.elements[14] = ((closureN)self_7313834)->elements[14];
c_7322173.elements[15] = ((closureN)self_7313834)->elements[15];
c_7322173.elements[16] = ((closureN)self_7313834)->elements[16];
c_7322173.elements[17] = ((closureN)self_7313834)->elements[17];
c_7322173.elements[18] = ((closureN)self_7313834)->elements[18];
c_7322173.elements[19] = ((closureN)self_7313834)->elements[19];
c_7322173.elements[20] = ((closureN)self_7313834)->elements[20];
c_7322173.elements[21] = ((closureN)self_7313834)->elements[21];
c_7322173.elements[22] = ((closureN)self_7313834)->elements[22];
c_7322173.elements[23] = ((closureN)self_7313834)->elements[23];
c_7322173.elements[24] = ((closureN)self_7313834)->elements[24];
c_7322173.elements[25] = ((closureN)self_7313834)->elements[25];
c_7322173.elements[26] = ((closureN)self_7313834)->elements[26];
c_7322173.elements[27] = ((closureN)self_7313834)->elements[27];
c_7322173.elements[28] = ((closureN)self_7313834)->elements[28];
c_7322173.elements[29] = ((closureN)self_7313834)->elements[29];
c_7322173.elements[30] = ((closureN)self_7313834)->elements[30];
c_7322173.elements[31] = ((closureN)self_7313834)->elements[31];
c_7322173.elements[32] = ((closureN)self_7313834)->elements[32];
c_7322173.elements[33] = ((closureN)self_7313834)->elements[34];
c_7322173.elements[34] = ((closureN)self_7313834)->elements[35];
c_7322173.elements[35] = ((closureN)self_7313834)->elements[36];
c_7322173.elements[36] = ((closureN)self_7313834)->elements[37];
c_7322173.elements[37] = ((closureN)self_7313834)->elements[38];
c_7322173.elements[38] = ((closureN)self_7313834)->elements[39];
c_7322173.elements[39] = ellipsis_91tail_733611;
c_7322173.elements[40] = ((closureN)self_7313834)->elements[40];
c_7322173.elements[41] = ((closureN)self_7313834)->elements[41];
c_7322173.elements[42] = ((closureN)self_7313834)->elements[42];
c_7322173.elements[43] = ((closureN)self_7313834)->elements[43];
c_7322173.elements[44] = ((closureN)self_7313834)->elements[44];
c_7322173.elements[45] = ((closureN)self_7313834)->elements[45];
c_7322173.elements[46] = ((closureN)self_7313834)->elements[46];
c_7322173.elements[47] = ((closureN)self_7313834)->elements[47];
c_7322173.elements[48] = ((closureN)self_7313834)->elements[48];
c_7322173.elements[49] = ((closureN)self_7313834)->elements[49];


pair_type local_7324014; 
return_direct_with_clo1(data,(closure)&c_7322173,__lambda_1431,  set_cell_as_expr(&local_7324014, ((closureN)self_7313834)->elements[33]));; 
}

static void __lambda_1431(void *data, object self_7313835, int argc, object *args) /* object self_7313835, object all_91vars_733612 */
 {
 object all_91vars_733612 = args[0];
  
closureN_type c_7322175;
object e_7324006 [50];
c_7322175.hdr.mark = gc_color_red;
 c_7322175.hdr.grayed = 0;
c_7322175.tag = closureN_tag;
 c_7322175.fn = (function_type)__lambda_1430;
c_7322175.num_args = 1;
c_7322175.num_elements = 50;
c_7322175.elements = (object *)e_7324006;
c_7322175.elements[0] = ((closureN)self_7313835)->elements[0];
c_7322175.elements[1] = ((closureN)self_7313835)->elements[1];
c_7322175.elements[2] = ((closureN)self_7313835)->elements[2];
c_7322175.elements[3] = ((closureN)self_7313835)->elements[3];
c_7322175.elements[4] = ((closureN)self_7313835)->elements[4];
c_7322175.elements[5] = ((closureN)self_7313835)->elements[5];
c_7322175.elements[6] = ((closureN)self_7313835)->elements[6];
c_7322175.elements[7] = ((closureN)self_7313835)->elements[7];
c_7322175.elements[8] = ((closureN)self_7313835)->elements[8];
c_7322175.elements[9] = ((closureN)self_7313835)->elements[9];
c_7322175.elements[10] = ((closureN)self_7313835)->elements[10];
c_7322175.elements[11] = ((closureN)self_7313835)->elements[11];
c_7322175.elements[12] = ((closureN)self_7313835)->elements[12];
c_7322175.elements[13] = ((closureN)self_7313835)->elements[13];
c_7322175.elements[14] = ((closureN)self_7313835)->elements[14];
c_7322175.elements[15] = ((closureN)self_7313835)->elements[15];
c_7322175.elements[16] = ((closureN)self_7313835)->elements[16];
c_7322175.elements[17] = ((closureN)self_7313835)->elements[17];
c_7322175.elements[18] = ((closureN)self_7313835)->elements[18];
c_7322175.elements[19] = ((closureN)self_7313835)->elements[19];
c_7322175.elements[20] = ((closureN)self_7313835)->elements[20];
c_7322175.elements[21] = ((closureN)self_7313835)->elements[21];
c_7322175.elements[22] = ((closureN)self_7313835)->elements[22];
c_7322175.elements[23] = ((closureN)self_7313835)->elements[23];
c_7322175.elements[24] = ((closureN)self_7313835)->elements[24];
c_7322175.elements[25] = ((closureN)self_7313835)->elements[25];
c_7322175.elements[26] = ((closureN)self_7313835)->elements[26];
c_7322175.elements[27] = ((closureN)self_7313835)->elements[27];
c_7322175.elements[28] = ((closureN)self_7313835)->elements[28];
c_7322175.elements[29] = ((closureN)self_7313835)->elements[29];
c_7322175.elements[30] = ((closureN)self_7313835)->elements[30];
c_7322175.elements[31] = ((closureN)self_7313835)->elements[31];
c_7322175.elements[32] = ((closureN)self_7313835)->elements[32];
c_7322175.elements[33] = all_91vars_733612;
c_7322175.elements[34] = ((closureN)self_7313835)->elements[33];
c_7322175.elements[35] = ((closureN)self_7313835)->elements[34];
c_7322175.elements[36] = ((closureN)self_7313835)->elements[35];
c_7322175.elements[37] = ((closureN)self_7313835)->elements[36];
c_7322175.elements[38] = ((closureN)self_7313835)->elements[37];
c_7322175.elements[39] = ((closureN)self_7313835)->elements[38];
c_7322175.elements[40] = ((closureN)self_7313835)->elements[39];
c_7322175.elements[41] = ((closureN)self_7313835)->elements[40];
c_7322175.elements[42] = ((closureN)self_7313835)->elements[41];
c_7322175.elements[43] = ((closureN)self_7313835)->elements[42];
c_7322175.elements[44] = ((closureN)self_7313835)->elements[43];
c_7322175.elements[45] = ((closureN)self_7313835)->elements[44];
c_7322175.elements[46] = ((closureN)self_7313835)->elements[46];
c_7322175.elements[47] = ((closureN)self_7313835)->elements[47];
c_7322175.elements[48] = ((closureN)self_7313835)->elements[48];
c_7322175.elements[49] = ((closureN)self_7313835)->elements[49];


pair_type local_7324009; 
return_direct_with_clo1(data,(closure)&c_7322175,__lambda_1430,  set_cell_as_expr(&local_7324009, ((closureN)self_7313835)->elements[45]));; 
}

static void __lambda_1430(void *data, object self_7313836, int argc, object *args) /* object self_7313836, object free_91vars_733613 */
 {
 object free_91vars_733613 = args[0];
  
closureN_type c_7322177;
object e_7324001 [50];
c_7322177.hdr.mark = gc_color_red;
 c_7322177.hdr.grayed = 0;
c_7322177.tag = closureN_tag;
 c_7322177.fn = (function_type)__lambda_1429;
c_7322177.num_args = 1;
c_7322177.num_elements = 50;
c_7322177.elements = (object *)e_7324001;
c_7322177.elements[0] = ((closureN)self_7313836)->elements[0];
c_7322177.elements[1] = ((closureN)self_7313836)->elements[1];
c_7322177.elements[2] = ((closureN)self_7313836)->elements[2];
c_7322177.elements[3] = ((closureN)self_7313836)->elements[3];
c_7322177.elements[4] = ((closureN)self_7313836)->elements[4];
c_7322177.elements[5] = ((closureN)self_7313836)->elements[5];
c_7322177.elements[6] = ((closureN)self_7313836)->elements[6];
c_7322177.elements[7] = ((closureN)self_7313836)->elements[7];
c_7322177.elements[8] = ((closureN)self_7313836)->elements[8];
c_7322177.elements[9] = ((closureN)self_7313836)->elements[9];
c_7322177.elements[10] = ((closureN)self_7313836)->elements[10];
c_7322177.elements[11] = ((closureN)self_7313836)->elements[11];
c_7322177.elements[12] = ((closureN)self_7313836)->elements[12];
c_7322177.elements[13] = ((closureN)self_7313836)->elements[13];
c_7322177.elements[14] = ((closureN)self_7313836)->elements[14];
c_7322177.elements[15] = ((closureN)self_7313836)->elements[15];
c_7322177.elements[16] = ((closureN)self_7313836)->elements[16];
c_7322177.elements[17] = ((closureN)self_7313836)->elements[17];
c_7322177.elements[18] = ((closureN)self_7313836)->elements[18];
c_7322177.elements[19] = ((closureN)self_7313836)->elements[19];
c_7322177.elements[20] = ((closureN)self_7313836)->elements[20];
c_7322177.elements[21] = ((closureN)self_7313836)->elements[21];
c_7322177.elements[22] = ((closureN)self_7313836)->elements[22];
c_7322177.elements[23] = ((closureN)self_7313836)->elements[23];
c_7322177.elements[24] = ((closureN)self_7313836)->elements[24];
c_7322177.elements[25] = ((closureN)self_7313836)->elements[25];
c_7322177.elements[26] = ((closureN)self_7313836)->elements[26];
c_7322177.elements[27] = ((closureN)self_7313836)->elements[27];
c_7322177.elements[28] = ((closureN)self_7313836)->elements[28];
c_7322177.elements[29] = ((closureN)self_7313836)->elements[29];
c_7322177.elements[30] = ((closureN)self_7313836)->elements[30];
c_7322177.elements[31] = ((closureN)self_7313836)->elements[31];
c_7322177.elements[32] = ((closureN)self_7313836)->elements[32];
c_7322177.elements[33] = ((closureN)self_7313836)->elements[33];
c_7322177.elements[34] = ((closureN)self_7313836)->elements[34];
c_7322177.elements[35] = ((closureN)self_7313836)->elements[35];
c_7322177.elements[36] = ((closureN)self_7313836)->elements[36];
c_7322177.elements[37] = ((closureN)self_7313836)->elements[37];
c_7322177.elements[38] = ((closureN)self_7313836)->elements[38];
c_7322177.elements[39] = ((closureN)self_7313836)->elements[39];
c_7322177.elements[40] = ((closureN)self_7313836)->elements[40];
c_7322177.elements[41] = ((closureN)self_7313836)->elements[41];
c_7322177.elements[42] = ((closureN)self_7313836)->elements[42];
c_7322177.elements[43] = ((closureN)self_7313836)->elements[44];
c_7322177.elements[44] = ((closureN)self_7313836)->elements[45];
c_7322177.elements[45] = free_91vars_733613;
c_7322177.elements[46] = ((closureN)self_7313836)->elements[46];
c_7322177.elements[47] = ((closureN)self_7313836)->elements[47];
c_7322177.elements[48] = ((closureN)self_7313836)->elements[48];
c_7322177.elements[49] = ((closureN)self_7313836)->elements[49];


pair_type local_7324004; 
return_direct_with_clo1(data,(closure)&c_7322177,__lambda_1429,  set_cell_as_expr(&local_7324004, ((closureN)self_7313836)->elements[43]));; 
}

static void __lambda_1429(void *data, object self_7313837, int argc, object *args) /* object self_7313837, object expand_91template_733614 */
 {
 object expand_91template_733614 = args[0];
  object r_736765;
  if( (boolean_f != ((closureN)self_7313837)->elements[39]) ){ 
  
  r_736765 = Cyc_cadr(data, ((closureN)self_7313837)->elements[43]);
} else { 
  r_736765 = quote__93_93_93;}
;
closureN_type c_7322187;
object e_7324000 [51];
c_7322187.hdr.mark = gc_color_red;
 c_7322187.hdr.grayed = 0;
c_7322187.tag = closureN_tag;
 c_7322187.fn = (function_type)__lambda_850;
c_7322187.num_args = 1;
c_7322187.num_elements = 51;
c_7322187.elements = (object *)e_7324000;
c_7322187.elements[0] = ((closureN)self_7313837)->elements[0];
c_7322187.elements[1] = ((closureN)self_7313837)->elements[1];
c_7322187.elements[2] = ((closureN)self_7313837)->elements[2];
c_7322187.elements[3] = ((closureN)self_7313837)->elements[3];
c_7322187.elements[4] = ((closureN)self_7313837)->elements[4];
c_7322187.elements[5] = ((closureN)self_7313837)->elements[5];
c_7322187.elements[6] = ((closureN)self_7313837)->elements[6];
c_7322187.elements[7] = ((closureN)self_7313837)->elements[7];
c_7322187.elements[8] = ((closureN)self_7313837)->elements[8];
c_7322187.elements[9] = ((closureN)self_7313837)->elements[9];
c_7322187.elements[10] = ((closureN)self_7313837)->elements[10];
c_7322187.elements[11] = ((closureN)self_7313837)->elements[11];
c_7322187.elements[12] = ((closureN)self_7313837)->elements[12];
c_7322187.elements[13] = ((closureN)self_7313837)->elements[13];
c_7322187.elements[14] = ((closureN)self_7313837)->elements[14];
c_7322187.elements[15] = ((closureN)self_7313837)->elements[15];
c_7322187.elements[16] = ((closureN)self_7313837)->elements[16];
c_7322187.elements[17] = ((closureN)self_7313837)->elements[17];
c_7322187.elements[18] = ((closureN)self_7313837)->elements[18];
c_7322187.elements[19] = ((closureN)self_7313837)->elements[19];
c_7322187.elements[20] = ((closureN)self_7313837)->elements[20];
c_7322187.elements[21] = ((closureN)self_7313837)->elements[21];
c_7322187.elements[22] = ((closureN)self_7313837)->elements[22];
c_7322187.elements[23] = ((closureN)self_7313837)->elements[23];
c_7322187.elements[24] = ((closureN)self_7313837)->elements[24];
c_7322187.elements[25] = ((closureN)self_7313837)->elements[25];
c_7322187.elements[26] = ((closureN)self_7313837)->elements[26];
c_7322187.elements[27] = ((closureN)self_7313837)->elements[27];
c_7322187.elements[28] = ((closureN)self_7313837)->elements[28];
c_7322187.elements[29] = ((closureN)self_7313837)->elements[29];
c_7322187.elements[30] = ((closureN)self_7313837)->elements[30];
c_7322187.elements[31] = ((closureN)self_7313837)->elements[31];
c_7322187.elements[32] = ((closureN)self_7313837)->elements[32];
c_7322187.elements[33] = ((closureN)self_7313837)->elements[33];
c_7322187.elements[34] = ((closureN)self_7313837)->elements[34];
c_7322187.elements[35] = ((closureN)self_7313837)->elements[35];
c_7322187.elements[36] = ((closureN)self_7313837)->elements[36];
c_7322187.elements[37] = ((closureN)self_7313837)->elements[37];
c_7322187.elements[38] = ((closureN)self_7313837)->elements[38];
c_7322187.elements[39] = ((closureN)self_7313837)->elements[39];
c_7322187.elements[40] = ((closureN)self_7313837)->elements[40];
c_7322187.elements[41] = ((closureN)self_7313837)->elements[41];
c_7322187.elements[42] = ((closureN)self_7313837)->elements[42];
c_7322187.elements[43] = expand_91template_733614;
c_7322187.elements[44] = ((closureN)self_7313837)->elements[43];
c_7322187.elements[45] = ((closureN)self_7313837)->elements[44];
c_7322187.elements[46] = ((closureN)self_7313837)->elements[45];
c_7322187.elements[47] = ((closureN)self_7313837)->elements[46];
c_7322187.elements[48] = ((closureN)self_7313837)->elements[47];
c_7322187.elements[49] = ((closureN)self_7313837)->elements[48];
c_7322187.elements[50] = ((closureN)self_7313837)->elements[49];

return_closcall2(data,  ((closureN)self_7313837)->elements[49],  &c_7322187, r_736765);; 
}

static void __lambda_850(void *data, object self_7313838, int argc, object *args) /* object self_7313838, object r_736764 */
 {
 object r_736764 = args[0];
  
closureN_type c_7322189;
object e_7323996 [51];
c_7322189.hdr.mark = gc_color_red;
 c_7322189.hdr.grayed = 0;
c_7322189.tag = closureN_tag;
 c_7322189.fn = (function_type)__lambda_851;
c_7322189.num_args = 1;
c_7322189.num_elements = 51;
c_7322189.elements = (object *)e_7323996;
c_7322189.elements[0] = ((closureN)self_7313838)->elements[0];
c_7322189.elements[1] = ((closureN)self_7313838)->elements[1];
c_7322189.elements[2] = ((closureN)self_7313838)->elements[2];
c_7322189.elements[3] = ((closureN)self_7313838)->elements[3];
c_7322189.elements[4] = ((closureN)self_7313838)->elements[4];
c_7322189.elements[5] = ((closureN)self_7313838)->elements[5];
c_7322189.elements[6] = ((closureN)self_7313838)->elements[6];
c_7322189.elements[7] = ((closureN)self_7313838)->elements[7];
c_7322189.elements[8] = ((closureN)self_7313838)->elements[8];
c_7322189.elements[9] = ((closureN)self_7313838)->elements[9];
c_7322189.elements[10] = ((closureN)self_7313838)->elements[10];
c_7322189.elements[11] = ((closureN)self_7313838)->elements[11];
c_7322189.elements[12] = ((closureN)self_7313838)->elements[12];
c_7322189.elements[13] = ((closureN)self_7313838)->elements[13];
c_7322189.elements[14] = ((closureN)self_7313838)->elements[14];
c_7322189.elements[15] = ((closureN)self_7313838)->elements[15];
c_7322189.elements[16] = ((closureN)self_7313838)->elements[16];
c_7322189.elements[17] = ((closureN)self_7313838)->elements[17];
c_7322189.elements[18] = ((closureN)self_7313838)->elements[18];
c_7322189.elements[19] = ((closureN)self_7313838)->elements[19];
c_7322189.elements[20] = ((closureN)self_7313838)->elements[20];
c_7322189.elements[21] = ((closureN)self_7313838)->elements[21];
c_7322189.elements[22] = ((closureN)self_7313838)->elements[22];
c_7322189.elements[23] = ((closureN)self_7313838)->elements[23];
c_7322189.elements[24] = ((closureN)self_7313838)->elements[24];
c_7322189.elements[25] = ((closureN)self_7313838)->elements[25];
c_7322189.elements[26] = ((closureN)self_7313838)->elements[26];
c_7322189.elements[27] = ((closureN)self_7313838)->elements[27];
c_7322189.elements[28] = ((closureN)self_7313838)->elements[28];
c_7322189.elements[29] = ((closureN)self_7313838)->elements[29];
c_7322189.elements[30] = ((closureN)self_7313838)->elements[30];
c_7322189.elements[31] = ((closureN)self_7313838)->elements[31];
c_7322189.elements[32] = ((closureN)self_7313838)->elements[32];
c_7322189.elements[33] = ((closureN)self_7313838)->elements[33];
c_7322189.elements[34] = ((closureN)self_7313838)->elements[34];
c_7322189.elements[35] = ((closureN)self_7313838)->elements[35];
c_7322189.elements[36] = ((closureN)self_7313838)->elements[36];
c_7322189.elements[37] = ((closureN)self_7313838)->elements[37];
c_7322189.elements[38] = ((closureN)self_7313838)->elements[38];
c_7322189.elements[39] = ((closureN)self_7313838)->elements[39];
c_7322189.elements[40] = ((closureN)self_7313838)->elements[40];
c_7322189.elements[41] = ((closureN)self_7313838)->elements[41];
c_7322189.elements[42] = ((closureN)self_7313838)->elements[42];
c_7322189.elements[43] = ((closureN)self_7313838)->elements[43];
c_7322189.elements[44] = ((closureN)self_7313838)->elements[44];
c_7322189.elements[45] = ((closureN)self_7313838)->elements[45];
c_7322189.elements[46] = ((closureN)self_7313838)->elements[46];
c_7322189.elements[47] = ((closureN)self_7313838)->elements[47];
c_7322189.elements[48] = ((closureN)self_7313838)->elements[48];
c_7322189.elements[49] = ((closureN)self_7313838)->elements[49];
c_7322189.elements[50] = ((closureN)self_7313838)->elements[50];



return_direct_with_clo1(data,(closure)&c_7322189,__lambda_851,  Cyc_set_cell(data, ((closureN)self_7313838)->elements[36], r_736764));; 
}

static void __lambda_851(void *data, object self_7313839, int argc, object *args) /* object self_7313839, object r_736384 */
 {

  
closureN_type c_7322191;
object e_7322203 [2];
c_7322191.hdr.mark = gc_color_red;
 c_7322191.hdr.grayed = 0;
c_7322191.tag = closureN_tag;
 c_7322191.fn = (function_type)__lambda_852;
c_7322191.num_args = 0;
c_7322191.num_elements = 2;
c_7322191.elements = (object *)e_7322203;
c_7322191.elements[0] = ((closureN)self_7313839)->elements[39];
c_7322191.elements[1] = ((closureN)self_7313839)->elements[44];


closureN_type c_7322204;
object e_7323995 [51];
c_7322204.hdr.mark = gc_color_red;
 c_7322204.hdr.grayed = 0;
c_7322204.tag = closureN_tag;
 c_7322204.fn = (function_type)__lambda_853;
c_7322204.num_args = 1;
c_7322204.num_elements = 51;
c_7322204.elements = (object *)e_7323995;
c_7322204.elements[0] = ((closureN)self_7313839)->elements[0];
c_7322204.elements[1] = ((closureN)self_7313839)->elements[1];
c_7322204.elements[2] = ((closureN)self_7313839)->elements[2];
c_7322204.elements[3] = ((closureN)self_7313839)->elements[3];
c_7322204.elements[4] = ((closureN)self_7313839)->elements[4];
c_7322204.elements[5] = ((closureN)self_7313839)->elements[5];
c_7322204.elements[6] = ((closureN)self_7313839)->elements[6];
c_7322204.elements[7] = ((closureN)self_7313839)->elements[7];
c_7322204.elements[8] = ((closureN)self_7313839)->elements[8];
c_7322204.elements[9] = ((closureN)self_7313839)->elements[9];
c_7322204.elements[10] = ((closureN)self_7313839)->elements[10];
c_7322204.elements[11] = ((closureN)self_7313839)->elements[11];
c_7322204.elements[12] = ((closureN)self_7313839)->elements[12];
c_7322204.elements[13] = ((closureN)self_7313839)->elements[13];
c_7322204.elements[14] = ((closureN)self_7313839)->elements[14];
c_7322204.elements[15] = ((closureN)self_7313839)->elements[15];
c_7322204.elements[16] = ((closureN)self_7313839)->elements[16];
c_7322204.elements[17] = ((closureN)self_7313839)->elements[17];
c_7322204.elements[18] = ((closureN)self_7313839)->elements[18];
c_7322204.elements[19] = ((closureN)self_7313839)->elements[19];
c_7322204.elements[20] = ((closureN)self_7313839)->elements[20];
c_7322204.elements[21] = ((closureN)self_7313839)->elements[21];
c_7322204.elements[22] = ((closureN)self_7313839)->elements[22];
c_7322204.elements[23] = ((closureN)self_7313839)->elements[23];
c_7322204.elements[24] = ((closureN)self_7313839)->elements[24];
c_7322204.elements[25] = ((closureN)self_7313839)->elements[25];
c_7322204.elements[26] = ((closureN)self_7313839)->elements[26];
c_7322204.elements[27] = ((closureN)self_7313839)->elements[27];
c_7322204.elements[28] = ((closureN)self_7313839)->elements[28];
c_7322204.elements[29] = ((closureN)self_7313839)->elements[29];
c_7322204.elements[30] = ((closureN)self_7313839)->elements[30];
c_7322204.elements[31] = ((closureN)self_7313839)->elements[31];
c_7322204.elements[32] = ((closureN)self_7313839)->elements[32];
c_7322204.elements[33] = ((closureN)self_7313839)->elements[33];
c_7322204.elements[34] = ((closureN)self_7313839)->elements[34];
c_7322204.elements[35] = ((closureN)self_7313839)->elements[35];
c_7322204.elements[36] = ((closureN)self_7313839)->elements[36];
c_7322204.elements[37] = ((closureN)self_7313839)->elements[37];
c_7322204.elements[38] = ((closureN)self_7313839)->elements[38];
c_7322204.elements[39] = ((closureN)self_7313839)->elements[39];
c_7322204.elements[40] = ((closureN)self_7313839)->elements[40];
c_7322204.elements[41] = ((closureN)self_7313839)->elements[41];
c_7322204.elements[42] = ((closureN)self_7313839)->elements[42];
c_7322204.elements[43] = ((closureN)self_7313839)->elements[43];
c_7322204.elements[44] = ((closureN)self_7313839)->elements[44];
c_7322204.elements[45] = ((closureN)self_7313839)->elements[45];
c_7322204.elements[46] = ((closureN)self_7313839)->elements[46];
c_7322204.elements[47] = ((closureN)self_7313839)->elements[47];
c_7322204.elements[48] = ((closureN)self_7313839)->elements[48];
c_7322204.elements[49] = ((closureN)self_7313839)->elements[49];
c_7322204.elements[50] = ((closureN)self_7313839)->elements[50];

return_direct_with_clo1(data,(closure)&c_7322191,__lambda_852,  &c_7322204);; 
}

static void __lambda_853(void *data, object self_7313840, int argc, object *args) /* object self_7313840, object r_736761 */
 {
 object r_736761 = args[0];
  
closureN_type c_7322206;
object e_7323991 [51];
c_7322206.hdr.mark = gc_color_red;
 c_7322206.hdr.grayed = 0;
c_7322206.tag = closureN_tag;
 c_7322206.fn = (function_type)__lambda_854;
c_7322206.num_args = 1;
c_7322206.num_elements = 51;
c_7322206.elements = (object *)e_7323991;
c_7322206.elements[0] = ((closureN)self_7313840)->elements[0];
c_7322206.elements[1] = ((closureN)self_7313840)->elements[1];
c_7322206.elements[2] = ((closureN)self_7313840)->elements[2];
c_7322206.elements[3] = ((closureN)self_7313840)->elements[3];
c_7322206.elements[4] = ((closureN)self_7313840)->elements[4];
c_7322206.elements[5] = ((closureN)self_7313840)->elements[5];
c_7322206.elements[6] = ((closureN)self_7313840)->elements[6];
c_7322206.elements[7] = ((closureN)self_7313840)->elements[7];
c_7322206.elements[8] = ((closureN)self_7313840)->elements[8];
c_7322206.elements[9] = ((closureN)self_7313840)->elements[9];
c_7322206.elements[10] = ((closureN)self_7313840)->elements[10];
c_7322206.elements[11] = ((closureN)self_7313840)->elements[11];
c_7322206.elements[12] = ((closureN)self_7313840)->elements[12];
c_7322206.elements[13] = ((closureN)self_7313840)->elements[13];
c_7322206.elements[14] = ((closureN)self_7313840)->elements[14];
c_7322206.elements[15] = ((closureN)self_7313840)->elements[15];
c_7322206.elements[16] = ((closureN)self_7313840)->elements[16];
c_7322206.elements[17] = ((closureN)self_7313840)->elements[17];
c_7322206.elements[18] = ((closureN)self_7313840)->elements[18];
c_7322206.elements[19] = ((closureN)self_7313840)->elements[19];
c_7322206.elements[20] = ((closureN)self_7313840)->elements[20];
c_7322206.elements[21] = ((closureN)self_7313840)->elements[21];
c_7322206.elements[22] = ((closureN)self_7313840)->elements[22];
c_7322206.elements[23] = ((closureN)self_7313840)->elements[23];
c_7322206.elements[24] = ((closureN)self_7313840)->elements[24];
c_7322206.elements[25] = ((closureN)self_7313840)->elements[25];
c_7322206.elements[26] = ((closureN)self_7313840)->elements[26];
c_7322206.elements[27] = ((closureN)self_7313840)->elements[27];
c_7322206.elements[28] = ((closureN)self_7313840)->elements[28];
c_7322206.elements[29] = ((closureN)self_7313840)->elements[29];
c_7322206.elements[30] = ((closureN)self_7313840)->elements[30];
c_7322206.elements[31] = ((closureN)self_7313840)->elements[31];
c_7322206.elements[32] = ((closureN)self_7313840)->elements[32];
c_7322206.elements[33] = ((closureN)self_7313840)->elements[33];
c_7322206.elements[34] = ((closureN)self_7313840)->elements[34];
c_7322206.elements[35] = ((closureN)self_7313840)->elements[35];
c_7322206.elements[36] = ((closureN)self_7313840)->elements[36];
c_7322206.elements[37] = ((closureN)self_7313840)->elements[37];
c_7322206.elements[38] = ((closureN)self_7313840)->elements[38];
c_7322206.elements[39] = ((closureN)self_7313840)->elements[39];
c_7322206.elements[40] = ((closureN)self_7313840)->elements[40];
c_7322206.elements[41] = ((closureN)self_7313840)->elements[41];
c_7322206.elements[42] = ((closureN)self_7313840)->elements[42];
c_7322206.elements[43] = ((closureN)self_7313840)->elements[43];
c_7322206.elements[44] = ((closureN)self_7313840)->elements[44];
c_7322206.elements[45] = ((closureN)self_7313840)->elements[45];
c_7322206.elements[46] = ((closureN)self_7313840)->elements[46];
c_7322206.elements[47] = ((closureN)self_7313840)->elements[47];
c_7322206.elements[48] = ((closureN)self_7313840)->elements[48];
c_7322206.elements[49] = ((closureN)self_7313840)->elements[49];
c_7322206.elements[50] = ((closureN)self_7313840)->elements[50];



return_direct_with_clo1(data,(closure)&c_7322206,__lambda_854,  Cyc_set_cell(data, ((closureN)self_7313840)->elements[48], r_736761));; 
}

static void __lambda_854(void *data, object self_7313841, int argc, object *args) /* object self_7313841, object r_736385 */
 {

  
closureN_type c_7322208;
object e_7322220 [2];
c_7322208.hdr.mark = gc_color_red;
 c_7322208.hdr.grayed = 0;
c_7322208.tag = closureN_tag;
 c_7322208.fn = (function_type)__lambda_855;
c_7322208.num_args = 0;
c_7322208.num_elements = 2;
c_7322208.elements = (object *)e_7322220;
c_7322208.elements[0] = ((closureN)self_7313841)->elements[39];
c_7322208.elements[1] = ((closureN)self_7313841)->elements[44];


closureN_type c_7322221;
object e_7323990 [50];
c_7322221.hdr.mark = gc_color_red;
 c_7322221.hdr.grayed = 0;
c_7322221.tag = closureN_tag;
 c_7322221.fn = (function_type)__lambda_856;
c_7322221.num_args = 1;
c_7322221.num_elements = 50;
c_7322221.elements = (object *)e_7323990;
c_7322221.elements[0] = ((closureN)self_7313841)->elements[0];
c_7322221.elements[1] = ((closureN)self_7313841)->elements[1];
c_7322221.elements[2] = ((closureN)self_7313841)->elements[2];
c_7322221.elements[3] = ((closureN)self_7313841)->elements[3];
c_7322221.elements[4] = ((closureN)self_7313841)->elements[4];
c_7322221.elements[5] = ((closureN)self_7313841)->elements[5];
c_7322221.elements[6] = ((closureN)self_7313841)->elements[6];
c_7322221.elements[7] = ((closureN)self_7313841)->elements[7];
c_7322221.elements[8] = ((closureN)self_7313841)->elements[8];
c_7322221.elements[9] = ((closureN)self_7313841)->elements[9];
c_7322221.elements[10] = ((closureN)self_7313841)->elements[10];
c_7322221.elements[11] = ((closureN)self_7313841)->elements[11];
c_7322221.elements[12] = ((closureN)self_7313841)->elements[12];
c_7322221.elements[13] = ((closureN)self_7313841)->elements[13];
c_7322221.elements[14] = ((closureN)self_7313841)->elements[14];
c_7322221.elements[15] = ((closureN)self_7313841)->elements[15];
c_7322221.elements[16] = ((closureN)self_7313841)->elements[16];
c_7322221.elements[17] = ((closureN)self_7313841)->elements[17];
c_7322221.elements[18] = ((closureN)self_7313841)->elements[18];
c_7322221.elements[19] = ((closureN)self_7313841)->elements[19];
c_7322221.elements[20] = ((closureN)self_7313841)->elements[20];
c_7322221.elements[21] = ((closureN)self_7313841)->elements[21];
c_7322221.elements[22] = ((closureN)self_7313841)->elements[22];
c_7322221.elements[23] = ((closureN)self_7313841)->elements[23];
c_7322221.elements[24] = ((closureN)self_7313841)->elements[24];
c_7322221.elements[25] = ((closureN)self_7313841)->elements[25];
c_7322221.elements[26] = ((closureN)self_7313841)->elements[26];
c_7322221.elements[27] = ((closureN)self_7313841)->elements[27];
c_7322221.elements[28] = ((closureN)self_7313841)->elements[28];
c_7322221.elements[29] = ((closureN)self_7313841)->elements[29];
c_7322221.elements[30] = ((closureN)self_7313841)->elements[30];
c_7322221.elements[31] = ((closureN)self_7313841)->elements[31];
c_7322221.elements[32] = ((closureN)self_7313841)->elements[32];
c_7322221.elements[33] = ((closureN)self_7313841)->elements[33];
c_7322221.elements[34] = ((closureN)self_7313841)->elements[34];
c_7322221.elements[35] = ((closureN)self_7313841)->elements[35];
c_7322221.elements[36] = ((closureN)self_7313841)->elements[36];
c_7322221.elements[37] = ((closureN)self_7313841)->elements[37];
c_7322221.elements[38] = ((closureN)self_7313841)->elements[38];
c_7322221.elements[39] = ((closureN)self_7313841)->elements[40];
c_7322221.elements[40] = ((closureN)self_7313841)->elements[41];
c_7322221.elements[41] = ((closureN)self_7313841)->elements[42];
c_7322221.elements[42] = ((closureN)self_7313841)->elements[43];
c_7322221.elements[43] = ((closureN)self_7313841)->elements[44];
c_7322221.elements[44] = ((closureN)self_7313841)->elements[45];
c_7322221.elements[45] = ((closureN)self_7313841)->elements[46];
c_7322221.elements[46] = ((closureN)self_7313841)->elements[47];
c_7322221.elements[47] = ((closureN)self_7313841)->elements[48];
c_7322221.elements[48] = ((closureN)self_7313841)->elements[49];
c_7322221.elements[49] = ((closureN)self_7313841)->elements[50];

return_direct_with_clo1(data,(closure)&c_7322208,__lambda_855,  &c_7322221);; 
}

static void __lambda_856(void *data, object self_7313842, int argc, object *args) /* object self_7313842, object r_736758 */
 {
 object r_736758 = args[0];
  
closureN_type c_7322223;
object e_7323986 [50];
c_7322223.hdr.mark = gc_color_red;
 c_7322223.hdr.grayed = 0;
c_7322223.tag = closureN_tag;
 c_7322223.fn = (function_type)__lambda_857;
c_7322223.num_args = 1;
c_7322223.num_elements = 50;
c_7322223.elements = (object *)e_7323986;
c_7322223.elements[0] = ((closureN)self_7313842)->elements[0];
c_7322223.elements[1] = ((closureN)self_7313842)->elements[1];
c_7322223.elements[2] = ((closureN)self_7313842)->elements[2];
c_7322223.elements[3] = ((closureN)self_7313842)->elements[3];
c_7322223.elements[4] = ((closureN)self_7313842)->elements[4];
c_7322223.elements[5] = ((closureN)self_7313842)->elements[5];
c_7322223.elements[6] = ((closureN)self_7313842)->elements[6];
c_7322223.elements[7] = ((closureN)self_7313842)->elements[7];
c_7322223.elements[8] = ((closureN)self_7313842)->elements[8];
c_7322223.elements[9] = ((closureN)self_7313842)->elements[9];
c_7322223.elements[10] = ((closureN)self_7313842)->elements[10];
c_7322223.elements[11] = ((closureN)self_7313842)->elements[11];
c_7322223.elements[12] = ((closureN)self_7313842)->elements[12];
c_7322223.elements[13] = ((closureN)self_7313842)->elements[13];
c_7322223.elements[14] = ((closureN)self_7313842)->elements[14];
c_7322223.elements[15] = ((closureN)self_7313842)->elements[15];
c_7322223.elements[16] = ((closureN)self_7313842)->elements[16];
c_7322223.elements[17] = ((closureN)self_7313842)->elements[17];
c_7322223.elements[18] = ((closureN)self_7313842)->elements[18];
c_7322223.elements[19] = ((closureN)self_7313842)->elements[19];
c_7322223.elements[20] = ((closureN)self_7313842)->elements[20];
c_7322223.elements[21] = ((closureN)self_7313842)->elements[21];
c_7322223.elements[22] = ((closureN)self_7313842)->elements[22];
c_7322223.elements[23] = ((closureN)self_7313842)->elements[23];
c_7322223.elements[24] = ((closureN)self_7313842)->elements[24];
c_7322223.elements[25] = ((closureN)self_7313842)->elements[25];
c_7322223.elements[26] = ((closureN)self_7313842)->elements[26];
c_7322223.elements[27] = ((closureN)self_7313842)->elements[27];
c_7322223.elements[28] = ((closureN)self_7313842)->elements[28];
c_7322223.elements[29] = ((closureN)self_7313842)->elements[29];
c_7322223.elements[30] = ((closureN)self_7313842)->elements[30];
c_7322223.elements[31] = ((closureN)self_7313842)->elements[31];
c_7322223.elements[32] = ((closureN)self_7313842)->elements[32];
c_7322223.elements[33] = ((closureN)self_7313842)->elements[33];
c_7322223.elements[34] = ((closureN)self_7313842)->elements[34];
c_7322223.elements[35] = ((closureN)self_7313842)->elements[35];
c_7322223.elements[36] = ((closureN)self_7313842)->elements[36];
c_7322223.elements[37] = ((closureN)self_7313842)->elements[37];
c_7322223.elements[38] = ((closureN)self_7313842)->elements[38];
c_7322223.elements[39] = ((closureN)self_7313842)->elements[39];
c_7322223.elements[40] = ((closureN)self_7313842)->elements[40];
c_7322223.elements[41] = ((closureN)self_7313842)->elements[41];
c_7322223.elements[42] = ((closureN)self_7313842)->elements[42];
c_7322223.elements[43] = ((closureN)self_7313842)->elements[43];
c_7322223.elements[44] = ((closureN)self_7313842)->elements[44];
c_7322223.elements[45] = ((closureN)self_7313842)->elements[45];
c_7322223.elements[46] = ((closureN)self_7313842)->elements[46];
c_7322223.elements[47] = ((closureN)self_7313842)->elements[47];
c_7322223.elements[48] = ((closureN)self_7313842)->elements[48];
c_7322223.elements[49] = ((closureN)self_7313842)->elements[49];



return_direct_with_clo1(data,(closure)&c_7322223,__lambda_857,  Cyc_set_cell(data, ((closureN)self_7313842)->elements[44], r_736758));; 
}

static void __lambda_857(void *data, object self_7313843, int argc, object *args) /* object self_7313843, object r_736386 */
 {

  
closureN_type c_7322225;
object e_7323947 [48];
c_7322225.hdr.mark = gc_color_red;
 c_7322225.hdr.grayed = 0;
c_7322225.tag = closureN_tag;
 c_7322225.fn = (function_type)__lambda_858;
c_7322225.num_args = 1;
c_7322225.num_elements = 48;
c_7322225.elements = (object *)e_7323947;
c_7322225.elements[0] = ((closureN)self_7313843)->elements[0];
c_7322225.elements[1] = ((closureN)self_7313843)->elements[1];
c_7322225.elements[2] = ((closureN)self_7313843)->elements[2];
c_7322225.elements[3] = ((closureN)self_7313843)->elements[3];
c_7322225.elements[4] = ((closureN)self_7313843)->elements[4];
c_7322225.elements[5] = ((closureN)self_7313843)->elements[5];
c_7322225.elements[6] = ((closureN)self_7313843)->elements[6];
c_7322225.elements[7] = ((closureN)self_7313843)->elements[7];
c_7322225.elements[8] = ((closureN)self_7313843)->elements[8];
c_7322225.elements[9] = ((closureN)self_7313843)->elements[9];
c_7322225.elements[10] = ((closureN)self_7313843)->elements[10];
c_7322225.elements[11] = ((closureN)self_7313843)->elements[11];
c_7322225.elements[12] = ((closureN)self_7313843)->elements[12];
c_7322225.elements[13] = ((closureN)self_7313843)->elements[13];
c_7322225.elements[14] = ((closureN)self_7313843)->elements[14];
c_7322225.elements[15] = ((closureN)self_7313843)->elements[15];
c_7322225.elements[16] = ((closureN)self_7313843)->elements[16];
c_7322225.elements[17] = ((closureN)self_7313843)->elements[17];
c_7322225.elements[18] = ((closureN)self_7313843)->elements[18];
c_7322225.elements[19] = ((closureN)self_7313843)->elements[19];
c_7322225.elements[20] = ((closureN)self_7313843)->elements[20];
c_7322225.elements[21] = ((closureN)self_7313843)->elements[21];
c_7322225.elements[22] = ((closureN)self_7313843)->elements[22];
c_7322225.elements[23] = ((closureN)self_7313843)->elements[23];
c_7322225.elements[24] = ((closureN)self_7313843)->elements[24];
c_7322225.elements[25] = ((closureN)self_7313843)->elements[25];
c_7322225.elements[26] = ((closureN)self_7313843)->elements[26];
c_7322225.elements[27] = ((closureN)self_7313843)->elements[27];
c_7322225.elements[28] = ((closureN)self_7313843)->elements[28];
c_7322225.elements[29] = ((closureN)self_7313843)->elements[29];
c_7322225.elements[30] = ((closureN)self_7313843)->elements[30];
c_7322225.elements[31] = ((closureN)self_7313843)->elements[31];
c_7322225.elements[32] = ((closureN)self_7313843)->elements[32];
c_7322225.elements[33] = ((closureN)self_7313843)->elements[33];
c_7322225.elements[34] = ((closureN)self_7313843)->elements[34];
c_7322225.elements[35] = ((closureN)self_7313843)->elements[36];
c_7322225.elements[36] = ((closureN)self_7313843)->elements[37];
c_7322225.elements[37] = ((closureN)self_7313843)->elements[38];
c_7322225.elements[38] = ((closureN)self_7313843)->elements[39];
c_7322225.elements[39] = ((closureN)self_7313843)->elements[40];
c_7322225.elements[40] = ((closureN)self_7313843)->elements[41];
c_7322225.elements[41] = ((closureN)self_7313843)->elements[42];
c_7322225.elements[42] = ((closureN)self_7313843)->elements[43];
c_7322225.elements[43] = ((closureN)self_7313843)->elements[44];
c_7322225.elements[44] = ((closureN)self_7313843)->elements[45];
c_7322225.elements[45] = ((closureN)self_7313843)->elements[46];
c_7322225.elements[46] = ((closureN)self_7313843)->elements[47];
c_7322225.elements[47] = ((closureN)self_7313843)->elements[48];


closureN_type c_7323948;
object e_7323985 [2];
c_7323948.hdr.mark = gc_color_red;
 c_7323948.hdr.grayed = 0;
c_7323948.tag = closureN_tag;
 c_7323948.fn = (function_type)__lambda_1020;
c_7323948.num_args = 1;
c_7323948.num_elements = 2;
c_7323948.elements = (object *)e_7323985;
c_7323948.elements[0] = ((closureN)self_7313843)->elements[35];
c_7323948.elements[1] = ((closureN)self_7313843)->elements[49];

return_direct_with_clo1(data,(closure)&c_7322225,__lambda_858,  &c_7323948);; 
}

static void __lambda_1020(void *data, object self_7313844, int argc, object *args) /* object self_7313844, object k_736752, object s_731303_733615 */
 {
 object k_736752 = args[0]; object s_731303_733615 = args[1];
  
closureN_type c_7323950;
object e_7323978 [4];
c_7323950.hdr.mark = gc_color_red;
 c_7323950.hdr.grayed = 0;
c_7323950.tag = closureN_tag;
 c_7323950.fn = (function_type)__lambda_1021;
c_7323950.num_args = 1;
c_7323950.num_elements = 4;
c_7323950.elements = (object *)e_7323978;
c_7323950.elements[0] = ((closureN)self_7313844)->elements[0];
c_7323950.elements[1] = k_736752;
c_7323950.elements[2] = ((closureN)self_7313844)->elements[1];
c_7323950.elements[3] = s_731303_733615;


complex_num_type local_7323981; 


return_direct_with_clo1(data,(closure)&c_7323950,__lambda_1021,  Cyc_fast_sum(data,&local_7323981, car(((closureN)self_7313844)->elements[0]), obj_int2obj(1)));; 
}

static void __lambda_1021(void *data, object self_7313845, int argc, object *args) /* object self_7313845, object r_736757 */
 {
 object r_736757 = args[0];
  
closureN_type c_7323952;
object e_7323974 [4];
c_7323952.hdr.mark = gc_color_red;
 c_7323952.hdr.grayed = 0;
c_7323952.tag = closureN_tag;
 c_7323952.fn = (function_type)__lambda_1022;
c_7323952.num_args = 1;
c_7323952.num_elements = 4;
c_7323952.elements = (object *)e_7323974;
c_7323952.elements[0] = ((closureN)self_7313845)->elements[0];
c_7323952.elements[1] = ((closureN)self_7313845)->elements[1];
c_7323952.elements[2] = ((closureN)self_7313845)->elements[2];
c_7323952.elements[3] = ((closureN)self_7313845)->elements[3];



return_direct_with_clo1(data,(closure)&c_7323952,__lambda_1022,  Cyc_set_cell(data, ((closureN)self_7313845)->elements[0], r_736757));; 
}

static void __lambda_1022(void *data, object self_7313846, int argc, object *args) /* object self_7313846, object r_736753 */
 {

  
closureN_type c_7323954;
object e_7323967 [3];
c_7323954.hdr.mark = gc_color_red;
 c_7323954.hdr.grayed = 0;
c_7323954.tag = closureN_tag;
 c_7323954.fn = (function_type)__lambda_1023;
c_7323954.num_args = 1;
c_7323954.num_elements = 3;
c_7323954.elements = (object *)e_7323967;
c_7323954.elements[0] = ((closureN)self_7313846)->elements[1];
c_7323954.elements[1] = ((closureN)self_7313846)->elements[2];
c_7323954.elements[2] = ((closureN)self_7313846)->elements[3];




object c_7323970 = Cyc_number2string2(data,(closure)&c_7323954,1,car(((closureN)self_7313846)->elements[0]));
return_closcall1(data,(closure)&c_7323954,  c_7323970);; 
}

static void __lambda_1023(void *data, object self_7313847, int argc, object *args) /* object self_7313847, object r_736756 */
 {
 object r_736756 = args[0];
  
closureN_type c_7323956;
object e_7323962 [2];
c_7323956.hdr.mark = gc_color_red;
 c_7323956.hdr.grayed = 0;
c_7323956.tag = closureN_tag;
 c_7323956.fn = (function_type)__lambda_1024;
c_7323956.num_args = 1;
c_7323956.num_elements = 2;
c_7323956.elements = (object *)e_7323962;
c_7323956.elements[0] = ((closureN)self_7313847)->elements[0];
c_7323956.elements[1] = ((closureN)self_7313847)->elements[1];


object c_7323965 = Cyc_string_append(data,(closure)&c_7323956,2,((closureN)self_7313847)->elements[2], r_736756);
return_closcall1(data,(closure)&c_7323956,  c_7323965);; 
}

static void __lambda_1024(void *data, object self_7313848, int argc, object *args) /* object self_7313848, object r_736755 */
 {
 object r_736755 = args[0];
  

return_closcall2(data,  ((closureN)self_7313848)->elements[1],  ((closureN)self_7313848)->elements[0], Cyc_string2symbol(data, r_736755));; 
}

static void __lambda_858(void *data, object self_7313849, int argc, object *args) /* object self_7313849, object r_736751 */
 {
 object r_736751 = args[0];
  
closureN_type c_7322227;
object e_7323943 [48];
c_7322227.hdr.mark = gc_color_red;
 c_7322227.hdr.grayed = 0;
c_7322227.tag = closureN_tag;
 c_7322227.fn = (function_type)__lambda_859;
c_7322227.num_args = 1;
c_7322227.num_elements = 48;
c_7322227.elements = (object *)e_7323943;
c_7322227.elements[0] = ((closureN)self_7313849)->elements[0];
c_7322227.elements[1] = ((closureN)self_7313849)->elements[1];
c_7322227.elements[2] = ((closureN)self_7313849)->elements[2];
c_7322227.elements[3] = ((closureN)self_7313849)->elements[3];
c_7322227.elements[4] = ((closureN)self_7313849)->elements[4];
c_7322227.elements[5] = ((closureN)self_7313849)->elements[5];
c_7322227.elements[6] = ((closureN)self_7313849)->elements[6];
c_7322227.elements[7] = ((closureN)self_7313849)->elements[7];
c_7322227.elements[8] = ((closureN)self_7313849)->elements[8];
c_7322227.elements[9] = ((closureN)self_7313849)->elements[9];
c_7322227.elements[10] = ((closureN)self_7313849)->elements[10];
c_7322227.elements[11] = ((closureN)self_7313849)->elements[11];
c_7322227.elements[12] = ((closureN)self_7313849)->elements[12];
c_7322227.elements[13] = ((closureN)self_7313849)->elements[13];
c_7322227.elements[14] = ((closureN)self_7313849)->elements[14];
c_7322227.elements[15] = ((closureN)self_7313849)->elements[15];
c_7322227.elements[16] = ((closureN)self_7313849)->elements[16];
c_7322227.elements[17] = ((closureN)self_7313849)->elements[17];
c_7322227.elements[18] = ((closureN)self_7313849)->elements[18];
c_7322227.elements[19] = ((closureN)self_7313849)->elements[19];
c_7322227.elements[20] = ((closureN)self_7313849)->elements[20];
c_7322227.elements[21] = ((closureN)self_7313849)->elements[21];
c_7322227.elements[22] = ((closureN)self_7313849)->elements[22];
c_7322227.elements[23] = ((closureN)self_7313849)->elements[23];
c_7322227.elements[24] = ((closureN)self_7313849)->elements[24];
c_7322227.elements[25] = ((closureN)self_7313849)->elements[25];
c_7322227.elements[26] = ((closureN)self_7313849)->elements[26];
c_7322227.elements[27] = ((closureN)self_7313849)->elements[27];
c_7322227.elements[28] = ((closureN)self_7313849)->elements[28];
c_7322227.elements[29] = ((closureN)self_7313849)->elements[29];
c_7322227.elements[30] = ((closureN)self_7313849)->elements[30];
c_7322227.elements[31] = ((closureN)self_7313849)->elements[31];
c_7322227.elements[32] = ((closureN)self_7313849)->elements[32];
c_7322227.elements[33] = ((closureN)self_7313849)->elements[33];
c_7322227.elements[34] = ((closureN)self_7313849)->elements[34];
c_7322227.elements[35] = ((closureN)self_7313849)->elements[35];
c_7322227.elements[36] = ((closureN)self_7313849)->elements[36];
c_7322227.elements[37] = ((closureN)self_7313849)->elements[37];
c_7322227.elements[38] = ((closureN)self_7313849)->elements[38];
c_7322227.elements[39] = ((closureN)self_7313849)->elements[39];
c_7322227.elements[40] = ((closureN)self_7313849)->elements[40];
c_7322227.elements[41] = ((closureN)self_7313849)->elements[41];
c_7322227.elements[42] = ((closureN)self_7313849)->elements[42];
c_7322227.elements[43] = ((closureN)self_7313849)->elements[43];
c_7322227.elements[44] = ((closureN)self_7313849)->elements[44];
c_7322227.elements[45] = ((closureN)self_7313849)->elements[45];
c_7322227.elements[46] = ((closureN)self_7313849)->elements[46];
c_7322227.elements[47] = ((closureN)self_7313849)->elements[47];



return_direct_with_clo1(data,(closure)&c_7322227,__lambda_859,  Cyc_set_cell(data, ((closureN)self_7313849)->elements[47], r_736751));; 
}

static void __lambda_859(void *data, object self_7313850, int argc, object *args) /* object self_7313850, object r_736387 */
 {

  
closureN_type c_7322229;
object e_7323086 [29];
c_7322229.hdr.mark = gc_color_red;
 c_7322229.hdr.grayed = 0;
c_7322229.tag = closureN_tag;
 c_7322229.fn = (function_type)__lambda_860;
c_7322229.num_args = 1;
c_7322229.num_elements = 29;
c_7322229.elements = (object *)e_7323086;
c_7322229.elements[0] = ((closureN)self_7313850)->elements[3];
c_7322229.elements[1] = ((closureN)self_7313850)->elements[4];
c_7322229.elements[2] = ((closureN)self_7313850)->elements[5];
c_7322229.elements[3] = ((closureN)self_7313850)->elements[7];
c_7322229.elements[4] = ((closureN)self_7313850)->elements[8];
c_7322229.elements[5] = ((closureN)self_7313850)->elements[9];
c_7322229.elements[6] = ((closureN)self_7313850)->elements[11];
c_7322229.elements[7] = ((closureN)self_7313850)->elements[12];
c_7322229.elements[8] = ((closureN)self_7313850)->elements[13];
c_7322229.elements[9] = ((closureN)self_7313850)->elements[16];
c_7322229.elements[10] = ((closureN)self_7313850)->elements[20];
c_7322229.elements[11] = ((closureN)self_7313850)->elements[23];
c_7322229.elements[12] = ((closureN)self_7313850)->elements[25];
c_7322229.elements[13] = ((closureN)self_7313850)->elements[27];
c_7322229.elements[14] = ((closureN)self_7313850)->elements[28];
c_7322229.elements[15] = ((closureN)self_7313850)->elements[33];
c_7322229.elements[16] = ((closureN)self_7313850)->elements[34];
c_7322229.elements[17] = ((closureN)self_7313850)->elements[35];
c_7322229.elements[18] = ((closureN)self_7313850)->elements[36];
c_7322229.elements[19] = ((closureN)self_7313850)->elements[37];
c_7322229.elements[20] = ((closureN)self_7313850)->elements[38];
c_7322229.elements[21] = ((closureN)self_7313850)->elements[39];
c_7322229.elements[22] = ((closureN)self_7313850)->elements[40];
c_7322229.elements[23] = ((closureN)self_7313850)->elements[41];
c_7322229.elements[24] = ((closureN)self_7313850)->elements[42];
c_7322229.elements[25] = ((closureN)self_7313850)->elements[43];
c_7322229.elements[26] = ((closureN)self_7313850)->elements[44];
c_7322229.elements[27] = ((closureN)self_7313850)->elements[45];
c_7322229.elements[28] = ((closureN)self_7313850)->elements[46];


closureN_type c_7323087;
object e_7323942 [32];
c_7323087.hdr.mark = gc_color_red;
 c_7323087.hdr.grayed = 0;
c_7323087.tag = closureN_tag;
 c_7323087.fn = (function_type)__lambda_958;
c_7323087.num_args = 2;
c_7323087.num_elements = 32;
c_7323087.elements = (object *)e_7323942;
c_7323087.elements[0] = ((closureN)self_7313850)->elements[0];
c_7323087.elements[1] = ((closureN)self_7313850)->elements[1];
c_7323087.elements[2] = ((closureN)self_7313850)->elements[2];
c_7323087.elements[3] = ((closureN)self_7313850)->elements[5];
c_7323087.elements[4] = ((closureN)self_7313850)->elements[6];
c_7323087.elements[5] = ((closureN)self_7313850)->elements[7];
c_7323087.elements[6] = ((closureN)self_7313850)->elements[8];
c_7323087.elements[7] = ((closureN)self_7313850)->elements[9];
c_7323087.elements[8] = ((closureN)self_7313850)->elements[10];
c_7323087.elements[9] = ((closureN)self_7313850)->elements[13];
c_7323087.elements[10] = ((closureN)self_7313850)->elements[14];
c_7323087.elements[11] = ((closureN)self_7313850)->elements[15];
c_7323087.elements[12] = ((closureN)self_7313850)->elements[17];
c_7323087.elements[13] = ((closureN)self_7313850)->elements[18];
c_7323087.elements[14] = ((closureN)self_7313850)->elements[19];
c_7323087.elements[15] = ((closureN)self_7313850)->elements[21];
c_7323087.elements[16] = ((closureN)self_7313850)->elements[22];
c_7323087.elements[17] = ((closureN)self_7313850)->elements[24];
c_7323087.elements[18] = ((closureN)self_7313850)->elements[26];
c_7323087.elements[19] = ((closureN)self_7313850)->elements[27];
c_7323087.elements[20] = ((closureN)self_7313850)->elements[28];
c_7323087.elements[21] = ((closureN)self_7313850)->elements[29];
c_7323087.elements[22] = ((closureN)self_7313850)->elements[30];
c_7323087.elements[23] = ((closureN)self_7313850)->elements[31];
c_7323087.elements[24] = ((closureN)self_7313850)->elements[32];
c_7323087.elements[25] = ((closureN)self_7313850)->elements[33];
c_7323087.elements[26] = ((closureN)self_7313850)->elements[34];
c_7323087.elements[27] = ((closureN)self_7313850)->elements[35];
c_7323087.elements[28] = ((closureN)self_7313850)->elements[39];
c_7323087.elements[29] = ((closureN)self_7313850)->elements[41];
c_7323087.elements[30] = ((closureN)self_7313850)->elements[46];
c_7323087.elements[31] = ((closureN)self_7313850)->elements[47];

return_direct_with_clo1(data,(closure)&c_7322229,__lambda_860,  &c_7323087);; 
}

static void __lambda_958(void *data, object self_7313851, int argc, object *args) /* object self_7313851, object k_736536, object pat_731304_733616, object tmpl_731305_733617 */
 {
 object k_736536 = args[0]; object pat_731304_733616 = args[1]; object tmpl_731305_733617 = args[2];
  
closureN_type c_7323089;
object e_7323926 [33];
c_7323089.hdr.mark = gc_color_red;
 c_7323089.hdr.grayed = 0;
c_7323089.tag = closureN_tag;
 c_7323089.fn = (function_type)__lambda_959;
c_7323089.num_args = 1;
c_7323089.num_elements = 33;
c_7323089.elements = (object *)e_7323926;
c_7323089.elements[0] = ((closureN)self_7313851)->elements[0];
c_7323089.elements[1] = ((closureN)self_7313851)->elements[1];
c_7323089.elements[2] = ((closureN)self_7313851)->elements[2];
c_7323089.elements[3] = ((closureN)self_7313851)->elements[3];
c_7323089.elements[4] = ((closureN)self_7313851)->elements[4];
c_7323089.elements[5] = ((closureN)self_7313851)->elements[5];
c_7323089.elements[6] = ((closureN)self_7313851)->elements[6];
c_7323089.elements[7] = ((closureN)self_7313851)->elements[7];
c_7323089.elements[8] = ((closureN)self_7313851)->elements[8];
c_7323089.elements[9] = ((closureN)self_7313851)->elements[9];
c_7323089.elements[10] = ((closureN)self_7313851)->elements[10];
c_7323089.elements[11] = ((closureN)self_7313851)->elements[11];
c_7323089.elements[12] = ((closureN)self_7313851)->elements[12];
c_7323089.elements[13] = ((closureN)self_7313851)->elements[13];
c_7323089.elements[14] = ((closureN)self_7313851)->elements[14];
c_7323089.elements[15] = ((closureN)self_7313851)->elements[15];
c_7323089.elements[16] = ((closureN)self_7313851)->elements[16];
c_7323089.elements[17] = ((closureN)self_7313851)->elements[17];
c_7323089.elements[18] = ((closureN)self_7313851)->elements[18];
c_7323089.elements[19] = ((closureN)self_7313851)->elements[19];
c_7323089.elements[20] = ((closureN)self_7313851)->elements[20];
c_7323089.elements[21] = ((closureN)self_7313851)->elements[21];
c_7323089.elements[22] = ((closureN)self_7313851)->elements[22];
c_7323089.elements[23] = ((closureN)self_7313851)->elements[23];
c_7323089.elements[24] = ((closureN)self_7313851)->elements[24];
c_7323089.elements[25] = ((closureN)self_7313851)->elements[25];
c_7323089.elements[26] = ((closureN)self_7313851)->elements[26];
c_7323089.elements[27] = ((closureN)self_7313851)->elements[27];
c_7323089.elements[28] = ((closureN)self_7313851)->elements[28];
c_7323089.elements[29] = k_736536;
c_7323089.elements[30] = ((closureN)self_7313851)->elements[30];
c_7323089.elements[31] = ((closureN)self_7313851)->elements[31];
c_7323089.elements[32] = pat_731304_733616;


closureN_type c_7323927;
object e_7323941 [3];
c_7323927.hdr.mark = gc_color_red;
 c_7323927.hdr.grayed = 0;
c_7323927.tag = closureN_tag;
 c_7323927.fn = (function_type)__lambda_1018;
c_7323927.num_args = 1;
c_7323927.num_elements = 3;
c_7323927.elements = (object *)e_7323941;
c_7323927.elements[0] = ((closureN)self_7313851)->elements[6];
c_7323927.elements[1] = ((closureN)self_7313851)->elements[29];
c_7323927.elements[2] = tmpl_731305_733617;

return_direct_with_clo1(data,(closure)&c_7323089,__lambda_959,  &c_7323927);; 
}

static void __lambda_1018(void *data, object self_7313852, int argc, object *args) /* object self_7313852, object k_736749, object vars_731384_733647 */
 {
 object k_736749 = args[0]; object vars_731384_733647 = args[1];
  


closureN_type c_7323932;
object e_7323939 [2];
c_7323932.hdr.mark = gc_color_red;
 c_7323932.hdr.grayed = 0;
c_7323932.tag = closureN_tag;
 c_7323932.fn = (function_type)__lambda_1019;
c_7323932.num_args = 1;
c_7323932.num_elements = 2;
c_7323932.elements = (object *)e_7323939;
c_7323932.elements[0] = ((closureN)self_7313852)->elements[0];
c_7323932.elements[1] = k_736749;

return_closcall3(data,  car(((closureN)self_7313852)->elements[1]),  &c_7323932, ((closureN)self_7313852)->elements[2], vars_731384_733647);; 
}

static void __lambda_1019(void *data, object self_7313853, int argc, object *args) /* object self_7313853, object r_736750 */
 {
 object r_736750 = args[0];
  
list_3_type local_7323937; 
return_direct_with_clo1(data,  ((closureN)self_7313853)->elements[1], (((closure)  ((closureN)self_7313853)->elements[1])->fn),  Cyc_fast_list_3(&local_7323937, ((closureN)self_7313853)->elements[0], r_736750, boolean_f));; 
}

static void __lambda_959(void *data, object self_7313854, int argc, object *args) /* object self_7313854, object r_736540 */
 {
 object r_736540 = args[0];
  
closureN_type c_7323091;
object e_7323917 [31];
c_7323091.hdr.mark = gc_color_red;
 c_7323091.hdr.grayed = 0;
c_7323091.tag = closureN_tag;
 c_7323091.fn = (function_type)__lambda_960;
c_7323091.num_args = 4;
c_7323091.num_elements = 31;
c_7323091.elements = (object *)e_7323917;
c_7323091.elements[0] = ((closureN)self_7313854)->elements[0];
c_7323091.elements[1] = ((closureN)self_7313854)->elements[1];
c_7323091.elements[2] = ((closureN)self_7313854)->elements[2];
c_7323091.elements[3] = ((closureN)self_7313854)->elements[3];
c_7323091.elements[4] = ((closureN)self_7313854)->elements[4];
c_7323091.elements[5] = ((closureN)self_7313854)->elements[5];
c_7323091.elements[6] = ((closureN)self_7313854)->elements[6];
c_7323091.elements[7] = ((closureN)self_7313854)->elements[7];
c_7323091.elements[8] = ((closureN)self_7313854)->elements[8];
c_7323091.elements[9] = ((closureN)self_7313854)->elements[10];
c_7323091.elements[10] = ((closureN)self_7313854)->elements[11];
c_7323091.elements[11] = ((closureN)self_7313854)->elements[12];
c_7323091.elements[12] = ((closureN)self_7313854)->elements[13];
c_7323091.elements[13] = ((closureN)self_7313854)->elements[14];
c_7323091.elements[14] = ((closureN)self_7313854)->elements[15];
c_7323091.elements[15] = ((closureN)self_7313854)->elements[16];
c_7323091.elements[16] = ((closureN)self_7313854)->elements[17];
c_7323091.elements[17] = ((closureN)self_7313854)->elements[18];
c_7323091.elements[18] = ((closureN)self_7313854)->elements[19];
c_7323091.elements[19] = ((closureN)self_7313854)->elements[20];
c_7323091.elements[20] = ((closureN)self_7313854)->elements[21];
c_7323091.elements[21] = ((closureN)self_7313854)->elements[22];
c_7323091.elements[22] = ((closureN)self_7313854)->elements[23];
c_7323091.elements[23] = ((closureN)self_7313854)->elements[24];
c_7323091.elements[24] = ((closureN)self_7313854)->elements[25];
c_7323091.elements[25] = ((closureN)self_7313854)->elements[26];
c_7323091.elements[26] = ((closureN)self_7313854)->elements[27];
c_7323091.elements[27] = ((closureN)self_7313854)->elements[28];
c_7323091.elements[28] = ((closureN)self_7313854)->elements[29];
c_7323091.elements[29] = ((closureN)self_7313854)->elements[30];
c_7323091.elements[30] = ((closureN)self_7313854)->elements[31];




list_2_type local_7323923; 
return_direct_with_clo4(data,(closure)&c_7323091,__lambda_960,  Cyc_cdr(data, ((closureN)self_7313854)->elements[32]), Cyc_fast_list_2(&local_7323923, ((closureN)self_7313854)->elements[4], ((closureN)self_7313854)->elements[9]), NULL, r_736540);; 
}

static void __lambda_960(void *data, object self_7313855, int argc, object *args) /* object self_7313855, object p_731307_733618, object x_731308_733619, object vars_731310_733621, object k_731311_733622 */
 {
 object p_731307_733618 = args[0]; object x_731308_733619 = args[1]; object vars_731310_733621 = args[2]; object k_731311_733622 = args[3];
  
closureN_type c_7323093;
object e_7323916 [35];
c_7323093.hdr.mark = gc_color_red;
 c_7323093.hdr.grayed = 0;
c_7323093.tag = closureN_tag;
 c_7323093.fn = (function_type)__lambda_961;
c_7323093.num_args = 1;
c_7323093.num_elements = 35;
c_7323093.elements = (object *)e_7323916;
c_7323093.elements[0] = ((closureN)self_7313855)->elements[0];
c_7323093.elements[1] = ((closureN)self_7313855)->elements[1];
c_7323093.elements[2] = ((closureN)self_7313855)->elements[2];
c_7323093.elements[3] = ((closureN)self_7313855)->elements[3];
c_7323093.elements[4] = ((closureN)self_7313855)->elements[4];
c_7323093.elements[5] = ((closureN)self_7313855)->elements[5];
c_7323093.elements[6] = ((closureN)self_7313855)->elements[6];
c_7323093.elements[7] = ((closureN)self_7313855)->elements[7];
c_7323093.elements[8] = ((closureN)self_7313855)->elements[8];
c_7323093.elements[9] = ((closureN)self_7313855)->elements[9];
c_7323093.elements[10] = ((closureN)self_7313855)->elements[10];
c_7323093.elements[11] = ((closureN)self_7313855)->elements[11];
c_7323093.elements[12] = ((closureN)self_7313855)->elements[12];
c_7323093.elements[13] = ((closureN)self_7313855)->elements[13];
c_7323093.elements[14] = ((closureN)self_7313855)->elements[14];
c_7323093.elements[15] = ((closureN)self_7313855)->elements[15];
c_7323093.elements[16] = ((closureN)self_7313855)->elements[16];
c_7323093.elements[17] = ((closureN)self_7313855)->elements[17];
c_7323093.elements[18] = ((closureN)self_7313855)->elements[18];
c_7323093.elements[19] = ((closureN)self_7313855)->elements[19];
c_7323093.elements[20] = ((closureN)self_7313855)->elements[20];
c_7323093.elements[21] = ((closureN)self_7313855)->elements[21];
c_7323093.elements[22] = ((closureN)self_7313855)->elements[22];
c_7323093.elements[23] = ((closureN)self_7313855)->elements[23];
c_7323093.elements[24] = ((closureN)self_7313855)->elements[24];
c_7323093.elements[25] = ((closureN)self_7313855)->elements[25];
c_7323093.elements[26] = ((closureN)self_7313855)->elements[26];
c_7323093.elements[27] = ((closureN)self_7313855)->elements[27];
c_7323093.elements[28] = k_731311_733622;
c_7323093.elements[29] = ((closureN)self_7313855)->elements[28];
c_7323093.elements[30] = ((closureN)self_7313855)->elements[29];
c_7323093.elements[31] = ((closureN)self_7313855)->elements[30];
c_7323093.elements[32] = p_731307_733618;
c_7323093.elements[33] = vars_731310_733621;
c_7323093.elements[34] = x_731308_733619;

return_direct_with_clo1(data,(closure)&c_7323093,__lambda_961,  boolean_f);; 
}

static void __lambda_961(void *data, object self_7313856, int argc, object *args) /* object self_7313856, object lp_731312_733623 */
 {
 object lp_731312_733623 = args[0];
  
closureN_type c_7323095;
object e_7323912 [35];
c_7323095.hdr.mark = gc_color_red;
 c_7323095.hdr.grayed = 0;
c_7323095.tag = closureN_tag;
 c_7323095.fn = (function_type)__lambda_1428;
c_7323095.num_args = 1;
c_7323095.num_elements = 35;
c_7323095.elements = (object *)e_7323912;
c_7323095.elements[0] = ((closureN)self_7313856)->elements[0];
c_7323095.elements[1] = ((closureN)self_7313856)->elements[1];
c_7323095.elements[2] = ((closureN)self_7313856)->elements[2];
c_7323095.elements[3] = ((closureN)self_7313856)->elements[3];
c_7323095.elements[4] = ((closureN)self_7313856)->elements[4];
c_7323095.elements[5] = ((closureN)self_7313856)->elements[5];
c_7323095.elements[6] = ((closureN)self_7313856)->elements[6];
c_7323095.elements[7] = ((closureN)self_7313856)->elements[7];
c_7323095.elements[8] = ((closureN)self_7313856)->elements[8];
c_7323095.elements[9] = ((closureN)self_7313856)->elements[9];
c_7323095.elements[10] = ((closureN)self_7313856)->elements[10];
c_7323095.elements[11] = ((closureN)self_7313856)->elements[11];
c_7323095.elements[12] = ((closureN)self_7313856)->elements[12];
c_7323095.elements[13] = ((closureN)self_7313856)->elements[13];
c_7323095.elements[14] = ((closureN)self_7313856)->elements[14];
c_7323095.elements[15] = ((closureN)self_7313856)->elements[15];
c_7323095.elements[16] = ((closureN)self_7313856)->elements[16];
c_7323095.elements[17] = ((closureN)self_7313856)->elements[17];
c_7323095.elements[18] = ((closureN)self_7313856)->elements[18];
c_7323095.elements[19] = ((closureN)self_7313856)->elements[19];
c_7323095.elements[20] = ((closureN)self_7313856)->elements[20];
c_7323095.elements[21] = ((closureN)self_7313856)->elements[21];
c_7323095.elements[22] = ((closureN)self_7313856)->elements[22];
c_7323095.elements[23] = ((closureN)self_7313856)->elements[23];
c_7323095.elements[24] = ((closureN)self_7313856)->elements[24];
c_7323095.elements[25] = ((closureN)self_7313856)->elements[25];
c_7323095.elements[26] = ((closureN)self_7313856)->elements[26];
c_7323095.elements[27] = ((closureN)self_7313856)->elements[27];
c_7323095.elements[28] = ((closureN)self_7313856)->elements[28];
c_7323095.elements[29] = ((closureN)self_7313856)->elements[29];
c_7323095.elements[30] = ((closureN)self_7313856)->elements[30];
c_7323095.elements[31] = ((closureN)self_7313856)->elements[31];
c_7323095.elements[32] = ((closureN)self_7313856)->elements[32];
c_7323095.elements[33] = ((closureN)self_7313856)->elements[33];
c_7323095.elements[34] = ((closureN)self_7313856)->elements[34];


pair_type local_7323915; 
return_direct_with_clo1(data,(closure)&c_7323095,__lambda_1428,  set_cell_as_expr(&local_7323915, lp_731312_733623));; 
}

static void __lambda_1428(void *data, object self_7313857, int argc, object *args) /* object self_7313857, object lp_731312_733623 */
 {
 object lp_731312_733623 = args[0];
  
closureN_type c_7323097;
object e_7323113 [6];
c_7323097.hdr.mark = gc_color_red;
 c_7323097.hdr.grayed = 0;
c_7323097.tag = closureN_tag;
 c_7323097.fn = (function_type)__lambda_962;
c_7323097.num_args = 1;
c_7323097.num_elements = 6;
c_7323097.elements = (object *)e_7323113;
c_7323097.elements[0] = ((closureN)self_7313857)->elements[28];
c_7323097.elements[1] = ((closureN)self_7313857)->elements[29];
c_7323097.elements[2] = lp_731312_733623;
c_7323097.elements[3] = ((closureN)self_7313857)->elements[32];
c_7323097.elements[4] = ((closureN)self_7313857)->elements[33];
c_7323097.elements[5] = ((closureN)self_7313857)->elements[34];


closureN_type c_7323114;
object e_7323911 [31];
c_7323114.hdr.mark = gc_color_red;
 c_7323114.hdr.grayed = 0;
c_7323114.tag = closureN_tag;
 c_7323114.fn = (function_type)__lambda_964;
c_7323114.num_args = 5;
c_7323114.num_elements = 31;
c_7323114.elements = (object *)e_7323911;
c_7323114.elements[0] = ((closureN)self_7313857)->elements[0];
c_7323114.elements[1] = ((closureN)self_7313857)->elements[1];
c_7323114.elements[2] = ((closureN)self_7313857)->elements[2];
c_7323114.elements[3] = ((closureN)self_7313857)->elements[3];
c_7323114.elements[4] = ((closureN)self_7313857)->elements[4];
c_7323114.elements[5] = ((closureN)self_7313857)->elements[5];
c_7323114.elements[6] = ((closureN)self_7313857)->elements[6];
c_7323114.elements[7] = ((closureN)self_7313857)->elements[7];
c_7323114.elements[8] = ((closureN)self_7313857)->elements[8];
c_7323114.elements[9] = ((closureN)self_7313857)->elements[9];
c_7323114.elements[10] = ((closureN)self_7313857)->elements[10];
c_7323114.elements[11] = ((closureN)self_7313857)->elements[11];
c_7323114.elements[12] = ((closureN)self_7313857)->elements[12];
c_7323114.elements[13] = ((closureN)self_7313857)->elements[13];
c_7323114.elements[14] = ((closureN)self_7313857)->elements[14];
c_7323114.elements[15] = ((closureN)self_7313857)->elements[15];
c_7323114.elements[16] = ((closureN)self_7313857)->elements[16];
c_7323114.elements[17] = ((closureN)self_7313857)->elements[17];
c_7323114.elements[18] = ((closureN)self_7313857)->elements[18];
c_7323114.elements[19] = ((closureN)self_7313857)->elements[19];
c_7323114.elements[20] = ((closureN)self_7313857)->elements[20];
c_7323114.elements[21] = ((closureN)self_7313857)->elements[21];
c_7323114.elements[22] = ((closureN)self_7313857)->elements[22];
c_7323114.elements[23] = ((closureN)self_7313857)->elements[23];
c_7323114.elements[24] = ((closureN)self_7313857)->elements[24];
c_7323114.elements[25] = ((closureN)self_7313857)->elements[25];
c_7323114.elements[26] = ((closureN)self_7313857)->elements[26];
c_7323114.elements[27] = ((closureN)self_7313857)->elements[27];
c_7323114.elements[28] = ((closureN)self_7313857)->elements[30];
c_7323114.elements[29] = lp_731312_733623;
c_7323114.elements[30] = ((closureN)self_7313857)->elements[31];

return_direct_with_clo1(data,(closure)&c_7323097,__lambda_962,  &c_7323114);; 
}

static void __lambda_964(void *data, object self_7313858, int argc, object *args) /* object self_7313858, object k_736543, object p_731313_733624, object x_731314_733625, object dim_731315_733626, object vars_731316_733627, object k_731317_733628 */
 {
 object k_736543 = args[0]; object p_731313_733624 = args[1]; object x_731314_733625 = args[2]; object dim_731315_733626 = args[3]; object vars_731316_733627 = args[4]; object k_731317_733628 = args[5];
  


closureN_type c_7323119;
object e_7323909 [37];
c_7323119.hdr.mark = gc_color_red;
 c_7323119.hdr.grayed = 0;
c_7323119.tag = closureN_tag;
 c_7323119.fn = (function_type)__lambda_965;
c_7323119.num_args = 1;
c_7323119.num_elements = 37;
c_7323119.elements = (object *)e_7323909;
c_7323119.elements[0] = ((closureN)self_7313858)->elements[0];
c_7323119.elements[1] = ((closureN)self_7313858)->elements[1];
c_7323119.elements[2] = ((closureN)self_7313858)->elements[2];
c_7323119.elements[3] = ((closureN)self_7313858)->elements[3];
c_7323119.elements[4] = ((closureN)self_7313858)->elements[4];
c_7323119.elements[5] = ((closureN)self_7313858)->elements[5];
c_7323119.elements[6] = ((closureN)self_7313858)->elements[6];
c_7323119.elements[7] = ((closureN)self_7313858)->elements[7];
c_7323119.elements[8] = ((closureN)self_7313858)->elements[8];
c_7323119.elements[9] = ((closureN)self_7313858)->elements[9];
c_7323119.elements[10] = ((closureN)self_7313858)->elements[10];
c_7323119.elements[11] = ((closureN)self_7313858)->elements[11];
c_7323119.elements[12] = ((closureN)self_7313858)->elements[12];
c_7323119.elements[13] = ((closureN)self_7313858)->elements[13];
c_7323119.elements[14] = ((closureN)self_7313858)->elements[14];
c_7323119.elements[15] = ((closureN)self_7313858)->elements[15];
c_7323119.elements[16] = ((closureN)self_7313858)->elements[16];
c_7323119.elements[17] = ((closureN)self_7313858)->elements[17];
c_7323119.elements[18] = ((closureN)self_7313858)->elements[18];
c_7323119.elements[19] = ((closureN)self_7313858)->elements[19];
c_7323119.elements[20] = ((closureN)self_7313858)->elements[20];
c_7323119.elements[21] = ((closureN)self_7313858)->elements[21];
c_7323119.elements[22] = ((closureN)self_7313858)->elements[22];
c_7323119.elements[23] = ((closureN)self_7313858)->elements[23];
c_7323119.elements[24] = ((closureN)self_7313858)->elements[24];
c_7323119.elements[25] = ((closureN)self_7313858)->elements[25];
c_7323119.elements[26] = dim_731315_733626;
c_7323119.elements[27] = ((closureN)self_7313858)->elements[26];
c_7323119.elements[28] = ((closureN)self_7313858)->elements[27];
c_7323119.elements[29] = k_731317_733628;
c_7323119.elements[30] = k_736543;
c_7323119.elements[31] = ((closureN)self_7313858)->elements[28];
c_7323119.elements[32] = ((closureN)self_7313858)->elements[29];
c_7323119.elements[33] = ((closureN)self_7313858)->elements[30];
c_7323119.elements[34] = p_731313_733624;
c_7323119.elements[35] = vars_731316_733627;
c_7323119.elements[36] = x_731314_733625;


make_utf8_string_with_len(c_7323910, "v.", 2, 2);
return_closcall2(data,  car(((closureN)self_7313858)->elements[30]),  &c_7323119, &c_7323910);; 
}

static void __lambda_965(void *data, object self_7313859, int argc, object *args) /* object self_7313859, object v_731318_733629 */
 {
 object v_731318_733629 = args[0];
  
closureN_type c_7323121;
object e_7323892 [36];
c_7323121.hdr.mark = gc_color_red;
 c_7323121.hdr.grayed = 0;
c_7323121.tag = closureN_tag;
 c_7323121.fn = (function_type)__lambda_966;
c_7323121.num_args = 0;
c_7323121.num_elements = 36;
c_7323121.elements = (object *)e_7323892;
c_7323121.elements[0] = ((closureN)self_7313859)->elements[0];
c_7323121.elements[1] = ((closureN)self_7313859)->elements[1];
c_7323121.elements[2] = ((closureN)self_7313859)->elements[2];
c_7323121.elements[3] = ((closureN)self_7313859)->elements[3];
c_7323121.elements[4] = ((closureN)self_7313859)->elements[4];
c_7323121.elements[5] = ((closureN)self_7313859)->elements[5];
c_7323121.elements[6] = ((closureN)self_7313859)->elements[6];
c_7323121.elements[7] = ((closureN)self_7313859)->elements[7];
c_7323121.elements[8] = ((closureN)self_7313859)->elements[8];
c_7323121.elements[9] = ((closureN)self_7313859)->elements[9];
c_7323121.elements[10] = ((closureN)self_7313859)->elements[10];
c_7323121.elements[11] = ((closureN)self_7313859)->elements[11];
c_7323121.elements[12] = ((closureN)self_7313859)->elements[12];
c_7323121.elements[13] = ((closureN)self_7313859)->elements[13];
c_7323121.elements[14] = ((closureN)self_7313859)->elements[14];
c_7323121.elements[15] = ((closureN)self_7313859)->elements[15];
c_7323121.elements[16] = ((closureN)self_7313859)->elements[16];
c_7323121.elements[17] = ((closureN)self_7313859)->elements[17];
c_7323121.elements[18] = ((closureN)self_7313859)->elements[18];
c_7323121.elements[19] = ((closureN)self_7313859)->elements[19];
c_7323121.elements[20] = ((closureN)self_7313859)->elements[20];
c_7323121.elements[21] = ((closureN)self_7313859)->elements[21];
c_7323121.elements[22] = ((closureN)self_7313859)->elements[22];
c_7323121.elements[23] = ((closureN)self_7313859)->elements[23];
c_7323121.elements[24] = ((closureN)self_7313859)->elements[24];
c_7323121.elements[25] = ((closureN)self_7313859)->elements[25];
c_7323121.elements[26] = ((closureN)self_7313859)->elements[26];
c_7323121.elements[27] = ((closureN)self_7313859)->elements[27];
c_7323121.elements[28] = ((closureN)self_7313859)->elements[28];
c_7323121.elements[29] = ((closureN)self_7313859)->elements[29];
c_7323121.elements[30] = ((closureN)self_7313859)->elements[31];
c_7323121.elements[31] = ((closureN)self_7313859)->elements[32];
c_7323121.elements[32] = ((closureN)self_7313859)->elements[33];
c_7323121.elements[33] = ((closureN)self_7313859)->elements[34];
c_7323121.elements[34] = v_731318_733629;
c_7323121.elements[35] = ((closureN)self_7313859)->elements[35];


closureN_type c_7323893;
object e_7323908 [4];
c_7323893.hdr.mark = gc_color_red;
 c_7323893.hdr.grayed = 0;
c_7323893.tag = closureN_tag;
 c_7323893.fn = (function_type)__lambda_1017;
c_7323893.num_args = 1;
c_7323893.num_elements = 4;
c_7323893.elements = (object *)e_7323908;
c_7323893.elements[0] = ((closureN)self_7313859)->elements[13];
c_7323893.elements[1] = ((closureN)self_7313859)->elements[30];
c_7323893.elements[2] = v_731318_733629;
c_7323893.elements[3] = ((closureN)self_7313859)->elements[36];

return_direct_with_clo1(data,(closure)&c_7323121,__lambda_966,  &c_7323893);; 
}

static void __lambda_1017(void *data, object self_7313860, int argc, object *args) /* object self_7313860, object r_736546 */
 {
 object r_736546 = args[0];
  
list_3_type local_7323898; 

pair_type local_7323902; 

list_2_type local_7323905; 
return_direct_with_clo1(data,  ((closureN)self_7313860)->elements[1], (((closure)  ((closureN)self_7313860)->elements[1])->fn),  Cyc_fast_list_3(&local_7323898, ((closureN)self_7313860)->elements[0], set_cell_as_expr(&local_7323902, Cyc_fast_list_2(&local_7323905, ((closureN)self_7313860)->elements[2], ((closureN)self_7313860)->elements[3])), r_736546));; 
}

static void __lambda_966(void *data, object self_7313861, int argc, object *args) /* object self_7313861, object k_736547 */
 {
 object k_736547 = args[0];
  
closureN_type c_7323123;
object e_7323890 [37];
c_7323123.hdr.mark = gc_color_red;
 c_7323123.hdr.grayed = 0;
c_7323123.tag = closureN_tag;
 c_7323123.fn = (function_type)__lambda_967;
c_7323123.num_args = 1;
c_7323123.num_elements = 37;
c_7323123.elements = (object *)e_7323890;
c_7323123.elements[0] = ((closureN)self_7313861)->elements[0];
c_7323123.elements[1] = ((closureN)self_7313861)->elements[1];
c_7323123.elements[2] = ((closureN)self_7313861)->elements[2];
c_7323123.elements[3] = ((closureN)self_7313861)->elements[3];
c_7323123.elements[4] = ((closureN)self_7313861)->elements[4];
c_7323123.elements[5] = ((closureN)self_7313861)->elements[5];
c_7323123.elements[6] = ((closureN)self_7313861)->elements[6];
c_7323123.elements[7] = ((closureN)self_7313861)->elements[7];
c_7323123.elements[8] = ((closureN)self_7313861)->elements[8];
c_7323123.elements[9] = ((closureN)self_7313861)->elements[9];
c_7323123.elements[10] = ((closureN)self_7313861)->elements[10];
c_7323123.elements[11] = ((closureN)self_7313861)->elements[11];
c_7323123.elements[12] = ((closureN)self_7313861)->elements[12];
c_7323123.elements[13] = ((closureN)self_7313861)->elements[13];
c_7323123.elements[14] = ((closureN)self_7313861)->elements[14];
c_7323123.elements[15] = ((closureN)self_7313861)->elements[15];
c_7323123.elements[16] = ((closureN)self_7313861)->elements[16];
c_7323123.elements[17] = ((closureN)self_7313861)->elements[17];
c_7323123.elements[18] = ((closureN)self_7313861)->elements[18];
c_7323123.elements[19] = ((closureN)self_7313861)->elements[19];
c_7323123.elements[20] = ((closureN)self_7313861)->elements[20];
c_7323123.elements[21] = ((closureN)self_7313861)->elements[21];
c_7323123.elements[22] = ((closureN)self_7313861)->elements[22];
c_7323123.elements[23] = ((closureN)self_7313861)->elements[23];
c_7323123.elements[24] = ((closureN)self_7313861)->elements[24];
c_7323123.elements[25] = ((closureN)self_7313861)->elements[25];
c_7323123.elements[26] = ((closureN)self_7313861)->elements[26];
c_7323123.elements[27] = ((closureN)self_7313861)->elements[27];
c_7323123.elements[28] = ((closureN)self_7313861)->elements[28];
c_7323123.elements[29] = ((closureN)self_7313861)->elements[29];
c_7323123.elements[30] = k_736547;
c_7323123.elements[31] = ((closureN)self_7313861)->elements[30];
c_7323123.elements[32] = ((closureN)self_7313861)->elements[31];
c_7323123.elements[33] = ((closureN)self_7313861)->elements[32];
c_7323123.elements[34] = ((closureN)self_7313861)->elements[33];
c_7323123.elements[35] = ((closureN)self_7313861)->elements[34];
c_7323123.elements[36] = ((closureN)self_7313861)->elements[35];

return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7323123, ((closureN)self_7313861)->elements[33]);; 
}

static void __lambda_967(void *data, object self_7313862, int argc, object *args) /* object self_7313862, object r_736548 */
 {
 object r_736548 = args[0];
  if( (boolean_f != r_736548) ){ 
  
closureN_type c_7323125;
object e_7323188 [12];
c_7323125.hdr.mark = gc_color_red;
 c_7323125.hdr.grayed = 0;
c_7323125.tag = closureN_tag;
 c_7323125.fn = (function_type)__lambda_968;
c_7323125.num_args = 1;
c_7323125.num_elements = 12;
c_7323125.elements = (object *)e_7323188;
c_7323125.elements[0] = ((closureN)self_7313862)->elements[2];
c_7323125.elements[1] = ((closureN)self_7313862)->elements[5];
c_7323125.elements[2] = ((closureN)self_7313862)->elements[13];
c_7323125.elements[3] = ((closureN)self_7313862)->elements[18];
c_7323125.elements[4] = ((closureN)self_7313862)->elements[19];
c_7323125.elements[5] = ((closureN)self_7313862)->elements[26];
c_7323125.elements[6] = ((closureN)self_7313862)->elements[29];
c_7323125.elements[7] = ((closureN)self_7313862)->elements[30];
c_7323125.elements[8] = ((closureN)self_7313862)->elements[31];
c_7323125.elements[9] = ((closureN)self_7313862)->elements[34];
c_7323125.elements[10] = ((closureN)self_7313862)->elements[35];
c_7323125.elements[11] = ((closureN)self_7313862)->elements[36];


closureN_type c_7323189;
object e_7323193 [2];
c_7323189.hdr.mark = gc_color_red;
 c_7323189.hdr.grayed = 0;
c_7323189.tag = closureN_tag;
 c_7323189.fn = (function_type)__lambda_973;
c_7323189.num_args = 1;
c_7323189.num_elements = 2;
c_7323189.elements = (object *)e_7323193;
c_7323189.elements[0] = ((closureN)self_7313862)->elements[25];
c_7323189.elements[1] = ((closureN)self_7313862)->elements[34];

return_direct_with_clo1(data,(closure)&c_7323125,__lambda_968,  &c_7323189);
} else { 
  


closureN_type c_7323198;
object e_7323888 [33];
c_7323198.hdr.mark = gc_color_red;
 c_7323198.hdr.grayed = 0;
c_7323198.tag = closureN_tag;
 c_7323198.fn = (function_type)__lambda_974;
c_7323198.num_args = 1;
c_7323198.num_elements = 33;
c_7323198.elements = (object *)e_7323888;
c_7323198.elements[0] = ((closureN)self_7313862)->elements[0];
c_7323198.elements[1] = ((closureN)self_7313862)->elements[1];
c_7323198.elements[2] = ((closureN)self_7313862)->elements[2];
c_7323198.elements[3] = ((closureN)self_7313862)->elements[3];
c_7323198.elements[4] = ((closureN)self_7313862)->elements[4];
c_7323198.elements[5] = ((closureN)self_7313862)->elements[6];
c_7323198.elements[6] = ((closureN)self_7313862)->elements[7];
c_7323198.elements[7] = ((closureN)self_7313862)->elements[8];
c_7323198.elements[8] = ((closureN)self_7313862)->elements[9];
c_7323198.elements[9] = ((closureN)self_7313862)->elements[10];
c_7323198.elements[10] = ((closureN)self_7313862)->elements[11];
c_7323198.elements[11] = ((closureN)self_7313862)->elements[12];
c_7323198.elements[12] = ((closureN)self_7313862)->elements[13];
c_7323198.elements[13] = ((closureN)self_7313862)->elements[14];
c_7323198.elements[14] = ((closureN)self_7313862)->elements[15];
c_7323198.elements[15] = ((closureN)self_7313862)->elements[16];
c_7323198.elements[16] = ((closureN)self_7313862)->elements[17];
c_7323198.elements[17] = ((closureN)self_7313862)->elements[18];
c_7323198.elements[18] = ((closureN)self_7313862)->elements[20];
c_7323198.elements[19] = ((closureN)self_7313862)->elements[21];
c_7323198.elements[20] = ((closureN)self_7313862)->elements[22];
c_7323198.elements[21] = ((closureN)self_7313862)->elements[23];
c_7323198.elements[22] = ((closureN)self_7313862)->elements[24];
c_7323198.elements[23] = ((closureN)self_7313862)->elements[25];
c_7323198.elements[24] = ((closureN)self_7313862)->elements[26];
c_7323198.elements[25] = ((closureN)self_7313862)->elements[27];
c_7323198.elements[26] = ((closureN)self_7313862)->elements[29];
c_7323198.elements[27] = ((closureN)self_7313862)->elements[30];
c_7323198.elements[28] = ((closureN)self_7313862)->elements[32];
c_7323198.elements[29] = ((closureN)self_7313862)->elements[33];
c_7323198.elements[30] = ((closureN)self_7313862)->elements[34];
c_7323198.elements[31] = ((closureN)self_7313862)->elements[35];
c_7323198.elements[32] = ((closureN)self_7313862)->elements[36];

return_closcall2(data,  car(((closureN)self_7313862)->elements[28]),  &c_7323198, ((closureN)self_7313862)->elements[34]);}
;; 
}

static void __lambda_974(void *data, object self_7313869, int argc, object *args) /* object self_7313869, object r_736561 */
 {
 object r_736561 = args[0];
  if( (boolean_f != r_736561) ){ 
  
closureN_type c_7323200;
object e_7323767 [30];
c_7323200.hdr.mark = gc_color_red;
 c_7323200.hdr.grayed = 0;
c_7323200.tag = closureN_tag;
 c_7323200.fn = (function_type)__lambda_975;
c_7323200.num_args = 1;
c_7323200.num_elements = 30;
c_7323200.elements = (object *)e_7323767;
c_7323200.elements[0] = ((closureN)self_7313869)->elements[0];
c_7323200.elements[1] = ((closureN)self_7313869)->elements[1];
c_7323200.elements[2] = ((closureN)self_7313869)->elements[2];
c_7323200.elements[3] = ((closureN)self_7313869)->elements[3];
c_7323200.elements[4] = ((closureN)self_7313869)->elements[4];
c_7323200.elements[5] = ((closureN)self_7313869)->elements[5];
c_7323200.elements[6] = ((closureN)self_7313869)->elements[6];
c_7323200.elements[7] = ((closureN)self_7313869)->elements[8];
c_7323200.elements[8] = ((closureN)self_7313869)->elements[9];
c_7323200.elements[9] = ((closureN)self_7313869)->elements[10];
c_7323200.elements[10] = ((closureN)self_7313869)->elements[11];
c_7323200.elements[11] = ((closureN)self_7313869)->elements[12];
c_7323200.elements[12] = ((closureN)self_7313869)->elements[13];
c_7323200.elements[13] = ((closureN)self_7313869)->elements[14];
c_7323200.elements[14] = ((closureN)self_7313869)->elements[15];
c_7323200.elements[15] = ((closureN)self_7313869)->elements[16];
c_7323200.elements[16] = ((closureN)self_7313869)->elements[17];
c_7323200.elements[17] = ((closureN)self_7313869)->elements[18];
c_7323200.elements[18] = ((closureN)self_7313869)->elements[19];
c_7323200.elements[19] = ((closureN)self_7313869)->elements[22];
c_7323200.elements[20] = ((closureN)self_7313869)->elements[23];
c_7323200.elements[21] = ((closureN)self_7313869)->elements[24];
c_7323200.elements[22] = ((closureN)self_7313869)->elements[25];
c_7323200.elements[23] = ((closureN)self_7313869)->elements[26];
c_7323200.elements[24] = ((closureN)self_7313869)->elements[27];
c_7323200.elements[25] = ((closureN)self_7313869)->elements[28];
c_7323200.elements[26] = ((closureN)self_7313869)->elements[29];
c_7323200.elements[27] = ((closureN)self_7313869)->elements[30];
c_7323200.elements[28] = ((closureN)self_7313869)->elements[31];
c_7323200.elements[29] = ((closureN)self_7313869)->elements[32];



return_direct_with_clo1(data,(closure)&c_7323200,__lambda_975,  Cyc_cdr(data, ((closureN)self_7313869)->elements[30]));
} else { 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313869)->elements[30])) ){ 
  
closureN_type c_7323775;
object e_7323803 [9];
c_7323775.hdr.mark = gc_color_red;
 c_7323775.hdr.grayed = 0;
c_7323775.tag = closureN_tag;
 c_7323775.fn = (function_type)__lambda_1010;
c_7323775.num_args = 1;
c_7323775.num_elements = 9;
c_7323775.elements = (object *)e_7323803;
c_7323775.elements[0] = ((closureN)self_7313869)->elements[2];
c_7323775.elements[1] = ((closureN)self_7313869)->elements[3];
c_7323775.elements[2] = ((closureN)self_7313869)->elements[16];
c_7323775.elements[3] = ((closureN)self_7313869)->elements[24];
c_7323775.elements[4] = ((closureN)self_7313869)->elements[27];
c_7323775.elements[5] = ((closureN)self_7313869)->elements[28];
c_7323775.elements[6] = ((closureN)self_7313869)->elements[30];
c_7323775.elements[7] = ((closureN)self_7313869)->elements[31];
c_7323775.elements[8] = ((closureN)self_7313869)->elements[32];


closureN_type c_7323804;
object e_7323819 [6];
c_7323804.hdr.mark = gc_color_red;
 c_7323804.hdr.grayed = 0;
c_7323804.tag = closureN_tag;
 c_7323804.fn = (function_type)__lambda_1012;
c_7323804.num_args = 1;
c_7323804.num_elements = 6;
c_7323804.elements = (object *)e_7323819;
c_7323804.elements[0] = ((closureN)self_7313869)->elements[4];
c_7323804.elements[1] = ((closureN)self_7313869)->elements[24];
c_7323804.elements[2] = ((closureN)self_7313869)->elements[26];
c_7323804.elements[3] = ((closureN)self_7313869)->elements[28];
c_7323804.elements[4] = ((closureN)self_7313869)->elements[30];
c_7323804.elements[5] = ((closureN)self_7313869)->elements[31];

return_direct_with_clo1(data,(closure)&c_7323775,__lambda_1010,  &c_7323804);
} else { 
    
if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313869)->elements[30])) ){ 
  
closureN_type c_7323824;
object e_7323850 [9];
c_7323824.hdr.mark = gc_color_red;
 c_7323824.hdr.grayed = 0;
c_7323824.tag = closureN_tag;
 c_7323824.fn = (function_type)__lambda_1013;
c_7323824.num_args = 1;
c_7323824.num_elements = 9;
c_7323824.elements = (object *)e_7323850;
c_7323824.elements[0] = ((closureN)self_7313869)->elements[2];
c_7323824.elements[1] = ((closureN)self_7313869)->elements[20];
c_7323824.elements[2] = ((closureN)self_7313869)->elements[21];
c_7323824.elements[3] = ((closureN)self_7313869)->elements[24];
c_7323824.elements[4] = ((closureN)self_7313869)->elements[26];
c_7323824.elements[5] = ((closureN)self_7313869)->elements[27];
c_7323824.elements[6] = ((closureN)self_7313869)->elements[28];
c_7323824.elements[7] = ((closureN)self_7313869)->elements[31];
c_7323824.elements[8] = ((closureN)self_7313869)->elements[32];

return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7323824, ((closureN)self_7313869)->elements[30]);
} else { 
    
if( (boolean_f != Cyc_is_null(((closureN)self_7313869)->elements[30])) ){ 
  
closureN_type c_7323857;
object e_7323869 [4];
c_7323857.hdr.mark = gc_color_red;
 c_7323857.hdr.grayed = 0;
c_7323857.tag = closureN_tag;
 c_7323857.fn = (function_type)__lambda_1015;
c_7323857.num_args = 1;
c_7323857.num_elements = 4;
c_7323857.elements = (object *)e_7323869;
c_7323857.elements[0] = ((closureN)self_7313869)->elements[2];
c_7323857.elements[1] = ((closureN)self_7313869)->elements[15];
c_7323857.elements[2] = ((closureN)self_7313869)->elements[27];
c_7323857.elements[3] = ((closureN)self_7313869)->elements[31];

return_closcall2(data,  ((closureN)self_7313869)->elements[26],  &c_7323857, ((closureN)self_7313869)->elements[32]);
} else { 
  
closureN_type c_7323873;
object e_7323886 [5];
c_7323873.hdr.mark = gc_color_red;
 c_7323873.hdr.grayed = 0;
c_7323873.tag = closureN_tag;
 c_7323873.fn = (function_type)__lambda_1016;
c_7323873.num_args = 1;
c_7323873.num_elements = 5;
c_7323873.elements = (object *)e_7323886;
c_7323873.elements[0] = ((closureN)self_7313869)->elements[2];
c_7323873.elements[1] = ((closureN)self_7313869)->elements[7];
c_7323873.elements[2] = ((closureN)self_7313869)->elements[27];
c_7323873.elements[3] = ((closureN)self_7313869)->elements[30];
c_7323873.elements[4] = ((closureN)self_7313869)->elements[31];

return_closcall2(data,  ((closureN)self_7313869)->elements[26],  &c_7323873, ((closureN)self_7313869)->elements[32]);}
;}
;}
;}
;; 
}

static void __lambda_1016(void *data, object self_7313911, int argc, object *args) /* object self_7313911, object r_736747 */
 {
 object r_736747 = args[0];
  
list_3_type local_7323878; 

list_3_type local_7323882; 
return_direct_with_clo1(data,  ((closureN)self_7313911)->elements[2], (((closure)  ((closureN)self_7313911)->elements[2])->fn),  Cyc_fast_list_3(&local_7323878, ((closureN)self_7313911)->elements[0], Cyc_fast_list_3(&local_7323882, ((closureN)self_7313911)->elements[1], ((closureN)self_7313911)->elements[4], ((closureN)self_7313911)->elements[3]), r_736747));; 
}

static void __lambda_1015(void *data, object self_7313910, int argc, object *args) /* object self_7313910, object r_736745 */
 {
 object r_736745 = args[0];
  
list_3_type local_7323862; 

list_2_type local_7323866; 
return_direct_with_clo1(data,  ((closureN)self_7313910)->elements[2], (((closure)  ((closureN)self_7313910)->elements[2])->fn),  Cyc_fast_list_3(&local_7323862, ((closureN)self_7313910)->elements[0], Cyc_fast_list_2(&local_7323866, ((closureN)self_7313910)->elements[1], ((closureN)self_7313910)->elements[3]), r_736745));; 
}

static void __lambda_1013(void *data, object self_7313908, int argc, object *args) /* object self_7313908, object r_736741 */
 {
 object r_736741 = args[0];
  


closureN_type c_7323829;
object e_7323841 [4];
c_7323829.hdr.mark = gc_color_red;
 c_7323829.hdr.grayed = 0;
c_7323829.tag = closureN_tag;
 c_7323829.fn = (function_type)__lambda_1014;
c_7323829.num_args = 1;
c_7323829.num_elements = 4;
c_7323829.elements = (object *)e_7323841;
c_7323829.elements[0] = ((closureN)self_7313908)->elements[0];
c_7323829.elements[1] = ((closureN)self_7313908)->elements[2];
c_7323829.elements[2] = ((closureN)self_7313908)->elements[5];
c_7323829.elements[3] = ((closureN)self_7313908)->elements[7];


list_2_type local_7323844; 
return_closcall6(data,  car(((closureN)self_7313908)->elements[6]),  &c_7323829, r_736741, Cyc_fast_list_2(&local_7323844, ((closureN)self_7313908)->elements[1], ((closureN)self_7313908)->elements[7]), ((closureN)self_7313908)->elements[3], ((closureN)self_7313908)->elements[8], ((closureN)self_7313908)->elements[4]);; 
}

static void __lambda_1014(void *data, object self_7313909, int argc, object *args) /* object self_7313909, object r_736740 */
 {
 object r_736740 = args[0];
  
list_3_type local_7323834; 

list_2_type local_7323838; 
return_direct_with_clo1(data,  ((closureN)self_7313909)->elements[2], (((closure)  ((closureN)self_7313909)->elements[2])->fn),  Cyc_fast_list_3(&local_7323834, ((closureN)self_7313909)->elements[0], Cyc_fast_list_2(&local_7323838, ((closureN)self_7313909)->elements[1], ((closureN)self_7313909)->elements[3]), r_736740));; 
}

static void __lambda_1012(void *data, object self_7313905, int argc, object *args) /* object self_7313905, object k_736735, object vars_731376_733646 */
 {
 object k_736735 = args[0]; object vars_731376_733646 = args[1];
  




list_2_type local_7323814; 
return_closcall6(data,  car(((closureN)self_7313905)->elements[3]),  k_736735, Cyc_cdr(data, ((closureN)self_7313905)->elements[4]), Cyc_fast_list_2(&local_7323814, ((closureN)self_7313905)->elements[0], ((closureN)self_7313905)->elements[5]), ((closureN)self_7313905)->elements[1], vars_731376_733646, ((closureN)self_7313905)->elements[2]);; 
}

static void __lambda_1010(void *data, object self_7313906, int argc, object *args) /* object self_7313906, object r_736734 */
 {
 object r_736734 = args[0];
  


closureN_type c_7323780;
object e_7323792 [4];
c_7323780.hdr.mark = gc_color_red;
 c_7323780.hdr.grayed = 0;
c_7323780.tag = closureN_tag;
 c_7323780.fn = (function_type)__lambda_1011;
c_7323780.num_args = 1;
c_7323780.num_elements = 4;
c_7323780.elements = (object *)e_7323792;
c_7323780.elements[0] = ((closureN)self_7313906)->elements[0];
c_7323780.elements[1] = ((closureN)self_7313906)->elements[2];
c_7323780.elements[2] = ((closureN)self_7313906)->elements[4];
c_7323780.elements[3] = ((closureN)self_7313906)->elements[7];




list_2_type local_7323798; 
return_closcall6(data,  car(((closureN)self_7313906)->elements[5]),  &c_7323780, Cyc_car(data, ((closureN)self_7313906)->elements[6]), Cyc_fast_list_2(&local_7323798, ((closureN)self_7313906)->elements[1], ((closureN)self_7313906)->elements[7]), ((closureN)self_7313906)->elements[3], ((closureN)self_7313906)->elements[8], r_736734);; 
}

static void __lambda_1011(void *data, object self_7313907, int argc, object *args) /* object self_7313907, object r_736731 */
 {
 object r_736731 = args[0];
  
list_3_type local_7323785; 

list_2_type local_7323789; 
return_direct_with_clo1(data,  ((closureN)self_7313907)->elements[2], (((closure)  ((closureN)self_7313907)->elements[2])->fn),  Cyc_fast_list_3(&local_7323785, ((closureN)self_7313907)->elements[0], Cyc_fast_list_2(&local_7323789, ((closureN)self_7313907)->elements[1], ((closureN)self_7313907)->elements[3]), r_736731));; 
}

static void __lambda_975(void *data, object self_7313870, int argc, object *args) /* object self_7313870, object r_736728 */
 {
 object r_736728 = args[0];
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, r_736728))) ){ 
  
closureN_type c_7323206;
object e_7323452 [20];
c_7323206.hdr.mark = gc_color_red;
 c_7323206.hdr.grayed = 0;
c_7323206.tag = closureN_tag;
 c_7323206.fn = (function_type)__lambda_976;
c_7323206.num_args = 1;
c_7323206.num_elements = 20;
c_7323206.elements = (object *)e_7323452;
c_7323206.elements[0] = ((closureN)self_7313870)->elements[2];
c_7323206.elements[1] = ((closureN)self_7313870)->elements[3];
c_7323206.elements[2] = ((closureN)self_7313870)->elements[4];
c_7323206.elements[3] = ((closureN)self_7313870)->elements[5];
c_7323206.elements[4] = ((closureN)self_7313870)->elements[8];
c_7323206.elements[5] = ((closureN)self_7313870)->elements[11];
c_7323206.elements[6] = ((closureN)self_7313870)->elements[12];
c_7323206.elements[7] = ((closureN)self_7313870)->elements[14];
c_7323206.elements[8] = ((closureN)self_7313870)->elements[15];
c_7323206.elements[9] = ((closureN)self_7313870)->elements[16];
c_7323206.elements[10] = ((closureN)self_7313870)->elements[18];
c_7323206.elements[11] = ((closureN)self_7313870)->elements[19];
c_7323206.elements[12] = ((closureN)self_7313870)->elements[21];
c_7323206.elements[13] = ((closureN)self_7313870)->elements[23];
c_7323206.elements[14] = ((closureN)self_7313870)->elements[24];
c_7323206.elements[15] = ((closureN)self_7313870)->elements[25];
c_7323206.elements[16] = ((closureN)self_7313870)->elements[26];
c_7323206.elements[17] = ((closureN)self_7313870)->elements[27];
c_7323206.elements[18] = ((closureN)self_7313870)->elements[28];
c_7323206.elements[19] = ((closureN)self_7313870)->elements[29];



return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7323206, Cyc_car(data, ((closureN)self_7313870)->elements[27]));
} else { 
  
closureN_type c_7323457;
object e_7323752 [24];
c_7323457.hdr.mark = gc_color_red;
 c_7323457.hdr.grayed = 0;
c_7323457.tag = closureN_tag;
 c_7323457.fn = (function_type)__lambda_1002;
c_7323457.num_args = 1;
c_7323457.num_elements = 24;
c_7323457.elements = (object *)e_7323752;
c_7323457.elements[0] = ((closureN)self_7313870)->elements[0];
c_7323457.elements[1] = ((closureN)self_7313870)->elements[1];
c_7323457.elements[2] = ((closureN)self_7313870)->elements[2];
c_7323457.elements[3] = ((closureN)self_7313870)->elements[3];
c_7323457.elements[4] = ((closureN)self_7313870)->elements[4];
c_7323457.elements[5] = ((closureN)self_7313870)->elements[5];
c_7323457.elements[6] = ((closureN)self_7313870)->elements[6];
c_7323457.elements[7] = ((closureN)self_7313870)->elements[7];
c_7323457.elements[8] = ((closureN)self_7313870)->elements[8];
c_7323457.elements[9] = ((closureN)self_7313870)->elements[9];
c_7323457.elements[10] = ((closureN)self_7313870)->elements[10];
c_7323457.elements[11] = ((closureN)self_7313870)->elements[11];
c_7323457.elements[12] = ((closureN)self_7313870)->elements[13];
c_7323457.elements[13] = ((closureN)self_7313870)->elements[16];
c_7323457.elements[14] = ((closureN)self_7313870)->elements[17];
c_7323457.elements[15] = ((closureN)self_7313870)->elements[18];
c_7323457.elements[16] = ((closureN)self_7313870)->elements[21];
c_7323457.elements[17] = ((closureN)self_7313870)->elements[23];
c_7323457.elements[18] = ((closureN)self_7313870)->elements[24];
c_7323457.elements[19] = ((closureN)self_7313870)->elements[25];
c_7323457.elements[20] = ((closureN)self_7313870)->elements[26];
c_7323457.elements[21] = ((closureN)self_7313870)->elements[27];
c_7323457.elements[22] = ((closureN)self_7313870)->elements[28];
c_7323457.elements[23] = ((closureN)self_7313870)->elements[29];


closureN_type c_7323753;
object e_7323766 [2];
c_7323753.hdr.mark = gc_color_red;
 c_7323753.hdr.grayed = 0;
c_7323753.tag = closureN_tag;
 c_7323753.fn = (function_type)__lambda_1008;
c_7323753.num_args = 1;
c_7323753.num_elements = 2;
c_7323753.elements = (object *)e_7323766;
c_7323753.elements[0] = ((closureN)self_7313870)->elements[20];
c_7323753.elements[1] = ((closureN)self_7313870)->elements[22];

return_direct_with_clo1(data,(closure)&c_7323457,__lambda_1002,  &c_7323753);}
;; 
}

static void __lambda_1008(void *data, object self_7313897, int argc, object *args) /* object self_7313897, object k_736725, object x_731332_733631 */
 {
 object k_736725 = args[0]; object x_731332_733631 = args[1];
  
closureN_type c_7323755;
object e_7323765 [4];
c_7323755.hdr.mark = gc_color_red;
 c_7323755.hdr.grayed = 0;
c_7323755.tag = closureN_tag;
 c_7323755.fn = (function_type)__lambda_1009;
c_7323755.num_args = 1;
c_7323755.num_elements = 4;
c_7323755.elements = (object *)e_7323765;
c_7323755.elements[0] = ((closureN)self_7313897)->elements[0];
c_7323755.elements[1] = ((closureN)self_7313897)->elements[1];
c_7323755.elements[2] = k_736725;
c_7323755.elements[3] = x_731332_733631;

return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7323755, x_731332_733631);; 
}

static void __lambda_1009(void *data, object self_7313898, int argc, object *args) /* object self_7313898, object r_736726 */
 {
 object r_736726 = args[0];
  if( (boolean_f != r_736726) ){ 
  

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

static void __lambda_1002(void *data, object self_7313899, int argc, object *args) /* object self_7313899, object r_736723 */
 {
 object r_736723 = args[0];
  
closureN_type c_7323459;
object e_7323748 [25];
c_7323459.hdr.mark = gc_color_red;
 c_7323459.hdr.grayed = 0;
c_7323459.tag = closureN_tag;
 c_7323459.fn = (function_type)__lambda_1003;
c_7323459.num_args = 1;
c_7323459.num_elements = 25;
c_7323459.elements = (object *)e_7323748;
c_7323459.elements[0] = ((closureN)self_7313899)->elements[0];
c_7323459.elements[1] = ((closureN)self_7313899)->elements[1];
c_7323459.elements[2] = ((closureN)self_7313899)->elements[2];
c_7323459.elements[3] = ((closureN)self_7313899)->elements[3];
c_7323459.elements[4] = ((closureN)self_7313899)->elements[4];
c_7323459.elements[5] = ((closureN)self_7313899)->elements[5];
c_7323459.elements[6] = ((closureN)self_7313899)->elements[6];
c_7323459.elements[7] = ((closureN)self_7313899)->elements[7];
c_7323459.elements[8] = ((closureN)self_7313899)->elements[8];
c_7323459.elements[9] = ((closureN)self_7313899)->elements[9];
c_7323459.elements[10] = ((closureN)self_7313899)->elements[10];
c_7323459.elements[11] = ((closureN)self_7313899)->elements[11];
c_7323459.elements[12] = ((closureN)self_7313899)->elements[12];
c_7323459.elements[13] = ((closureN)self_7313899)->elements[13];
c_7323459.elements[14] = ((closureN)self_7313899)->elements[14];
c_7323459.elements[15] = ((closureN)self_7313899)->elements[15];
c_7323459.elements[16] = ((closureN)self_7313899)->elements[16];
c_7323459.elements[17] = ((closureN)self_7313899)->elements[17];
c_7323459.elements[18] = ((closureN)self_7313899)->elements[18];
c_7323459.elements[19] = ((closureN)self_7313899)->elements[19];
c_7323459.elements[20] = ((closureN)self_7313899)->elements[20];
c_7323459.elements[21] = ((closureN)self_7313899)->elements[21];
c_7323459.elements[22] = r_736723;
c_7323459.elements[23] = ((closureN)self_7313899)->elements[22];
c_7323459.elements[24] = ((closureN)self_7313899)->elements[23];



return_direct_with_clo1(data,(closure)&c_7323459,__lambda_1003,  Cyc_cddr(data, ((closureN)self_7313899)->elements[21]));; 
}

static void __lambda_1003(void *data, object self_7313900, int argc, object *args) /* object self_7313900, object r_736724 */
 {
 object r_736724 = args[0];
  
closureN_type c_7323461;
object e_7323746 [24];
c_7323461.hdr.mark = gc_color_red;
 c_7323461.hdr.grayed = 0;
c_7323461.tag = closureN_tag;
 c_7323461.fn = (function_type)__lambda_1004;
c_7323461.num_args = 1;
c_7323461.num_elements = 24;
c_7323461.elements = (object *)e_7323746;
c_7323461.elements[0] = ((closureN)self_7313900)->elements[0];
c_7323461.elements[1] = ((closureN)self_7313900)->elements[1];
c_7323461.elements[2] = ((closureN)self_7313900)->elements[2];
c_7323461.elements[3] = ((closureN)self_7313900)->elements[3];
c_7323461.elements[4] = ((closureN)self_7313900)->elements[4];
c_7323461.elements[5] = ((closureN)self_7313900)->elements[5];
c_7323461.elements[6] = ((closureN)self_7313900)->elements[6];
c_7323461.elements[7] = ((closureN)self_7313900)->elements[7];
c_7323461.elements[8] = ((closureN)self_7313900)->elements[8];
c_7323461.elements[9] = ((closureN)self_7313900)->elements[9];
c_7323461.elements[10] = ((closureN)self_7313900)->elements[10];
c_7323461.elements[11] = ((closureN)self_7313900)->elements[11];
c_7323461.elements[12] = ((closureN)self_7313900)->elements[12];
c_7323461.elements[13] = ((closureN)self_7313900)->elements[13];
c_7323461.elements[14] = ((closureN)self_7313900)->elements[14];
c_7323461.elements[15] = ((closureN)self_7313900)->elements[15];
c_7323461.elements[16] = ((closureN)self_7313900)->elements[16];
c_7323461.elements[17] = ((closureN)self_7313900)->elements[17];
c_7323461.elements[18] = ((closureN)self_7313900)->elements[18];
c_7323461.elements[19] = ((closureN)self_7313900)->elements[19];
c_7323461.elements[20] = ((closureN)self_7313900)->elements[20];
c_7323461.elements[21] = ((closureN)self_7313900)->elements[21];
c_7323461.elements[22] = ((closureN)self_7313900)->elements[23];
c_7323461.elements[23] = ((closureN)self_7313900)->elements[24];

return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7323461, ((closureN)self_7313900)->elements[22], r_736724);; 
}

static void __lambda_1004(void *data, object self_7313901, int argc, object *args) /* object self_7313901, object r_736618 */
 {
 object r_736618 = args[0];
  if( (boolean_f != r_736618) ){ 
  
make_utf8_string_with_len(c_7323464, "multiple ellipses", 17, 17);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7313901)->elements[18], &c_7323464, ((closureN)self_7313901)->elements[21]);
} else { 
  


closureN_type c_7323470;
object e_7323744 [23];
c_7323470.hdr.mark = gc_color_red;
 c_7323470.hdr.grayed = 0;
c_7323470.tag = closureN_tag;
 c_7323470.fn = (function_type)__lambda_1005;
c_7323470.num_args = 1;
c_7323470.num_elements = 23;
c_7323470.elements = (object *)e_7323744;
c_7323470.elements[0] = ((closureN)self_7313901)->elements[0];
c_7323470.elements[1] = ((closureN)self_7313901)->elements[1];
c_7323470.elements[2] = ((closureN)self_7313901)->elements[2];
c_7323470.elements[3] = ((closureN)self_7313901)->elements[3];
c_7323470.elements[4] = ((closureN)self_7313901)->elements[4];
c_7323470.elements[5] = ((closureN)self_7313901)->elements[5];
c_7323470.elements[6] = ((closureN)self_7313901)->elements[6];
c_7323470.elements[7] = ((closureN)self_7313901)->elements[7];
c_7323470.elements[8] = ((closureN)self_7313901)->elements[8];
c_7323470.elements[9] = ((closureN)self_7313901)->elements[9];
c_7323470.elements[10] = ((closureN)self_7313901)->elements[10];
c_7323470.elements[11] = ((closureN)self_7313901)->elements[11];
c_7323470.elements[12] = ((closureN)self_7313901)->elements[12];
c_7323470.elements[13] = ((closureN)self_7313901)->elements[13];
c_7323470.elements[14] = ((closureN)self_7313901)->elements[14];
c_7323470.elements[15] = ((closureN)self_7313901)->elements[15];
c_7323470.elements[16] = ((closureN)self_7313901)->elements[16];
c_7323470.elements[17] = ((closureN)self_7313901)->elements[17];
c_7323470.elements[18] = ((closureN)self_7313901)->elements[18];
c_7323470.elements[19] = ((closureN)self_7313901)->elements[19];
c_7323470.elements[20] = ((closureN)self_7313901)->elements[21];
c_7323470.elements[21] = ((closureN)self_7313901)->elements[22];
c_7323470.elements[22] = ((closureN)self_7313901)->elements[23];


make_utf8_string_with_len(c_7323745, "lp.", 3, 3);
return_closcall2(data,  car(((closureN)self_7313901)->elements[20]),  &c_7323470, &c_7323745);}
;; 
}

static void __lambda_1005(void *data, object self_7313902, int argc, object *args) /* object self_7313902, object r_736620 */
 {
 object r_736620 = args[0];
  
closureN_type c_7323472;
object e_7323736 [23];
c_7323472.hdr.mark = gc_color_red;
 c_7323472.hdr.grayed = 0;
c_7323472.tag = closureN_tag;
 c_7323472.fn = (function_type)__lambda_1006;
c_7323472.num_args = 2;
c_7323472.num_elements = 23;
c_7323472.elements = (object *)e_7323736;
c_7323472.elements[0] = ((closureN)self_7313902)->elements[0];
c_7323472.elements[1] = ((closureN)self_7313902)->elements[1];
c_7323472.elements[2] = ((closureN)self_7313902)->elements[2];
c_7323472.elements[3] = ((closureN)self_7313902)->elements[3];
c_7323472.elements[4] = ((closureN)self_7313902)->elements[4];
c_7323472.elements[5] = ((closureN)self_7313902)->elements[5];
c_7323472.elements[6] = ((closureN)self_7313902)->elements[6];
c_7323472.elements[7] = ((closureN)self_7313902)->elements[7];
c_7323472.elements[8] = ((closureN)self_7313902)->elements[8];
c_7323472.elements[9] = ((closureN)self_7313902)->elements[9];
c_7323472.elements[10] = ((closureN)self_7313902)->elements[10];
c_7323472.elements[11] = ((closureN)self_7313902)->elements[11];
c_7323472.elements[12] = ((closureN)self_7313902)->elements[12];
c_7323472.elements[13] = ((closureN)self_7313902)->elements[13];
c_7323472.elements[14] = ((closureN)self_7313902)->elements[14];
c_7323472.elements[15] = ((closureN)self_7313902)->elements[15];
c_7323472.elements[16] = ((closureN)self_7313902)->elements[16];
c_7323472.elements[17] = ((closureN)self_7313902)->elements[17];
c_7323472.elements[18] = ((closureN)self_7313902)->elements[18];
c_7323472.elements[19] = ((closureN)self_7313902)->elements[19];
c_7323472.elements[20] = ((closureN)self_7313902)->elements[20];
c_7323472.elements[21] = ((closureN)self_7313902)->elements[21];
c_7323472.elements[22] = ((closureN)self_7313902)->elements[22];







return_direct_with_clo2(data,(closure)&c_7323472,__lambda_1006,  Cyc_length(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313902)->elements[20]))), r_736620);; 
}

static void __lambda_1006(void *data, object self_7313903, int argc, object *args) /* object self_7313903, object len_731335_733632, object _191lp_731336_733633 */
 {
 object len_731335_733632 = args[0]; object _191lp_731336_733633 = args[1];
  


closureN_type c_7323477;
object e_7323673 [18];
c_7323477.hdr.mark = gc_color_red;
 c_7323477.hdr.grayed = 0;
c_7323477.tag = closureN_tag;
 c_7323477.fn = (function_type)__lambda_1007;
c_7323477.num_args = 1;
c_7323477.num_elements = 18;
c_7323477.elements = (object *)e_7323673;
c_7323477.elements[0] = ((closureN)self_7313903)->elements[0];
c_7323477.elements[1] = ((closureN)self_7313903)->elements[1];
c_7323477.elements[2] = ((closureN)self_7313903)->elements[2];
c_7323477.elements[3] = ((closureN)self_7313903)->elements[3];
c_7323477.elements[4] = ((closureN)self_7313903)->elements[4];
c_7323477.elements[5] = ((closureN)self_7313903)->elements[6];
c_7323477.elements[6] = ((closureN)self_7313903)->elements[7];
c_7323477.elements[7] = ((closureN)self_7313903)->elements[8];
c_7323477.elements[8] = ((closureN)self_7313903)->elements[9];
c_7323477.elements[9] = ((closureN)self_7313903)->elements[10];
c_7323477.elements[10] = ((closureN)self_7313903)->elements[11];
c_7323477.elements[11] = _191lp_731336_733633;
c_7323477.elements[12] = ((closureN)self_7313903)->elements[12];
c_7323477.elements[13] = ((closureN)self_7313903)->elements[13];
c_7323477.elements[14] = ((closureN)self_7313903)->elements[14];
c_7323477.elements[15] = ((closureN)self_7313903)->elements[18];
c_7323477.elements[16] = len_731335_733632;
c_7323477.elements[17] = ((closureN)self_7313903)->elements[21];


pair_type local_7323676; 



pair_type local_7323682; 

pair_type local_7323685; 



pair_type local_7323691; 





pair_type local_7323699; 

pair_type local_7323703; 

pair_type local_7323707; 

pair_type local_7323710; 

pair_type local_7323714; 

pair_type local_7323717; 

pair_type local_7323721; 

pair_type local_7323725; 

pair_type local_7323728; 

pair_type local_7323732; 
return_closcall6(data,  car(((closureN)self_7313903)->elements[19]),  &c_7323477, set_pair_as_expr(&local_7323676, Cyc_cddr(data, ((closureN)self_7313903)->elements[20]), set_pair_as_expr(&local_7323682, set_pair_as_expr(&local_7323685, Cyc_car(data, ((closureN)self_7313903)->elements[20]), set_pair_as_expr(&local_7323691, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313903)->elements[20])), NULL)), NULL)), set_pair_as_expr(&local_7323699, ((closureN)self_7313903)->elements[5], set_pair_as_expr(&local_7323703, ((closureN)self_7313903)->elements[12], set_pair_as_expr(&local_7323707, set_pair_as_expr(&local_7323710, ((closureN)self_7313903)->elements[5], set_pair_as_expr(&local_7323714, set_pair_as_expr(&local_7323717, ((closureN)self_7313903)->elements[15], set_pair_as_expr(&local_7323721, ((closureN)self_7313903)->elements[14], NULL)), set_pair_as_expr(&local_7323725, set_pair_as_expr(&local_7323728, ((closureN)self_7313903)->elements[13], set_pair_as_expr(&local_7323732, NULL, NULL)), NULL))), NULL))), ((closureN)self_7313903)->elements[16], ((closureN)self_7313903)->elements[22], ((closureN)self_7313903)->elements[17]);; 
}

static void __lambda_1007(void *data, object self_7313904, int argc, object *args) /* object self_7313904, object r_736640 */
 {
 object r_736640 = args[0];
  
pair_type local_7323482; 

pair_type local_7323486; 

pair_type local_7323489; 

pair_type local_7323492; 

pair_type local_7323496; 

pair_type local_7323499; 

pair_type local_7323503; 

pair_type local_7323507; 

pair_type local_7323510; 

pair_type local_7323514; 

pair_type local_7323517; 

pair_type local_7323521; 

pair_type local_7323525; 

pair_type local_7323529; 

pair_type local_7323532; 

pair_type local_7323536; 

pair_type local_7323540; 

pair_type local_7323543; 

pair_type local_7323546; 

pair_type local_7323550; 

pair_type local_7323554; 

pair_type local_7323557; 

pair_type local_7323561; 

pair_type local_7323564; 

pair_type local_7323568; 

pair_type local_7323572; 

pair_type local_7323576; 

pair_type local_7323579; 

pair_type local_7323583; 

pair_type local_7323586; 

pair_type local_7323590; 

pair_type local_7323593; 

pair_type local_7323596; 

pair_type local_7323600; 

pair_type local_7323603; 

pair_type local_7323607; 

pair_type local_7323610; 

pair_type local_7323614; 

pair_type local_7323617; 

pair_type local_7323620; 

pair_type local_7323624; 

pair_type local_7323627; 

pair_type local_7323631; 

pair_type local_7323635; 

pair_type local_7323638; 

pair_type local_7323642; 

pair_type local_7323646; 

pair_type local_7323649; 

pair_type local_7323652; 

pair_type local_7323656; 

pair_type local_7323659; 

pair_type local_7323663; 

pair_type local_7323667; 

pair_type local_7323671; 
return_direct_with_clo1(data,  ((closureN)self_7313904)->elements[15], (((closure)  ((closureN)self_7313904)->elements[15])->fn),  set_pair_as_expr(&local_7323482, ((closureN)self_7313904)->elements[10], set_pair_as_expr(&local_7323486, set_pair_as_expr(&local_7323489, set_pair_as_expr(&local_7323492, ((closureN)self_7313904)->elements[8], set_pair_as_expr(&local_7323496, set_pair_as_expr(&local_7323499, ((closureN)self_7313904)->elements[9], set_pair_as_expr(&local_7323503, ((closureN)self_7313904)->elements[17], NULL)), NULL)), NULL), set_pair_as_expr(&local_7323507, set_pair_as_expr(&local_7323510, ((closureN)self_7313904)->elements[2], set_pair_as_expr(&local_7323514, set_pair_as_expr(&local_7323517, ((closureN)self_7313904)->elements[1], set_pair_as_expr(&local_7323521, ((closureN)self_7313904)->elements[8], set_pair_as_expr(&local_7323525, ((closureN)self_7313904)->elements[16], NULL))), set_pair_as_expr(&local_7323529, set_pair_as_expr(&local_7323532, ((closureN)self_7313904)->elements[10], set_pair_as_expr(&local_7323536, ((closureN)self_7313904)->elements[11], set_pair_as_expr(&local_7323540, set_pair_as_expr(&local_7323543, set_pair_as_expr(&local_7323546, ((closureN)self_7313904)->elements[12], set_pair_as_expr(&local_7323550, ((closureN)self_7313904)->elements[17], NULL)), set_pair_as_expr(&local_7323554, set_pair_as_expr(&local_7323557, ((closureN)self_7313904)->elements[6], set_pair_as_expr(&local_7323561, set_pair_as_expr(&local_7323564, ((closureN)self_7313904)->elements[0], set_pair_as_expr(&local_7323568, ((closureN)self_7313904)->elements[8], set_pair_as_expr(&local_7323572, ((closureN)self_7313904)->elements[16], NULL))), NULL)), set_pair_as_expr(&local_7323576, set_pair_as_expr(&local_7323579, ((closureN)self_7313904)->elements[14], set_pair_as_expr(&local_7323583, set_pair_as_expr(&local_7323586, ((closureN)self_7313904)->elements[13], set_pair_as_expr(&local_7323590, NULL, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7323593, set_pair_as_expr(&local_7323596, ((closureN)self_7313904)->elements[7], set_pair_as_expr(&local_7323600, set_pair_as_expr(&local_7323603, ((closureN)self_7313904)->elements[1], set_pair_as_expr(&local_7323607, obj_int2obj(0), set_pair_as_expr(&local_7323610, ((closureN)self_7313904)->elements[6], NULL))), set_pair_as_expr(&local_7323614, r_736640, set_pair_as_expr(&local_7323617, set_pair_as_expr(&local_7323620, ((closureN)self_7313904)->elements[11], set_pair_as_expr(&local_7323624, set_pair_as_expr(&local_7323627, ((closureN)self_7313904)->elements[4], set_pair_as_expr(&local_7323631, ((closureN)self_7313904)->elements[12], NULL)), set_pair_as_expr(&local_7323635, set_pair_as_expr(&local_7323638, ((closureN)self_7313904)->elements[0], set_pair_as_expr(&local_7323642, ((closureN)self_7313904)->elements[6], set_pair_as_expr(&local_7323646, obj_int2obj(1), NULL))), set_pair_as_expr(&local_7323649, set_pair_as_expr(&local_7323652, ((closureN)self_7313904)->elements[5], set_pair_as_expr(&local_7323656, set_pair_as_expr(&local_7323659, ((closureN)self_7313904)->elements[3], set_pair_as_expr(&local_7323663, ((closureN)self_7313904)->elements[12], NULL)), set_pair_as_expr(&local_7323667, ((closureN)self_7313904)->elements[14], set_pair_as_expr(&local_7323671, ((closureN)self_7313904)->elements[12], NULL)))), NULL)))), NULL)))), NULL)))), NULL))), NULL))));; 
}

static void __lambda_976(void *data, object self_7313871, int argc, object *args) /* object self_7313871, object r_736563 */
 {
 object r_736563 = args[0];
  if( (boolean_f != r_736563) ){ 
  
closureN_type c_7323209;
object e_7323235 [6];
c_7323209.hdr.mark = gc_color_red;
 c_7323209.hdr.grayed = 0;
c_7323209.tag = closureN_tag;
 c_7323209.fn = (function_type)__lambda_977;
c_7323209.num_args = 1;
c_7323209.num_elements = 6;
c_7323209.elements = (object *)e_7323235;
c_7323209.elements[0] = ((closureN)self_7313871)->elements[0];
c_7323209.elements[1] = ((closureN)self_7313871)->elements[5];
c_7323209.elements[2] = ((closureN)self_7313871)->elements[6];
c_7323209.elements[3] = ((closureN)self_7313871)->elements[14];
c_7323209.elements[4] = ((closureN)self_7313871)->elements[17];
c_7323209.elements[5] = ((closureN)self_7313871)->elements[18];


pair_type local_7323238; 

pair_type local_7323241; 



complex_num_type local_7323247; 
return_closcall2(data,  ((closureN)self_7313871)->elements[13],  &c_7323209, set_pair_as_expr(&local_7323238, set_pair_as_expr(&local_7323241, Cyc_car(data, ((closureN)self_7313871)->elements[17]), Cyc_fast_sum(data,&local_7323247, obj_int2obj(1), ((closureN)self_7313871)->elements[12])), ((closureN)self_7313871)->elements[19]));
} else { 
  


closureN_type c_7323254;
object e_7323450 [19];
c_7323254.hdr.mark = gc_color_red;
 c_7323254.hdr.grayed = 0;
c_7323254.tag = closureN_tag;
 c_7323254.fn = (function_type)__lambda_978;
c_7323254.num_args = 1;
c_7323254.num_elements = 19;
c_7323254.elements = (object *)e_7323450;
c_7323254.elements[0] = ((closureN)self_7313871)->elements[0];
c_7323254.elements[1] = ((closureN)self_7313871)->elements[1];
c_7323254.elements[2] = ((closureN)self_7313871)->elements[2];
c_7323254.elements[3] = ((closureN)self_7313871)->elements[3];
c_7323254.elements[4] = ((closureN)self_7313871)->elements[4];
c_7323254.elements[5] = ((closureN)self_7313871)->elements[5];
c_7323254.elements[6] = ((closureN)self_7313871)->elements[7];
c_7323254.elements[7] = ((closureN)self_7313871)->elements[8];
c_7323254.elements[8] = ((closureN)self_7313871)->elements[9];
c_7323254.elements[9] = ((closureN)self_7313871)->elements[10];
c_7323254.elements[10] = ((closureN)self_7313871)->elements[11];
c_7323254.elements[11] = ((closureN)self_7313871)->elements[12];
c_7323254.elements[12] = ((closureN)self_7313871)->elements[13];
c_7323254.elements[13] = ((closureN)self_7313871)->elements[14];
c_7323254.elements[14] = ((closureN)self_7313871)->elements[15];
c_7323254.elements[15] = ((closureN)self_7313871)->elements[16];
c_7323254.elements[16] = ((closureN)self_7313871)->elements[17];
c_7323254.elements[17] = ((closureN)self_7313871)->elements[18];
c_7323254.elements[18] = ((closureN)self_7313871)->elements[19];


make_utf8_string_with_len(c_7323451, "w.", 2, 2);
return_closcall2(data,  car(((closureN)self_7313871)->elements[16]),  &c_7323254, &c_7323451);}
;; 
}

static void __lambda_978(void *data, object self_7313873, int argc, object *args) /* object self_7313873, object w_731352_733634 */
 {
 object w_731352_733634 = args[0];
  


closureN_type c_7323259;
object e_7323448 [20];
c_7323259.hdr.mark = gc_color_red;
 c_7323259.hdr.grayed = 0;
c_7323259.tag = closureN_tag;
 c_7323259.fn = (function_type)__lambda_979;
c_7323259.num_args = 1;
c_7323259.num_elements = 20;
c_7323259.elements = (object *)e_7323448;
c_7323259.elements[0] = ((closureN)self_7313873)->elements[0];
c_7323259.elements[1] = ((closureN)self_7313873)->elements[1];
c_7323259.elements[2] = ((closureN)self_7313873)->elements[2];
c_7323259.elements[3] = ((closureN)self_7313873)->elements[3];
c_7323259.elements[4] = ((closureN)self_7313873)->elements[4];
c_7323259.elements[5] = ((closureN)self_7313873)->elements[5];
c_7323259.elements[6] = ((closureN)self_7313873)->elements[6];
c_7323259.elements[7] = ((closureN)self_7313873)->elements[7];
c_7323259.elements[8] = ((closureN)self_7313873)->elements[8];
c_7323259.elements[9] = ((closureN)self_7313873)->elements[9];
c_7323259.elements[10] = ((closureN)self_7313873)->elements[10];
c_7323259.elements[11] = ((closureN)self_7313873)->elements[11];
c_7323259.elements[12] = ((closureN)self_7313873)->elements[12];
c_7323259.elements[13] = ((closureN)self_7313873)->elements[13];
c_7323259.elements[14] = ((closureN)self_7313873)->elements[14];
c_7323259.elements[15] = ((closureN)self_7313873)->elements[15];
c_7323259.elements[16] = ((closureN)self_7313873)->elements[16];
c_7323259.elements[17] = ((closureN)self_7313873)->elements[17];
c_7323259.elements[18] = ((closureN)self_7313873)->elements[18];
c_7323259.elements[19] = w_731352_733634;


make_utf8_string_with_len(c_7323449, "lp.", 3, 3);
return_closcall2(data,  car(((closureN)self_7313873)->elements[15]),  &c_7323259, &c_7323449);; 
}

static void __lambda_979(void *data, object self_7313874, int argc, object *args) /* object self_7313874, object _191lp_731355_733635 */
 {
 object _191lp_731355_733635 = args[0];
  


closureN_type c_7323264;
object e_7323440 [20];
c_7323264.hdr.mark = gc_color_red;
 c_7323264.hdr.grayed = 0;
c_7323264.tag = closureN_tag;
 c_7323264.fn = (function_type)__lambda_980;
c_7323264.num_args = 1;
c_7323264.num_elements = 20;
c_7323264.elements = (object *)e_7323440;
c_7323264.elements[0] = ((closureN)self_7313874)->elements[0];
c_7323264.elements[1] = ((closureN)self_7313874)->elements[1];
c_7323264.elements[2] = ((closureN)self_7313874)->elements[2];
c_7323264.elements[3] = ((closureN)self_7313874)->elements[3];
c_7323264.elements[4] = ((closureN)self_7313874)->elements[4];
c_7323264.elements[5] = ((closureN)self_7313874)->elements[5];
c_7323264.elements[6] = _191lp_731355_733635;
c_7323264.elements[7] = ((closureN)self_7313874)->elements[6];
c_7323264.elements[8] = ((closureN)self_7313874)->elements[7];
c_7323264.elements[9] = ((closureN)self_7313874)->elements[8];
c_7323264.elements[10] = ((closureN)self_7313874)->elements[9];
c_7323264.elements[11] = ((closureN)self_7313874)->elements[11];
c_7323264.elements[12] = ((closureN)self_7313874)->elements[12];
c_7323264.elements[13] = ((closureN)self_7313874)->elements[13];
c_7323264.elements[14] = ((closureN)self_7313874)->elements[14];
c_7323264.elements[15] = ((closureN)self_7313874)->elements[15];
c_7323264.elements[16] = ((closureN)self_7313874)->elements[16];
c_7323264.elements[17] = ((closureN)self_7313874)->elements[17];
c_7323264.elements[18] = ((closureN)self_7313874)->elements[18];
c_7323264.elements[19] = ((closureN)self_7313874)->elements[19];




complex_num_type local_7323446; 
return_closcall3(data,  car(((closureN)self_7313874)->elements[10]),  &c_7323264, Cyc_car(data, ((closureN)self_7313874)->elements[16]), Cyc_fast_sum(data,&local_7323446, ((closureN)self_7313874)->elements[11], obj_int2obj(1)));; 
}

static void __lambda_980(void *data, object self_7313875, int argc, object *args) /* object self_7313875, object new_91vars_731358_733636 */
 {
 object new_91vars_731358_733636 = args[0];
  
closureN_type c_7323266;
object e_7323417 [20];
c_7323266.hdr.mark = gc_color_red;
 c_7323266.hdr.grayed = 0;
c_7323266.tag = closureN_tag;
 c_7323266.fn = (function_type)__lambda_981;
c_7323266.num_args = 1;
c_7323266.num_elements = 20;
c_7323266.elements = (object *)e_7323417;
c_7323266.elements[0] = ((closureN)self_7313875)->elements[0];
c_7323266.elements[1] = ((closureN)self_7313875)->elements[1];
c_7323266.elements[2] = ((closureN)self_7313875)->elements[2];
c_7323266.elements[3] = ((closureN)self_7313875)->elements[3];
c_7323266.elements[4] = ((closureN)self_7313875)->elements[4];
c_7323266.elements[5] = ((closureN)self_7313875)->elements[5];
c_7323266.elements[6] = ((closureN)self_7313875)->elements[6];
c_7323266.elements[7] = ((closureN)self_7313875)->elements[7];
c_7323266.elements[8] = ((closureN)self_7313875)->elements[8];
c_7323266.elements[9] = ((closureN)self_7313875)->elements[9];
c_7323266.elements[10] = ((closureN)self_7313875)->elements[10];
c_7323266.elements[11] = ((closureN)self_7313875)->elements[11];
c_7323266.elements[12] = ((closureN)self_7313875)->elements[12];
c_7323266.elements[13] = ((closureN)self_7313875)->elements[13];
c_7323266.elements[14] = ((closureN)self_7313875)->elements[14];
c_7323266.elements[15] = new_91vars_731358_733636;
c_7323266.elements[16] = ((closureN)self_7313875)->elements[16];
c_7323266.elements[17] = ((closureN)self_7313875)->elements[17];
c_7323266.elements[18] = ((closureN)self_7313875)->elements[18];
c_7323266.elements[19] = ((closureN)self_7313875)->elements[19];


closureN_type c_7323418;
object e_7323439 [1];
c_7323418.hdr.mark = gc_color_red;
 c_7323418.hdr.grayed = 0;
c_7323418.tag = closureN_tag;
 c_7323418.fn = (function_type)__lambda_999;
c_7323418.num_args = 1;
c_7323418.num_elements = 1;
c_7323418.elements = (object *)e_7323439;
c_7323418.elements[0] = ((closureN)self_7313875)->elements[15];

return_direct_with_clo1(data,(closure)&c_7323266,__lambda_981,  &c_7323418);; 
}

static void __lambda_999(void *data, object self_7313876, int argc, object *args) /* object self_7313876, object k_736611, object x_731372_733645 */
 {
 object k_736611 = args[0]; object x_731372_733645 = args[1];
  
closureN_type c_7323420;
object e_7323433 [2];
c_7323420.hdr.mark = gc_color_red;
 c_7323420.hdr.grayed = 0;
c_7323420.tag = closureN_tag;
 c_7323420.fn = (function_type)__lambda_1000;
c_7323420.num_args = 1;
c_7323420.num_elements = 2;
c_7323420.elements = (object *)e_7323433;
c_7323420.elements[0] = k_736611;
c_7323420.elements[1] = ((closureN)self_7313876)->elements[0];




object c_7323436 = Cyc_symbol2string(data,(closure)&c_7323420,Cyc_car(data, x_731372_733645));
return_closcall1(data,(closure)&c_7323420,  c_7323436);; 
}

static void __lambda_1000(void *data, object self_7313877, int argc, object *args) /* object self_7313877, object r_736613 */
 {
 object r_736613 = args[0];
  
closureN_type c_7323422;
object e_7323428 [2];
c_7323422.hdr.mark = gc_color_red;
 c_7323422.hdr.grayed = 0;
c_7323422.tag = closureN_tag;
 c_7323422.fn = (function_type)__lambda_1001;
c_7323422.num_args = 1;
c_7323422.num_elements = 2;
c_7323422.elements = (object *)e_7323428;
c_7323422.elements[0] = ((closureN)self_7313877)->elements[0];
c_7323422.elements[1] = ((closureN)self_7313877)->elements[1];


make_utf8_string_with_len(c_7323432, "-ls", 3, 3);

object c_7323431 = Cyc_string_append(data,(closure)&c_7323422,2,r_736613, &c_7323432);
return_closcall1(data,(closure)&c_7323422,  c_7323431);; 
}

static void __lambda_1001(void *data, object self_7313878, int argc, object *args) /* object self_7313878, object r_736612 */
 {
 object r_736612 = args[0];
  

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

static void __lambda_981(void *data, object self_7313879, int argc, object *args) /* object self_7313879, object r_736610 */
 {
 object r_736610 = args[0];
  
closureN_type c_7323268;
object e_7323415 [20];
c_7323268.hdr.mark = gc_color_red;
 c_7323268.hdr.grayed = 0;
c_7323268.tag = closureN_tag;
 c_7323268.fn = (function_type)__lambda_982;
c_7323268.num_args = 1;
c_7323268.num_elements = 20;
c_7323268.elements = (object *)e_7323415;
c_7323268.elements[0] = ((closureN)self_7313879)->elements[0];
c_7323268.elements[1] = ((closureN)self_7313879)->elements[1];
c_7323268.elements[2] = ((closureN)self_7313879)->elements[2];
c_7323268.elements[3] = ((closureN)self_7313879)->elements[3];
c_7323268.elements[4] = ((closureN)self_7313879)->elements[4];
c_7323268.elements[5] = ((closureN)self_7313879)->elements[5];
c_7323268.elements[6] = ((closureN)self_7313879)->elements[6];
c_7323268.elements[7] = ((closureN)self_7313879)->elements[7];
c_7323268.elements[8] = ((closureN)self_7313879)->elements[8];
c_7323268.elements[9] = ((closureN)self_7313879)->elements[9];
c_7323268.elements[10] = ((closureN)self_7313879)->elements[10];
c_7323268.elements[11] = ((closureN)self_7313879)->elements[11];
c_7323268.elements[12] = ((closureN)self_7313879)->elements[12];
c_7323268.elements[13] = ((closureN)self_7313879)->elements[13];
c_7323268.elements[14] = ((closureN)self_7313879)->elements[14];
c_7323268.elements[15] = ((closureN)self_7313879)->elements[15];
c_7323268.elements[16] = ((closureN)self_7313879)->elements[16];
c_7323268.elements[17] = ((closureN)self_7313879)->elements[17];
c_7323268.elements[18] = ((closureN)self_7313879)->elements[18];
c_7323268.elements[19] = ((closureN)self_7313879)->elements[19];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7323268, r_736610, ((closureN)self_7313879)->elements[15]);; 
}

static void __lambda_982(void *data, object self_7313880, int argc, object *args) /* object self_7313880, object ls_91vars_731361_733637 */
 {
 object ls_91vars_731361_733637 = args[0];
  
closureN_type c_7323270;
object e_7323378 [19];
c_7323270.hdr.mark = gc_color_red;
 c_7323270.hdr.grayed = 0;
c_7323270.tag = closureN_tag;
 c_7323270.fn = (function_type)__lambda_983;
c_7323270.num_args = 1;
c_7323270.num_elements = 19;
c_7323270.elements = (object *)e_7323378;
c_7323270.elements[0] = ((closureN)self_7313880)->elements[0];
c_7323270.elements[1] = ((closureN)self_7313880)->elements[1];
c_7323270.elements[2] = ((closureN)self_7313880)->elements[4];
c_7323270.elements[3] = ((closureN)self_7313880)->elements[5];
c_7323270.elements[4] = ((closureN)self_7313880)->elements[6];
c_7323270.elements[5] = ((closureN)self_7313880)->elements[7];
c_7323270.elements[6] = ((closureN)self_7313880)->elements[8];
c_7323270.elements[7] = ((closureN)self_7313880)->elements[9];
c_7323270.elements[8] = ((closureN)self_7313880)->elements[10];
c_7323270.elements[9] = ((closureN)self_7313880)->elements[11];
c_7323270.elements[10] = ((closureN)self_7313880)->elements[12];
c_7323270.elements[11] = ((closureN)self_7313880)->elements[13];
c_7323270.elements[12] = ((closureN)self_7313880)->elements[14];
c_7323270.elements[13] = ls_91vars_731361_733637;
c_7323270.elements[14] = ((closureN)self_7313880)->elements[15];
c_7323270.elements[15] = ((closureN)self_7313880)->elements[16];
c_7323270.elements[16] = ((closureN)self_7313880)->elements[17];
c_7323270.elements[17] = ((closureN)self_7313880)->elements[18];
c_7323270.elements[18] = ((closureN)self_7313880)->elements[19];


closureN_type c_7323379;
object e_7323414 [6];
c_7323379.hdr.mark = gc_color_red;
 c_7323379.hdr.grayed = 0;
c_7323379.tag = closureN_tag;
 c_7323379.fn = (function_type)__lambda_994;
c_7323379.num_args = 1;
c_7323379.num_elements = 6;
c_7323379.elements = (object *)e_7323414;
c_7323379.elements[0] = ((closureN)self_7313880)->elements[2];
c_7323379.elements[1] = ((closureN)self_7313880)->elements[3];
c_7323379.elements[2] = ((closureN)self_7313880)->elements[6];
c_7323379.elements[3] = ls_91vars_731361_733637;
c_7323379.elements[4] = ((closureN)self_7313880)->elements[15];
c_7323379.elements[5] = ((closureN)self_7313880)->elements[19];

return_direct_with_clo1(data,(closure)&c_7323270,__lambda_983,  &c_7323379);; 
}

static void __lambda_994(void *data, object self_7313881, int argc, object *args) /* object self_7313881, object k_736603, object _191_731369_733642 */
 {
 object k_736603 = args[0];
  
closureN_type c_7323381;
object e_7323404 [6];
c_7323381.hdr.mark = gc_color_red;
 c_7323381.hdr.grayed = 0;
c_7323381.tag = closureN_tag;
 c_7323381.fn = (function_type)__lambda_995;
c_7323381.num_args = 1;
c_7323381.num_elements = 6;
c_7323381.elements = (object *)e_7323404;
c_7323381.elements[0] = ((closureN)self_7313881)->elements[0];
c_7323381.elements[1] = ((closureN)self_7313881)->elements[2];
c_7323381.elements[2] = k_736603;
c_7323381.elements[3] = ((closureN)self_7313881)->elements[3];
c_7323381.elements[4] = ((closureN)self_7313881)->elements[4];
c_7323381.elements[5] = ((closureN)self_7313881)->elements[5];


closureN_type c_7323405;
object e_7323413 [1];
c_7323405.hdr.mark = gc_color_red;
 c_7323405.hdr.grayed = 0;
c_7323405.tag = closureN_tag;
 c_7323405.fn = (function_type)__lambda_998;
c_7323405.num_args = 2;
c_7323405.num_elements = 1;
c_7323405.elements = (object *)e_7323413;
c_7323405.elements[0] = ((closureN)self_7313881)->elements[1];

return_direct_with_clo1(data,(closure)&c_7323381,__lambda_995,  &c_7323405);; 
}

static void __lambda_998(void *data, object self_7313882, int argc, object *args) /* object self_7313882, object k_736608, object x_731370_733643, object l_731371_733644 */
 {
 object k_736608 = args[0]; object x_731370_733643 = args[1]; object l_731371_733644 = args[2];
  
list_3_type local_7323409; 


return_direct_with_clo1(data,  k_736608, (((closure)  k_736608)->fn),  Cyc_fast_list_3(&local_7323409, ((closureN)self_7313882)->elements[0], Cyc_car(data, x_731370_733643), l_731371_733644));; 
}

static void __lambda_995(void *data, object self_7313883, int argc, object *args) /* object self_7313883, object r_736607 */
 {
 object r_736607 = args[0];
  
closureN_type c_7323383;
object e_7323401 [4];
c_7323383.hdr.mark = gc_color_red;
 c_7323383.hdr.grayed = 0;
c_7323383.tag = closureN_tag;
 c_7323383.fn = (function_type)__lambda_996;
c_7323383.num_args = 1;
c_7323383.num_elements = 4;
c_7323383.elements = (object *)e_7323401;
c_7323383.elements[0] = ((closureN)self_7313883)->elements[0];
c_7323383.elements[1] = ((closureN)self_7313883)->elements[1];
c_7323383.elements[2] = ((closureN)self_7313883)->elements[2];
c_7323383.elements[3] = ((closureN)self_7313883)->elements[5];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7323383, r_736607, ((closureN)self_7313883)->elements[4], ((closureN)self_7313883)->elements[3]);; 
}

static void __lambda_996(void *data, object self_7313884, int argc, object *args) /* object self_7313884, object r_736606 */
 {
 object r_736606 = args[0];
  
closureN_type c_7323385;
object e_7323392 [2];
c_7323385.hdr.mark = gc_color_red;
 c_7323385.hdr.grayed = 0;
c_7323385.tag = closureN_tag;
 c_7323385.fn = (function_type)__lambda_997;
c_7323385.num_args = 1;
c_7323385.num_elements = 2;
c_7323385.elements = (object *)e_7323392;
c_7323385.elements[0] = ((closureN)self_7313884)->elements[1];
c_7323385.elements[1] = ((closureN)self_7313884)->elements[2];


pair_type local_7323395; 

list_2_type local_7323398; 
return_direct_with_clo1(data,(closure)&c_7323385,__lambda_997,  set_pair_as_expr(&local_7323395, Cyc_fast_list_2(&local_7323398, ((closureN)self_7313884)->elements[0], ((closureN)self_7313884)->elements[3]), r_736606));; 
}

static void __lambda_997(void *data, object self_7313885, int argc, object *args) /* object self_7313885, object r_736604 */
 {
 object r_736604 = args[0];
  
pair_type local_7323390; 
return_direct_with_clo1(data,  ((closureN)self_7313885)->elements[1], (((closure)  ((closureN)self_7313885)->elements[1])->fn),  set_pair_as_expr(&local_7323390, ((closureN)self_7313885)->elements[0], r_736604));; 
}

static void __lambda_983(void *data, object self_7313886, int argc, object *args) /* object self_7313886, object r_736602 */
 {
 object r_736602 = args[0];
  


closureN_type c_7323275;
object e_7323365 [15];
c_7323275.hdr.mark = gc_color_red;
 c_7323275.hdr.grayed = 0;
c_7323275.tag = closureN_tag;
 c_7323275.fn = (function_type)__lambda_984;
c_7323275.num_args = 1;
c_7323275.num_elements = 15;
c_7323275.elements = (object *)e_7323365;
c_7323275.elements[0] = ((closureN)self_7313886)->elements[0];
c_7323275.elements[1] = ((closureN)self_7313886)->elements[2];
c_7323275.elements[2] = ((closureN)self_7313886)->elements[3];
c_7323275.elements[3] = ((closureN)self_7313886)->elements[4];
c_7323275.elements[4] = ((closureN)self_7313886)->elements[5];
c_7323275.elements[5] = ((closureN)self_7313886)->elements[6];
c_7323275.elements[6] = ((closureN)self_7313886)->elements[7];
c_7323275.elements[7] = ((closureN)self_7313886)->elements[8];
c_7323275.elements[8] = ((closureN)self_7313886)->elements[10];
c_7323275.elements[9] = ((closureN)self_7313886)->elements[11];
c_7323275.elements[10] = ((closureN)self_7313886)->elements[13];
c_7323275.elements[11] = ((closureN)self_7313886)->elements[14];
c_7323275.elements[12] = ((closureN)self_7313886)->elements[16];
c_7323275.elements[13] = ((closureN)self_7313886)->elements[17];
c_7323275.elements[14] = ((closureN)self_7313886)->elements[18];




list_2_type local_7323371; 

complex_num_type local_7323376; 
return_closcall6(data,  car(((closureN)self_7313886)->elements[12]),  &c_7323275, Cyc_car(data, ((closureN)self_7313886)->elements[15]), Cyc_fast_list_2(&local_7323371, ((closureN)self_7313886)->elements[1], ((closureN)self_7313886)->elements[18]), Cyc_fast_sum(data,&local_7323376, ((closureN)self_7313886)->elements[9], obj_int2obj(1)), NULL, r_736602);; 
}

static void __lambda_984(void *data, object self_7313887, int argc, object *args) /* object self_7313887, object once_731364_733638 */
 {
 object once_731364_733638 = args[0];
  
closureN_type c_7323277;
object e_7323354 [15];
c_7323277.hdr.mark = gc_color_red;
 c_7323277.hdr.grayed = 0;
c_7323277.tag = closureN_tag;
 c_7323277.fn = (function_type)__lambda_985;
c_7323277.num_args = 1;
c_7323277.num_elements = 15;
c_7323277.elements = (object *)e_7323354;
c_7323277.elements[0] = ((closureN)self_7313887)->elements[0];
c_7323277.elements[1] = ((closureN)self_7313887)->elements[1];
c_7323277.elements[2] = ((closureN)self_7313887)->elements[2];
c_7323277.elements[3] = ((closureN)self_7313887)->elements[3];
c_7323277.elements[4] = ((closureN)self_7313887)->elements[4];
c_7323277.elements[5] = ((closureN)self_7313887)->elements[5];
c_7323277.elements[6] = ((closureN)self_7313887)->elements[7];
c_7323277.elements[7] = ((closureN)self_7313887)->elements[8];
c_7323277.elements[8] = ((closureN)self_7313887)->elements[9];
c_7323277.elements[9] = ((closureN)self_7313887)->elements[10];
c_7323277.elements[10] = ((closureN)self_7313887)->elements[11];
c_7323277.elements[11] = once_731364_733638;
c_7323277.elements[12] = ((closureN)self_7313887)->elements[12];
c_7323277.elements[13] = ((closureN)self_7313887)->elements[13];
c_7323277.elements[14] = ((closureN)self_7313887)->elements[14];


closureN_type c_7323355;
object e_7323364 [1];
c_7323355.hdr.mark = gc_color_red;
 c_7323355.hdr.grayed = 0;
c_7323355.tag = closureN_tag;
 c_7323355.fn = (function_type)__lambda_993;
c_7323355.num_args = 1;
c_7323355.num_elements = 1;
c_7323355.elements = (object *)e_7323364;
c_7323355.elements[0] = ((closureN)self_7313887)->elements[6];

return_direct_with_clo1(data,(closure)&c_7323277,__lambda_985,  &c_7323355);; 
}

static void __lambda_993(void *data, object self_7313888, int argc, object *args) /* object self_7313888, object k_736595, object x_731366_733639 */
 {
 object k_736595 = args[0]; object x_731366_733639 = args[1];
  
list_2_type local_7323359; 

list_2_type local_7323362; 
return_direct_with_clo1(data,  k_736595, (((closure)  k_736595)->fn),  Cyc_fast_list_2(&local_7323359, x_731366_733639, Cyc_fast_list_2(&local_7323362, ((closureN)self_7313888)->elements[0], NULL)));; 
}

static void __lambda_985(void *data, object self_7313889, int argc, object *args) /* object self_7313889, object r_736594 */
 {
 object r_736594 = args[0];
  
closureN_type c_7323279;
object e_7323352 [15];
c_7323279.hdr.mark = gc_color_red;
 c_7323279.hdr.grayed = 0;
c_7323279.tag = closureN_tag;
 c_7323279.fn = (function_type)__lambda_986;
c_7323279.num_args = 1;
c_7323279.num_elements = 15;
c_7323279.elements = (object *)e_7323352;
c_7323279.elements[0] = ((closureN)self_7313889)->elements[0];
c_7323279.elements[1] = ((closureN)self_7313889)->elements[1];
c_7323279.elements[2] = ((closureN)self_7313889)->elements[2];
c_7323279.elements[3] = ((closureN)self_7313889)->elements[3];
c_7323279.elements[4] = ((closureN)self_7313889)->elements[4];
c_7323279.elements[5] = ((closureN)self_7313889)->elements[5];
c_7323279.elements[6] = ((closureN)self_7313889)->elements[6];
c_7323279.elements[7] = ((closureN)self_7313889)->elements[7];
c_7323279.elements[8] = ((closureN)self_7313889)->elements[8];
c_7323279.elements[9] = ((closureN)self_7313889)->elements[9];
c_7323279.elements[10] = ((closureN)self_7313889)->elements[10];
c_7323279.elements[11] = ((closureN)self_7313889)->elements[11];
c_7323279.elements[12] = ((closureN)self_7313889)->elements[12];
c_7323279.elements[13] = ((closureN)self_7313889)->elements[13];
c_7323279.elements[14] = ((closureN)self_7313889)->elements[14];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7323279, r_736594, ((closureN)self_7313889)->elements[9]);; 
}

static void __lambda_986(void *data, object self_7313890, int argc, object *args) /* object self_7313890, object r_736593 */
 {
 object r_736593 = args[0];
  
closureN_type c_7323281;
object e_7323339 [15];
c_7323281.hdr.mark = gc_color_red;
 c_7323281.hdr.grayed = 0;
c_7323281.tag = closureN_tag;
 c_7323281.fn = (function_type)__lambda_987;
c_7323281.num_args = 1;
c_7323281.num_elements = 15;
c_7323281.elements = (object *)e_7323339;
c_7323281.elements[0] = ((closureN)self_7313890)->elements[0];
c_7323281.elements[1] = ((closureN)self_7313890)->elements[1];
c_7323281.elements[2] = ((closureN)self_7313890)->elements[2];
c_7323281.elements[3] = ((closureN)self_7313890)->elements[3];
c_7323281.elements[4] = ((closureN)self_7313890)->elements[4];
c_7323281.elements[5] = ((closureN)self_7313890)->elements[5];
c_7323281.elements[6] = ((closureN)self_7313890)->elements[7];
c_7323281.elements[7] = ((closureN)self_7313890)->elements[8];
c_7323281.elements[8] = ((closureN)self_7313890)->elements[9];
c_7323281.elements[9] = ((closureN)self_7313890)->elements[10];
c_7323281.elements[10] = ((closureN)self_7313890)->elements[11];
c_7323281.elements[11] = r_736593;
c_7323281.elements[12] = ((closureN)self_7313890)->elements[12];
c_7323281.elements[13] = ((closureN)self_7313890)->elements[13];
c_7323281.elements[14] = ((closureN)self_7313890)->elements[14];


closureN_type c_7323340;
object e_7323351 [1];
c_7323340.hdr.mark = gc_color_red;
 c_7323340.hdr.grayed = 0;
c_7323340.tag = closureN_tag;
 c_7323340.fn = (function_type)__lambda_992;
c_7323340.num_args = 2;
c_7323340.num_elements = 1;
c_7323340.elements = (object *)e_7323351;
c_7323340.elements[0] = ((closureN)self_7313890)->elements[6];

return_direct_with_clo1(data,(closure)&c_7323281,__lambda_987,  &c_7323340);; 
}

static void __lambda_992(void *data, object self_7313891, int argc, object *args) /* object self_7313891, object k_736589, object x_731367_733640, object l_731368_733641 */
 {
 object k_736589 = args[0]; object x_731367_733640 = args[1]; object l_731368_733641 = args[2];
  
list_2_type local_7323344; 



list_2_type local_7323349; 
return_direct_with_clo1(data,  k_736589, (((closure)  k_736589)->fn),  Cyc_fast_list_2(&local_7323344, Cyc_car(data, x_731367_733640), Cyc_fast_list_2(&local_7323349, ((closureN)self_7313891)->elements[0], l_731368_733641)));; 
}

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

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7323283, r_736588, ((closureN)self_7313892)->elements[9], ((closureN)self_7313892)->elements[8]);; 
}

static void __lambda_988(void *data, object self_7313893, int argc, object *args) /* object self_7313893, object r_736585 */
 {
 object r_736585 = args[0];
  
closureN_type c_7323285;
object e_7323333 [13];
c_7323285.hdr.mark = gc_color_red;
 c_7323285.hdr.grayed = 0;
c_7323285.tag = closureN_tag;
 c_7323285.fn = (function_type)__lambda_989;
c_7323285.num_args = 1;
c_7323285.num_elements = 13;
c_7323285.elements = (object *)e_7323333;
c_7323285.elements[0] = ((closureN)self_7313893)->elements[0];
c_7323285.elements[1] = ((closureN)self_7313893)->elements[1];
c_7323285.elements[2] = ((closureN)self_7313893)->elements[2];
c_7323285.elements[3] = ((closureN)self_7313893)->elements[3];
c_7323285.elements[4] = ((closureN)self_7313893)->elements[4];
c_7323285.elements[5] = ((closureN)self_7313893)->elements[5];
c_7323285.elements[6] = ((closureN)self_7313893)->elements[6];
c_7323285.elements[7] = ((closureN)self_7313893)->elements[7];
c_7323285.elements[8] = ((closureN)self_7313893)->elements[9];
c_7323285.elements[9] = r_736585;
c_7323285.elements[10] = ((closureN)self_7313893)->elements[10];
c_7323285.elements[11] = ((closureN)self_7313893)->elements[11];
c_7323285.elements[12] = ((closureN)self_7313893)->elements[13];

return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7323285, ((closureN)self_7313893)->elements[8], ((closureN)self_7313893)->elements[12]);; 
}

static void __lambda_989(void *data, object self_7313894, int argc, object *args) /* object self_7313894, object r_736587 */
 {
 object r_736587 = args[0];
  
closureN_type c_7323288;
object e_7323332 [12];
c_7323288.hdr.mark = gc_color_red;
 c_7323288.hdr.grayed = 0;
c_7323288.tag = closureN_tag;
 c_7323288.fn = (function_type)__lambda_990;
c_7323288.num_args = 1;
c_7323288.num_elements = 12;
c_7323288.elements = (object *)e_7323332;
c_7323288.elements[0] = ((closureN)self_7313894)->elements[0];
c_7323288.elements[1] = ((closureN)self_7313894)->elements[1];
c_7323288.elements[2] = ((closureN)self_7313894)->elements[2];
c_7323288.elements[3] = ((closureN)self_7313894)->elements[3];
c_7323288.elements[4] = ((closureN)self_7313894)->elements[4];
c_7323288.elements[5] = ((closureN)self_7313894)->elements[5];
c_7323288.elements[6] = ((closureN)self_7313894)->elements[7];
c_7323288.elements[7] = ((closureN)self_7313894)->elements[8];
c_7323288.elements[8] = ((closureN)self_7313894)->elements[9];
c_7323288.elements[9] = ((closureN)self_7313894)->elements[10];
c_7323288.elements[10] = ((closureN)self_7313894)->elements[11];
c_7323288.elements[11] = ((closureN)self_7313894)->elements[12];

return_closcall2(data,  ((closureN)self_7313894)->elements[6],  &c_7323288, r_736587);; 
}

static void __lambda_990(void *data, object self_7313895, int argc, object *args) /* object self_7313895, object r_736586 */
 {
 object r_736586 = args[0];
  
closureN_type c_7323290;
object e_7323326 [11];
c_7323290.hdr.mark = gc_color_red;
 c_7323290.hdr.grayed = 0;
c_7323290.tag = closureN_tag;
 c_7323290.fn = (function_type)__lambda_991;
c_7323290.num_args = 1;
c_7323290.num_elements = 11;
c_7323290.elements = (object *)e_7323326;
c_7323290.elements[0] = ((closureN)self_7313895)->elements[0];
c_7323290.elements[1] = ((closureN)self_7313895)->elements[1];
c_7323290.elements[2] = ((closureN)self_7313895)->elements[2];
c_7323290.elements[3] = ((closureN)self_7313895)->elements[3];
c_7323290.elements[4] = ((closureN)self_7313895)->elements[4];
c_7323290.elements[5] = ((closureN)self_7313895)->elements[5];
c_7323290.elements[6] = ((closureN)self_7313895)->elements[6];
c_7323290.elements[7] = ((closureN)self_7313895)->elements[7];
c_7323290.elements[8] = ((closureN)self_7313895)->elements[9];
c_7323290.elements[9] = ((closureN)self_7313895)->elements[10];
c_7323290.elements[10] = ((closureN)self_7313895)->elements[11];


list_3_type local_7323329; 
return_direct_with_clo1(data,(closure)&c_7323290,__lambda_991,  Cyc_fast_list_3(&local_7323329, ((closureN)self_7313895)->elements[2], ((closureN)self_7313895)->elements[8], r_736586));; 
}

static void __lambda_991(void *data, object self_7313896, int argc, object *args) /* object self_7313896, object r_736582 */
 {
 object r_736582 = args[0];
  
list_4_type local_7323295; 

pair_type local_7323300; 

list_2_type local_7323303; 

list_4_type local_7323309; 

list_2_type local_7323313; 

list_3_type local_7323318; 

list_2_type local_7323322; 
return_direct_with_clo1(data,  ((closureN)self_7313896)->elements[6], (((closure)  ((closureN)self_7313896)->elements[6])->fn),  Cyc_fast_list_4(&local_7323295, ((closureN)self_7313896)->elements[2], ((closureN)self_7313896)->elements[3], set_pair_as_expr(&local_7323300, Cyc_fast_list_2(&local_7323303, ((closureN)self_7313896)->elements[10], ((closureN)self_7313896)->elements[9]), ((closureN)self_7313896)->elements[8]), Cyc_fast_list_4(&local_7323309, ((closureN)self_7313896)->elements[1], Cyc_fast_list_2(&local_7323313, ((closureN)self_7313896)->elements[4], ((closureN)self_7313896)->elements[10]), r_736582, Cyc_fast_list_3(&local_7323318, ((closureN)self_7313896)->elements[0], Cyc_fast_list_2(&local_7323322, ((closureN)self_7313896)->elements[5], ((closureN)self_7313896)->elements[10]), ((closureN)self_7313896)->elements[7]))));; 
}

static void __lambda_977(void *data, object self_7313872, int argc, object *args) /* object self_7313872, object r_736567 */
 {
 object r_736567 = args[0];
  
list_3_type local_7323214; 

list_2_type local_7323218; 

list_3_type local_7323223; 

pair_type local_7323227; 

list_2_type local_7323230; 


return_direct_with_clo1(data,  ((closureN)self_7313872)->elements[3], (((closure)  ((closureN)self_7313872)->elements[3])->fn),  Cyc_fast_list_3(&local_7323214, ((closureN)self_7313872)->elements[0], Cyc_fast_list_2(&local_7323218, ((closureN)self_7313872)->elements[2], ((closureN)self_7313872)->elements[5]), Cyc_fast_list_3(&local_7323223, ((closureN)self_7313872)->elements[1], set_cell_as_expr(&local_7323227, Cyc_fast_list_2(&local_7323230, Cyc_car(data, ((closureN)self_7313872)->elements[4]), ((closureN)self_7313872)->elements[5])), r_736567)));; 
}

static void __lambda_973(void *data, object self_7313863, int argc, object *args) /* object self_7313863, object k_736560, object l_731322_733630 */
 {
 object k_736560 = args[0]; object l_731322_733630 = args[1];
  return_closcall3(data,  ((closureN)self_7313863)->elements[0],  k_736560, ((closureN)self_7313863)->elements[1], l_731322_733630);; 
}

static void __lambda_968(void *data, object self_7313864, int argc, object *args) /* object self_7313864, object r_736559 */
 {
 object r_736559 = args[0];
  
closureN_type c_7323127;
object e_7323184 [11];
c_7323127.hdr.mark = gc_color_red;
 c_7323127.hdr.grayed = 0;
c_7323127.tag = closureN_tag;
 c_7323127.fn = (function_type)__lambda_969;
c_7323127.num_args = 1;
c_7323127.num_elements = 11;
c_7323127.elements = (object *)e_7323184;
c_7323127.elements[0] = ((closureN)self_7313864)->elements[0];
c_7323127.elements[1] = ((closureN)self_7313864)->elements[1];
c_7323127.elements[2] = ((closureN)self_7313864)->elements[2];
c_7323127.elements[3] = ((closureN)self_7313864)->elements[3];
c_7323127.elements[4] = ((closureN)self_7313864)->elements[4];
c_7323127.elements[5] = ((closureN)self_7313864)->elements[5];
c_7323127.elements[6] = ((closureN)self_7313864)->elements[6];
c_7323127.elements[7] = ((closureN)self_7313864)->elements[7];
c_7323127.elements[8] = ((closureN)self_7313864)->elements[9];
c_7323127.elements[9] = ((closureN)self_7313864)->elements[10];
c_7323127.elements[10] = ((closureN)self_7313864)->elements[11];



return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7323127, r_736559, car(((closureN)self_7313864)->elements[8]));; 
}

static void __lambda_969(void *data, object self_7313865, int argc, object *args) /* object self_7313865, object r_736549 */
 {
 object r_736549 = args[0];
  if( (boolean_f != r_736549) ){ 
  
closureN_type c_7323129;
object e_7323151 [7];
c_7323129.hdr.mark = gc_color_red;
 c_7323129.hdr.grayed = 0;
c_7323129.tag = closureN_tag;
 c_7323129.fn = (function_type)__lambda_970;
c_7323129.num_args = 1;
c_7323129.num_elements = 7;
c_7323129.elements = (object *)e_7323151;
c_7323129.elements[0] = ((closureN)self_7313865)->elements[0];
c_7323129.elements[1] = ((closureN)self_7313865)->elements[1];
c_7323129.elements[2] = ((closureN)self_7313865)->elements[4];
c_7323129.elements[3] = ((closureN)self_7313865)->elements[6];
c_7323129.elements[4] = ((closureN)self_7313865)->elements[7];
c_7323129.elements[5] = ((closureN)self_7313865)->elements[9];
c_7323129.elements[6] = ((closureN)self_7313865)->elements[10];


list_2_type local_7323154; 
return_direct_with_clo1(data,(closure)&c_7323129,__lambda_970,  Cyc_fast_list_2(&local_7323154, ((closureN)self_7313865)->elements[3], ((closureN)self_7313865)->elements[8]));
} else { 
  
closureN_type c_7323159;
object e_7323174 [4];
c_7323159.hdr.mark = gc_color_red;
 c_7323159.hdr.grayed = 0;
c_7323159.tag = closureN_tag;
 c_7323159.fn = (function_type)__lambda_972;
c_7323159.num_args = 1;
c_7323159.num_elements = 4;
c_7323159.elements = (object *)e_7323174;
c_7323159.elements[0] = ((closureN)self_7313865)->elements[2];
c_7323159.elements[1] = ((closureN)self_7313865)->elements[7];
c_7323159.elements[2] = ((closureN)self_7313865)->elements[8];
c_7323159.elements[3] = ((closureN)self_7313865)->elements[9];


pair_type local_7323177; 

pair_type local_7323180; 
return_closcall2(data,  ((closureN)self_7313865)->elements[6],  &c_7323159, set_pair_as_expr(&local_7323177, set_pair_as_expr(&local_7323180, ((closureN)self_7313865)->elements[8], ((closureN)self_7313865)->elements[5]), ((closureN)self_7313865)->elements[10]));}
;; 
}

static void __lambda_972(void *data, object self_7313868, int argc, object *args) /* object self_7313868, object r_736555 */
 {
 object r_736555 = args[0];
  
list_3_type local_7323164; 

pair_type local_7323168; 

list_2_type local_7323171; 
return_direct_with_clo1(data,  ((closureN)self_7313868)->elements[1], (((closure)  ((closureN)self_7313868)->elements[1])->fn),  Cyc_fast_list_3(&local_7323164, ((closureN)self_7313868)->elements[0], set_cell_as_expr(&local_7323168, Cyc_fast_list_2(&local_7323171, ((closureN)self_7313868)->elements[2], ((closureN)self_7313868)->elements[3])), r_736555));; 
}

static void __lambda_970(void *data, object self_7313866, int argc, object *args) /* object self_7313866, object r_736553 */
 {
 object r_736553 = args[0];
  
closureN_type c_7323132;
object e_7323149 [6];
c_7323132.hdr.mark = gc_color_red;
 c_7323132.hdr.grayed = 0;
c_7323132.tag = closureN_tag;
 c_7323132.fn = (function_type)__lambda_971;
c_7323132.num_args = 1;
c_7323132.num_elements = 6;
c_7323132.elements = (object *)e_7323149;
c_7323132.elements[0] = ((closureN)self_7313866)->elements[0];
c_7323132.elements[1] = ((closureN)self_7313866)->elements[1];
c_7323132.elements[2] = ((closureN)self_7313866)->elements[2];
c_7323132.elements[3] = ((closureN)self_7313866)->elements[4];
c_7323132.elements[4] = r_736553;
c_7323132.elements[5] = ((closureN)self_7313866)->elements[5];

return_closcall2(data,  ((closureN)self_7313866)->elements[3],  &c_7323132, ((closureN)self_7313866)->elements[6]);; 
}

static void __lambda_971(void *data, object self_7313867, int argc, object *args) /* object self_7313867, object r_736551 */
 {
 object r_736551 = args[0];
  
list_3_type local_7323137; 

list_3_type local_7323141; 

list_2_type local_7323146; 
return_direct_with_clo1(data,  ((closureN)self_7313867)->elements[3], (((closure)  ((closureN)self_7313867)->elements[3])->fn),  Cyc_fast_list_3(&local_7323137, ((closureN)self_7313867)->elements[0], Cyc_fast_list_3(&local_7323141, ((closureN)self_7313867)->elements[1], ((closureN)self_7313867)->elements[5], Cyc_fast_list_2(&local_7323146, ((closureN)self_7313867)->elements[2], ((closureN)self_7313867)->elements[4])), r_736551));; 
}

static void __lambda_962(void *data, object self_7313912, int argc, object *args) /* object self_7313912, object r_736542 */
 {
 object r_736542 = args[0];
  
closureN_type c_7323099;
object e_7323109 [6];
c_7323099.hdr.mark = gc_color_red;
 c_7323099.hdr.grayed = 0;
c_7323099.tag = closureN_tag;
 c_7323099.fn = (function_type)__lambda_963;
c_7323099.num_args = 1;
c_7323099.num_elements = 6;
c_7323099.elements = (object *)e_7323109;
c_7323099.elements[0] = ((closureN)self_7313912)->elements[0];
c_7323099.elements[1] = ((closureN)self_7313912)->elements[1];
c_7323099.elements[2] = ((closureN)self_7313912)->elements[2];
c_7323099.elements[3] = ((closureN)self_7313912)->elements[3];
c_7323099.elements[4] = ((closureN)self_7313912)->elements[4];
c_7323099.elements[5] = ((closureN)self_7313912)->elements[5];



return_direct_with_clo1(data,(closure)&c_7323099,__lambda_963,  Cyc_set_cell(data, ((closureN)self_7313912)->elements[2], r_736542));; 
}

static void __lambda_963(void *data, object self_7313913, int argc, object *args) /* object self_7313913, object r_736541 */
 {

  

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

static void __lambda_860(void *data, object self_7313914, int argc, object *args) /* object self_7313914, object r_736535 */
 {
 object r_736535 = args[0];
  
closureN_type c_7322231;
object e_7323082 [29];
c_7322231.hdr.mark = gc_color_red;
 c_7322231.hdr.grayed = 0;
c_7322231.tag = closureN_tag;
 c_7322231.fn = (function_type)__lambda_861;
c_7322231.num_args = 1;
c_7322231.num_elements = 29;
c_7322231.elements = (object *)e_7323082;
c_7322231.elements[0] = ((closureN)self_7313914)->elements[0];
c_7322231.elements[1] = ((closureN)self_7313914)->elements[1];
c_7322231.elements[2] = ((closureN)self_7313914)->elements[2];
c_7322231.elements[3] = ((closureN)self_7313914)->elements[3];
c_7322231.elements[4] = ((closureN)self_7313914)->elements[4];
c_7322231.elements[5] = ((closureN)self_7313914)->elements[5];
c_7322231.elements[6] = ((closureN)self_7313914)->elements[6];
c_7322231.elements[7] = ((closureN)self_7313914)->elements[7];
c_7322231.elements[8] = ((closureN)self_7313914)->elements[8];
c_7322231.elements[9] = ((closureN)self_7313914)->elements[9];
c_7322231.elements[10] = ((closureN)self_7313914)->elements[10];
c_7322231.elements[11] = ((closureN)self_7313914)->elements[11];
c_7322231.elements[12] = ((closureN)self_7313914)->elements[12];
c_7322231.elements[13] = ((closureN)self_7313914)->elements[13];
c_7322231.elements[14] = ((closureN)self_7313914)->elements[14];
c_7322231.elements[15] = ((closureN)self_7313914)->elements[15];
c_7322231.elements[16] = ((closureN)self_7313914)->elements[16];
c_7322231.elements[17] = ((closureN)self_7313914)->elements[17];
c_7322231.elements[18] = ((closureN)self_7313914)->elements[18];
c_7322231.elements[19] = ((closureN)self_7313914)->elements[19];
c_7322231.elements[20] = ((closureN)self_7313914)->elements[20];
c_7322231.elements[21] = ((closureN)self_7313914)->elements[21];
c_7322231.elements[22] = ((closureN)self_7313914)->elements[22];
c_7322231.elements[23] = ((closureN)self_7313914)->elements[23];
c_7322231.elements[24] = ((closureN)self_7313914)->elements[24];
c_7322231.elements[25] = ((closureN)self_7313914)->elements[25];
c_7322231.elements[26] = ((closureN)self_7313914)->elements[26];
c_7322231.elements[27] = ((closureN)self_7313914)->elements[27];
c_7322231.elements[28] = ((closureN)self_7313914)->elements[28];



return_direct_with_clo1(data,(closure)&c_7322231,__lambda_861,  Cyc_set_cell(data, ((closureN)self_7313914)->elements[22], r_736535));; 
}

static void __lambda_861(void *data, object self_7313915, int argc, object *args) /* object self_7313915, object r_736388 */
 {

  
closureN_type c_7322233;
object e_7323069 [29];
c_7322233.hdr.mark = gc_color_red;
 c_7322233.hdr.grayed = 0;
c_7322233.tag = closureN_tag;
 c_7322233.fn = (function_type)__lambda_862;
c_7322233.num_args = 1;
c_7322233.num_elements = 29;
c_7322233.elements = (object *)e_7323069;
c_7322233.elements[0] = ((closureN)self_7313915)->elements[0];
c_7322233.elements[1] = ((closureN)self_7313915)->elements[1];
c_7322233.elements[2] = ((closureN)self_7313915)->elements[2];
c_7322233.elements[3] = ((closureN)self_7313915)->elements[3];
c_7322233.elements[4] = ((closureN)self_7313915)->elements[4];
c_7322233.elements[5] = ((closureN)self_7313915)->elements[5];
c_7322233.elements[6] = ((closureN)self_7313915)->elements[6];
c_7322233.elements[7] = ((closureN)self_7313915)->elements[7];
c_7322233.elements[8] = ((closureN)self_7313915)->elements[8];
c_7322233.elements[9] = ((closureN)self_7313915)->elements[9];
c_7322233.elements[10] = ((closureN)self_7313915)->elements[10];
c_7322233.elements[11] = ((closureN)self_7313915)->elements[11];
c_7322233.elements[12] = ((closureN)self_7313915)->elements[12];
c_7322233.elements[13] = ((closureN)self_7313915)->elements[13];
c_7322233.elements[14] = ((closureN)self_7313915)->elements[14];
c_7322233.elements[15] = ((closureN)self_7313915)->elements[15];
c_7322233.elements[16] = ((closureN)self_7313915)->elements[16];
c_7322233.elements[17] = ((closureN)self_7313915)->elements[17];
c_7322233.elements[18] = ((closureN)self_7313915)->elements[18];
c_7322233.elements[19] = ((closureN)self_7313915)->elements[19];
c_7322233.elements[20] = ((closureN)self_7313915)->elements[20];
c_7322233.elements[21] = ((closureN)self_7313915)->elements[21];
c_7322233.elements[22] = ((closureN)self_7313915)->elements[22];
c_7322233.elements[23] = ((closureN)self_7313915)->elements[23];
c_7322233.elements[24] = ((closureN)self_7313915)->elements[24];
c_7322233.elements[25] = ((closureN)self_7313915)->elements[25];
c_7322233.elements[26] = ((closureN)self_7313915)->elements[26];
c_7322233.elements[27] = ((closureN)self_7313915)->elements[27];
c_7322233.elements[28] = ((closureN)self_7313915)->elements[28];


closureN_type c_7323070;
object e_7323081 [2];
c_7323070.hdr.mark = gc_color_red;
 c_7323070.hdr.grayed = 0;
c_7323070.tag = closureN_tag;
 c_7323070.fn = (function_type)__lambda_957;
c_7323070.num_args = 1;
c_7323070.num_elements = 2;
c_7323070.elements = (object *)e_7323081;
c_7323070.elements[0] = ((closureN)self_7313915)->elements[16];
c_7323070.elements[1] = ((closureN)self_7313915)->elements[17];

return_direct_with_clo1(data,(closure)&c_7322233,__lambda_862,  &c_7323070);; 
}

static void __lambda_957(void *data, object self_7313916, int argc, object *args) /* object self_7313916, object k_736532, object x_731385_733648 */
 {
 object k_736532 = args[0]; object x_731385_733648 = args[1];
    
if( (boolean_f != Cyc_is_pair(x_731385_733648)) ){ 
  



return_closcall3(data,  ((closureN)self_7313916)->elements[0],  k_736532, car(((closureN)self_7313916)->elements[1]), Cyc_car(data, x_731385_733648));
} else { 
  return_direct_with_clo1(data,  k_736532, (((closure)  k_736532)->fn),  boolean_f);}
;; 
}

static void __lambda_862(void *data, object self_7313917, int argc, object *args) /* object self_7313917, object r_736531 */
 {
 object r_736531 = args[0];
  
closureN_type c_7322235;
object e_7323065 [29];
c_7322235.hdr.mark = gc_color_red;
 c_7322235.hdr.grayed = 0;
c_7322235.tag = closureN_tag;
 c_7322235.fn = (function_type)__lambda_863;
c_7322235.num_args = 1;
c_7322235.num_elements = 29;
c_7322235.elements = (object *)e_7323065;
c_7322235.elements[0] = ((closureN)self_7313917)->elements[0];
c_7322235.elements[1] = ((closureN)self_7313917)->elements[1];
c_7322235.elements[2] = ((closureN)self_7313917)->elements[2];
c_7322235.elements[3] = ((closureN)self_7313917)->elements[3];
c_7322235.elements[4] = ((closureN)self_7313917)->elements[4];
c_7322235.elements[5] = ((closureN)self_7313917)->elements[5];
c_7322235.elements[6] = ((closureN)self_7313917)->elements[6];
c_7322235.elements[7] = ((closureN)self_7313917)->elements[7];
c_7322235.elements[8] = ((closureN)self_7313917)->elements[8];
c_7322235.elements[9] = ((closureN)self_7313917)->elements[9];
c_7322235.elements[10] = ((closureN)self_7313917)->elements[10];
c_7322235.elements[11] = ((closureN)self_7313917)->elements[11];
c_7322235.elements[12] = ((closureN)self_7313917)->elements[12];
c_7322235.elements[13] = ((closureN)self_7313917)->elements[13];
c_7322235.elements[14] = ((closureN)self_7313917)->elements[14];
c_7322235.elements[15] = ((closureN)self_7313917)->elements[15];
c_7322235.elements[16] = ((closureN)self_7313917)->elements[16];
c_7322235.elements[17] = ((closureN)self_7313917)->elements[17];
c_7322235.elements[18] = ((closureN)self_7313917)->elements[18];
c_7322235.elements[19] = ((closureN)self_7313917)->elements[19];
c_7322235.elements[20] = ((closureN)self_7313917)->elements[20];
c_7322235.elements[21] = ((closureN)self_7313917)->elements[21];
c_7322235.elements[22] = ((closureN)self_7313917)->elements[22];
c_7322235.elements[23] = ((closureN)self_7313917)->elements[23];
c_7322235.elements[24] = ((closureN)self_7313917)->elements[24];
c_7322235.elements[25] = ((closureN)self_7313917)->elements[25];
c_7322235.elements[26] = ((closureN)self_7313917)->elements[26];
c_7322235.elements[27] = ((closureN)self_7313917)->elements[27];
c_7322235.elements[28] = ((closureN)self_7313917)->elements[28];



return_direct_with_clo1(data,(closure)&c_7322235,__lambda_863,  Cyc_set_cell(data, ((closureN)self_7313917)->elements[19], r_736531));; 
}

static void __lambda_863(void *data, object self_7313918, int argc, object *args) /* object self_7313918, object r_736389 */
 {

  
closureN_type c_7322237;
object e_7323047 [28];
c_7322237.hdr.mark = gc_color_red;
 c_7322237.hdr.grayed = 0;
c_7322237.tag = closureN_tag;
 c_7322237.fn = (function_type)__lambda_864;
c_7322237.num_args = 1;
c_7322237.num_elements = 28;
c_7322237.elements = (object *)e_7323047;
c_7322237.elements[0] = ((closureN)self_7313918)->elements[0];
c_7322237.elements[1] = ((closureN)self_7313918)->elements[1];
c_7322237.elements[2] = ((closureN)self_7313918)->elements[2];
c_7322237.elements[3] = ((closureN)self_7313918)->elements[3];
c_7322237.elements[4] = ((closureN)self_7313918)->elements[4];
c_7322237.elements[5] = ((closureN)self_7313918)->elements[5];
c_7322237.elements[6] = ((closureN)self_7313918)->elements[6];
c_7322237.elements[7] = ((closureN)self_7313918)->elements[7];
c_7322237.elements[8] = ((closureN)self_7313918)->elements[8];
c_7322237.elements[9] = ((closureN)self_7313918)->elements[9];
c_7322237.elements[10] = ((closureN)self_7313918)->elements[10];
c_7322237.elements[11] = ((closureN)self_7313918)->elements[11];
c_7322237.elements[12] = ((closureN)self_7313918)->elements[12];
c_7322237.elements[13] = ((closureN)self_7313918)->elements[13];
c_7322237.elements[14] = ((closureN)self_7313918)->elements[14];
c_7322237.elements[15] = ((closureN)self_7313918)->elements[15];
c_7322237.elements[16] = ((closureN)self_7313918)->elements[16];
c_7322237.elements[17] = ((closureN)self_7313918)->elements[18];
c_7322237.elements[18] = ((closureN)self_7313918)->elements[19];
c_7322237.elements[19] = ((closureN)self_7313918)->elements[20];
c_7322237.elements[20] = ((closureN)self_7313918)->elements[21];
c_7322237.elements[21] = ((closureN)self_7313918)->elements[22];
c_7322237.elements[22] = ((closureN)self_7313918)->elements[23];
c_7322237.elements[23] = ((closureN)self_7313918)->elements[24];
c_7322237.elements[24] = ((closureN)self_7313918)->elements[25];
c_7322237.elements[25] = ((closureN)self_7313918)->elements[26];
c_7322237.elements[26] = ((closureN)self_7313918)->elements[27];
c_7322237.elements[27] = ((closureN)self_7313918)->elements[28];


closureN_type c_7323048;
object e_7323064 [2];
c_7323048.hdr.mark = gc_color_red;
 c_7323048.hdr.grayed = 0;
c_7323048.tag = closureN_tag;
 c_7323048.fn = (function_type)__lambda_956;
c_7323048.num_args = 1;
c_7323048.num_elements = 2;
c_7323048.elements = (object *)e_7323064;
c_7323048.elements[0] = ((closureN)self_7313918)->elements[16];
c_7323048.elements[1] = ((closureN)self_7313918)->elements[17];

return_direct_with_clo1(data,(closure)&c_7322237,__lambda_864,  &c_7323048);; 
}

static void __lambda_956(void *data, object self_7313919, int argc, object *args) /* object self_7313919, object k_736526, object x_731387_733649 */
 {
 object k_736526 = args[0]; object x_731387_733649 = args[1];
    
if( (boolean_f != Cyc_is_pair(x_731387_733649)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_731387_733649))) ){ 
  



return_closcall3(data,  ((closureN)self_7313919)->elements[0],  k_736526, car(((closureN)self_7313919)->elements[1]), Cyc_cadr(data, x_731387_733649));
} else { 
  return_direct_with_clo1(data,  k_736526, (((closure)  k_736526)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_736526, (((closure)  k_736526)->fn),  boolean_f);}
;; 
}

static void __lambda_864(void *data, object self_7313920, int argc, object *args) /* object self_7313920, object r_736525 */
 {
 object r_736525 = args[0];
  
closureN_type c_7322239;
object e_7323043 [28];
c_7322239.hdr.mark = gc_color_red;
 c_7322239.hdr.grayed = 0;
c_7322239.tag = closureN_tag;
 c_7322239.fn = (function_type)__lambda_865;
c_7322239.num_args = 1;
c_7322239.num_elements = 28;
c_7322239.elements = (object *)e_7323043;
c_7322239.elements[0] = ((closureN)self_7313920)->elements[0];
c_7322239.elements[1] = ((closureN)self_7313920)->elements[1];
c_7322239.elements[2] = ((closureN)self_7313920)->elements[2];
c_7322239.elements[3] = ((closureN)self_7313920)->elements[3];
c_7322239.elements[4] = ((closureN)self_7313920)->elements[4];
c_7322239.elements[5] = ((closureN)self_7313920)->elements[5];
c_7322239.elements[6] = ((closureN)self_7313920)->elements[6];
c_7322239.elements[7] = ((closureN)self_7313920)->elements[7];
c_7322239.elements[8] = ((closureN)self_7313920)->elements[8];
c_7322239.elements[9] = ((closureN)self_7313920)->elements[9];
c_7322239.elements[10] = ((closureN)self_7313920)->elements[10];
c_7322239.elements[11] = ((closureN)self_7313920)->elements[11];
c_7322239.elements[12] = ((closureN)self_7313920)->elements[12];
c_7322239.elements[13] = ((closureN)self_7313920)->elements[13];
c_7322239.elements[14] = ((closureN)self_7313920)->elements[14];
c_7322239.elements[15] = ((closureN)self_7313920)->elements[15];
c_7322239.elements[16] = ((closureN)self_7313920)->elements[16];
c_7322239.elements[17] = ((closureN)self_7313920)->elements[17];
c_7322239.elements[18] = ((closureN)self_7313920)->elements[18];
c_7322239.elements[19] = ((closureN)self_7313920)->elements[19];
c_7322239.elements[20] = ((closureN)self_7313920)->elements[20];
c_7322239.elements[21] = ((closureN)self_7313920)->elements[21];
c_7322239.elements[22] = ((closureN)self_7313920)->elements[22];
c_7322239.elements[23] = ((closureN)self_7313920)->elements[23];
c_7322239.elements[24] = ((closureN)self_7313920)->elements[24];
c_7322239.elements[25] = ((closureN)self_7313920)->elements[25];
c_7322239.elements[26] = ((closureN)self_7313920)->elements[26];
c_7322239.elements[27] = ((closureN)self_7313920)->elements[27];



return_direct_with_clo1(data,(closure)&c_7322239,__lambda_865,  Cyc_set_cell(data, ((closureN)self_7313920)->elements[20], r_736525));; 
}

static void __lambda_865(void *data, object self_7313921, int argc, object *args) /* object self_7313921, object r_736390 */
 {

  
closureN_type c_7322241;
object e_7323018 [28];
c_7322241.hdr.mark = gc_color_red;
 c_7322241.hdr.grayed = 0;
c_7322241.tag = closureN_tag;
 c_7322241.fn = (function_type)__lambda_866;
c_7322241.num_args = 1;
c_7322241.num_elements = 28;
c_7322241.elements = (object *)e_7323018;
c_7322241.elements[0] = ((closureN)self_7313921)->elements[0];
c_7322241.elements[1] = ((closureN)self_7313921)->elements[1];
c_7322241.elements[2] = ((closureN)self_7313921)->elements[2];
c_7322241.elements[3] = ((closureN)self_7313921)->elements[3];
c_7322241.elements[4] = ((closureN)self_7313921)->elements[4];
c_7322241.elements[5] = ((closureN)self_7313921)->elements[5];
c_7322241.elements[6] = ((closureN)self_7313921)->elements[6];
c_7322241.elements[7] = ((closureN)self_7313921)->elements[7];
c_7322241.elements[8] = ((closureN)self_7313921)->elements[8];
c_7322241.elements[9] = ((closureN)self_7313921)->elements[9];
c_7322241.elements[10] = ((closureN)self_7313921)->elements[10];
c_7322241.elements[11] = ((closureN)self_7313921)->elements[11];
c_7322241.elements[12] = ((closureN)self_7313921)->elements[12];
c_7322241.elements[13] = ((closureN)self_7313921)->elements[13];
c_7322241.elements[14] = ((closureN)self_7313921)->elements[14];
c_7322241.elements[15] = ((closureN)self_7313921)->elements[15];
c_7322241.elements[16] = ((closureN)self_7313921)->elements[16];
c_7322241.elements[17] = ((closureN)self_7313921)->elements[17];
c_7322241.elements[18] = ((closureN)self_7313921)->elements[18];
c_7322241.elements[19] = ((closureN)self_7313921)->elements[19];
c_7322241.elements[20] = ((closureN)self_7313921)->elements[20];
c_7322241.elements[21] = ((closureN)self_7313921)->elements[21];
c_7322241.elements[22] = ((closureN)self_7313921)->elements[22];
c_7322241.elements[23] = ((closureN)self_7313921)->elements[23];
c_7322241.elements[24] = ((closureN)self_7313921)->elements[24];
c_7322241.elements[25] = ((closureN)self_7313921)->elements[25];
c_7322241.elements[26] = ((closureN)self_7313921)->elements[26];
c_7322241.elements[27] = ((closureN)self_7313921)->elements[27];


closureN_type c_7323019;
object e_7323042 [2];
c_7323019.hdr.mark = gc_color_red;
 c_7323019.hdr.grayed = 0;
c_7323019.tag = closureN_tag;
 c_7323019.fn = (function_type)__lambda_953;
c_7323019.num_args = 1;
c_7323019.num_elements = 2;
c_7323019.elements = (object *)e_7323042;
c_7323019.elements[0] = ((closureN)self_7313921)->elements[17];
c_7323019.elements[1] = ((closureN)self_7313921)->elements[20];

return_direct_with_clo1(data,(closure)&c_7322241,__lambda_866,  &c_7323019);; 
}

static void __lambda_953(void *data, object self_7313922, int argc, object *args) /* object self_7313922, object k_736521, object x_731390_733650 */
 {
 object k_736521 = args[0]; object x_731390_733650 = args[1];
  


closureN_type c_7323024;
object e_7323041 [3];
c_7323024.hdr.mark = gc_color_red;
 c_7323024.hdr.grayed = 0;
c_7323024.tag = closureN_tag;
 c_7323024.fn = (function_type)__lambda_954;
c_7323024.num_args = 1;
c_7323024.num_elements = 3;
c_7323024.elements = (object *)e_7323041;
c_7323024.elements[0] = ((closureN)self_7313922)->elements[0];
c_7323024.elements[1] = k_736521;
c_7323024.elements[2] = x_731390_733650;

return_closcall2(data,  car(((closureN)self_7313922)->elements[1]),  &c_7323024, x_731390_733650);; 
}

static void __lambda_954(void *data, object self_7313923, int argc, object *args) /* object self_7313923, object r_736522 */
 {
 object r_736522 = args[0];
  if( (boolean_f != r_736522) ){ 
  


closureN_type c_7323029;
object e_7323035 [1];
c_7323029.hdr.mark = gc_color_red;
 c_7323029.hdr.grayed = 0;
c_7323029.tag = closureN_tag;
 c_7323029.fn = (function_type)__lambda_955;
c_7323029.num_args = 1;
c_7323029.num_elements = 1;
c_7323029.elements = (object *)e_7323035;
c_7323029.elements[0] = ((closureN)self_7313923)->elements[1];



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

static void __lambda_955(void *data, object self_7313924, int argc, object *args) /* object self_7313924, object r_736523 */
 {
 object r_736523 = args[0];
  
complex_num_type local_7323034; 
return_direct_with_clo1(data,  ((closureN)self_7313924)->elements[0], (((closure)  ((closureN)self_7313924)->elements[0])->fn),  Cyc_fast_sum(data,&local_7323034, obj_int2obj(1), r_736523));; 
}

static void __lambda_866(void *data, object self_7313925, int argc, object *args) /* object self_7313925, object r_736520 */
 {
 object r_736520 = args[0];
  
closureN_type c_7322243;
object e_7323014 [28];
c_7322243.hdr.mark = gc_color_red;
 c_7322243.hdr.grayed = 0;
c_7322243.tag = closureN_tag;
 c_7322243.fn = (function_type)__lambda_867;
c_7322243.num_args = 1;
c_7322243.num_elements = 28;
c_7322243.elements = (object *)e_7323014;
c_7322243.elements[0] = ((closureN)self_7313925)->elements[0];
c_7322243.elements[1] = ((closureN)self_7313925)->elements[1];
c_7322243.elements[2] = ((closureN)self_7313925)->elements[2];
c_7322243.elements[3] = ((closureN)self_7313925)->elements[3];
c_7322243.elements[4] = ((closureN)self_7313925)->elements[4];
c_7322243.elements[5] = ((closureN)self_7313925)->elements[5];
c_7322243.elements[6] = ((closureN)self_7313925)->elements[6];
c_7322243.elements[7] = ((closureN)self_7313925)->elements[7];
c_7322243.elements[8] = ((closureN)self_7313925)->elements[8];
c_7322243.elements[9] = ((closureN)self_7313925)->elements[9];
c_7322243.elements[10] = ((closureN)self_7313925)->elements[10];
c_7322243.elements[11] = ((closureN)self_7313925)->elements[11];
c_7322243.elements[12] = ((closureN)self_7313925)->elements[12];
c_7322243.elements[13] = ((closureN)self_7313925)->elements[13];
c_7322243.elements[14] = ((closureN)self_7313925)->elements[14];
c_7322243.elements[15] = ((closureN)self_7313925)->elements[15];
c_7322243.elements[16] = ((closureN)self_7313925)->elements[16];
c_7322243.elements[17] = ((closureN)self_7313925)->elements[17];
c_7322243.elements[18] = ((closureN)self_7313925)->elements[18];
c_7322243.elements[19] = ((closureN)self_7313925)->elements[19];
c_7322243.elements[20] = ((closureN)self_7313925)->elements[20];
c_7322243.elements[21] = ((closureN)self_7313925)->elements[21];
c_7322243.elements[22] = ((closureN)self_7313925)->elements[22];
c_7322243.elements[23] = ((closureN)self_7313925)->elements[23];
c_7322243.elements[24] = ((closureN)self_7313925)->elements[24];
c_7322243.elements[25] = ((closureN)self_7313925)->elements[25];
c_7322243.elements[26] = ((closureN)self_7313925)->elements[26];
c_7322243.elements[27] = ((closureN)self_7313925)->elements[27];



return_direct_with_clo1(data,(closure)&c_7322243,__lambda_867,  Cyc_set_cell(data, ((closureN)self_7313925)->elements[17], r_736520));; 
}

static void __lambda_867(void *data, object self_7313926, int argc, object *args) /* object self_7313926, object r_736391 */
 {

  
closureN_type c_7322245;
object e_7322992 [28];
c_7322245.hdr.mark = gc_color_red;
 c_7322245.hdr.grayed = 0;
c_7322245.tag = closureN_tag;
 c_7322245.fn = (function_type)__lambda_868;
c_7322245.num_args = 1;
c_7322245.num_elements = 28;
c_7322245.elements = (object *)e_7322992;
c_7322245.elements[0] = ((closureN)self_7313926)->elements[0];
c_7322245.elements[1] = ((closureN)self_7313926)->elements[1];
c_7322245.elements[2] = ((closureN)self_7313926)->elements[2];
c_7322245.elements[3] = ((closureN)self_7313926)->elements[3];
c_7322245.elements[4] = ((closureN)self_7313926)->elements[4];
c_7322245.elements[5] = ((closureN)self_7313926)->elements[5];
c_7322245.elements[6] = ((closureN)self_7313926)->elements[6];
c_7322245.elements[7] = ((closureN)self_7313926)->elements[7];
c_7322245.elements[8] = ((closureN)self_7313926)->elements[8];
c_7322245.elements[9] = ((closureN)self_7313926)->elements[9];
c_7322245.elements[10] = ((closureN)self_7313926)->elements[10];
c_7322245.elements[11] = ((closureN)self_7313926)->elements[11];
c_7322245.elements[12] = ((closureN)self_7313926)->elements[12];
c_7322245.elements[13] = ((closureN)self_7313926)->elements[13];
c_7322245.elements[14] = ((closureN)self_7313926)->elements[14];
c_7322245.elements[15] = ((closureN)self_7313926)->elements[15];
c_7322245.elements[16] = ((closureN)self_7313926)->elements[16];
c_7322245.elements[17] = ((closureN)self_7313926)->elements[17];
c_7322245.elements[18] = ((closureN)self_7313926)->elements[18];
c_7322245.elements[19] = ((closureN)self_7313926)->elements[19];
c_7322245.elements[20] = ((closureN)self_7313926)->elements[20];
c_7322245.elements[21] = ((closureN)self_7313926)->elements[21];
c_7322245.elements[22] = ((closureN)self_7313926)->elements[22];
c_7322245.elements[23] = ((closureN)self_7313926)->elements[23];
c_7322245.elements[24] = ((closureN)self_7313926)->elements[24];
c_7322245.elements[25] = ((closureN)self_7313926)->elements[25];
c_7322245.elements[26] = ((closureN)self_7313926)->elements[26];
c_7322245.elements[27] = ((closureN)self_7313926)->elements[27];


closureN_type c_7322993;
object e_7323013 [2];
c_7322993.hdr.mark = gc_color_red;
 c_7322993.hdr.grayed = 0;
c_7322993.tag = closureN_tag;
 c_7322993.fn = (function_type)__lambda_951;
c_7322993.num_args = 1;
c_7322993.num_elements = 2;
c_7322993.elements = (object *)e_7323013;
c_7322993.elements[0] = ((closureN)self_7313926)->elements[19];
c_7322993.elements[1] = ((closureN)self_7313926)->elements[20];

return_direct_with_clo1(data,(closure)&c_7322245,__lambda_868,  &c_7322993);; 
}

static void __lambda_951(void *data, object self_7313927, int argc, object *args) /* object self_7313927, object k_736517, object x_731391_733651 */
 {
 object k_736517 = args[0]; object x_731391_733651 = args[1];
  


closureN_type c_7322998;
object e_7323012 [3];
c_7322998.hdr.mark = gc_color_red;
 c_7322998.hdr.grayed = 0;
c_7322998.tag = closureN_tag;
 c_7322998.fn = (function_type)__lambda_952;
c_7322998.num_args = 1;
c_7322998.num_elements = 3;
c_7322998.elements = (object *)e_7323012;
c_7322998.elements[0] = ((closureN)self_7313927)->elements[0];
c_7322998.elements[1] = k_736517;
c_7322998.elements[2] = x_731391_733651;

return_closcall2(data,  car(((closureN)self_7313927)->elements[1]),  &c_7322998, x_731391_733651);; 
}

static void __lambda_952(void *data, object self_7313928, int argc, object *args) /* object self_7313928, object r_736518 */
 {
 object r_736518 = args[0];
  if( (boolean_f != r_736518) ){ 
  



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

return_direct_with_clo1(data,  ((closureN)self_7313928)->elements[1], (((closure)  ((closureN)self_7313928)->elements[1])->fn),  Cyc_cdr(data, ((closureN)self_7313928)->elements[2]));}
;; 
}

static void __lambda_868(void *data, object self_7313929, int argc, object *args) /* object self_7313929, object r_736516 */
 {
 object r_736516 = args[0];
  
closureN_type c_7322247;
object e_7322988 [28];
c_7322247.hdr.mark = gc_color_red;
 c_7322247.hdr.grayed = 0;
c_7322247.tag = closureN_tag;
 c_7322247.fn = (function_type)__lambda_869;
c_7322247.num_args = 1;
c_7322247.num_elements = 28;
c_7322247.elements = (object *)e_7322988;
c_7322247.elements[0] = ((closureN)self_7313929)->elements[0];
c_7322247.elements[1] = ((closureN)self_7313929)->elements[1];
c_7322247.elements[2] = ((closureN)self_7313929)->elements[2];
c_7322247.elements[3] = ((closureN)self_7313929)->elements[3];
c_7322247.elements[4] = ((closureN)self_7313929)->elements[4];
c_7322247.elements[5] = ((closureN)self_7313929)->elements[5];
c_7322247.elements[6] = ((closureN)self_7313929)->elements[6];
c_7322247.elements[7] = ((closureN)self_7313929)->elements[7];
c_7322247.elements[8] = ((closureN)self_7313929)->elements[8];
c_7322247.elements[9] = ((closureN)self_7313929)->elements[9];
c_7322247.elements[10] = ((closureN)self_7313929)->elements[10];
c_7322247.elements[11] = ((closureN)self_7313929)->elements[11];
c_7322247.elements[12] = ((closureN)self_7313929)->elements[12];
c_7322247.elements[13] = ((closureN)self_7313929)->elements[13];
c_7322247.elements[14] = ((closureN)self_7313929)->elements[14];
c_7322247.elements[15] = ((closureN)self_7313929)->elements[15];
c_7322247.elements[16] = ((closureN)self_7313929)->elements[16];
c_7322247.elements[17] = ((closureN)self_7313929)->elements[17];
c_7322247.elements[18] = ((closureN)self_7313929)->elements[18];
c_7322247.elements[19] = ((closureN)self_7313929)->elements[19];
c_7322247.elements[20] = ((closureN)self_7313929)->elements[20];
c_7322247.elements[21] = ((closureN)self_7313929)->elements[21];
c_7322247.elements[22] = ((closureN)self_7313929)->elements[22];
c_7322247.elements[23] = ((closureN)self_7313929)->elements[23];
c_7322247.elements[24] = ((closureN)self_7313929)->elements[24];
c_7322247.elements[25] = ((closureN)self_7313929)->elements[25];
c_7322247.elements[26] = ((closureN)self_7313929)->elements[26];
c_7322247.elements[27] = ((closureN)self_7313929)->elements[27];



return_direct_with_clo1(data,(closure)&c_7322247,__lambda_869,  Cyc_set_cell(data, ((closureN)self_7313929)->elements[19], r_736516));; 
}

static void __lambda_869(void *data, object self_7313930, int argc, object *args) /* object self_7313930, object r_736392 */
 {

  
closureN_type c_7322249;
object e_7322853 [26];
c_7322249.hdr.mark = gc_color_red;
 c_7322249.hdr.grayed = 0;
c_7322249.tag = closureN_tag;
 c_7322249.fn = (function_type)__lambda_870;
c_7322249.num_args = 1;
c_7322249.num_elements = 26;
c_7322249.elements = (object *)e_7322853;
c_7322249.elements[0] = ((closureN)self_7313930)->elements[0];
c_7322249.elements[1] = ((closureN)self_7313930)->elements[1];
c_7322249.elements[2] = ((closureN)self_7313930)->elements[2];
c_7322249.elements[3] = ((closureN)self_7313930)->elements[3];
c_7322249.elements[4] = ((closureN)self_7313930)->elements[4];
c_7322249.elements[5] = ((closureN)self_7313930)->elements[5];
c_7322249.elements[6] = ((closureN)self_7313930)->elements[6];
c_7322249.elements[7] = ((closureN)self_7313930)->elements[7];
c_7322249.elements[8] = ((closureN)self_7313930)->elements[8];
c_7322249.elements[9] = ((closureN)self_7313930)->elements[9];
c_7322249.elements[10] = ((closureN)self_7313930)->elements[10];
c_7322249.elements[11] = ((closureN)self_7313930)->elements[11];
c_7322249.elements[12] = ((closureN)self_7313930)->elements[12];
c_7322249.elements[13] = ((closureN)self_7313930)->elements[13];
c_7322249.elements[14] = ((closureN)self_7313930)->elements[14];
c_7322249.elements[15] = ((closureN)self_7313930)->elements[15];
c_7322249.elements[16] = ((closureN)self_7313930)->elements[17];
c_7322249.elements[17] = ((closureN)self_7313930)->elements[18];
c_7322249.elements[18] = ((closureN)self_7313930)->elements[19];
c_7322249.elements[19] = ((closureN)self_7313930)->elements[20];
c_7322249.elements[20] = ((closureN)self_7313930)->elements[21];
c_7322249.elements[21] = ((closureN)self_7313930)->elements[22];
c_7322249.elements[22] = ((closureN)self_7313930)->elements[23];
c_7322249.elements[23] = ((closureN)self_7313930)->elements[24];
c_7322249.elements[24] = ((closureN)self_7313930)->elements[25];
c_7322249.elements[25] = ((closureN)self_7313930)->elements[26];


closureN_type c_7322854;
object e_7322987 [3];
c_7322854.hdr.mark = gc_color_red;
 c_7322854.hdr.grayed = 0;
c_7322854.tag = closureN_tag;
 c_7322854.fn = (function_type)__lambda_937;
c_7322854.num_args = 2;
c_7322854.num_elements = 3;
c_7322854.elements = (object *)e_7322987;
c_7322854.elements[0] = ((closureN)self_7313930)->elements[16];
c_7322854.elements[1] = ((closureN)self_7313930)->elements[20];
c_7322854.elements[2] = ((closureN)self_7313930)->elements[27];

return_direct_with_clo1(data,(closure)&c_7322249,__lambda_870,  &c_7322854);; 
}

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

return_direct_with_clo3(data,(closure)&c_7322856,__lambda_938,  x_731392_733652, dim_731393_733653, NULL);; 
}

static void __lambda_938(void *data, object self_7313932, int argc, object *args) /* object self_7313932, object x_731395_733654, object dim_731396_733655, object vars_731397_733656 */
 {
 object x_731395_733654 = args[0]; object dim_731396_733655 = args[1]; object vars_731397_733656 = args[2];
  
closureN_type c_7322858;
object e_7322985 [7];
c_7322858.hdr.mark = gc_color_red;
 c_7322858.hdr.grayed = 0;
c_7322858.tag = closureN_tag;
 c_7322858.fn = (function_type)__lambda_939;
c_7322858.num_args = 1;
c_7322858.num_elements = 7;
c_7322858.elements = (object *)e_7322985;
c_7322858.elements[0] = ((closureN)self_7313932)->elements[0];
c_7322858.elements[1] = dim_731396_733655;
c_7322858.elements[2] = ((closureN)self_7313932)->elements[1];
c_7322858.elements[3] = ((closureN)self_7313932)->elements[2];
c_7322858.elements[4] = ((closureN)self_7313932)->elements[3];
c_7322858.elements[5] = vars_731397_733656;
c_7322858.elements[6] = x_731395_733654;

return_direct_with_clo1(data,(closure)&c_7322858,__lambda_939,  boolean_f);; 
}

static void __lambda_939(void *data, object self_7313933, int argc, object *args) /* object self_7313933, object lp_731398_733657 */
 {
 object lp_731398_733657 = args[0];
  
closureN_type c_7322860;
object e_7322981 [7];
c_7322860.hdr.mark = gc_color_red;
 c_7322860.hdr.grayed = 0;
c_7322860.tag = closureN_tag;
 c_7322860.fn = (function_type)__lambda_1427;
c_7322860.num_args = 1;
c_7322860.num_elements = 7;
c_7322860.elements = (object *)e_7322981;
c_7322860.elements[0] = ((closureN)self_7313933)->elements[0];
c_7322860.elements[1] = ((closureN)self_7313933)->elements[1];
c_7322860.elements[2] = ((closureN)self_7313933)->elements[2];
c_7322860.elements[3] = ((closureN)self_7313933)->elements[3];
c_7322860.elements[4] = ((closureN)self_7313933)->elements[4];
c_7322860.elements[5] = ((closureN)self_7313933)->elements[5];
c_7322860.elements[6] = ((closureN)self_7313933)->elements[6];


pair_type local_7322984; 
return_direct_with_clo1(data,(closure)&c_7322860,__lambda_1427,  set_cell_as_expr(&local_7322984, lp_731398_733657));; 
}

static void __lambda_1427(void *data, object self_7313934, int argc, object *args) /* object self_7313934, object lp_731398_733657 */
 {
 object lp_731398_733657 = args[0];
  
closureN_type c_7322862;
object e_7322877 [5];
c_7322862.hdr.mark = gc_color_red;
 c_7322862.hdr.grayed = 0;
c_7322862.tag = closureN_tag;
 c_7322862.fn = (function_type)__lambda_940;
c_7322862.num_args = 1;
c_7322862.num_elements = 5;
c_7322862.elements = (object *)e_7322877;
c_7322862.elements[0] = ((closureN)self_7313934)->elements[1];
c_7322862.elements[1] = ((closureN)self_7313934)->elements[3];
c_7322862.elements[2] = lp_731398_733657;
c_7322862.elements[3] = ((closureN)self_7313934)->elements[5];
c_7322862.elements[4] = ((closureN)self_7313934)->elements[6];


closureN_type c_7322878;
object e_7322980 [4];
c_7322878.hdr.mark = gc_color_red;
 c_7322878.hdr.grayed = 0;
c_7322878.tag = closureN_tag;
 c_7322878.fn = (function_type)__lambda_942;
c_7322878.num_args = 3;
c_7322878.num_elements = 4;
c_7322878.elements = (object *)e_7322980;
c_7322878.elements[0] = ((closureN)self_7313934)->elements[0];
c_7322878.elements[1] = ((closureN)self_7313934)->elements[2];
c_7322878.elements[2] = ((closureN)self_7313934)->elements[4];
c_7322878.elements[3] = lp_731398_733657;

return_direct_with_clo1(data,(closure)&c_7322862,__lambda_940,  &c_7322878);; 
}

static void __lambda_942(void *data, object self_7313935, int argc, object *args) /* object self_7313935, object k_736499, object x_731399_733658, object dim_731400_733659, object vars_731401_733660 */
 {
 object k_736499 = args[0]; object x_731399_733658 = args[1]; object dim_731400_733659 = args[2]; object vars_731401_733660 = args[3];
  
closureN_type c_7322880;
object e_7322979 [8];
c_7322880.hdr.mark = gc_color_red;
 c_7322880.hdr.grayed = 0;
c_7322880.tag = closureN_tag;
 c_7322880.fn = (function_type)__lambda_943;
c_7322880.num_args = 1;
c_7322880.num_elements = 8;
c_7322880.elements = (object *)e_7322979;
c_7322880.elements[0] = ((closureN)self_7313935)->elements[0];
c_7322880.elements[1] = dim_731400_733659;
c_7322880.elements[2] = ((closureN)self_7313935)->elements[1];
c_7322880.elements[3] = k_736499;
c_7322880.elements[4] = ((closureN)self_7313935)->elements[2];
c_7322880.elements[5] = ((closureN)self_7313935)->elements[3];
c_7322880.elements[6] = vars_731401_733660;
c_7322880.elements[7] = x_731399_733658;

return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322880, x_731399_733658);; 
}

static void __lambda_943(void *data, object self_7313936, int argc, object *args) /* object self_7313936, object r_736500 */
 {
 object r_736500 = args[0];
  if( (boolean_f != r_736500) ){ 
  
closureN_type c_7322882;
object e_7322903 [5];
c_7322882.hdr.mark = gc_color_red;
 c_7322882.hdr.grayed = 0;
c_7322882.tag = closureN_tag;
 c_7322882.fn = (function_type)__lambda_944;
c_7322882.num_args = 1;
c_7322882.num_elements = 5;
c_7322882.elements = (object *)e_7322903;
c_7322882.elements[0] = ((closureN)self_7313936)->elements[1];
c_7322882.elements[1] = ((closureN)self_7313936)->elements[3];
c_7322882.elements[2] = ((closureN)self_7313936)->elements[4];
c_7322882.elements[3] = ((closureN)self_7313936)->elements[6];
c_7322882.elements[4] = ((closureN)self_7313936)->elements[7];


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

return_direct_with_clo1(data,(closure)&c_7322882,__lambda_944,  &c_7322904);
} else { 
  


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

return_closcall2(data,  car(((closureN)self_7313936)->elements[2]),  &c_7322913, ((closureN)self_7313936)->elements[7]);}
;; 
}

static void __lambda_947(void *data, object self_7313940, int argc, object *args) /* object self_7313940, object r_736505 */
 {
 object r_736505 = args[0];
  if( (boolean_f != r_736505) ){ 
  


closureN_type c_7322918;
object e_7322931 [4];
c_7322918.hdr.mark = gc_color_red;
 c_7322918.hdr.grayed = 0;
c_7322918.tag = closureN_tag;
 c_7322918.fn = (function_type)__lambda_948;
c_7322918.num_args = 1;
c_7322918.num_elements = 4;
c_7322918.elements = (object *)e_7322931;
c_7322918.elements[0] = ((closureN)self_7313940)->elements[0];
c_7322918.elements[1] = ((closureN)self_7313940)->elements[1];
c_7322918.elements[2] = ((closureN)self_7313940)->elements[2];
c_7322918.elements[3] = ((closureN)self_7313940)->elements[4];



return_closcall4(data,  car(((closureN)self_7313940)->elements[2]),  &c_7322918, Cyc_cddr(data, ((closureN)self_7313940)->elements[4]), ((closureN)self_7313940)->elements[0], ((closureN)self_7313940)->elements[3]);
} else { 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313940)->elements[4])) ){ 
  


closureN_type c_7322944;
object e_7322954 [4];
c_7322944.hdr.mark = gc_color_red;
 c_7322944.hdr.grayed = 0;
c_7322944.tag = closureN_tag;
 c_7322944.fn = (function_type)__lambda_949;
c_7322944.num_args = 1;
c_7322944.num_elements = 4;
c_7322944.elements = (object *)e_7322954;
c_7322944.elements[0] = ((closureN)self_7313940)->elements[0];
c_7322944.elements[1] = ((closureN)self_7313940)->elements[1];
c_7322944.elements[2] = ((closureN)self_7313940)->elements[2];
c_7322944.elements[3] = ((closureN)self_7313940)->elements[4];



return_closcall4(data,  car(((closureN)self_7313940)->elements[2]),  &c_7322944, Cyc_cdr(data, ((closureN)self_7313940)->elements[4]), ((closureN)self_7313940)->elements[0], ((closureN)self_7313940)->elements[3]);
} else { 
    
if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313940)->elements[4])) ){ 
  
closureN_type c_7322964;
object e_7322972 [4];
c_7322964.hdr.mark = gc_color_red;
 c_7322964.hdr.grayed = 0;
c_7322964.tag = closureN_tag;
 c_7322964.fn = (function_type)__lambda_950;
c_7322964.num_args = 1;
c_7322964.num_elements = 4;
c_7322964.elements = (object *)e_7322972;
c_7322964.elements[0] = ((closureN)self_7313940)->elements[0];
c_7322964.elements[1] = ((closureN)self_7313940)->elements[1];
c_7322964.elements[2] = ((closureN)self_7313940)->elements[2];
c_7322964.elements[3] = ((closureN)self_7313940)->elements[3];

return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7322964, ((closureN)self_7313940)->elements[4]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313940)->elements[1], (((closure)  ((closureN)self_7313940)->elements[1])->fn),  ((closureN)self_7313940)->elements[3]);}
;}
;}
;; 
}

static void __lambda_950(void *data, object self_7313943, int argc, object *args) /* object self_7313943, object r_736515 */
 {
 object r_736515 = args[0];
  

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

static void __lambda_949(void *data, object self_7313942, int argc, object *args) /* object self_7313942, object r_736512 */
 {
 object r_736512 = args[0];
  



return_closcall4(data,  car(((closureN)self_7313942)->elements[2]),  ((closureN)self_7313942)->elements[1], Cyc_car(data, ((closureN)self_7313942)->elements[3]), ((closureN)self_7313942)->elements[0], r_736512);; 
}

static void __lambda_948(void *data, object self_7313941, int argc, object *args) /* object self_7313941, object r_736508 */
 {
 object r_736508 = args[0];
  




complex_num_type local_7322929; 
return_closcall4(data,  car(((closureN)self_7313941)->elements[2]),  ((closureN)self_7313941)->elements[1], Cyc_car(data, ((closureN)self_7313941)->elements[3]), Cyc_fast_sum(data,&local_7322929, ((closureN)self_7313941)->elements[0], obj_int2obj(1)), r_736508);; 
}

static void __lambda_946(void *data, object self_7313937, int argc, object *args) /* object self_7313937, object k_736504, object lit_731405_733661 */
 {
 object k_736504 = args[0]; object lit_731405_733661 = args[1];
  return_closcall3(data,  ((closureN)self_7313937)->elements[0],  k_736504, ((closureN)self_7313937)->elements[1], lit_731405_733661);; 
}

static void __lambda_944(void *data, object self_7313938, int argc, object *args) /* object self_7313938, object r_736503 */
 {
 object r_736503 = args[0];
  
closureN_type c_7322884;
object e_7322899 [4];
c_7322884.hdr.mark = gc_color_red;
 c_7322884.hdr.grayed = 0;
c_7322884.tag = closureN_tag;
 c_7322884.fn = (function_type)__lambda_945;
c_7322884.num_args = 1;
c_7322884.num_elements = 4;
c_7322884.elements = (object *)e_7322899;
c_7322884.elements[0] = ((closureN)self_7313938)->elements[0];
c_7322884.elements[1] = ((closureN)self_7313938)->elements[1];
c_7322884.elements[2] = ((closureN)self_7313938)->elements[3];
c_7322884.elements[3] = ((closureN)self_7313938)->elements[4];



return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7322884, r_736503, car(((closureN)self_7313938)->elements[2]));; 
}

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

pair_type local_7322895; 
return_direct_with_clo1(data,  ((closureN)self_7313939)->elements[1], (((closure)  ((closureN)self_7313939)->elements[1])->fn),  set_pair_as_expr(&local_7322892, set_pair_as_expr(&local_7322895, ((closureN)self_7313939)->elements[3], ((closureN)self_7313939)->elements[0]), ((closureN)self_7313939)->elements[2]));}
;; 
}

static void __lambda_940(void *data, object self_7313944, int argc, object *args) /* object self_7313944, object r_736498 */
 {
 object r_736498 = args[0];
  
closureN_type c_7322864;
object e_7322873 [5];
c_7322864.hdr.mark = gc_color_red;
 c_7322864.hdr.grayed = 0;
c_7322864.tag = closureN_tag;
 c_7322864.fn = (function_type)__lambda_941;
c_7322864.num_args = 1;
c_7322864.num_elements = 5;
c_7322864.elements = (object *)e_7322873;
c_7322864.elements[0] = ((closureN)self_7313944)->elements[0];
c_7322864.elements[1] = ((closureN)self_7313944)->elements[1];
c_7322864.elements[2] = ((closureN)self_7313944)->elements[2];
c_7322864.elements[3] = ((closureN)self_7313944)->elements[3];
c_7322864.elements[4] = ((closureN)self_7313944)->elements[4];



return_direct_with_clo1(data,(closure)&c_7322864,__lambda_941,  Cyc_set_cell(data, ((closureN)self_7313944)->elements[2], r_736498));; 
}

static void __lambda_941(void *data, object self_7313945, int argc, object *args) /* object self_7313945, object r_736497 */
 {

  

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

static void __lambda_870(void *data, object self_7313946, int argc, object *args) /* object self_7313946, object r_736494 */
 {
 object r_736494 = args[0];
  
closureN_type c_7322251;
object e_7322849 [25];
c_7322251.hdr.mark = gc_color_red;
 c_7322251.hdr.grayed = 0;
c_7322251.tag = closureN_tag;
 c_7322251.fn = (function_type)__lambda_871;
c_7322251.num_args = 1;
c_7322251.num_elements = 25;
c_7322251.elements = (object *)e_7322849;
c_7322251.elements[0] = ((closureN)self_7313946)->elements[0];
c_7322251.elements[1] = ((closureN)self_7313946)->elements[1];
c_7322251.elements[2] = ((closureN)self_7313946)->elements[2];
c_7322251.elements[3] = ((closureN)self_7313946)->elements[3];
c_7322251.elements[4] = ((closureN)self_7313946)->elements[4];
c_7322251.elements[5] = ((closureN)self_7313946)->elements[5];
c_7322251.elements[6] = ((closureN)self_7313946)->elements[6];
c_7322251.elements[7] = ((closureN)self_7313946)->elements[7];
c_7322251.elements[8] = ((closureN)self_7313946)->elements[8];
c_7322251.elements[9] = ((closureN)self_7313946)->elements[9];
c_7322251.elements[10] = ((closureN)self_7313946)->elements[10];
c_7322251.elements[11] = ((closureN)self_7313946)->elements[11];
c_7322251.elements[12] = ((closureN)self_7313946)->elements[12];
c_7322251.elements[13] = ((closureN)self_7313946)->elements[13];
c_7322251.elements[14] = ((closureN)self_7313946)->elements[14];
c_7322251.elements[15] = ((closureN)self_7313946)->elements[16];
c_7322251.elements[16] = ((closureN)self_7313946)->elements[17];
c_7322251.elements[17] = ((closureN)self_7313946)->elements[18];
c_7322251.elements[18] = ((closureN)self_7313946)->elements[19];
c_7322251.elements[19] = ((closureN)self_7313946)->elements[20];
c_7322251.elements[20] = ((closureN)self_7313946)->elements[21];
c_7322251.elements[21] = ((closureN)self_7313946)->elements[22];
c_7322251.elements[22] = ((closureN)self_7313946)->elements[23];
c_7322251.elements[23] = ((closureN)self_7313946)->elements[24];
c_7322251.elements[24] = ((closureN)self_7313946)->elements[25];



return_direct_with_clo1(data,(closure)&c_7322251,__lambda_871,  Cyc_set_cell(data, ((closureN)self_7313946)->elements[15], r_736494));; 
}

static void __lambda_871(void *data, object self_7313947, int argc, object *args) /* object self_7313947, object r_736393 */
 {

  
closureN_type c_7322253;
object e_7322734 [25];
c_7322253.hdr.mark = gc_color_red;
 c_7322253.hdr.grayed = 0;
c_7322253.tag = closureN_tag;
 c_7322253.fn = (function_type)__lambda_872;
c_7322253.num_args = 1;
c_7322253.num_elements = 25;
c_7322253.elements = (object *)e_7322734;
c_7322253.elements[0] = ((closureN)self_7313947)->elements[0];
c_7322253.elements[1] = ((closureN)self_7313947)->elements[1];
c_7322253.elements[2] = ((closureN)self_7313947)->elements[2];
c_7322253.elements[3] = ((closureN)self_7313947)->elements[3];
c_7322253.elements[4] = ((closureN)self_7313947)->elements[4];
c_7322253.elements[5] = ((closureN)self_7313947)->elements[5];
c_7322253.elements[6] = ((closureN)self_7313947)->elements[6];
c_7322253.elements[7] = ((closureN)self_7313947)->elements[7];
c_7322253.elements[8] = ((closureN)self_7313947)->elements[8];
c_7322253.elements[9] = ((closureN)self_7313947)->elements[9];
c_7322253.elements[10] = ((closureN)self_7313947)->elements[10];
c_7322253.elements[11] = ((closureN)self_7313947)->elements[11];
c_7322253.elements[12] = ((closureN)self_7313947)->elements[12];
c_7322253.elements[13] = ((closureN)self_7313947)->elements[13];
c_7322253.elements[14] = ((closureN)self_7313947)->elements[14];
c_7322253.elements[15] = ((closureN)self_7313947)->elements[15];
c_7322253.elements[16] = ((closureN)self_7313947)->elements[16];
c_7322253.elements[17] = ((closureN)self_7313947)->elements[17];
c_7322253.elements[18] = ((closureN)self_7313947)->elements[18];
c_7322253.elements[19] = ((closureN)self_7313947)->elements[19];
c_7322253.elements[20] = ((closureN)self_7313947)->elements[20];
c_7322253.elements[21] = ((closureN)self_7313947)->elements[21];
c_7322253.elements[22] = ((closureN)self_7313947)->elements[22];
c_7322253.elements[23] = ((closureN)self_7313947)->elements[23];
c_7322253.elements[24] = ((closureN)self_7313947)->elements[24];


mmacro(c_7322735, (function_type)__lambda_923);c_7322735.num_args = 3;
return_direct_with_clo1(data,(closure)&c_7322253,__lambda_872,  &c_7322735);; 
}

static void __lambda_923(void *data, object self_7313948, int argc, object *args) /* object self_7313948, object k_736477, object x_731416_733662, object vars_731417_733663, object dim_731418_733664 */
 {
 object k_736477 = args[0]; object x_731416_733662 = args[1]; object vars_731417_733663 = args[2]; object dim_731418_733664 = args[3];
  
closureN_type c_7322737;
object e_7322848 [3];
c_7322737.hdr.mark = gc_color_red;
 c_7322737.hdr.grayed = 0;
c_7322737.tag = closureN_tag;
 c_7322737.fn = (function_type)__lambda_924;
c_7322737.num_args = 2;
c_7322737.num_elements = 3;
c_7322737.elements = (object *)e_7322848;
c_7322737.elements[0] = dim_731418_733664;
c_7322737.elements[1] = k_736477;
c_7322737.elements[2] = vars_731417_733663;

return_direct_with_clo2(data,(closure)&c_7322737,__lambda_924,  x_731416_733662, NULL);; 
}

static void __lambda_924(void *data, object self_7313949, int argc, object *args) /* object self_7313949, object x_731420_733665, object free_731421_733666 */
 {
 object x_731420_733665 = args[0]; object free_731421_733666 = args[1];
  
closureN_type c_7322739;
object e_7322847 [5];
c_7322739.hdr.mark = gc_color_red;
 c_7322739.hdr.grayed = 0;
c_7322739.tag = closureN_tag;
 c_7322739.fn = (function_type)__lambda_925;
c_7322739.num_args = 1;
c_7322739.num_elements = 5;
c_7322739.elements = (object *)e_7322847;
c_7322739.elements[0] = ((closureN)self_7313949)->elements[0];
c_7322739.elements[1] = free_731421_733666;
c_7322739.elements[2] = ((closureN)self_7313949)->elements[1];
c_7322739.elements[3] = ((closureN)self_7313949)->elements[2];
c_7322739.elements[4] = x_731420_733665;

return_direct_with_clo1(data,(closure)&c_7322739,__lambda_925,  boolean_f);; 
}

static void __lambda_925(void *data, object self_7313950, int argc, object *args) /* object self_7313950, object lp_731422_733667 */
 {
 object lp_731422_733667 = args[0];
  
closureN_type c_7322741;
object e_7322843 [5];
c_7322741.hdr.mark = gc_color_red;
 c_7322741.hdr.grayed = 0;
c_7322741.tag = closureN_tag;
 c_7322741.fn = (function_type)__lambda_1426;
c_7322741.num_args = 1;
c_7322741.num_elements = 5;
c_7322741.elements = (object *)e_7322843;
c_7322741.elements[0] = ((closureN)self_7313950)->elements[0];
c_7322741.elements[1] = ((closureN)self_7313950)->elements[1];
c_7322741.elements[2] = ((closureN)self_7313950)->elements[2];
c_7322741.elements[3] = ((closureN)self_7313950)->elements[3];
c_7322741.elements[4] = ((closureN)self_7313950)->elements[4];


pair_type local_7322846; 
return_direct_with_clo1(data,(closure)&c_7322741,__lambda_1426,  set_cell_as_expr(&local_7322846, lp_731422_733667));; 
}

static void __lambda_1426(void *data, object self_7313951, int argc, object *args) /* object self_7313951, object lp_731422_733667 */
 {
 object lp_731422_733667 = args[0];
  
closureN_type c_7322743;
object e_7322757 [4];
c_7322743.hdr.mark = gc_color_red;
 c_7322743.hdr.grayed = 0;
c_7322743.tag = closureN_tag;
 c_7322743.fn = (function_type)__lambda_926;
c_7322743.num_args = 1;
c_7322743.num_elements = 4;
c_7322743.elements = (object *)e_7322757;
c_7322743.elements[0] = ((closureN)self_7313951)->elements[1];
c_7322743.elements[1] = ((closureN)self_7313951)->elements[2];
c_7322743.elements[2] = lp_731422_733667;
c_7322743.elements[3] = ((closureN)self_7313951)->elements[4];


closureN_type c_7322758;
object e_7322842 [3];
c_7322758.hdr.mark = gc_color_red;
 c_7322758.hdr.grayed = 0;
c_7322758.tag = closureN_tag;
 c_7322758.fn = (function_type)__lambda_928;
c_7322758.num_args = 2;
c_7322758.num_elements = 3;
c_7322758.elements = (object *)e_7322842;
c_7322758.elements[0] = ((closureN)self_7313951)->elements[0];
c_7322758.elements[1] = lp_731422_733667;
c_7322758.elements[2] = ((closureN)self_7313951)->elements[3];

return_direct_with_clo1(data,(closure)&c_7322743,__lambda_926,  &c_7322758);; 
}

static void __lambda_928(void *data, object self_7313952, int argc, object *args) /* object self_7313952, object k_736481, object x_731423_733668, object free_731424_733669 */
 {
 object k_736481 = args[0]; object x_731423_733668 = args[1]; object free_731424_733669 = args[2];
  
closureN_type c_7322760;
object e_7322841 [6];
c_7322760.hdr.mark = gc_color_red;
 c_7322760.hdr.grayed = 0;
c_7322760.tag = closureN_tag;
 c_7322760.fn = (function_type)__lambda_929;
c_7322760.num_args = 1;
c_7322760.num_elements = 6;
c_7322760.elements = (object *)e_7322841;
c_7322760.elements[0] = ((closureN)self_7313952)->elements[0];
c_7322760.elements[1] = free_731424_733669;
c_7322760.elements[2] = k_736481;
c_7322760.elements[3] = ((closureN)self_7313952)->elements[1];
c_7322760.elements[4] = ((closureN)self_7313952)->elements[2];
c_7322760.elements[5] = x_731423_733668;

return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322760, x_731423_733668);; 
}

static void __lambda_929(void *data, object self_7313953, int argc, object *args) /* object self_7313953, object r_736482 */
 {
 object r_736482 = args[0];
  if( (boolean_f != r_736482) ){ 
  
closureN_type c_7322762;
object e_7322791 [4];
c_7322762.hdr.mark = gc_color_red;
 c_7322762.hdr.grayed = 0;
c_7322762.tag = closureN_tag;
 c_7322762.fn = (function_type)__lambda_930;
c_7322762.num_args = 0;
c_7322762.num_elements = 4;
c_7322762.elements = (object *)e_7322791;
c_7322762.elements[0] = ((closureN)self_7313953)->elements[0];
c_7322762.elements[1] = ((closureN)self_7313953)->elements[1];
c_7322762.elements[2] = ((closureN)self_7313953)->elements[4];
c_7322762.elements[3] = ((closureN)self_7313953)->elements[5];


closureN_type c_7322792;
object e_7322803 [3];
c_7322792.hdr.mark = gc_color_red;
 c_7322792.hdr.grayed = 0;
c_7322792.tag = closureN_tag;
 c_7322792.fn = (function_type)__lambda_934;
c_7322792.num_args = 1;
c_7322792.num_elements = 3;
c_7322792.elements = (object *)e_7322803;
c_7322792.elements[0] = ((closureN)self_7313953)->elements[1];
c_7322792.elements[1] = ((closureN)self_7313953)->elements[2];
c_7322792.elements[2] = ((closureN)self_7313953)->elements[5];

return_direct_with_clo1(data,(closure)&c_7322762,__lambda_930,  &c_7322792);
} else { 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313953)->elements[5])) ){ 
  


closureN_type c_7322811;
object e_7322820 [3];
c_7322811.hdr.mark = gc_color_red;
 c_7322811.hdr.grayed = 0;
c_7322811.tag = closureN_tag;
 c_7322811.fn = (function_type)__lambda_935;
c_7322811.num_args = 1;
c_7322811.num_elements = 3;
c_7322811.elements = (object *)e_7322820;
c_7322811.elements[0] = ((closureN)self_7313953)->elements[2];
c_7322811.elements[1] = ((closureN)self_7313953)->elements[3];
c_7322811.elements[2] = ((closureN)self_7313953)->elements[5];



return_closcall3(data,  car(((closureN)self_7313953)->elements[3]),  &c_7322811, Cyc_cdr(data, ((closureN)self_7313953)->elements[5]), ((closureN)self_7313953)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313953)->elements[5])) ){ 
  
closureN_type c_7322829;
object e_7322836 [3];
c_7322829.hdr.mark = gc_color_red;
 c_7322829.hdr.grayed = 0;
c_7322829.tag = closureN_tag;
 c_7322829.fn = (function_type)__lambda_936;
c_7322829.num_args = 1;
c_7322829.num_elements = 3;
c_7322829.elements = (object *)e_7322836;
c_7322829.elements[0] = ((closureN)self_7313953)->elements[1];
c_7322829.elements[1] = ((closureN)self_7313953)->elements[2];
c_7322829.elements[2] = ((closureN)self_7313953)->elements[3];

return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7322829, ((closureN)self_7313953)->elements[5]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313953)->elements[2], (((closure)  ((closureN)self_7313953)->elements[2])->fn),  ((closureN)self_7313953)->elements[1]);}
;}
;}
;; 
}

static void __lambda_936(void *data, object self_7313960, int argc, object *args) /* object self_7313960, object r_736493 */
 {
 object r_736493 = args[0];
  

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

static void __lambda_935(void *data, object self_7313959, int argc, object *args) /* object self_7313959, object r_736490 */
 {
 object r_736490 = args[0];
  



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

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

static void __lambda_930(void *data, object self_7313955, int argc, object *args) /* object self_7313955, object k_736484 */
 {
 object k_736484 = args[0];
  
closureN_type c_7322764;
object e_7322786 [4];
c_7322764.hdr.mark = gc_color_red;
 c_7322764.hdr.grayed = 0;
c_7322764.tag = closureN_tag;
 c_7322764.fn = (function_type)__lambda_931;
c_7322764.num_args = 1;
c_7322764.num_elements = 4;
c_7322764.elements = (object *)e_7322786;
c_7322764.elements[0] = ((closureN)self_7313955)->elements[0];
c_7322764.elements[1] = k_736484;
c_7322764.elements[2] = ((closureN)self_7313955)->elements[2];
c_7322764.elements[3] = ((closureN)self_7313955)->elements[3];



return_direct_with_clo1(data,(closure)&c_7322764,__lambda_931,  memqp(data, ((closureN)self_7313955)->elements[3], ((closureN)self_7313955)->elements[1]));; 
}

static void __lambda_931(void *data, object self_7313956, int argc, object *args) /* object self_7313956, object r_736485 */
 {
 object r_736485 = args[0];
  if( (boolean_f != r_736485) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313956)->elements[1], (((closure)  ((closureN)self_7313956)->elements[1])->fn),  boolean_f);
} else { 
  
closureN_type c_7322768;
object e_7322781 [2];
c_7322768.hdr.mark = gc_color_red;
 c_7322768.hdr.grayed = 0;
c_7322768.tag = closureN_tag;
 c_7322768.fn = (function_type)__lambda_932;
c_7322768.num_args = 1;
c_7322768.num_elements = 2;
c_7322768.elements = (object *)e_7322781;
c_7322768.elements[0] = ((closureN)self_7313956)->elements[0];
c_7322768.elements[1] = ((closureN)self_7313956)->elements[1];



return_direct_with_clo1(data,(closure)&c_7322768,__lambda_932,  assq(data, ((closureN)self_7313956)->elements[3], ((closureN)self_7313956)->elements[2]));}
;; 
}

static void __lambda_932(void *data, object self_7313957, int argc, object *args) /* object self_7313957, object tmp_731431_731433_733670 */
 {
 object tmp_731431_731433_733670 = args[0];
  if( (boolean_f != tmp_731431_731433_733670) ){ 
  
closureN_type c_7322770;
object e_7322778 [2];
c_7322770.hdr.mark = gc_color_red;
 c_7322770.hdr.grayed = 0;
c_7322770.tag = closureN_tag;
 c_7322770.fn = (function_type)__lambda_933;
c_7322770.num_args = 1;
c_7322770.num_elements = 2;
c_7322770.elements = (object *)e_7322778;
c_7322770.elements[0] = ((closureN)self_7313957)->elements[0];
c_7322770.elements[1] = ((closureN)self_7313957)->elements[1];

return_direct_with_clo1(data,(closure)&c_7322770,__lambda_933,  tmp_731431_731433_733670);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313957)->elements[1], (((closure)  ((closureN)self_7313957)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_933(void *data, object self_7313958, int argc, object *args) /* object self_7313958, object cell_731434_733671 */
 {
 object cell_731434_733671 = args[0];
  



return_direct_with_clo1(data,  ((closureN)self_7313958)->elements[1], (((closure)  ((closureN)self_7313958)->elements[1])->fn),  Cyc_num_fast_gte_op(data, Cyc_cdr(data, cell_731434_733671), ((closureN)self_7313958)->elements[0]));; 
}

static void __lambda_926(void *data, object self_7313961, int argc, object *args) /* object self_7313961, object r_736480 */
 {
 object r_736480 = args[0];
  
closureN_type c_7322745;
object e_7322753 [4];
c_7322745.hdr.mark = gc_color_red;
 c_7322745.hdr.grayed = 0;
c_7322745.tag = closureN_tag;
 c_7322745.fn = (function_type)__lambda_927;
c_7322745.num_args = 1;
c_7322745.num_elements = 4;
c_7322745.elements = (object *)e_7322753;
c_7322745.elements[0] = ((closureN)self_7313961)->elements[0];
c_7322745.elements[1] = ((closureN)self_7313961)->elements[1];
c_7322745.elements[2] = ((closureN)self_7313961)->elements[2];
c_7322745.elements[3] = ((closureN)self_7313961)->elements[3];



return_direct_with_clo1(data,(closure)&c_7322745,__lambda_927,  Cyc_set_cell(data, ((closureN)self_7313961)->elements[2], r_736480));; 
}

static void __lambda_927(void *data, object self_7313962, int argc, object *args) /* object self_7313962, object r_736479 */
 {

  

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

static void __lambda_872(void *data, object self_7313963, int argc, object *args) /* object self_7313963, object r_736476 */
 {
 object r_736476 = args[0];
  
closureN_type c_7322255;
object e_7322730 [25];
c_7322255.hdr.mark = gc_color_red;
 c_7322255.hdr.grayed = 0;
c_7322255.tag = closureN_tag;
 c_7322255.fn = (function_type)__lambda_873;
c_7322255.num_args = 1;
c_7322255.num_elements = 25;
c_7322255.elements = (object *)e_7322730;
c_7322255.elements[0] = ((closureN)self_7313963)->elements[0];
c_7322255.elements[1] = ((closureN)self_7313963)->elements[1];
c_7322255.elements[2] = ((closureN)self_7313963)->elements[2];
c_7322255.elements[3] = ((closureN)self_7313963)->elements[3];
c_7322255.elements[4] = ((closureN)self_7313963)->elements[4];
c_7322255.elements[5] = ((closureN)self_7313963)->elements[5];
c_7322255.elements[6] = ((closureN)self_7313963)->elements[6];
c_7322255.elements[7] = ((closureN)self_7313963)->elements[7];
c_7322255.elements[8] = ((closureN)self_7313963)->elements[8];
c_7322255.elements[9] = ((closureN)self_7313963)->elements[9];
c_7322255.elements[10] = ((closureN)self_7313963)->elements[10];
c_7322255.elements[11] = ((closureN)self_7313963)->elements[11];
c_7322255.elements[12] = ((closureN)self_7313963)->elements[12];
c_7322255.elements[13] = ((closureN)self_7313963)->elements[13];
c_7322255.elements[14] = ((closureN)self_7313963)->elements[14];
c_7322255.elements[15] = ((closureN)self_7313963)->elements[15];
c_7322255.elements[16] = ((closureN)self_7313963)->elements[16];
c_7322255.elements[17] = ((closureN)self_7313963)->elements[17];
c_7322255.elements[18] = ((closureN)self_7313963)->elements[18];
c_7322255.elements[19] = ((closureN)self_7313963)->elements[19];
c_7322255.elements[20] = ((closureN)self_7313963)->elements[20];
c_7322255.elements[21] = ((closureN)self_7313963)->elements[21];
c_7322255.elements[22] = ((closureN)self_7313963)->elements[22];
c_7322255.elements[23] = ((closureN)self_7313963)->elements[23];
c_7322255.elements[24] = ((closureN)self_7313963)->elements[24];



return_direct_with_clo1(data,(closure)&c_7322255,__lambda_873,  Cyc_set_cell(data, ((closureN)self_7313963)->elements[23], r_736476));; 
}

static void __lambda_873(void *data, object self_7313964, int argc, object *args) /* object self_7313964, object r_736394 */
 {

  
closureN_type c_7322257;
object e_7322327 [13];
c_7322257.hdr.mark = gc_color_red;
 c_7322257.hdr.grayed = 0;
c_7322257.tag = closureN_tag;
 c_7322257.fn = (function_type)__lambda_874;
c_7322257.num_args = 1;
c_7322257.num_elements = 13;
c_7322257.elements = (object *)e_7322327;
c_7322257.elements[0] = ((closureN)self_7313964)->elements[2];
c_7322257.elements[1] = ((closureN)self_7313964)->elements[3];
c_7322257.elements[2] = ((closureN)self_7313964)->elements[4];
c_7322257.elements[3] = ((closureN)self_7313964)->elements[6];
c_7322257.elements[4] = ((closureN)self_7313964)->elements[7];
c_7322257.elements[5] = ((closureN)self_7313964)->elements[8];
c_7322257.elements[6] = ((closureN)self_7313964)->elements[9];
c_7322257.elements[7] = ((closureN)self_7313964)->elements[12];
c_7322257.elements[8] = ((closureN)self_7313964)->elements[14];
c_7322257.elements[9] = ((closureN)self_7313964)->elements[19];
c_7322257.elements[10] = ((closureN)self_7313964)->elements[20];
c_7322257.elements[11] = ((closureN)self_7313964)->elements[22];
c_7322257.elements[12] = ((closureN)self_7313964)->elements[24];


closureN_type c_7322328;
object e_7322729 [14];
c_7322328.hdr.mark = gc_color_red;
 c_7322328.hdr.grayed = 0;
c_7322328.tag = closureN_tag;
 c_7322328.fn = (function_type)__lambda_881;
c_7322328.num_args = 2;
c_7322328.num_elements = 14;
c_7322328.elements = (object *)e_7322729;
c_7322328.elements[0] = ((closureN)self_7313964)->elements[0];
c_7322328.elements[1] = ((closureN)self_7313964)->elements[1];
c_7322328.elements[2] = ((closureN)self_7313964)->elements[5];
c_7322328.elements[3] = ((closureN)self_7313964)->elements[9];
c_7322328.elements[4] = ((closureN)self_7313964)->elements[10];
c_7322328.elements[5] = ((closureN)self_7313964)->elements[11];
c_7322328.elements[6] = ((closureN)self_7313964)->elements[13];
c_7322328.elements[7] = ((closureN)self_7313964)->elements[14];
c_7322328.elements[8] = ((closureN)self_7313964)->elements[15];
c_7322328.elements[9] = ((closureN)self_7313964)->elements[16];
c_7322328.elements[10] = ((closureN)self_7313964)->elements[17];
c_7322328.elements[11] = ((closureN)self_7313964)->elements[18];
c_7322328.elements[12] = ((closureN)self_7313964)->elements[21];
c_7322328.elements[13] = ((closureN)self_7313964)->elements[23];

return_direct_with_clo1(data,(closure)&c_7322257,__lambda_874,  &c_7322328);; 
}

static void __lambda_881(void *data, object self_7313965, int argc, object *args) /* object self_7313965, object k_736410, object tmpl_731443_733672, object vars_731444_733673 */
 {
 object k_736410 = args[0]; object tmpl_731443_733672 = args[1]; object vars_731444_733673 = args[2];
  
closureN_type c_7322330;
object e_7322728 [16];
c_7322330.hdr.mark = gc_color_red;
 c_7322330.hdr.grayed = 0;
c_7322330.tag = closureN_tag;
 c_7322330.fn = (function_type)__lambda_882;
c_7322330.num_args = 1;
c_7322330.num_elements = 16;
c_7322330.elements = (object *)e_7322728;
c_7322330.elements[0] = ((closureN)self_7313965)->elements[0];
c_7322330.elements[1] = ((closureN)self_7313965)->elements[1];
c_7322330.elements[2] = ((closureN)self_7313965)->elements[2];
c_7322330.elements[3] = ((closureN)self_7313965)->elements[3];
c_7322330.elements[4] = ((closureN)self_7313965)->elements[4];
c_7322330.elements[5] = ((closureN)self_7313965)->elements[5];
c_7322330.elements[6] = ((closureN)self_7313965)->elements[6];
c_7322330.elements[7] = ((closureN)self_7313965)->elements[7];
c_7322330.elements[8] = ((closureN)self_7313965)->elements[8];
c_7322330.elements[9] = ((closureN)self_7313965)->elements[9];
c_7322330.elements[10] = ((closureN)self_7313965)->elements[10];
c_7322330.elements[11] = ((closureN)self_7313965)->elements[11];
c_7322330.elements[12] = ((closureN)self_7313965)->elements[12];
c_7322330.elements[13] = ((closureN)self_7313965)->elements[13];
c_7322330.elements[14] = k_736410;
c_7322330.elements[15] = vars_731444_733673;

return_direct_with_clo1(data,(closure)&c_7322330,__lambda_882,  tmpl_731443_733672);; 
}

static void __lambda_882(void *data, object self_7313966, int argc, object *args) /* object self_7313966, object t_731446_733674 */
 {
 object t_731446_733674 = args[0];
  
closureN_type c_7322332;
object e_7322727 [17];
c_7322332.hdr.mark = gc_color_red;
 c_7322332.hdr.grayed = 0;
c_7322332.tag = closureN_tag;
 c_7322332.fn = (function_type)__lambda_883;
c_7322332.num_args = 1;
c_7322332.num_elements = 17;
c_7322332.elements = (object *)e_7322727;
c_7322332.elements[0] = ((closureN)self_7313966)->elements[0];
c_7322332.elements[1] = ((closureN)self_7313966)->elements[1];
c_7322332.elements[2] = ((closureN)self_7313966)->elements[2];
c_7322332.elements[3] = ((closureN)self_7313966)->elements[3];
c_7322332.elements[4] = ((closureN)self_7313966)->elements[4];
c_7322332.elements[5] = ((closureN)self_7313966)->elements[5];
c_7322332.elements[6] = ((closureN)self_7313966)->elements[6];
c_7322332.elements[7] = ((closureN)self_7313966)->elements[7];
c_7322332.elements[8] = ((closureN)self_7313966)->elements[8];
c_7322332.elements[9] = ((closureN)self_7313966)->elements[9];
c_7322332.elements[10] = ((closureN)self_7313966)->elements[10];
c_7322332.elements[11] = ((closureN)self_7313966)->elements[11];
c_7322332.elements[12] = ((closureN)self_7313966)->elements[12];
c_7322332.elements[13] = ((closureN)self_7313966)->elements[13];
c_7322332.elements[14] = ((closureN)self_7313966)->elements[14];
c_7322332.elements[15] = t_731446_733674;
c_7322332.elements[16] = ((closureN)self_7313966)->elements[15];

return_direct_with_clo1(data,(closure)&c_7322332,__lambda_883,  boolean_f);; 
}

static void __lambda_883(void *data, object self_7313967, int argc, object *args) /* object self_7313967, object lp_731448_733676 */
 {
 object lp_731448_733676 = args[0];
  
closureN_type c_7322334;
object e_7322723 [17];
c_7322334.hdr.mark = gc_color_red;
 c_7322334.hdr.grayed = 0;
c_7322334.tag = closureN_tag;
 c_7322334.fn = (function_type)__lambda_1425;
c_7322334.num_args = 1;
c_7322334.num_elements = 17;
c_7322334.elements = (object *)e_7322723;
c_7322334.elements[0] = ((closureN)self_7313967)->elements[0];
c_7322334.elements[1] = ((closureN)self_7313967)->elements[1];
c_7322334.elements[2] = ((closureN)self_7313967)->elements[2];
c_7322334.elements[3] = ((closureN)self_7313967)->elements[3];
c_7322334.elements[4] = ((closureN)self_7313967)->elements[4];
c_7322334.elements[5] = ((closureN)self_7313967)->elements[5];
c_7322334.elements[6] = ((closureN)self_7313967)->elements[6];
c_7322334.elements[7] = ((closureN)self_7313967)->elements[7];
c_7322334.elements[8] = ((closureN)self_7313967)->elements[8];
c_7322334.elements[9] = ((closureN)self_7313967)->elements[9];
c_7322334.elements[10] = ((closureN)self_7313967)->elements[10];
c_7322334.elements[11] = ((closureN)self_7313967)->elements[11];
c_7322334.elements[12] = ((closureN)self_7313967)->elements[12];
c_7322334.elements[13] = ((closureN)self_7313967)->elements[13];
c_7322334.elements[14] = ((closureN)self_7313967)->elements[14];
c_7322334.elements[15] = ((closureN)self_7313967)->elements[15];
c_7322334.elements[16] = ((closureN)self_7313967)->elements[16];


pair_type local_7322726; 
return_direct_with_clo1(data,(closure)&c_7322334,__lambda_1425,  set_cell_as_expr(&local_7322726, lp_731448_733676));; 
}

static void __lambda_1425(void *data, object self_7313968, int argc, object *args) /* object self_7313968, object lp_731448_733676 */
 {
 object lp_731448_733676 = args[0];
  
closureN_type c_7322336;
object e_7322349 [3];
c_7322336.hdr.mark = gc_color_red;
 c_7322336.hdr.grayed = 0;
c_7322336.tag = closureN_tag;
 c_7322336.fn = (function_type)__lambda_884;
c_7322336.num_args = 1;
c_7322336.num_elements = 3;
c_7322336.elements = (object *)e_7322349;
c_7322336.elements[0] = ((closureN)self_7313968)->elements[14];
c_7322336.elements[1] = lp_731448_733676;
c_7322336.elements[2] = ((closureN)self_7313968)->elements[15];


closureN_type c_7322350;
object e_7322722 [16];
c_7322350.hdr.mark = gc_color_red;
 c_7322350.hdr.grayed = 0;
c_7322350.tag = closureN_tag;
 c_7322350.fn = (function_type)__lambda_886;
c_7322350.num_args = 2;
c_7322350.num_elements = 16;
c_7322350.elements = (object *)e_7322722;
c_7322350.elements[0] = ((closureN)self_7313968)->elements[0];
c_7322350.elements[1] = ((closureN)self_7313968)->elements[1];
c_7322350.elements[2] = ((closureN)self_7313968)->elements[2];
c_7322350.elements[3] = ((closureN)self_7313968)->elements[3];
c_7322350.elements[4] = ((closureN)self_7313968)->elements[4];
c_7322350.elements[5] = ((closureN)self_7313968)->elements[5];
c_7322350.elements[6] = ((closureN)self_7313968)->elements[6];
c_7322350.elements[7] = ((closureN)self_7313968)->elements[7];
c_7322350.elements[8] = ((closureN)self_7313968)->elements[8];
c_7322350.elements[9] = ((closureN)self_7313968)->elements[9];
c_7322350.elements[10] = ((closureN)self_7313968)->elements[10];
c_7322350.elements[11] = ((closureN)self_7313968)->elements[11];
c_7322350.elements[12] = ((closureN)self_7313968)->elements[12];
c_7322350.elements[13] = ((closureN)self_7313968)->elements[13];
c_7322350.elements[14] = lp_731448_733676;
c_7322350.elements[15] = ((closureN)self_7313968)->elements[16];

return_direct_with_clo1(data,(closure)&c_7322336,__lambda_884,  &c_7322350);; 
}

static void __lambda_886(void *data, object self_7313969, int argc, object *args) /* object self_7313969, object k_736413, object t_731449_733677, object dim_731450_733678 */
 {
 object k_736413 = args[0]; object t_731449_733677 = args[1]; object dim_731450_733678 = args[2];
  
closureN_type c_7322352;
object e_7322721 [19];
c_7322352.hdr.mark = gc_color_red;
 c_7322352.hdr.grayed = 0;
c_7322352.tag = closureN_tag;
 c_7322352.fn = (function_type)__lambda_887;
c_7322352.num_args = 1;
c_7322352.num_elements = 19;
c_7322352.elements = (object *)e_7322721;
c_7322352.elements[0] = ((closureN)self_7313969)->elements[0];
c_7322352.elements[1] = ((closureN)self_7313969)->elements[1];
c_7322352.elements[2] = ((closureN)self_7313969)->elements[2];
c_7322352.elements[3] = ((closureN)self_7313969)->elements[3];
c_7322352.elements[4] = ((closureN)self_7313969)->elements[4];
c_7322352.elements[5] = ((closureN)self_7313969)->elements[5];
c_7322352.elements[6] = ((closureN)self_7313969)->elements[6];
c_7322352.elements[7] = ((closureN)self_7313969)->elements[7];
c_7322352.elements[8] = dim_731450_733678;
c_7322352.elements[9] = ((closureN)self_7313969)->elements[8];
c_7322352.elements[10] = ((closureN)self_7313969)->elements[9];
c_7322352.elements[11] = ((closureN)self_7313969)->elements[10];
c_7322352.elements[12] = ((closureN)self_7313969)->elements[11];
c_7322352.elements[13] = ((closureN)self_7313969)->elements[12];
c_7322352.elements[14] = ((closureN)self_7313969)->elements[13];
c_7322352.elements[15] = k_736413;
c_7322352.elements[16] = ((closureN)self_7313969)->elements[14];
c_7322352.elements[17] = t_731449_733677;
c_7322352.elements[18] = ((closureN)self_7313969)->elements[15];

return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322352, t_731449_733677);; 
}

static void __lambda_887(void *data, object self_7313970, int argc, object *args) /* object self_7313970, object r_736414 */
 {
 object r_736414 = args[0];
  if( (boolean_f != r_736414) ){ 
  
closureN_type c_7322354;
object e_7322384 [6];
c_7322354.hdr.mark = gc_color_red;
 c_7322354.hdr.grayed = 0;
c_7322354.tag = closureN_tag;
 c_7322354.fn = (function_type)__lambda_888;
c_7322354.num_args = 1;
c_7322354.num_elements = 6;
c_7322354.elements = (object *)e_7322384;
c_7322354.elements[0] = ((closureN)self_7313970)->elements[6];
c_7322354.elements[1] = ((closureN)self_7313970)->elements[7];
c_7322354.elements[2] = ((closureN)self_7313970)->elements[8];
c_7322354.elements[3] = ((closureN)self_7313970)->elements[15];
c_7322354.elements[4] = ((closureN)self_7313970)->elements[17];
c_7322354.elements[5] = ((closureN)self_7313970)->elements[18];


closureN_type c_7322385;
object e_7322392 [1];
c_7322385.hdr.mark = gc_color_red;
 c_7322385.hdr.grayed = 0;
c_7322385.tag = closureN_tag;
 c_7322385.fn = (function_type)__lambda_891;
c_7322385.num_args = 1;
c_7322385.num_elements = 1;
c_7322385.elements = (object *)e_7322392;
c_7322385.elements[0] = ((closureN)self_7313970)->elements[17];

return_direct_with_clo1(data,(closure)&c_7322354,__lambda_888,  &c_7322385);
} else { 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313970)->elements[17])) ){ 
  


closureN_type c_7322400;
object e_7322687 [16];
c_7322400.hdr.mark = gc_color_red;
 c_7322400.hdr.grayed = 0;
c_7322400.tag = closureN_tag;
 c_7322400.fn = (function_type)__lambda_892;
c_7322400.num_args = 1;
c_7322400.num_elements = 16;
c_7322400.elements = (object *)e_7322687;
c_7322400.elements[0] = ((closureN)self_7313970)->elements[0];
c_7322400.elements[1] = ((closureN)self_7313970)->elements[1];
c_7322400.elements[2] = ((closureN)self_7313970)->elements[2];
c_7322400.elements[3] = ((closureN)self_7313970)->elements[3];
c_7322400.elements[4] = ((closureN)self_7313970)->elements[5];
c_7322400.elements[5] = ((closureN)self_7313970)->elements[6];
c_7322400.elements[6] = ((closureN)self_7313970)->elements[8];
c_7322400.elements[7] = ((closureN)self_7313970)->elements[9];
c_7322400.elements[8] = ((closureN)self_7313970)->elements[11];
c_7322400.elements[9] = ((closureN)self_7313970)->elements[12];
c_7322400.elements[10] = ((closureN)self_7313970)->elements[13];
c_7322400.elements[11] = ((closureN)self_7313970)->elements[14];
c_7322400.elements[12] = ((closureN)self_7313970)->elements[15];
c_7322400.elements[13] = ((closureN)self_7313970)->elements[16];
c_7322400.elements[14] = ((closureN)self_7313970)->elements[17];
c_7322400.elements[15] = ((closureN)self_7313970)->elements[18];

return_closcall2(data,  car(((closureN)self_7313970)->elements[10]),  &c_7322400, ((closureN)self_7313970)->elements[17]);
} else { 
    
if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313970)->elements[17])) ){ 
  
closureN_type c_7322693;
object e_7322707 [4];
c_7322693.hdr.mark = gc_color_red;
 c_7322693.hdr.grayed = 0;
c_7322693.tag = closureN_tag;
 c_7322693.fn = (function_type)__lambda_921;
c_7322693.num_args = 1;
c_7322693.num_elements = 4;
c_7322693.elements = (object *)e_7322707;
c_7322693.elements[0] = ((closureN)self_7313970)->elements[4];
c_7322693.elements[1] = ((closureN)self_7313970)->elements[8];
c_7322693.elements[2] = ((closureN)self_7313970)->elements[15];
c_7322693.elements[3] = ((closureN)self_7313970)->elements[16];

return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7322693, ((closureN)self_7313970)->elements[17]);
} else { 
    
if( (boolean_f != Cyc_is_null(((closureN)self_7313970)->elements[17])) ){ 
  
list_2_type local_7322716; 
return_direct_with_clo1(data,  ((closureN)self_7313970)->elements[15], (((closure)  ((closureN)self_7313970)->elements[15])->fn),  Cyc_fast_list_2(&local_7322716, ((closureN)self_7313970)->elements[6], NULL));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313970)->elements[15], (((closure)  ((closureN)self_7313970)->elements[15])->fn),  ((closureN)self_7313970)->elements[17]);}
;}
;}
;}
;; 
}

static void __lambda_921(void *data, object self_7314005, int argc, object *args) /* object self_7314005, object r_736473 */
 {
 object r_736473 = args[0];
  


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

return_closcall3(data,  car(((closureN)self_7314005)->elements[3]),  &c_7322698, r_736473, ((closureN)self_7314005)->elements[1]);; 
}

static void __lambda_922(void *data, object self_7314006, int argc, object *args) /* object self_7314006, object r_736472 */
 {
 object r_736472 = args[0];
  
list_2_type local_7322703; 
return_direct_with_clo1(data,  ((closureN)self_7314006)->elements[1], (((closure)  ((closureN)self_7314006)->elements[1])->fn),  Cyc_fast_list_2(&local_7322703, ((closureN)self_7314006)->elements[0], r_736472));; 
}

static void __lambda_892(void *data, object self_7313975, int argc, object *args) /* object self_7313975, object r_736423 */
 {
 object r_736423 = args[0];
  if( (boolean_f != r_736423) ){ 
  
closureN_type c_7322402;
object e_7322425 [1];
c_7322402.hdr.mark = gc_color_red;
 c_7322402.hdr.grayed = 0;
c_7322402.tag = closureN_tag;
 c_7322402.fn = (function_type)__lambda_893;
c_7322402.num_args = 0;
c_7322402.num_elements = 1;
c_7322402.elements = (object *)e_7322425;
c_7322402.elements[0] = ((closureN)self_7313975)->elements[14];


closureN_type c_7322426;
object e_7322433 [2];
c_7322426.hdr.mark = gc_color_red;
 c_7322426.hdr.grayed = 0;
c_7322426.tag = closureN_tag;
 c_7322426.fn = (function_type)__lambda_894;
c_7322426.num_args = 1;
c_7322426.num_elements = 2;
c_7322426.elements = (object *)e_7322433;
c_7322426.elements[0] = ((closureN)self_7313975)->elements[5];
c_7322426.elements[1] = ((closureN)self_7313975)->elements[12];

return_direct_with_clo1(data,(closure)&c_7322402,__lambda_893,  &c_7322426);
} else { 
  


closureN_type c_7322438;
object e_7322685 [15];
c_7322438.hdr.mark = gc_color_red;
 c_7322438.hdr.grayed = 0;
c_7322438.tag = closureN_tag;
 c_7322438.fn = (function_type)__lambda_895;
c_7322438.num_args = 1;
c_7322438.num_elements = 15;
c_7322438.elements = (object *)e_7322685;
c_7322438.elements[0] = ((closureN)self_7313975)->elements[0];
c_7322438.elements[1] = ((closureN)self_7313975)->elements[1];
c_7322438.elements[2] = ((closureN)self_7313975)->elements[2];
c_7322438.elements[3] = ((closureN)self_7313975)->elements[3];
c_7322438.elements[4] = ((closureN)self_7313975)->elements[4];
c_7322438.elements[5] = ((closureN)self_7313975)->elements[5];
c_7322438.elements[6] = ((closureN)self_7313975)->elements[6];
c_7322438.elements[7] = ((closureN)self_7313975)->elements[7];
c_7322438.elements[8] = ((closureN)self_7313975)->elements[8];
c_7322438.elements[9] = ((closureN)self_7313975)->elements[10];
c_7322438.elements[10] = ((closureN)self_7313975)->elements[11];
c_7322438.elements[11] = ((closureN)self_7313975)->elements[12];
c_7322438.elements[12] = ((closureN)self_7313975)->elements[13];
c_7322438.elements[13] = ((closureN)self_7313975)->elements[14];
c_7322438.elements[14] = ((closureN)self_7313975)->elements[15];

return_closcall2(data,  car(((closureN)self_7313975)->elements[9]),  &c_7322438, ((closureN)self_7313975)->elements[14]);}
;; 
}

static void __lambda_895(void *data, object self_7313978, int argc, object *args) /* object self_7313978, object r_736430 */
 {
 object r_736430 = args[0];
  if( (boolean_f != r_736430) ){ 
  


closureN_type c_7322443;
object e_7322644 [12];
c_7322443.hdr.mark = gc_color_red;
 c_7322443.hdr.grayed = 0;
c_7322443.tag = closureN_tag;
 c_7322443.fn = (function_type)__lambda_896;
c_7322443.num_args = 1;
c_7322443.num_elements = 12;
c_7322443.elements = (object *)e_7322644;
c_7322443.elements[0] = ((closureN)self_7313978)->elements[0];
c_7322443.elements[1] = ((closureN)self_7313978)->elements[1];
c_7322443.elements[2] = ((closureN)self_7313978)->elements[3];
c_7322443.elements[3] = ((closureN)self_7313978)->elements[4];
c_7322443.elements[4] = ((closureN)self_7313978)->elements[6];
c_7322443.elements[5] = ((closureN)self_7313978)->elements[8];
c_7322443.elements[6] = ((closureN)self_7313978)->elements[9];
c_7322443.elements[7] = ((closureN)self_7313978)->elements[10];
c_7322443.elements[8] = ((closureN)self_7313978)->elements[11];
c_7322443.elements[9] = ((closureN)self_7313978)->elements[12];
c_7322443.elements[10] = ((closureN)self_7313978)->elements[13];
c_7322443.elements[11] = ((closureN)self_7313978)->elements[14];

return_closcall2(data,  car(((closureN)self_7313978)->elements[7]),  &c_7322443, ((closureN)self_7313978)->elements[13]);
} else { 
  


closureN_type c_7322650;
object e_7322680 [6];
c_7322650.hdr.mark = gc_color_red;
 c_7322650.hdr.grayed = 0;
c_7322650.tag = closureN_tag;
 c_7322650.fn = (function_type)__lambda_917;
c_7322650.num_args = 1;
c_7322650.num_elements = 6;
c_7322650.elements = (object *)e_7322680;
c_7322650.elements[0] = ((closureN)self_7313978)->elements[2];
c_7322650.elements[1] = ((closureN)self_7313978)->elements[5];
c_7322650.elements[2] = ((closureN)self_7313978)->elements[6];
c_7322650.elements[3] = ((closureN)self_7313978)->elements[11];
c_7322650.elements[4] = ((closureN)self_7313978)->elements[12];
c_7322650.elements[5] = ((closureN)self_7313978)->elements[13];



return_closcall3(data,  car(((closureN)self_7313978)->elements[12]),  &c_7322650, Cyc_car(data, ((closureN)self_7313978)->elements[13]), ((closureN)self_7313978)->elements[6]);}
;; 
}

static void __lambda_917(void *data, object self_7314001, int argc, object *args) /* object self_7314001, object r_736466 */
 {
 object r_736466 = args[0];
  
closureN_type c_7322652;
object e_7322676 [7];
c_7322652.hdr.mark = gc_color_red;
 c_7322652.hdr.grayed = 0;
c_7322652.tag = closureN_tag;
 c_7322652.fn = (function_type)__lambda_918;
c_7322652.num_args = 1;
c_7322652.num_elements = 7;
c_7322652.elements = (object *)e_7322676;
c_7322652.elements[0] = ((closureN)self_7314001)->elements[0];
c_7322652.elements[1] = ((closureN)self_7314001)->elements[1];
c_7322652.elements[2] = ((closureN)self_7314001)->elements[2];
c_7322652.elements[3] = ((closureN)self_7314001)->elements[3];
c_7322652.elements[4] = ((closureN)self_7314001)->elements[4];
c_7322652.elements[5] = r_736466;
c_7322652.elements[6] = ((closureN)self_7314001)->elements[5];



return_direct_with_clo1(data,(closure)&c_7322652,__lambda_918,  Cyc_cdr(data, ((closureN)self_7314001)->elements[5]));; 
}

static void __lambda_918(void *data, object self_7314002, int argc, object *args) /* object self_7314002, object r_736469 */
 {
 object r_736469 = args[0];
  


closureN_type c_7322657;
object e_7322674 [5];
c_7322657.hdr.mark = gc_color_red;
 c_7322657.hdr.grayed = 0;
c_7322657.tag = closureN_tag;
 c_7322657.fn = (function_type)__lambda_919;
c_7322657.num_args = 1;
c_7322657.num_elements = 5;
c_7322657.elements = (object *)e_7322674;
c_7322657.elements[0] = ((closureN)self_7314002)->elements[0];
c_7322657.elements[1] = ((closureN)self_7314002)->elements[1];
c_7322657.elements[2] = ((closureN)self_7314002)->elements[3];
c_7322657.elements[3] = ((closureN)self_7314002)->elements[5];
c_7322657.elements[4] = ((closureN)self_7314002)->elements[6];

return_closcall3(data,  car(((closureN)self_7314002)->elements[4]),  &c_7322657, r_736469, ((closureN)self_7314002)->elements[2]);; 
}

static void __lambda_919(void *data, object self_7314003, int argc, object *args) /* object self_7314003, object r_736467 */
 {
 object r_736467 = args[0];
  
closureN_type c_7322659;
object e_7322668 [4];
c_7322659.hdr.mark = gc_color_red;
 c_7322659.hdr.grayed = 0;
c_7322659.tag = closureN_tag;
 c_7322659.fn = (function_type)__lambda_920;
c_7322659.num_args = 1;
c_7322659.num_elements = 4;
c_7322659.elements = (object *)e_7322668;
c_7322659.elements[0] = ((closureN)self_7314003)->elements[0];
c_7322659.elements[1] = ((closureN)self_7314003)->elements[2];
c_7322659.elements[2] = ((closureN)self_7314003)->elements[3];
c_7322659.elements[3] = r_736467;


list_2_type local_7322671; 
return_direct_with_clo1(data,(closure)&c_7322659,__lambda_920,  Cyc_fast_list_2(&local_7322671, ((closureN)self_7314003)->elements[1], ((closureN)self_7314003)->elements[4]));; 
}

static void __lambda_920(void *data, object self_7314004, int argc, object *args) /* object self_7314004, object r_736468 */
 {
 object r_736468 = args[0];
  
list_4_type local_7322664; 
return_direct_with_clo1(data,  ((closureN)self_7314004)->elements[1], (((closure)  ((closureN)self_7314004)->elements[1])->fn),  Cyc_fast_list_4(&local_7322664, ((closureN)self_7314004)->elements[0], ((closureN)self_7314004)->elements[2], ((closureN)self_7314004)->elements[3], r_736468));; 
}

static void __lambda_896(void *data, object self_7313979, int argc, object *args) /* object self_7313979, object depth_731473_733682 */
 {
 object depth_731473_733682 = args[0];
  
closureN_type c_7322445;
object e_7322640 [13];
c_7322445.hdr.mark = gc_color_red;
 c_7322445.hdr.grayed = 0;
c_7322445.tag = closureN_tag;
 c_7322445.fn = (function_type)__lambda_897;
c_7322445.num_args = 1;
c_7322445.num_elements = 13;
c_7322445.elements = (object *)e_7322640;
c_7322445.elements[0] = ((closureN)self_7313979)->elements[0];
c_7322445.elements[1] = ((closureN)self_7313979)->elements[1];
c_7322445.elements[2] = ((closureN)self_7313979)->elements[2];
c_7322445.elements[3] = ((closureN)self_7313979)->elements[3];
c_7322445.elements[4] = depth_731473_733682;
c_7322445.elements[5] = ((closureN)self_7313979)->elements[4];
c_7322445.elements[6] = ((closureN)self_7313979)->elements[5];
c_7322445.elements[7] = ((closureN)self_7313979)->elements[6];
c_7322445.elements[8] = ((closureN)self_7313979)->elements[7];
c_7322445.elements[9] = ((closureN)self_7313979)->elements[8];
c_7322445.elements[10] = ((closureN)self_7313979)->elements[9];
c_7322445.elements[11] = ((closureN)self_7313979)->elements[10];
c_7322445.elements[12] = ((closureN)self_7313979)->elements[11];



return_direct_with_clo1(data,(closure)&c_7322445,__lambda_897,  Cyc_car(data, ((closureN)self_7313979)->elements[10]));; 
}

static void __lambda_897(void *data, object self_7313980, int argc, object *args) /* object self_7313980, object r_736465 */
 {
 object r_736465 = args[0];
  


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


complex_num_type local_7322637; 
return_closcall4(data,  car(((closureN)self_7313980)->elements[8]),  &c_7322450, r_736465, ((closureN)self_7313980)->elements[12], Cyc_fast_sum(data,&local_7322637, ((closureN)self_7313980)->elements[5], ((closureN)self_7313980)->elements[4]));; 
}

static void __lambda_898(void *data, object self_7313981, int argc, object *args) /* object self_7313981, object ell_91vars_731479_733684 */
 {
 object ell_91vars_731479_733684 = args[0];
    
if( (boolean_f != Cyc_is_null(ell_91vars_731479_733684)) ){ 
  
make_utf8_string_with_len(c_7322455, "too many ...'s", 14, 14);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313981)->elements[8], &c_7322455, ((closureN)self_7313981)->elements[7]);
} else { 
  
closureN_type c_7322458;
object e_7322471 [1];
c_7322458.hdr.mark = gc_color_red;
 c_7322458.hdr.grayed = 0;
c_7322458.tag = closureN_tag;
 c_7322458.fn = (function_type)__lambda_899;
c_7322458.num_args = 0;
c_7322458.num_elements = 1;
c_7322458.elements = (object *)e_7322471;
c_7322458.elements[0] = ((closureN)self_7313981)->elements[10];


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

return_direct_with_clo1(data,(closure)&c_7322458,__lambda_899,  &c_7322472);}
;; 
}

static void __lambda_900(void *data, object self_7313982, int argc, object *args) /* object self_7313982, object r_736435 */
 {
 object r_736435 = args[0];
  if( (boolean_f != r_736435) ){ 
  




complex_num_type local_7322483; 
return_closcall3(data,  car(((closureN)self_7313982)->elements[9]),  ((closureN)self_7313982)->elements[8], Cyc_car(data, ((closureN)self_7313982)->elements[10]), Cyc_fast_sum(data,&local_7322483, ((closureN)self_7313982)->elements[5], ((closureN)self_7313982)->elements[4]));
} else { 
  
closureN_type c_7322487;
object e_7322628 [12];
c_7322487.hdr.mark = gc_color_red;
 c_7322487.hdr.grayed = 0;
c_7322487.tag = closureN_tag;
 c_7322487.fn = (function_type)__lambda_901;
c_7322487.num_args = 1;
c_7322487.num_elements = 12;
c_7322487.elements = (object *)e_7322628;
c_7322487.elements[0] = ((closureN)self_7313982)->elements[0];
c_7322487.elements[1] = ((closureN)self_7313982)->elements[1];
c_7322487.elements[2] = ((closureN)self_7313982)->elements[2];
c_7322487.elements[3] = ((closureN)self_7313982)->elements[3];
c_7322487.elements[4] = ((closureN)self_7313982)->elements[4];
c_7322487.elements[5] = ((closureN)self_7313982)->elements[5];
c_7322487.elements[6] = ((closureN)self_7313982)->elements[6];
c_7322487.elements[7] = ((closureN)self_7313982)->elements[7];
c_7322487.elements[8] = ((closureN)self_7313982)->elements[8];
c_7322487.elements[9] = ((closureN)self_7313982)->elements[9];
c_7322487.elements[10] = ((closureN)self_7313982)->elements[10];
c_7322487.elements[11] = ((closureN)self_7313982)->elements[11];



return_direct_with_clo1(data,(closure)&c_7322487,__lambda_901,  Cyc_car(data, ((closureN)self_7313982)->elements[10]));}
;; 
}

static void __lambda_901(void *data, object self_7313983, int argc, object *args) /* object self_7313983, object r_736459 */
 {
 object r_736459 = args[0];
  


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


complex_num_type local_7322625; 
return_closcall3(data,  car(((closureN)self_7313983)->elements[9]),  &c_7322492, r_736459, Cyc_fast_sum(data,&local_7322625, ((closureN)self_7313983)->elements[5], ((closureN)self_7313983)->elements[4]));; 
}

static void __lambda_902(void *data, object self_7313984, int argc, object *args) /* object self_7313984, object once_731491_733685 */
 {
 object once_731491_733685 = args[0];
  
closureN_type c_7322494;
object e_7322539 [5];
c_7322494.hdr.mark = gc_color_red;
 c_7322494.hdr.grayed = 0;
c_7322494.tag = closureN_tag;
 c_7322494.fn = (function_type)__lambda_903;
c_7322494.num_args = 0;
c_7322494.num_elements = 5;
c_7322494.elements = (object *)e_7322539;
c_7322494.elements[0] = ((closureN)self_7313984)->elements[2];
c_7322494.elements[1] = ((closureN)self_7313984)->elements[3];
c_7322494.elements[2] = ((closureN)self_7313984)->elements[6];
c_7322494.elements[3] = once_731491_733685;
c_7322494.elements[4] = ((closureN)self_7313984)->elements[11];


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

return_direct_with_clo1(data,(closure)&c_7322494,__lambda_903,  &c_7322540);; 
}

static void __lambda_907(void *data, object self_7313985, int argc, object *args) /* object self_7313985, object nest_731494_733686 */
 {
 object nest_731494_733686 = args[0];
  
closureN_type c_7322542;
object e_7322619 [7];
c_7322542.hdr.mark = gc_color_red;
 c_7322542.hdr.grayed = 0;
c_7322542.tag = closureN_tag;
 c_7322542.fn = (function_type)__lambda_908;
c_7322542.num_args = 2;
c_7322542.num_elements = 7;
c_7322542.elements = (object *)e_7322619;
c_7322542.elements[0] = ((closureN)self_7313985)->elements[0];
c_7322542.elements[1] = ((closureN)self_7313985)->elements[1];
c_7322542.elements[2] = ((closureN)self_7313985)->elements[3];
c_7322542.elements[3] = ((closureN)self_7313985)->elements[4];
c_7322542.elements[4] = ((closureN)self_7313985)->elements[5];
c_7322542.elements[5] = ((closureN)self_7313985)->elements[6];
c_7322542.elements[6] = ((closureN)self_7313985)->elements[7];

return_direct_with_clo2(data,(closure)&c_7322542,__lambda_908,  ((closureN)self_7313985)->elements[2], nest_731494_733686);; 
}

static void __lambda_908(void *data, object self_7313986, int argc, object *args) /* object self_7313986, object d_731501_733688, object many_731502_733689 */
 {
 object d_731501_733688 = args[0]; object many_731502_733689 = args[1];
  
closureN_type c_7322544;
object e_7322618 [9];
c_7322544.hdr.mark = gc_color_red;
 c_7322544.hdr.grayed = 0;
c_7322544.tag = closureN_tag;
 c_7322544.fn = (function_type)__lambda_909;
c_7322544.num_args = 1;
c_7322544.num_elements = 9;
c_7322544.elements = (object *)e_7322618;
c_7322544.elements[0] = ((closureN)self_7313986)->elements[0];
c_7322544.elements[1] = ((closureN)self_7313986)->elements[1];
c_7322544.elements[2] = d_731501_733688;
c_7322544.elements[3] = ((closureN)self_7313986)->elements[2];
c_7322544.elements[4] = ((closureN)self_7313986)->elements[3];
c_7322544.elements[5] = ((closureN)self_7313986)->elements[4];
c_7322544.elements[6] = ((closureN)self_7313986)->elements[5];
c_7322544.elements[7] = many_731502_733689;
c_7322544.elements[8] = ((closureN)self_7313986)->elements[6];

return_direct_with_clo1(data,(closure)&c_7322544,__lambda_909,  boolean_f);; 
}

static void __lambda_909(void *data, object self_7313987, int argc, object *args) /* object self_7313987, object lp_731448_731503_733690 */
 {
 object lp_731448_731503_733690 = args[0];
  
closureN_type c_7322546;
object e_7322614 [9];
c_7322546.hdr.mark = gc_color_red;
 c_7322546.hdr.grayed = 0;
c_7322546.tag = closureN_tag;
 c_7322546.fn = (function_type)__lambda_1424;
c_7322546.num_args = 1;
c_7322546.num_elements = 9;
c_7322546.elements = (object *)e_7322614;
c_7322546.elements[0] = ((closureN)self_7313987)->elements[0];
c_7322546.elements[1] = ((closureN)self_7313987)->elements[1];
c_7322546.elements[2] = ((closureN)self_7313987)->elements[2];
c_7322546.elements[3] = ((closureN)self_7313987)->elements[3];
c_7322546.elements[4] = ((closureN)self_7313987)->elements[4];
c_7322546.elements[5] = ((closureN)self_7313987)->elements[5];
c_7322546.elements[6] = ((closureN)self_7313987)->elements[6];
c_7322546.elements[7] = ((closureN)self_7313987)->elements[7];
c_7322546.elements[8] = ((closureN)self_7313987)->elements[8];


pair_type local_7322617; 
return_direct_with_clo1(data,(closure)&c_7322546,__lambda_1424,  set_cell_as_expr(&local_7322617, lp_731448_731503_733690));; 
}

static void __lambda_1424(void *data, object self_7313988, int argc, object *args) /* object self_7313988, object lp_731448_731503_733690 */
 {
 object lp_731448_731503_733690 = args[0];
  
closureN_type c_7322548;
object e_7322596 [9];
c_7322548.hdr.mark = gc_color_red;
 c_7322548.hdr.grayed = 0;
c_7322548.tag = closureN_tag;
 c_7322548.fn = (function_type)__lambda_910;
c_7322548.num_args = 1;
c_7322548.num_elements = 9;
c_7322548.elements = (object *)e_7322596;
c_7322548.elements[0] = ((closureN)self_7313988)->elements[0];
c_7322548.elements[1] = ((closureN)self_7313988)->elements[2];
c_7322548.elements[2] = ((closureN)self_7313988)->elements[3];
c_7322548.elements[3] = ((closureN)self_7313988)->elements[4];
c_7322548.elements[4] = ((closureN)self_7313988)->elements[5];
c_7322548.elements[5] = lp_731448_731503_733690;
c_7322548.elements[6] = ((closureN)self_7313988)->elements[6];
c_7322548.elements[7] = ((closureN)self_7313988)->elements[7];
c_7322548.elements[8] = ((closureN)self_7313988)->elements[8];


closureN_type c_7322597;
object e_7322613 [3];
c_7322597.hdr.mark = gc_color_red;
 c_7322597.hdr.grayed = 0;
c_7322597.tag = closureN_tag;
 c_7322597.fn = (function_type)__lambda_916;
c_7322597.num_args = 2;
c_7322597.num_elements = 3;
c_7322597.elements = (object *)e_7322613;
c_7322597.elements[0] = ((closureN)self_7313988)->elements[0];
c_7322597.elements[1] = ((closureN)self_7313988)->elements[1];
c_7322597.elements[2] = lp_731448_731503_733690;

return_direct_with_clo1(data,(closure)&c_7322548,__lambda_910,  &c_7322597);; 
}

static void __lambda_916(void *data, object self_7313989, int argc, object *args) /* object self_7313989, object k_736446, object d_731504_733691, object many_731505_733692 */
 {
 object k_736446 = args[0]; object d_731504_733691 = args[1]; object many_731505_733692 = args[2];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, d_731504_733691, obj_int2obj(1))) ){ 
  return_direct_with_clo1(data,  k_736446, (((closure)  k_736446)->fn),  many_731505_733692);
} else { 
  


complex_num_type local_7322607; 

list_3_type local_7322610; 
return_closcall3(data,  car(((closureN)self_7313989)->elements[2]),  k_736446, Cyc_fast_sub(data,&local_7322607, d_731504_733691, obj_int2obj(1)), Cyc_fast_list_3(&local_7322610, ((closureN)self_7313989)->elements[1], ((closureN)self_7313989)->elements[0], many_731505_733692));}
;; 
}

static void __lambda_910(void *data, object self_7313990, int argc, object *args) /* object self_7313990, object r_736445 */
 {
 object r_736445 = args[0];
  
closureN_type c_7322550;
object e_7322592 [9];
c_7322550.hdr.mark = gc_color_red;
 c_7322550.hdr.grayed = 0;
c_7322550.tag = closureN_tag;
 c_7322550.fn = (function_type)__lambda_911;
c_7322550.num_args = 1;
c_7322550.num_elements = 9;
c_7322550.elements = (object *)e_7322592;
c_7322550.elements[0] = ((closureN)self_7313990)->elements[0];
c_7322550.elements[1] = ((closureN)self_7313990)->elements[1];
c_7322550.elements[2] = ((closureN)self_7313990)->elements[2];
c_7322550.elements[3] = ((closureN)self_7313990)->elements[3];
c_7322550.elements[4] = ((closureN)self_7313990)->elements[4];
c_7322550.elements[5] = ((closureN)self_7313990)->elements[5];
c_7322550.elements[6] = ((closureN)self_7313990)->elements[6];
c_7322550.elements[7] = ((closureN)self_7313990)->elements[7];
c_7322550.elements[8] = ((closureN)self_7313990)->elements[8];



return_direct_with_clo1(data,(closure)&c_7322550,__lambda_911,  Cyc_set_cell(data, ((closureN)self_7313990)->elements[5], r_736445));; 
}

static void __lambda_911(void *data, object self_7313991, int argc, object *args) /* object self_7313991, object r_736444 */
 {

  


closureN_type c_7322555;
object e_7322589 [6];
c_7322555.hdr.mark = gc_color_red;
 c_7322555.hdr.grayed = 0;
c_7322555.tag = closureN_tag;
 c_7322555.fn = (function_type)__lambda_912;
c_7322555.num_args = 1;
c_7322555.num_elements = 6;
c_7322555.elements = (object *)e_7322589;
c_7322555.elements[0] = ((closureN)self_7313991)->elements[0];
c_7322555.elements[1] = ((closureN)self_7313991)->elements[2];
c_7322555.elements[2] = ((closureN)self_7313991)->elements[3];
c_7322555.elements[3] = ((closureN)self_7313991)->elements[4];
c_7322555.elements[4] = ((closureN)self_7313991)->elements[6];
c_7322555.elements[5] = ((closureN)self_7313991)->elements[8];

return_closcall3(data,  car(((closureN)self_7313991)->elements[5]),  &c_7322555, ((closureN)self_7313991)->elements[1], ((closureN)self_7313991)->elements[7]);; 
}

static void __lambda_912(void *data, object self_7313992, int argc, object *args) /* object self_7313992, object many_731497_733687 */
 {
 object many_731497_733687 = args[0];
  


closureN_type c_7322560;
object e_7322587 [7];
c_7322560.hdr.mark = gc_color_red;
 c_7322560.hdr.grayed = 0;
c_7322560.tag = closureN_tag;
 c_7322560.fn = (function_type)__lambda_913;
c_7322560.num_args = 1;
c_7322560.num_elements = 7;
c_7322560.elements = (object *)e_7322587;
c_7322560.elements[0] = ((closureN)self_7313992)->elements[0];
c_7322560.elements[1] = ((closureN)self_7313992)->elements[1];
c_7322560.elements[2] = ((closureN)self_7313992)->elements[2];
c_7322560.elements[3] = ((closureN)self_7313992)->elements[3];
c_7322560.elements[4] = ((closureN)self_7313992)->elements[4];
c_7322560.elements[5] = many_731497_733687;
c_7322560.elements[6] = ((closureN)self_7313992)->elements[5];

return_closcall2(data,  car(((closureN)self_7313992)->elements[2]),  &c_7322560, ((closureN)self_7313992)->elements[5]);; 
}

static void __lambda_913(void *data, object self_7313993, int argc, object *args) /* object self_7313993, object r_736443 */
 {
 object r_736443 = args[0];
    
if( (boolean_f != Cyc_is_null(r_736443)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313993)->elements[3], (((closure)  ((closureN)self_7313993)->elements[3])->fn),  ((closureN)self_7313993)->elements[5]);
} else { 
  


closureN_type c_7322570;
object e_7322585 [5];
c_7322570.hdr.mark = gc_color_red;
 c_7322570.hdr.grayed = 0;
c_7322570.tag = closureN_tag;
 c_7322570.fn = (function_type)__lambda_914;
c_7322570.num_args = 1;
c_7322570.num_elements = 5;
c_7322570.elements = (object *)e_7322585;
c_7322570.elements[0] = ((closureN)self_7313993)->elements[0];
c_7322570.elements[1] = ((closureN)self_7313993)->elements[1];
c_7322570.elements[2] = ((closureN)self_7313993)->elements[3];
c_7322570.elements[3] = ((closureN)self_7313993)->elements[4];
c_7322570.elements[4] = ((closureN)self_7313993)->elements[5];

return_closcall2(data,  car(((closureN)self_7313993)->elements[2]),  &c_7322570, ((closureN)self_7313993)->elements[6]);}
;; 
}

static void __lambda_914(void *data, object self_7313994, int argc, object *args) /* object self_7313994, object r_736442 */
 {
 object r_736442 = args[0];
  


closureN_type c_7322575;
object e_7322583 [3];
c_7322575.hdr.mark = gc_color_red;
 c_7322575.hdr.grayed = 0;
c_7322575.tag = closureN_tag;
 c_7322575.fn = (function_type)__lambda_915;
c_7322575.num_args = 1;
c_7322575.num_elements = 3;
c_7322575.elements = (object *)e_7322583;
c_7322575.elements[0] = ((closureN)self_7313994)->elements[0];
c_7322575.elements[1] = ((closureN)self_7313994)->elements[2];
c_7322575.elements[2] = ((closureN)self_7313994)->elements[4];

return_closcall3(data,  car(((closureN)self_7313994)->elements[3]),  &c_7322575, r_736442, ((closureN)self_7313994)->elements[1]);; 
}

static void __lambda_915(void *data, object self_7313995, int argc, object *args) /* object self_7313995, object r_736441 */
 {
 object r_736441 = args[0];
  
list_3_type local_7322580; 
return_direct_with_clo1(data,  ((closureN)self_7313995)->elements[1], (((closure)  ((closureN)self_7313995)->elements[1])->fn),  Cyc_fast_list_3(&local_7322580, ((closureN)self_7313995)->elements[0], ((closureN)self_7313995)->elements[2], r_736441));; 
}

static void __lambda_903(void *data, object self_7313996, int argc, object *args) /* object self_7313996, object k_736450 */
 {
 object k_736450 = args[0];
  
closureN_type c_7322496;
object e_7322517 [3];
c_7322496.hdr.mark = gc_color_red;
 c_7322496.hdr.grayed = 0;
c_7322496.tag = closureN_tag;
 c_7322496.fn = (function_type)__lambda_904;
c_7322496.num_args = 0;
c_7322496.num_elements = 3;
c_7322496.elements = (object *)e_7322517;
c_7322496.elements[0] = ((closureN)self_7313996)->elements[2];
c_7322496.elements[1] = ((closureN)self_7313996)->elements[3];
c_7322496.elements[2] = ((closureN)self_7313996)->elements[4];


closureN_type c_7322518;
object e_7322538 [5];
c_7322518.hdr.mark = gc_color_red;
 c_7322518.hdr.grayed = 0;
c_7322518.tag = closureN_tag;
 c_7322518.fn = (function_type)__lambda_906;
c_7322518.num_args = 1;
c_7322518.num_elements = 5;
c_7322518.elements = (object *)e_7322538;
c_7322518.elements[0] = ((closureN)self_7313996)->elements[0];
c_7322518.elements[1] = ((closureN)self_7313996)->elements[1];
c_7322518.elements[2] = ((closureN)self_7313996)->elements[2];
c_7322518.elements[3] = k_736450;
c_7322518.elements[4] = ((closureN)self_7313996)->elements[3];

return_direct_with_clo1(data,(closure)&c_7322496,__lambda_904,  &c_7322518);; 
}

static void __lambda_906(void *data, object self_7313997, int argc, object *args) /* object self_7313997, object r_736451 */
 {
 object r_736451 = args[0];
  if( (boolean_f != r_736451) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313997)->elements[3], (((closure)  ((closureN)self_7313997)->elements[3])->fn),  ((closureN)self_7313997)->elements[4]);
} else { 
  
pair_type local_7322526; 

pair_type local_7322530; 

list_3_type local_7322533; 
return_direct_with_clo1(data,  ((closureN)self_7313997)->elements[3], (((closure)  ((closureN)self_7313997)->elements[3])->fn),  set_pair_as_expr(&local_7322526, ((closureN)self_7313997)->elements[1], set_pair_as_expr(&local_7322530, Cyc_fast_list_3(&local_7322533, ((closureN)self_7313997)->elements[0], ((closureN)self_7313997)->elements[2], ((closureN)self_7313997)->elements[4]), ((closureN)self_7313997)->elements[2])));}
;; 
}

static void __lambda_904(void *data, object self_7313998, int argc, object *args) /* object self_7313998, object k_736454 */
 {
 object k_736454 = args[0];
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313998)->elements[0]))) ){ 
  
closureN_type c_7322503;
object e_7322514 [3];
c_7322503.hdr.mark = gc_color_red;
 c_7322503.hdr.grayed = 0;
c_7322503.tag = closureN_tag;
 c_7322503.fn = (function_type)__lambda_905;
c_7322503.num_args = 1;
c_7322503.num_elements = 3;
c_7322503.elements = (object *)e_7322514;
c_7322503.elements[0] = k_736454;
c_7322503.elements[1] = ((closureN)self_7313998)->elements[1];
c_7322503.elements[2] = ((closureN)self_7313998)->elements[2];

return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322503, ((closureN)self_7313998)->elements[1]);
} else { 
  return_direct_with_clo1(data,  k_736454, (((closure)  k_736454)->fn),  boolean_f);}
;; 
}

static void __lambda_905(void *data, object self_7313999, int argc, object *args) /* object self_7313999, object r_736456 */
 {
 object r_736456 = args[0];
  if( (boolean_f != r_736456) ){ 
  



return_direct_with_clo1(data,  ((closureN)self_7313999)->elements[0], (((closure)  ((closureN)self_7313999)->elements[0])->fn),  Cyc_eq(((closureN)self_7313999)->elements[1], Cyc_car(data, ((closureN)self_7313999)->elements[2])));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313999)->elements[0], (((closure)  ((closureN)self_7313999)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_899(void *data, object self_7314000, int argc, object *args) /* object self_7314000, object k_736460 */
 {
 object k_736460 = args[0];
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314000)->elements[0])))) ){ 
  

return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  k_736460, Cyc_car(data, ((closureN)self_7314000)->elements[0]));
} else { 
  return_direct_with_clo1(data,  k_736460, (((closure)  k_736460)->fn),  boolean_f);}
;; 
}

static void __lambda_894(void *data, object self_7313976, int argc, object *args) /* object self_7313976, object r_736424 */
 {
 object r_736424 = args[0];
  
list_2_type local_7322431; 
return_direct_with_clo1(data,  ((closureN)self_7313976)->elements[1], (((closure)  ((closureN)self_7313976)->elements[1])->fn),  Cyc_fast_list_2(&local_7322431, ((closureN)self_7313976)->elements[0], r_736424));; 
}

static void __lambda_893(void *data, object self_7313977, int argc, object *args) /* object self_7313977, object k_736425 */
 {
 object k_736425 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313977)->elements[0]))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, ((closureN)self_7313977)->elements[0]))) ){ 
  

return_direct_with_clo1(data,  k_736425,__lambda_894,  Cyc_cddr(data, ((closureN)self_7313977)->elements[0]));
} else { 
  

return_direct_with_clo1(data,  k_736425,__lambda_894,  Cyc_cadr(data, ((closureN)self_7313977)->elements[0]));}
;
} else { 
  

return_direct_with_clo1(data,  k_736425,__lambda_894,  Cyc_cdr(data, ((closureN)self_7313977)->elements[0]));}
;; 
}

static void __lambda_891(void *data, object self_7313971, int argc, object *args) /* object self_7313971, object k_736420, object v_731461_733681 */
 {
 object k_736420 = args[0]; object v_731461_733681 = args[1];
  



return_direct_with_clo1(data,  k_736420, (((closure)  k_736420)->fn),  Cyc_eq(((closureN)self_7313971)->elements[0], Cyc_car(data, v_731461_733681)));; 
}

static void __lambda_888(void *data, object self_7313972, int argc, object *args) /* object self_7313972, object r_736419 */
 {
 object r_736419 = args[0];
  
closureN_type c_7322356;
object e_7322382 [5];
c_7322356.hdr.mark = gc_color_red;
 c_7322356.hdr.grayed = 0;
c_7322356.tag = closureN_tag;
 c_7322356.fn = (function_type)__lambda_889;
c_7322356.num_args = 1;
c_7322356.num_elements = 5;
c_7322356.elements = (object *)e_7322382;
c_7322356.elements[0] = ((closureN)self_7313972)->elements[0];
c_7322356.elements[1] = ((closureN)self_7313972)->elements[1];
c_7322356.elements[2] = ((closureN)self_7313972)->elements[2];
c_7322356.elements[3] = ((closureN)self_7313972)->elements[3];
c_7322356.elements[4] = ((closureN)self_7313972)->elements[4];

return_direct_with_clo3(data,  __glo_find_scheme_base, (((closure)  __glo_find_scheme_base)->fn),  &c_7322356, r_736419, ((closureN)self_7313972)->elements[5]);; 
}

static void __lambda_889(void *data, object self_7313973, int argc, object *args) /* object self_7313973, object tmp_731456_731458_733679 */
 {
 object tmp_731456_731458_733679 = args[0];
  if( (boolean_f != tmp_731456_731458_733679) ){ 
  
closureN_type c_7322358;
object e_7322370 [3];
c_7322358.hdr.mark = gc_color_red;
 c_7322358.hdr.grayed = 0;
c_7322358.tag = closureN_tag;
 c_7322358.fn = (function_type)__lambda_890;
c_7322358.num_args = 1;
c_7322358.num_elements = 3;
c_7322358.elements = (object *)e_7322370;
c_7322358.elements[0] = ((closureN)self_7313973)->elements[2];
c_7322358.elements[1] = ((closureN)self_7313973)->elements[3];
c_7322358.elements[2] = ((closureN)self_7313973)->elements[4];

return_direct_with_clo1(data,(closure)&c_7322358,__lambda_890,  tmp_731456_731458_733679);
} else { 
  
list_2_type local_7322375; 

list_2_type local_7322379; 
return_direct_with_clo1(data,  ((closureN)self_7313973)->elements[3], (((closure)  ((closureN)self_7313973)->elements[3])->fn),  Cyc_fast_list_2(&local_7322375, ((closureN)self_7313973)->elements[1], Cyc_fast_list_2(&local_7322379, ((closureN)self_7313973)->elements[0], ((closureN)self_7313973)->elements[4])));}
;; 
}

static void __lambda_890(void *data, object self_7313974, int argc, object *args) /* object self_7313974, object cell_731459_733680 */
 {
 object cell_731459_733680 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_lte_op(data, Cyc_cdr(data, cell_731459_733680), ((closureN)self_7313974)->elements[0])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313974)->elements[1], (((closure)  ((closureN)self_7313974)->elements[1])->fn),  ((closureN)self_7313974)->elements[2]);
} else { 
  
make_utf8_string_with_len(c_7322369, "too few ...'s", 13, 13);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7313974)->elements[1], &c_7322369);}
;; 
}

static void __lambda_884(void *data, object self_7314007, int argc, object *args) /* object self_7314007, object r_736412 */
 {
 object r_736412 = args[0];
  
closureN_type c_7322338;
object e_7322345 [3];
c_7322338.hdr.mark = gc_color_red;
 c_7322338.hdr.grayed = 0;
c_7322338.tag = closureN_tag;
 c_7322338.fn = (function_type)__lambda_885;
c_7322338.num_args = 1;
c_7322338.num_elements = 3;
c_7322338.elements = (object *)e_7322345;
c_7322338.elements[0] = ((closureN)self_7314007)->elements[0];
c_7322338.elements[1] = ((closureN)self_7314007)->elements[1];
c_7322338.elements[2] = ((closureN)self_7314007)->elements[2];



return_direct_with_clo1(data,(closure)&c_7322338,__lambda_885,  Cyc_set_cell(data, ((closureN)self_7314007)->elements[1], r_736412));; 
}

static void __lambda_885(void *data, object self_7314008, int argc, object *args) /* object self_7314008, object r_736411 */
 {

  

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

static void __lambda_874(void *data, object self_7314009, int argc, object *args) /* object self_7314009, object r_736409 */
 {
 object r_736409 = args[0];
  
closureN_type c_7322259;
object e_7322323 [12];
c_7322259.hdr.mark = gc_color_red;
 c_7322259.hdr.grayed = 0;
c_7322259.tag = closureN_tag;
 c_7322259.fn = (function_type)__lambda_875;
c_7322259.num_args = 1;
c_7322259.num_elements = 12;
c_7322259.elements = (object *)e_7322323;
c_7322259.elements[0] = ((closureN)self_7314009)->elements[0];
c_7322259.elements[1] = ((closureN)self_7314009)->elements[1];
c_7322259.elements[2] = ((closureN)self_7314009)->elements[2];
c_7322259.elements[3] = ((closureN)self_7314009)->elements[3];
c_7322259.elements[4] = ((closureN)self_7314009)->elements[4];
c_7322259.elements[5] = ((closureN)self_7314009)->elements[5];
c_7322259.elements[6] = ((closureN)self_7314009)->elements[6];
c_7322259.elements[7] = ((closureN)self_7314009)->elements[7];
c_7322259.elements[8] = ((closureN)self_7314009)->elements[8];
c_7322259.elements[9] = ((closureN)self_7314009)->elements[9];
c_7322259.elements[10] = ((closureN)self_7314009)->elements[11];
c_7322259.elements[11] = ((closureN)self_7314009)->elements[12];



return_direct_with_clo1(data,(closure)&c_7322259,__lambda_875,  Cyc_set_cell(data, ((closureN)self_7314009)->elements[10], r_736409));; 
}

static void __lambda_875(void *data, object self_7314010, int argc, object *args) /* object self_7314010, object r_736395 */
 {

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


closureN_type c_7322313;
object e_7322322 [1];
c_7322313.hdr.mark = gc_color_red;
 c_7322313.hdr.grayed = 0;
c_7322313.tag = closureN_tag;
 c_7322313.fn = (function_type)__lambda_880;
c_7322313.num_args = 1;
c_7322313.num_elements = 1;
c_7322313.elements = (object *)e_7322322;
c_7322313.elements[0] = ((closureN)self_7314010)->elements[9];

return_direct_with_clo1(data,(closure)&c_7322261,__lambda_876,  &c_7322313);; 
}

static void __lambda_880(void *data, object self_7314011, int argc, object *args) /* object self_7314011, object k_736406, object clause_731516_733693 */
 {
 object k_736406 = args[0]; object clause_731516_733693 = args[1];
  





return_closcall3(data,  car(((closureN)self_7314011)->elements[0]),  k_736406, Cyc_car(data, clause_731516_733693), Cyc_cadr(data, clause_731516_733693));; 
}

static void __lambda_876(void *data, object self_7314012, int argc, object *args) /* object self_7314012, object r_736405 */
 {
 object r_736405 = args[0];
  
closureN_type c_7322263;
object e_7322308 [10];
c_7322263.hdr.mark = gc_color_red;
 c_7322263.hdr.grayed = 0;
c_7322263.tag = closureN_tag;
 c_7322263.fn = (function_type)__lambda_877;
c_7322263.num_args = 1;
c_7322263.num_elements = 10;
c_7322263.elements = (object *)e_7322308;
c_7322263.elements[0] = ((closureN)self_7314012)->elements[0];
c_7322263.elements[1] = ((closureN)self_7314012)->elements[1];
c_7322263.elements[2] = ((closureN)self_7314012)->elements[2];
c_7322263.elements[3] = ((closureN)self_7314012)->elements[3];
c_7322263.elements[4] = ((closureN)self_7314012)->elements[4];
c_7322263.elements[5] = ((closureN)self_7314012)->elements[5];
c_7322263.elements[6] = ((closureN)self_7314012)->elements[6];
c_7322263.elements[7] = ((closureN)self_7314012)->elements[7];
c_7322263.elements[8] = ((closureN)self_7314012)->elements[8];
c_7322263.elements[9] = ((closureN)self_7314012)->elements[10];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7322263, r_736405, car(((closureN)self_7314012)->elements[9]));; 
}

static void __lambda_877(void *data, object self_7314013, int argc, object *args) /* object self_7314013, object r_736401 */
 {
 object r_736401 = args[0];
  
closureN_type c_7322265;
object e_7322301 [10];
c_7322265.hdr.mark = gc_color_red;
 c_7322265.hdr.grayed = 0;
c_7322265.tag = closureN_tag;
 c_7322265.fn = (function_type)__lambda_878;
c_7322265.num_args = 1;
c_7322265.num_elements = 10;
c_7322265.elements = (object *)e_7322301;
c_7322265.elements[0] = ((closureN)self_7314013)->elements[0];
c_7322265.elements[1] = ((closureN)self_7314013)->elements[1];
c_7322265.elements[2] = ((closureN)self_7314013)->elements[2];
c_7322265.elements[3] = ((closureN)self_7314013)->elements[3];
c_7322265.elements[4] = ((closureN)self_7314013)->elements[5];
c_7322265.elements[5] = ((closureN)self_7314013)->elements[6];
c_7322265.elements[6] = ((closureN)self_7314013)->elements[7];
c_7322265.elements[7] = ((closureN)self_7314013)->elements[8];
c_7322265.elements[8] = ((closureN)self_7314013)->elements[9];
c_7322265.elements[9] = r_736401;


list_3_type local_7322304; 

make_utf8_string_with_len(c_7322306, "no expansion for", 16, 16);
return_direct_with_clo1(data,(closure)&c_7322265,__lambda_878,  Cyc_fast_list_3(&local_7322304, ((closureN)self_7314013)->elements[4], &c_7322306, ((closureN)self_7314013)->elements[5]));; 
}

static void __lambda_878(void *data, object self_7314014, int argc, object *args) /* object self_7314014, object r_736404 */
 {
 object r_736404 = args[0];
  
closureN_type c_7322267;
object e_7322292 [8];
c_7322267.hdr.mark = gc_color_red;
 c_7322267.hdr.grayed = 0;
c_7322267.tag = closureN_tag;
 c_7322267.fn = (function_type)__lambda_879;
c_7322267.num_args = 1;
c_7322267.num_elements = 8;
c_7322267.elements = (object *)e_7322292;
c_7322267.elements[0] = ((closureN)self_7314014)->elements[0];
c_7322267.elements[1] = ((closureN)self_7314014)->elements[1];
c_7322267.elements[2] = ((closureN)self_7314014)->elements[3];
c_7322267.elements[3] = ((closureN)self_7314014)->elements[4];
c_7322267.elements[4] = ((closureN)self_7314014)->elements[5];
c_7322267.elements[5] = ((closureN)self_7314014)->elements[6];
c_7322267.elements[6] = ((closureN)self_7314014)->elements[7];
c_7322267.elements[7] = ((closureN)self_7314014)->elements[8];


pair_type local_7322296; 

list_3_type local_7322299; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7322267, ((closureN)self_7314014)->elements[9], set_cell_as_expr(&local_7322296, Cyc_fast_list_3(&local_7322299, ((closureN)self_7314014)->elements[2], r_736404, boolean_f)));; 
}

static void __lambda_879(void *data, object self_7314015, int argc, object *args) /* object self_7314015, object r_736400 */
 {
 object r_736400 = args[0];
  
list_2_type local_7322272; 

list_3_type local_7322276; 

list_3_type local_7322280; 

list_2_type local_7322286; 

pair_type local_7322290; 
return_direct_with_clo1(data,  ((closureN)self_7314015)->elements[7], (((closure)  ((closureN)self_7314015)->elements[7])->fn),  Cyc_fast_list_2(&local_7322272, ((closureN)self_7314015)->elements[2], Cyc_fast_list_3(&local_7322276, ((closureN)self_7314015)->elements[4], Cyc_fast_list_3(&local_7322280, ((closureN)self_7314015)->elements[3], ((closureN)self_7314015)->elements[6], ((closureN)self_7314015)->elements[1]), Cyc_fast_list_2(&local_7322286, ((closureN)self_7314015)->elements[0], set_pair_as_expr(&local_7322290, ((closureN)self_7314015)->elements[5], r_736400)))));; 
}

static void __lambda_855(void *data, object self_7314016, int argc, object *args) /* object self_7314016, object k_736759 */
 {
 object k_736759 = args[0];
  if( (boolean_f != ((closureN)self_7314016)->elements[0]) ){ 
  



return_direct_with_clo1(data,  k_736759,__lambda_856,  Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7314016)->elements[1])));
} else { 
  

return_direct_with_clo1(data,  k_736759,__lambda_856,  Cyc_cddr(data, ((closureN)self_7314016)->elements[1]));}
;; 
}

static void __lambda_852(void *data, object self_7314017, int argc, object *args) /* object self_7314017, object k_736762 */
 {
 object k_736762 = args[0];
  if( (boolean_f != ((closureN)self_7314017)->elements[0]) ){ 
  



return_direct_with_clo1(data,  k_736762,__lambda_853,  Cyc_car(data, Cyc_cddr(data, ((closureN)self_7314017)->elements[1])));
} else { 
  

return_direct_with_clo1(data,  k_736762,__lambda_853,  Cyc_cadr(data, ((closureN)self_7314017)->elements[1]));}
;; 
}

static void __lambda_809(void *data, object _, int argc, object *args) /* closure _,object k_736344, object kar_731260_733548, object kdr_731261_733549, object source_731262_733550 */
 {
object k_736344 = args[0]; object kar_731260_733548 = args[1]; object kdr_731261_733549 = args[2];
  Cyc_st_add(data, "scheme/base.sld:cons-source");

pair_type local_7322037; 
return_direct_with_clo1(data,  k_736344, (((closure)  k_736344)->fn),  set_pair_as_expr(&local_7322037, kar_731260_733548, kdr_731261_733549));; 
}

static void __lambda_807(void *data, object _, int argc, object *args) /* closure _,object k_736340, object pred_731252_733545, object ls_731253_733546 */
 {
object k_736340 = args[0]; object pred_731252_733545 = args[1]; object ls_731253_733546 = args[2];
  Cyc_st_add(data, "scheme/base.sld:find");

closureN_type c_7322025;
object e_7322032 [1];
c_7322025.hdr.mark = gc_color_red;
 c_7322025.hdr.grayed = 0;
c_7322025.tag = closureN_tag;
 c_7322025.fn = (function_type)__lambda_808;
c_7322025.num_args = 1;
c_7322025.num_elements = 1;
c_7322025.elements = (object *)e_7322032;
c_7322025.elements[0] = k_736340;

return_direct_with_clo3(data,  __glo_find_91tail_scheme_base, (((closure)  __glo_find_91tail_scheme_base)->fn),  &c_7322025, pred_731252_733545, ls_731253_733546);; 
}

static void __lambda_808(void *data, object self_7313785, int argc, object *args) /* object self_7313785, object tmp_731256_731258_733547 */
 {
 object tmp_731256_731258_733547 = args[0];
  if( (boolean_f != tmp_731256_731258_733547) ){ 
  

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

static void __lambda_805(void *data, object _, int argc, object *args) /* closure _,object k_736333, object pred_731249_733543, object ls_731250_733544 */
 {
object k_736333 = args[0]; object pred_731249_733543 = args[1]; object ls_731250_733544 = args[2];
  Cyc_st_add(data, "scheme/base.sld:find-tail");
  
if( (boolean_f != Cyc_is_pair(ls_731250_733544)) ){ 
  
closureN_type c_7322009;
object e_7322019 [3];
c_7322009.hdr.mark = gc_color_red;
 c_7322009.hdr.grayed = 0;
c_7322009.tag = closureN_tag;
 c_7322009.fn = (function_type)__lambda_806;
c_7322009.num_args = 1;
c_7322009.num_elements = 3;
c_7322009.elements = (object *)e_7322019;
c_7322009.elements[0] = k_736333;
c_7322009.elements[1] = ls_731250_733544;
c_7322009.elements[2] = pred_731249_733543;



return_closcall2(data,  pred_731249_733543,  &c_7322009, Cyc_car(data, ls_731250_733544));
} else { 
  return_direct_with_clo1(data,  k_736333, (((closure)  k_736333)->fn),  boolean_f);}
;; 
}

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

return_direct_with_clo3(data,  __glo_find_91tail_scheme_base, (((closure)  __glo_find_91tail_scheme_base)->fn),  ((closureN)self_7313784)->elements[0], ((closureN)self_7313784)->elements[2], Cyc_cdr(data, ((closureN)self_7313784)->elements[1]));}
;; 
}

static void __lambda_1513(void *data, object _, int argc, object *args) {object k = args[0];object bv = args[1]; port_type *p = Cyc_io_open_input_bytevector(data, bv);
      return_closcall1(data, k, p);  }
static void __lambda_1512(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_get_output_bytevector(data, k, port);
     }
static void __lambda_1511(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_get_output_string(data, k, port);
     }
static void __lambda_1510(void *data, object _, int argc, object *args) {object k = args[0]; port_type *p = Cyc_io_open_output_string(data);
      return_closcall1(data, k, p);  }
static void __lambda_1509(void *data, object _, int argc, object *args) {object k = args[0];object str = args[1]; port_type *p = Cyc_io_open_input_string(data, str);
      return_closcall1(data, k, p);  }
static void __lambda_1508(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
      if (boolean_f == Cyc_is_port(port)) {
        return_closcall1(data, k, boolean_f);
      }
      return_closcall1(
        data, 
        k, 
       ((p->mode == 0 && p->fp != NULL) ? boolean_t : boolean_f));  }
static void __lambda_1507(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
      if (boolean_f == Cyc_is_port(port)) {
        return_closcall1(data, k, boolean_f);
      }
      return_closcall1(
        data, 
        k, 
       ((p->mode == 1 && p->fp != NULL) ? boolean_t : boolean_f));  }
static void __lambda_1506(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
      if (boolean_f == Cyc_is_port(port)) {
        return_closcall1(data, k, boolean_f);
      }
      return_closcall1(
        data, 
        k, 
       ((p->mode == 0) ? boolean_t : boolean_f));  }
static void __lambda_1505(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; port_type *p = (port_type *)port;
      if (boolean_f == Cyc_is_port(port)) {
        return_closcall1(data, k, boolean_f);
      }
      return_closcall1(
        data, 
        k, 
       ((p->mode == 1) ? boolean_t : boolean_f));  }
static object __lambda_1504(void *data, object ptr) { return Cyc_RECORD_MARKER; }
static void __lambda_1503(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_RECORD_MARKER);  }
static object __lambda_1502(void *data, object ptr) { return Cyc_VOID; }
static void __lambda_1501(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_VOID);  }
static object __lambda_1500(void *data, object ptr) { return Cyc_EOF; }
static void __lambda_1499(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_EOF);  }
static void __lambda_1498(void *data, object _, int argc, object *args) {object k = args[0];object z1 = args[1];object z2 = args[2]; Cyc_expt(data, k, z1, z2);  }
static object __lambda_1497(void *data, object ptr,object z_731248_733542) {

  Cyc_st_add(data, "scheme/base.sld:square");

complex_num_type local_7321988; 
return_copy(ptr,  Cyc_fast_mul(data,&local_7321988, z_731248_733542, z_731248_733542));; 
}

static void __lambda_804(void *data, object _, int argc, object *args) /* closure _,object k_736326, object z_731248_733542 */
 {
object k_736326 = args[0]; object z_731248_733542 = args[1];
  Cyc_st_add(data, "scheme/base.sld:square");

complex_num_type local_7321983; 
return_direct_with_clo1(data,  k_736326, (((closure)  k_736326)->fn),  Cyc_fast_mul(data,&local_7321983, z_731248_733542, z_731248_733542));; 
}

static void __lambda_801(void *data, object _, int argc, object *args) /* closure _,object k_736321, object n_731246_733540, object m_731247_733541 */
 {
object k_736321 = args[0]; object n_731246_733540 = args[1]; object m_731247_733541 = args[2];
  Cyc_st_add(data, "scheme/base.sld:floor/");

closureN_type c_7321969;
object e_7321978 [3];
c_7321969.hdr.mark = gc_color_red;
 c_7321969.hdr.grayed = 0;
c_7321969.tag = closureN_tag;
 c_7321969.fn = (function_type)__lambda_802;
c_7321969.num_args = 1;
c_7321969.num_elements = 3;
c_7321969.elements = (object *)e_7321978;
c_7321969.elements[0] = k_736321;
c_7321969.elements[1] = m_731247_733541;
c_7321969.elements[2] = n_731246_733540;

return_direct_with_clo3(data,  __glo_floor_91quotient_scheme_base, (((closure)  __glo_floor_91quotient_scheme_base)->fn),  &c_7321969, n_731246_733540, m_731247_733541);; 
}

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

return_direct_with_clo3(data,  __glo_floor_91remainder_scheme_base, (((closure)  __glo_floor_91remainder_scheme_base)->fn),  &c_7321971, ((closureN)self_7313782)->elements[2], ((closureN)self_7313782)->elements[1]);; 
}

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

static void __lambda_799(void *data, object _, int argc, object *args) /* closure _,object k_736316, object n_731244_733538, object m_731245_733539 */
 {
object k_736316 = args[0]; object n_731244_733538 = args[1]; object m_731245_733539 = args[2];
  Cyc_st_add(data, "scheme/base.sld:floor-remainder");

closureN_type c_7321955;
object e_7321966 [3];
c_7321955.hdr.mark = gc_color_red;
 c_7321955.hdr.grayed = 0;
c_7321955.tag = closureN_tag;
 c_7321955.fn = (function_type)__lambda_800;
c_7321955.num_args = 1;
c_7321955.num_elements = 3;
c_7321955.elements = (object *)e_7321966;
c_7321955.elements[0] = k_736316;
c_7321955.elements[1] = m_731245_733539;
c_7321955.elements[2] = n_731244_733538;

return_direct_with_clo3(data,  __glo_floor_91quotient_scheme_base, (((closure)  __glo_floor_91quotient_scheme_base)->fn),  &c_7321955, n_731244_733538, m_731245_733539);; 
}

static void __lambda_800(void *data, object self_7313781, int argc, object *args) /* object self_7313781, object r_736318 */
 {
 object r_736318 = args[0];
  
complex_num_type local_7321960; 

complex_num_type local_7321964; 
return_direct_with_clo1(data,  ((closureN)self_7313781)->elements[0], (((closure)  ((closureN)self_7313781)->elements[0])->fn),  Cyc_fast_sub(data,&local_7321960, ((closureN)self_7313781)->elements[2], Cyc_fast_mul(data,&local_7321964, ((closureN)self_7313781)->elements[1], r_736318)));; 
}

static void __lambda_798(void *data, object _, int argc, object *args) /* closure _,object k_736308, object n_731240_733535, object m_731241_733536 */
 {
object k_736308 = args[0]; object n_731240_733535 = args[1]; object m_731241_733536 = args[2];
  object r_736310;
  Cyc_st_add(data, "scheme/base.sld:floor-quotient");
  object local_7321930 = alloca(sizeof(complex_num_type)); 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321930, n_731240_733535)) ){ 
  object local_7321934 = alloca(sizeof(complex_num_type)); 
  r_736310 = ((inline_function_type)
                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321934, m_731241_733536);
} else { 
  r_736310 = boolean_f;}
;if( (boolean_f != r_736310) ){ 
  
complex_num_type local_7321939; 

complex_num_type local_7321942; 

complex_num_type local_7321945; 
return_direct_with_clo1(data,  k_736308, (((closure)  k_736308)->fn),  ((inline_function_type)
                   ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7321939, ((inline_function_type)
                   ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7321942, Cyc_fast_div(data,&local_7321945, n_731240_733535, m_731241_733536))));
} else { 
  
complex_num_type local_7321949; 

complex_num_type local_7321952; 
return_direct_with_clo1(data,  k_736308, (((closure)  k_736308)->fn),  ((inline_function_type)
                   ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7321949, Cyc_fast_div(data,&local_7321952, n_731240_733535, m_731241_733536)));}
;; 
}

static void __lambda_795(void *data, object _, int argc, object *args) /* closure _,object k_736303, object n_731238_733533, object m_731239_733534 */
 {
object k_736303 = args[0]; object n_731238_733533 = args[1]; object m_731239_733534 = args[2];
  Cyc_st_add(data, "scheme/base.sld:truncate/");

closureN_type c_7321916;
object e_7321925 [3];
c_7321916.hdr.mark = gc_color_red;
 c_7321916.hdr.grayed = 0;
c_7321916.tag = closureN_tag;
 c_7321916.fn = (function_type)__lambda_796;
c_7321916.num_args = 1;
c_7321916.num_elements = 3;
c_7321916.elements = (object *)e_7321925;
c_7321916.elements[0] = k_736303;
c_7321916.elements[1] = m_731239_733534;
c_7321916.elements[2] = n_731238_733533;

return_direct_with_clo3(data,  __glo_truncate_91quotient_scheme_base, (((closure)  __glo_truncate_91quotient_scheme_base)->fn),  &c_7321916, n_731238_733533, m_731239_733534);; 
}

static void __lambda_796(void *data, object self_7313779, int argc, object *args) /* object self_7313779, object r_736304 */
 {
 object r_736304 = args[0];
  
closureN_type c_7321918;
object e_7321922 [2];
c_7321918.hdr.mark = gc_color_red;
 c_7321918.hdr.grayed = 0;
c_7321918.tag = closureN_tag;
 c_7321918.fn = (function_type)__lambda_797;
c_7321918.num_args = 1;
c_7321918.num_elements = 2;
c_7321918.elements = (object *)e_7321922;
c_7321918.elements[0] = ((closureN)self_7313779)->elements[0];
c_7321918.elements[1] = r_736304;

return_direct_with_clo3(data,  __glo_truncate_91remainder_scheme_base, (((closure)  __glo_truncate_91remainder_scheme_base)->fn),  &c_7321918, ((closureN)self_7313779)->elements[2], ((closureN)self_7313779)->elements[1]);; 
}

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

static object __lambda_1496(void *data, object ptr,object x_731235_733531, object y_731236_733532) {

  object r_736291;
  Cyc_st_add(data, "scheme/base.sld:quotient");
  object local_7321891 = alloca(sizeof(complex_num_type)); 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321891, x_731235_733531)) ){ 
  object local_7321895 = alloca(sizeof(complex_num_type)); 
  r_736291 = ((inline_function_type)
                   ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321895, y_731236_733532);
} else { 
  r_736291 = boolean_f;}
;if( (boolean_f != r_736291) ){ 
  
complex_num_type local_7321900; 

complex_num_type local_7321903; 

complex_num_type local_7321906; 
return_copy(ptr,  ((inline_function_type)
                   ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7321900, ((inline_function_type)
                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321903, Cyc_fast_div(data,&local_7321906, x_731235_733531, y_731236_733532))));
} else { 
  
complex_num_type local_7321910; 

complex_num_type local_7321913; 
return_copy(ptr,  ((inline_function_type)
                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321910, Cyc_fast_div(data,&local_7321913, x_731235_733531, y_731236_733532)));}
;; 
}

static void __lambda_794(void *data, object _, int argc, object *args) /* closure _,object k_736290, object x_731235_733531, object y_731236_733532 */
 {
object k_736290 = args[0]; object x_731235_733531 = args[1]; object y_731236_733532 = args[2];
  object r_736291;
  Cyc_st_add(data, "scheme/base.sld:quotient");
  object local_7321864 = alloca(sizeof(complex_num_type)); 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321864, x_731235_733531)) ){ 
  object local_7321868 = alloca(sizeof(complex_num_type)); 
  r_736291 = ((inline_function_type)
                   ((closure)__glo_fixnum_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321868, y_731236_733532);
} else { 
  r_736291 = boolean_f;}
;if( (boolean_f != r_736291) ){ 
  
complex_num_type local_7321873; 

complex_num_type local_7321876; 

complex_num_type local_7321879; 
return_direct_with_clo1(data,  k_736290, (((closure)  k_736290)->fn),  ((inline_function_type)
                   ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7321873, ((inline_function_type)
                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321876, Cyc_fast_div(data,&local_7321879, x_731235_733531, y_731236_733532))));
} else { 
  
complex_num_type local_7321883; 

complex_num_type local_7321886; 
return_direct_with_clo1(data,  k_736290, (((closure)  k_736290)->fn),  ((inline_function_type)
                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321883, Cyc_fast_div(data,&local_7321886, x_731235_733531, y_731236_733532)));}
;; 
}

static object __lambda_1495(void *data, object ptr, object obj) { return obj_is_int(obj) ? boolean_t : boolean_f;  }
static void __lambda_1494(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k, 
        obj_is_int(obj) ? boolean_t : boolean_f);  }
static void __lambda_1493(void *data, object _, int argc, object *args) {object k = args[0];object n = args[1]; Cyc_get_ratio(data, k, n, 0); }
static void __lambda_1492(void *data, object _, int argc, object *args) {object k = args[0];object n = args[1]; Cyc_get_ratio(data, k, n, 1); }
static void __lambda_793(void *data, object _, int argc, object *args) /* closure _,object k_736283, object nums_731234_733530_raw, ... */
 {
object k_736283 = args[0];
load_varargs(nums_731234_733530, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:lcm/entry");
  
if( (boolean_f != Cyc_eqv(nums_731234_733530, NULL)) ){ 
  return_direct_with_clo1(data,  k_736283, (((closure)  k_736283)->fn),  obj_int2obj(1));
} else { 
  



return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_736283, __glo_lcm_95main_scheme_base, Cyc_car(data, nums_731234_733530), Cyc_cdr(data, nums_731234_733530));}
;; 
}

static void __lambda_791(void *data, object _, int argc, object *args) /* closure _,object k_736277, object a_731232_733528, object b_731233_733529 */
 {
object k_736277 = args[0]; object a_731232_733528 = args[1]; object b_731233_733529 = args[2];
  Cyc_st_add(data, "scheme/base.sld:lcm/main");

closureN_type c_7321835;
object e_7321846 [3];
c_7321835.hdr.mark = gc_color_red;
 c_7321835.hdr.grayed = 0;
c_7321835.tag = closureN_tag;
 c_7321835.fn = (function_type)__lambda_792;
c_7321835.num_args = 1;
c_7321835.num_elements = 3;
c_7321835.elements = (object *)e_7321846;
c_7321835.elements[0] = a_731232_733528;
c_7321835.elements[1] = b_731233_733529;
c_7321835.elements[2] = k_736277;

return_direct_with_clo3(data,  __glo_gcd_95main_scheme_base, (((closure)  __glo_gcd_95main_scheme_base)->fn),  &c_7321835, a_731232_733528, b_731233_733529);; 
}

static void __lambda_792(void *data, object self_7313778, int argc, object *args) /* object self_7313778, object r_736280 */
 {
 object r_736280 = args[0];
  
complex_num_type local_7321840; 

complex_num_type local_7321843; 
return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  ((closureN)self_7313778)->elements[2], Cyc_fast_div(data,&local_7321840, Cyc_fast_mul(data,&local_7321843, ((closureN)self_7313778)->elements[0], ((closureN)self_7313778)->elements[1]), r_736280));; 
}

static void __lambda_790(void *data, object _, int argc, object *args) /* closure _,object k_736270, object nums_731231_733527_raw, ... */
 {
object k_736270 = args[0];
load_varargs(nums_731231_733527, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:gcd/entry");
  
if( (boolean_f != Cyc_eqv(nums_731231_733527, NULL)) ){ 
  return_direct_with_clo1(data,  k_736270, (((closure)  k_736270)->fn),  obj_int2obj(0));
} else { 
  



return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_736270, __glo_gcd_95main_scheme_base, Cyc_car(data, nums_731231_733527), Cyc_cdr(data, nums_731231_733527));}
;; 
}

static void __lambda_788(void *data, object _, int argc, object *args) /* closure _,object k_736265, object a_731229_733525, object b_731230_733526 */
 {
object k_736265 = args[0]; object a_731229_733525 = args[1]; object b_731230_733526 = args[2];
  Cyc_st_add(data, "scheme/base.sld:gcd/main");
  
if( (boolean_f != Cyc_num_fast_eq_op(data, b_731230_733526, obj_int2obj(0))) ){ 
  return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  k_736265, a_731229_733525);
} else { 
  
closureN_type c_7321819;
object e_7321823 [2];
c_7321819.hdr.mark = gc_color_red;
 c_7321819.hdr.grayed = 0;
c_7321819.tag = closureN_tag;
 c_7321819.fn = (function_type)__lambda_789;
c_7321819.num_args = 1;
c_7321819.num_elements = 2;
c_7321819.elements = (object *)e_7321823;
c_7321819.elements[0] = b_731230_733526;
c_7321819.elements[1] = k_736265;

return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7321819, a_731229_733525, b_731230_733526);}
;; 
}

static void __lambda_789(void *data, object self_7313777, int argc, object *args) /* object self_7313777, object r_736267 */
 {
 object r_736267 = args[0];
  return_direct_with_clo3(data,  __glo_gcd_95main_scheme_base, (((closure)  __glo_gcd_95main_scheme_base)->fn),  ((closureN)self_7313777)->elements[1], ((closureN)self_7313777)->elements[0], r_736267);; 
}

static void __lambda_785(void *data, object _, int argc, object *args) /* closure _,object k_736255, object first_731225_733521, object rest_731226_733522_raw, ... */
 {
object k_736255 = args[0]; object first_731225_733521 = args[1];
load_varargs(rest_731226_733522, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:min");

closureN_type c_7321803;
object e_7321808 [3];
c_7321803.hdr.mark = gc_color_red;
 c_7321803.hdr.grayed = 0;
c_7321803.tag = closureN_tag;
 c_7321803.fn = (function_type)__lambda_786;
c_7321803.num_args = 1;
c_7321803.num_elements = 3;
c_7321803.elements = (object *)e_7321808;
c_7321803.elements[0] = first_731225_733521;
c_7321803.elements[1] = k_736255;
c_7321803.elements[2] = rest_731226_733522;


mclosure0(c_7321809, (function_type)__lambda_787);c_7321809.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7321803,__lambda_786,  &c_7321809);; 
}

static void __lambda_787(void *data, object self_7313775, int argc, object *args) /* object self_7313775, object k_736257, object old_731227_733523, object new_731228_733524 */
 {
 object k_736257 = args[0]; object old_731227_733523 = args[1]; object new_731228_733524 = args[2];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, old_731227_733523, new_731228_733524)) ){ 
  return_direct_with_clo1(data,  k_736257, (((closure)  k_736257)->fn),  old_731227_733523);
} else { 
  return_direct_with_clo1(data,  k_736257, (((closure)  k_736257)->fn),  new_731228_733524);}
;; 
}

static void __lambda_786(void *data, object self_7313776, int argc, object *args) /* object self_7313776, object r_736256 */
 {
 object r_736256 = args[0];
  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7313776)->elements[1], r_736256, ((closureN)self_7313776)->elements[0], ((closureN)self_7313776)->elements[2]);; 
}

static void __lambda_782(void *data, object _, int argc, object *args) /* closure _,object k_736249, object first_731221_733517, object rest_731222_733518_raw, ... */
 {
object k_736249 = args[0]; object first_731221_733517 = args[1];
load_varargs(rest_731222_733518, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:max");

closureN_type c_7321790;
object e_7321795 [3];
c_7321790.hdr.mark = gc_color_red;
 c_7321790.hdr.grayed = 0;
c_7321790.tag = closureN_tag;
 c_7321790.fn = (function_type)__lambda_783;
c_7321790.num_args = 1;
c_7321790.num_elements = 3;
c_7321790.elements = (object *)e_7321795;
c_7321790.elements[0] = first_731221_733517;
c_7321790.elements[1] = k_736249;
c_7321790.elements[2] = rest_731222_733518;


mclosure0(c_7321796, (function_type)__lambda_784);c_7321796.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7321790,__lambda_783,  &c_7321796);; 
}

static void __lambda_784(void *data, object self_7313773, int argc, object *args) /* object self_7313773, object k_736251, object old_731223_733519, object new_731224_733520 */
 {
 object k_736251 = args[0]; object old_731223_733519 = args[1]; object new_731224_733520 = args[2];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, old_731223_733519, new_731224_733520)) ){ 
  return_direct_with_clo1(data,  k_736251, (((closure)  k_736251)->fn),  old_731223_733519);
} else { 
  return_direct_with_clo1(data,  k_736251, (((closure)  k_736251)->fn),  new_731224_733520);}
;; 
}

static void __lambda_783(void *data, object self_7313774, int argc, object *args) /* object self_7313774, object r_736250 */
 {
 object r_736250 = args[0];
  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7313774)->elements[1], r_736250, ((closureN)self_7313774)->elements[0], ((closureN)self_7313774)->elements[2]);; 
}

static void __lambda_781(void *data, object _, int argc, object *args) /* closure _,object k_736246, object x_731219_733515, object y_731220_733516 */
 {
object k_736246 = args[0]; object x_731219_733515 = args[1]; object y_731220_733516 = args[2];
  Cyc_st_add(data, "scheme/base.sld:rationalize");

complex_num_type local_7321787; 
return_direct_with_clo1(data,  k_736246, (((closure)  k_736246)->fn),  Cyc_fast_div(data,&local_7321787, x_731219_733515, y_731220_733516));; 
}

static object __lambda_1491(void *data, object ptr, object z) { return Cyc_is_complex(z);  }
static void __lambda_1490(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_closcall1(data, k, Cyc_is_complex(z));  }
static void __lambda_780(void *data, object _, int argc, object *args) /* closure _,object k_736240, object num_731218_733514 */
 {
object k_736240 = args[0]; object num_731218_733514 = args[1];
  Cyc_st_add(data, "scheme/base.sld:inexact?");
  complex_num_type local_7321778; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7321778, num_731218_733514)) ){ 
  return_direct_with_clo1(data,  k_736240, (((closure)  k_736240)->fn),  boolean_f);
} else { 
  return_direct_with_clo1(data,  k_736240, (((closure)  k_736240)->fn),  boolean_t);}
;; 
}

static object __lambda_1489(void *data, object ptr, object num) { Cyc_check_num(data, num);
      if (obj_is_int(num) || type_of(num) == integer_tag 
                          || type_of(num) == bignum_tag)
        return boolean_t;
      return boolean_f; }
static void __lambda_1488(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; Cyc_check_num(data, num);
      if (obj_is_int(num) || type_of(num) == integer_tag 
                          || type_of(num) == bignum_tag)
        return_closcall1(data, k, boolean_t);
      return_closcall1(data, k, boolean_f);  }
static object __lambda_1487(void *data, object ptr, object num) { if (obj_is_int(num) || (num != NULL && !is_value_type(num) && 
                               (type_of(num) == integer_tag || 
                                type_of(num) == bignum_tag)))
        return boolean_t;
      return boolean_f; }
static void __lambda_1486(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; if (obj_is_int(num) || (num != NULL && !is_value_type(num) && 
                               (type_of(num) == integer_tag || 
                                type_of(num) == bignum_tag)))
        return_closcall1(data, k, boolean_t);
      return_closcall1(data, k, boolean_f);  }
static object __lambda_1485(void *data, object ptr, object z) { return_inexact_double_op_no_cps(data, ptr, sqrt, z); }
static void __lambda_1484(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_inexact_double_op(data, k, sqrt, z); }
static void __lambda_774(void *data, object _, int argc, object *args) /* closure _,object k_736223, object k_731208_733511 */
 {
object k_736223 = args[0]; object k_731208_733511 = args[1];
  Cyc_st_add(data, "scheme/base.sld:exact-integer-sqrt");

closureN_type c_7321713;
object e_7321733 [1];
c_7321713.hdr.mark = gc_color_red;
 c_7321713.hdr.grayed = 0;
c_7321713.tag = closureN_tag;
 c_7321713.fn = (function_type)__lambda_775;
c_7321713.num_args = 0;
c_7321713.num_elements = 1;
c_7321713.elements = (object *)e_7321733;
c_7321713.elements[0] = k_731208_733511;


closureN_type c_7321734;
object e_7321768 [2];
c_7321734.hdr.mark = gc_color_red;
 c_7321734.hdr.grayed = 0;
c_7321734.tag = closureN_tag;
 c_7321734.fn = (function_type)__lambda_776;
c_7321734.num_args = 1;
c_7321734.num_elements = 2;
c_7321734.elements = (object *)e_7321768;
c_7321734.elements[0] = k_731208_733511;
c_7321734.elements[1] = k_736223;

return_direct_with_clo1(data,(closure)&c_7321713,__lambda_775,  &c_7321734);; 
}

static void __lambda_776(void *data, object self_7313768, int argc, object *args) /* object self_7313768, object r_736224 */
 {

  
closureN_type c_7321736;
object e_7321756 [1];
c_7321736.hdr.mark = gc_color_red;
 c_7321736.hdr.grayed = 0;
c_7321736.tag = closureN_tag;
 c_7321736.fn = (function_type)__lambda_777;
c_7321736.num_args = 0;
c_7321736.num_elements = 1;
c_7321736.elements = (object *)e_7321756;
c_7321736.elements[0] = ((closureN)self_7313768)->elements[0];


closureN_type c_7321757;
object e_7321767 [2];
c_7321757.hdr.mark = gc_color_red;
 c_7321757.hdr.grayed = 0;
c_7321757.tag = closureN_tag;
 c_7321757.fn = (function_type)__lambda_779;
c_7321757.num_args = 1;
c_7321757.num_elements = 2;
c_7321757.elements = (object *)e_7321767;
c_7321757.elements[0] = ((closureN)self_7313768)->elements[0];
c_7321757.elements[1] = ((closureN)self_7313768)->elements[1];

return_direct_with_clo1(data,(closure)&c_7321736,__lambda_777,  &c_7321757);; 
}

static void __lambda_779(void *data, object self_7313769, int argc, object *args) /* object self_7313769, object s_731213_733512 */
 {
 object s_731213_733512 = args[0];
  
complex_num_type local_7321762; 

complex_num_type local_7321766; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7313769)->elements[1], s_731213_733512, Cyc_fast_sub(data,&local_7321762, ((closureN)self_7313769)->elements[0], Cyc_fast_mul(data,&local_7321766, s_731213_733512, s_731213_733512)));; 
}

static void __lambda_777(void *data, object self_7313770, int argc, object *args) /* object self_7313770, object k_736228 */
 {
 object k_736228 = args[0];
  
closureN_type c_7321738;
object e_7321754 [2];
c_7321738.hdr.mark = gc_color_red;
 c_7321738.hdr.grayed = 0;
c_7321738.tag = closureN_tag;
 c_7321738.fn = (function_type)__lambda_778;
c_7321738.num_args = 1;
c_7321738.num_elements = 2;
c_7321738.elements = (object *)e_7321754;
c_7321738.elements[0] = ((closureN)self_7313770)->elements[0];
c_7321738.elements[1] = k_736228;

return_direct_with_clo2(data,  __glo_bignum_127_scheme_base, (((closure)  __glo_bignum_127_scheme_base)->fn),  &c_7321738, ((closureN)self_7313770)->elements[0]);; 
}

static void __lambda_778(void *data, object self_7313771, int argc, object *args) /* object self_7313771, object r_736229 */
 {
 object r_736229 = args[0];
  if( (boolean_f != r_736229) ){ 
  return_direct_with_clo2(data,  __glo_bignum_91sqrt_scheme_base, (((closure)  __glo_bignum_91sqrt_scheme_base)->fn),  ((closureN)self_7313771)->elements[1], ((closureN)self_7313771)->elements[0]);
} else { 
  
complex_num_type local_7321746; 

complex_num_type local_7321749; 

complex_num_type local_7321752; 
return_direct_with_clo1(data,  ((closureN)self_7313771)->elements[1], (((closure)  ((closureN)self_7313771)->elements[1])->fn),  ((inline_function_type)
                   ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_7321746, ((inline_function_type)
                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321749, ((inline_function_type)
                   ((closure)__glo_sqrt_191_191inline_191_191_scheme_base)->fn)(data,&local_7321752, ((closureN)self_7313771)->elements[0]))));}
;; 
}

static void __lambda_775(void *data, object self_7313772, int argc, object *args) /* object self_7313772, object k_736232 */
 {
 object k_736232 = args[0];
  object r_736233;
    object local_7321717 = alloca(sizeof(complex_num_type)); 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321717, ((closureN)self_7313772)->elements[0])) ){ 
    
if( (boolean_f != Cyc_is_integer(((closureN)self_7313772)->elements[0])) ){ 
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7313772)->elements[0], obj_int2obj(0))) ){ 
  r_736233 = boolean_f;
} else { 
  r_736233 = boolean_t;}
;
} else { 
  r_736233 = boolean_f;}
;
} else { 
  r_736233 = boolean_f;}
;if( (boolean_f != r_736233) ){ 
  return_direct_with_clo1(data,  k_736232, (((closure)  k_736232)->fn),  Cyc_VOID);
} else { 
  
make_utf8_string_with_len(c_7321731, "exact non-negative integer required", 35, 35);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_736232, &c_7321731, ((closureN)self_7313772)->elements[0]);}
;; 
}

static void __lambda_1483(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; alloc_bignum(data, bn);
      if (MP_OKAY != mp_sqrt(&(bignum_value(obj)), &bignum_value(bn))) {
        Cyc_rt_raise2(data, "Error computing sqrt", obj);
      }
      return_closcall1(data, k, bn);  }
static void __lambda_1482(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; return_closcall1(data, k, Cyc_is_bignum(obj));  }
static void __lambda_772(void *data, object _, int argc, object *args) /* closure _,object k_736218, object num_731207_733510 */
 {
object k_736218 = args[0]; object num_731207_733510 = args[1];
  Cyc_st_add(data, "scheme/base.sld:even?");
  
if( (boolean_f != Cyc_is_integer(num_731207_733510)) ){ 
  
closureN_type c_7321701;
object e_7321706 [1];
c_7321701.hdr.mark = gc_color_red;
 c_7321701.hdr.grayed = 0;
c_7321701.tag = closureN_tag;
 c_7321701.fn = (function_type)__lambda_773;
c_7321701.num_args = 1;
c_7321701.num_elements = 1;
c_7321701.elements = (object *)e_7321706;
c_7321701.elements[0] = k_736218;

return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7321701, num_731207_733510, obj_int2obj(2));
} else { 
  
make_utf8_string_with_len(c_7321708, "Not an integer", 14, 14);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_736218, &c_7321708, num_731207_733510);}
;; 
}

static void __lambda_773(void *data, object self_7313767, int argc, object *args) /* object self_7313767, object r_736220 */
 {
 object r_736220 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_7313767)->elements[0], (((closure)  ((closureN)self_7313767)->elements[0])->fn),  Cyc_num_fast_eq_op(data, r_736220, obj_int2obj(0)));; 
}

static void __lambda_770(void *data, object _, int argc, object *args) /* closure _,object k_736213, object num_731206_733509 */
 {
object k_736213 = args[0]; object num_731206_733509 = args[1];
  Cyc_st_add(data, "scheme/base.sld:odd?");
  
if( (boolean_f != Cyc_is_integer(num_731206_733509)) ){ 
  
closureN_type c_7321689;
object e_7321694 [1];
c_7321689.hdr.mark = gc_color_red;
 c_7321689.hdr.grayed = 0;
c_7321689.tag = closureN_tag;
 c_7321689.fn = (function_type)__lambda_771;
c_7321689.num_args = 1;
c_7321689.num_elements = 1;
c_7321689.elements = (object *)e_7321694;
c_7321689.elements[0] = k_736213;

return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7321689, num_731206_733509, obj_int2obj(2));
} else { 
  
make_utf8_string_with_len(c_7321696, "Not an integer", 14, 14);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_736213, &c_7321696, num_731206_733509);}
;; 
}

static void __lambda_771(void *data, object self_7313766, int argc, object *args) /* object self_7313766, object r_736215 */
 {
 object r_736215 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_7313766)->elements[0], (((closure)  ((closureN)self_7313766)->elements[0])->fn),  Cyc_num_fast_eq_op(data, r_736215, obj_int2obj(1)));; 
}

static void __lambda_768(void *data, object _, int argc, object *args) /* closure _,object k_736206, object a_731203_733506, object b_731204_733507 */
 {
object k_736206 = args[0]; object a_731203_733506 = args[1]; object b_731204_733507 = args[2];
  Cyc_st_add(data, "scheme/base.sld:modulo");

closureN_type c_7321660;
object e_7321684 [2];
c_7321660.hdr.mark = gc_color_red;
 c_7321660.hdr.grayed = 0;
c_7321660.tag = closureN_tag;
 c_7321660.fn = (function_type)__lambda_769;
c_7321660.num_args = 1;
c_7321660.num_elements = 2;
c_7321660.elements = (object *)e_7321684;
c_7321660.elements[0] = b_731204_733507;
c_7321660.elements[1] = k_736206;

return_direct_with_clo3(data,  __glo_remainder_scheme_base, (((closure)  __glo_remainder_scheme_base)->fn),  &c_7321660, a_731203_733506, b_731204_733507);; 
}

static void __lambda_769(void *data, object self_7313765, int argc, object *args) /* object self_7313765, object res_731205_733508 */
 {
 object res_731205_733508 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7313765)->elements[0], obj_int2obj(0))) ){ 
    
if( (boolean_f != Cyc_num_fast_lte_op(data, res_731205_733508, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313765)->elements[1], (((closure)  ((closureN)self_7313765)->elements[1])->fn),  res_731205_733508);
} else { 
  
complex_num_type local_7321672; 
return_direct_with_clo1(data,  ((closureN)self_7313765)->elements[1], (((closure)  ((closureN)self_7313765)->elements[1])->fn),  Cyc_fast_sum(data,&local_7321672, res_731205_733508, ((closureN)self_7313765)->elements[0]));}
;
} else { 
    
if( (boolean_f != Cyc_num_fast_gte_op(data, res_731205_733508, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313765)->elements[1], (((closure)  ((closureN)self_7313765)->elements[1])->fn),  res_731205_733508);
} else { 
  
complex_num_type local_7321682; 
return_direct_with_clo1(data,  ((closureN)self_7313765)->elements[1], (((closure)  ((closureN)self_7313765)->elements[1])->fn),  Cyc_fast_sum(data,&local_7321682, res_731205_733508, ((closureN)self_7313765)->elements[0]));}
;}
;; 
}

static void __lambda_1481(void *data, object _, int argc, object *args) {object k = args[0];object num1 = args[1];object num2 = args[2]; Cyc_remainder(data, k, num1, num2);  }
static void __lambda_1480(void *data, object _, int argc, object *args) {object k = args[0];object num = args[1]; Cyc_check_num(data, num);
      if (obj_is_int(num)) {
        return_closcall1(data, k, obj_int2obj( labs( obj_obj2int(num))));
      } else if (is_object_type(num) && type_of(num) == bignum_tag){
        alloc_bignum(data, bn);
        BIGNUM_CALL(mp_abs(&bignum_value(num), &bignum_value(bn)));
        return_closcall1(data, k, bn);
      } else if (is_object_type(num) && type_of(num) == complex_num_tag){
        make_double(d, cabs(((complex_num_type *)num)->value));
        return_closcall1(data, k, &d);
      } else {
        make_double(d, fabs(((double_type *)num)->value));
        return_closcall1(data, k, &d);
      }  }
static object __lambda_1479(void *data, object ptr, object z) { return_inexact_double_or_cplx_op_no_cps(data, ptr, (double), (double complex), z); }
static void __lambda_1478(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_inexact_double_or_cplx_op(data, k, (double), (double complex), z);  }
static object __lambda_1477(void *data, object ptr, object z) { return Cyc_exact_no_cps(data, ptr, z); }
static void __lambda_1476(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; Cyc_exact(data, k, z);  }
static object __lambda_1475(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, round_to_nearest_even, z); }
static void __lambda_1474(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, round_to_nearest_even, z);  }
static object __lambda_1473(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, trunc, z); }
static void __lambda_1472(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, trunc, z);  }
static object __lambda_1471(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, ceil, z); }
static void __lambda_1470(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, ceil, z);  }
static object __lambda_1469(void *data, object ptr, object z) { return_double_op_no_cps(data, ptr, floor, z); }
static void __lambda_1468(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_double_op(data, k, floor, z);  }
static void __lambda_762(void *data, object _, int argc, object *args) /* closure _,object k_736196, object pred_731190_733501, object lst_731191_733502 */
 {
object k_736196 = args[0]; object pred_731190_733501 = args[1]; object lst_731191_733502 = args[2];
  Cyc_st_add(data, "scheme/base.sld:every");

closureN_type c_7321604;
object e_7321643 [1];
c_7321604.hdr.mark = gc_color_red;
 c_7321604.hdr.grayed = 0;
c_7321604.tag = closureN_tag;
 c_7321604.fn = (function_type)__lambda_763;
c_7321604.num_args = 1;
c_7321604.num_elements = 1;
c_7321604.elements = (object *)e_7321643;
c_7321604.elements[0] = k_736196;

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7321604, pred_731190_733501, lst_731191_733502);; 
}

static void __lambda_763(void *data, object self_7313759, int argc, object *args) /* object self_7313759, object l_731193_733503 */
 {
 object l_731193_733503 = args[0];
  
closureN_type c_7321606;
object e_7321642 [2];
c_7321606.hdr.mark = gc_color_red;
 c_7321606.hdr.grayed = 0;
c_7321606.tag = closureN_tag;
 c_7321606.fn = (function_type)__lambda_764;
c_7321606.num_args = 1;
c_7321606.num_elements = 2;
c_7321606.elements = (object *)e_7321642;
c_7321606.elements[0] = ((closureN)self_7313759)->elements[0];
c_7321606.elements[1] = l_731193_733503;

return_direct_with_clo1(data,(closure)&c_7321606,__lambda_764,  boolean_f);; 
}

static void __lambda_764(void *data, object self_7313760, int argc, object *args) /* object self_7313760, object every_85_731194_733504 */
 {
 object every_85_731194_733504 = args[0];
  
closureN_type c_7321608;
object e_7321638 [2];
c_7321608.hdr.mark = gc_color_red;
 c_7321608.hdr.grayed = 0;
c_7321608.tag = closureN_tag;
 c_7321608.fn = (function_type)__lambda_1423;
c_7321608.num_args = 1;
c_7321608.num_elements = 2;
c_7321608.elements = (object *)e_7321638;
c_7321608.elements[0] = ((closureN)self_7313760)->elements[0];
c_7321608.elements[1] = ((closureN)self_7313760)->elements[1];


pair_type local_7321641; 
return_direct_with_clo1(data,(closure)&c_7321608,__lambda_1423,  set_cell_as_expr(&local_7321641, every_85_731194_733504));; 
}

static void __lambda_1423(void *data, object self_7313761, int argc, object *args) /* object self_7313761, object every_85_731194_733504 */
 {
 object every_85_731194_733504 = args[0];
  
closureN_type c_7321610;
object e_7321623 [3];
c_7321610.hdr.mark = gc_color_red;
 c_7321610.hdr.grayed = 0;
c_7321610.tag = closureN_tag;
 c_7321610.fn = (function_type)__lambda_765;
c_7321610.num_args = 1;
c_7321610.num_elements = 3;
c_7321610.elements = (object *)e_7321623;
c_7321610.elements[0] = every_85_731194_733504;
c_7321610.elements[1] = ((closureN)self_7313761)->elements[0];
c_7321610.elements[2] = ((closureN)self_7313761)->elements[1];


closureN_type c_7321624;
object e_7321637 [1];
c_7321624.hdr.mark = gc_color_red;
 c_7321624.hdr.grayed = 0;
c_7321624.tag = closureN_tag;
 c_7321624.fn = (function_type)__lambda_767;
c_7321624.num_args = 1;
c_7321624.num_elements = 1;
c_7321624.elements = (object *)e_7321637;
c_7321624.elements[0] = every_85_731194_733504;

return_direct_with_clo1(data,(closure)&c_7321610,__lambda_765,  &c_7321624);; 
}

static void __lambda_767(void *data, object self_7313762, int argc, object *args) /* object self_7313762, object k_736200, object l_731195_733505 */
 {
 object k_736200 = args[0]; object l_731195_733505 = args[1];
    
if( (boolean_f != Cyc_is_null(l_731195_733505)) ){ 
  return_direct_with_clo1(data,  k_736200, (((closure)  k_736200)->fn),  boolean_t);
} else { 
    
if( (boolean_f != Cyc_car(data, l_731195_733505)) ){ 
  



return_closcall2(data,  car(((closureN)self_7313762)->elements[0]),  k_736200, Cyc_cdr(data, l_731195_733505));
} else { 
  return_direct_with_clo1(data,  k_736200, (((closure)  k_736200)->fn),  boolean_f);}
;}
;; 
}

static void __lambda_765(void *data, object self_7313763, int argc, object *args) /* object self_7313763, object r_736199 */
 {
 object r_736199 = args[0];
  
closureN_type c_7321612;
object e_7321619 [3];
c_7321612.hdr.mark = gc_color_red;
 c_7321612.hdr.grayed = 0;
c_7321612.tag = closureN_tag;
 c_7321612.fn = (function_type)__lambda_766;
c_7321612.num_args = 1;
c_7321612.num_elements = 3;
c_7321612.elements = (object *)e_7321619;
c_7321612.elements[0] = ((closureN)self_7313763)->elements[0];
c_7321612.elements[1] = ((closureN)self_7313763)->elements[1];
c_7321612.elements[2] = ((closureN)self_7313763)->elements[2];



return_direct_with_clo1(data,(closure)&c_7321612,__lambda_766,  Cyc_set_cell(data, ((closureN)self_7313763)->elements[0], r_736199));; 
}

static void __lambda_766(void *data, object self_7313764, int argc, object *args) /* object self_7313764, object r_736198 */
 {

  

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

static void __lambda_756(void *data, object _, int argc, object *args) /* closure _,object k_736186, object pred_731177_733496, object lst_731178_733497 */
 {
object k_736186 = args[0]; object pred_731177_733496 = args[1]; object lst_731178_733497 = args[2];
  Cyc_st_add(data, "scheme/base.sld:any");

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

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7321562, pred_731177_733496, lst_731178_733497);; 
}

static void __lambda_757(void *data, object self_7313753, int argc, object *args) /* object self_7313753, object l_731180_733498 */
 {
 object l_731180_733498 = args[0];
  
closureN_type c_7321564;
object e_7321600 [2];
c_7321564.hdr.mark = gc_color_red;
 c_7321564.hdr.grayed = 0;
c_7321564.tag = closureN_tag;
 c_7321564.fn = (function_type)__lambda_758;
c_7321564.num_args = 1;
c_7321564.num_elements = 2;
c_7321564.elements = (object *)e_7321600;
c_7321564.elements[0] = ((closureN)self_7313753)->elements[0];
c_7321564.elements[1] = l_731180_733498;

return_direct_with_clo1(data,(closure)&c_7321564,__lambda_758,  boolean_f);; 
}

static void __lambda_758(void *data, object self_7313754, int argc, object *args) /* object self_7313754, object any_85_731181_733499 */
 {
 object any_85_731181_733499 = args[0];
  
closureN_type c_7321566;
object e_7321596 [2];
c_7321566.hdr.mark = gc_color_red;
 c_7321566.hdr.grayed = 0;
c_7321566.tag = closureN_tag;
 c_7321566.fn = (function_type)__lambda_1422;
c_7321566.num_args = 1;
c_7321566.num_elements = 2;
c_7321566.elements = (object *)e_7321596;
c_7321566.elements[0] = ((closureN)self_7313754)->elements[0];
c_7321566.elements[1] = ((closureN)self_7313754)->elements[1];


pair_type local_7321599; 
return_direct_with_clo1(data,(closure)&c_7321566,__lambda_1422,  set_cell_as_expr(&local_7321599, any_85_731181_733499));; 
}

static void __lambda_1422(void *data, object self_7313755, int argc, object *args) /* object self_7313755, object any_85_731181_733499 */
 {
 object any_85_731181_733499 = args[0];
  
closureN_type c_7321568;
object e_7321581 [3];
c_7321568.hdr.mark = gc_color_red;
 c_7321568.hdr.grayed = 0;
c_7321568.tag = closureN_tag;
 c_7321568.fn = (function_type)__lambda_759;
c_7321568.num_args = 1;
c_7321568.num_elements = 3;
c_7321568.elements = (object *)e_7321581;
c_7321568.elements[0] = any_85_731181_733499;
c_7321568.elements[1] = ((closureN)self_7313755)->elements[0];
c_7321568.elements[2] = ((closureN)self_7313755)->elements[1];


closureN_type c_7321582;
object e_7321595 [1];
c_7321582.hdr.mark = gc_color_red;
 c_7321582.hdr.grayed = 0;
c_7321582.tag = closureN_tag;
 c_7321582.fn = (function_type)__lambda_761;
c_7321582.num_args = 1;
c_7321582.num_elements = 1;
c_7321582.elements = (object *)e_7321595;
c_7321582.elements[0] = any_85_731181_733499;

return_direct_with_clo1(data,(closure)&c_7321568,__lambda_759,  &c_7321582);; 
}

static void __lambda_761(void *data, object self_7313756, int argc, object *args) /* object self_7313756, object k_736190, object l_731182_733500 */
 {
 object k_736190 = args[0]; object l_731182_733500 = args[1];
    
if( (boolean_f != Cyc_is_null(l_731182_733500)) ){ 
  return_direct_with_clo1(data,  k_736190, (((closure)  k_736190)->fn),  boolean_f);
} else { 
    
if( (boolean_f != Cyc_car(data, l_731182_733500)) ){ 
  return_direct_with_clo1(data,  k_736190, (((closure)  k_736190)->fn),  boolean_t);
} else { 
  



return_closcall2(data,  car(((closureN)self_7313756)->elements[0]),  k_736190, Cyc_cdr(data, l_731182_733500));}
;}
;; 
}

static void __lambda_759(void *data, object self_7313757, int argc, object *args) /* object self_7313757, object r_736189 */
 {
 object r_736189 = args[0];
  
closureN_type c_7321570;
object e_7321577 [3];
c_7321570.hdr.mark = gc_color_red;
 c_7321570.hdr.grayed = 0;
c_7321570.tag = closureN_tag;
 c_7321570.fn = (function_type)__lambda_760;
c_7321570.num_args = 1;
c_7321570.num_elements = 3;
c_7321570.elements = (object *)e_7321577;
c_7321570.elements[0] = ((closureN)self_7313757)->elements[0];
c_7321570.elements[1] = ((closureN)self_7313757)->elements[1];
c_7321570.elements[2] = ((closureN)self_7313757)->elements[2];



return_direct_with_clo1(data,(closure)&c_7321570,__lambda_760,  Cyc_set_cell(data, ((closureN)self_7313757)->elements[0], r_736189));; 
}

static void __lambda_760(void *data, object self_7313758, int argc, object *args) /* object self_7313758, object r_736188 */
 {

  

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

static void __lambda_742(void *data, object _, int argc, object *args) /* closure _,object k_736163, object reason_731161_733486, object expr_731162_733487, object args_731163_733488_raw, ... */
 {
object k_736163 = args[0]; object reason_731161_733486 = args[1]; object expr_731162_733487 = args[2];
load_varargs(args_731163_733488, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:error/loc");

closureN_type c_7321444;
object e_7321559 [4];
c_7321444.hdr.mark = gc_color_red;
 c_7321444.hdr.grayed = 0;
c_7321444.tag = closureN_tag;
 c_7321444.fn = (function_type)__lambda_743;
c_7321444.num_args = 1;
c_7321444.num_elements = 4;
c_7321444.elements = (object *)e_7321559;
c_7321444.elements[0] = args_731163_733488;
c_7321444.elements[1] = expr_731162_733487;
c_7321444.elements[2] = k_736163;
c_7321444.elements[3] = reason_731161_733486;

return_direct_with_clo1(data,(closure)&c_7321444,__lambda_743,  boolean_f);; 
}

static void __lambda_743(void *data, object self_7313739, int argc, object *args) /* object self_7313739, object reason_95line_91loc_127_733490 */
 {
 object reason_95line_91loc_127_733490 = args[0];
  
closureN_type c_7321446;
object e_7321555 [4];
c_7321446.hdr.mark = gc_color_red;
 c_7321446.hdr.grayed = 0;
c_7321446.tag = closureN_tag;
 c_7321446.fn = (function_type)__lambda_1421;
c_7321446.num_args = 1;
c_7321446.num_elements = 4;
c_7321446.elements = (object *)e_7321555;
c_7321446.elements[0] = ((closureN)self_7313739)->elements[0];
c_7321446.elements[1] = ((closureN)self_7313739)->elements[1];
c_7321446.elements[2] = ((closureN)self_7313739)->elements[2];
c_7321446.elements[3] = ((closureN)self_7313739)->elements[3];


pair_type local_7321558; 
return_direct_with_clo1(data,(closure)&c_7321446,__lambda_1421,  set_cell_as_expr(&local_7321558, reason_95line_91loc_127_733490));; 
}

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


mclosure0(c_7321540, (function_type)__lambda_754);c_7321540.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7321448,__lambda_744,  &c_7321540);; 
}

static void __lambda_754(void *data, object self_7313741, int argc, object *args) /* object self_7313741, object k_736181, object reason_731164_733492 */
 {
 object k_736181 = args[0]; object reason_731164_733492 = args[1];
    
if( (boolean_f != Cyc_is_string(reason_731164_733492)) ){ 
  
closureN_type c_7321544;
object e_7321550 [1];
c_7321544.hdr.mark = gc_color_red;
 c_7321544.hdr.grayed = 0;
c_7321544.tag = closureN_tag;
 c_7321544.fn = (function_type)__lambda_755;
c_7321544.num_args = 1;
c_7321544.num_elements = 1;
c_7321544.elements = (object *)e_7321550;
c_7321544.elements[0] = k_736181;


object c_7321553 = Cyc_substring(data,(closure)&c_7321544,reason_731164_733492, obj_int2obj(0), obj_int2obj(8));
return_closcall1(data,(closure)&c_7321544,  c_7321553);
} else { 
  return_direct_with_clo1(data,  k_736181, (((closure)  k_736181)->fn),  boolean_f);}
;; 
}

static void __lambda_755(void *data, object self_7313742, int argc, object *args) /* object self_7313742, object r_736183 */
 {
 object r_736183 = args[0];
  


make_utf8_string_with_len(c_7321549, "at line ", 8, 8);
return_direct_with_clo1(data,  ((closureN)self_7313742)->elements[0], (((closure)  ((closureN)self_7313742)->elements[0])->fn),  equalp(r_736183, &c_7321549));; 
}

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



return_direct_with_clo1(data,(closure)&c_7321450,__lambda_745,  Cyc_set_cell(data, ((closureN)self_7313743)->elements[4], r_736180));; 
}

static void __lambda_745(void *data, object self_7313744, int argc, object *args) /* object self_7313744, object r_736164 */
 {

  
closureN_type c_7321452;
object e_7321531 [5];
c_7321452.hdr.mark = gc_color_red;
 c_7321452.hdr.grayed = 0;
c_7321452.tag = closureN_tag;
 c_7321452.fn = (function_type)__lambda_746;
c_7321452.num_args = 1;
c_7321452.num_elements = 5;
c_7321452.elements = (object *)e_7321531;
c_7321452.elements[0] = ((closureN)self_7313744)->elements[0];
c_7321452.elements[1] = ((closureN)self_7313744)->elements[1];
c_7321452.elements[2] = ((closureN)self_7313744)->elements[2];
c_7321452.elements[3] = ((closureN)self_7313744)->elements[3];
c_7321452.elements[4] = ((closureN)self_7313744)->elements[4];



return_direct_with_clo1(data,(closure)&c_7321452,__lambda_746,  assoc(data, ((closureN)self_7313744)->elements[1], __glo__85reader_91source_91db_85_scheme_cyclone_common));; 
}

static void __lambda_746(void *data, object self_7313745, int argc, object *args) /* object self_7313745, object found_731168_733493 */
 {
 object found_731168_733493 = args[0];
  object loc_91vec_731171_733494;
  if( (boolean_f != found_731168_733493) ){ 
  
  loc_91vec_731171_733494 = Cyc_cdr(data, found_731168_733493);
} else { 
  loc_91vec_731171_733494 = boolean_f;}
;
closureN_type c_7321459;
object e_7321513 [3];
c_7321459.hdr.mark = gc_color_red;
 c_7321459.hdr.grayed = 0;
c_7321459.tag = closureN_tag;
 c_7321459.fn = (function_type)__lambda_747;
c_7321459.num_args = 0;
c_7321459.num_elements = 3;
c_7321459.elements = (object *)e_7321513;
c_7321459.elements[0] = loc_91vec_731171_733494;
c_7321459.elements[1] = ((closureN)self_7313745)->elements[3];
c_7321459.elements[2] = ((closureN)self_7313745)->elements[4];


closureN_type c_7321514;
object e_7321530 [3];
c_7321514.hdr.mark = gc_color_red;
 c_7321514.hdr.grayed = 0;
c_7321514.tag = closureN_tag;
 c_7321514.fn = (function_type)__lambda_753;
c_7321514.num_args = 1;
c_7321514.num_elements = 3;
c_7321514.elements = (object *)e_7321530;
c_7321514.elements[0] = ((closureN)self_7313745)->elements[0];
c_7321514.elements[1] = ((closureN)self_7313745)->elements[1];
c_7321514.elements[2] = ((closureN)self_7313745)->elements[2];

return_direct_with_clo1(data,(closure)&c_7321459,__lambda_747,  &c_7321514);; 
}

static void __lambda_753(void *data, object self_7313746, int argc, object *args) /* object self_7313746, object msg_731174_733495 */
 {
 object msg_731174_733495 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313746)->elements[0])) ){ 
  
pair_type local_7321525; 

object c_7321522 = apply(data,  ((closureN)self_7313746)->elements[2],__glo_error_scheme_base, set_pair_as_expr(&local_7321525, msg_731174_733495, ((closureN)self_7313746)->elements[0]));
return_direct_with_clo1(data,  ((closureN)self_7313746)->elements[2], (((closure)  ((closureN)self_7313746)->elements[2])->fn),  c_7321522);
} else { 
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7313746)->elements[2], msg_731174_733495, ((closureN)self_7313746)->elements[1]);}
;; 
}

static void __lambda_747(void *data, object self_7313747, int argc, object *args) /* object self_7313747, object k_736170 */
 {
 object k_736170 = args[0];
  
closureN_type c_7321461;
object e_7321475 [3];
c_7321461.hdr.mark = gc_color_red;
 c_7321461.hdr.grayed = 0;
c_7321461.tag = closureN_tag;
 c_7321461.fn = (function_type)__lambda_748;
c_7321461.num_args = 0;
c_7321461.num_elements = 3;
c_7321461.elements = (object *)e_7321475;
c_7321461.elements[0] = ((closureN)self_7313747)->elements[0];
c_7321461.elements[1] = ((closureN)self_7313747)->elements[1];
c_7321461.elements[2] = ((closureN)self_7313747)->elements[2];


closureN_type c_7321476;
object e_7321512 [3];
c_7321476.hdr.mark = gc_color_red;
 c_7321476.hdr.grayed = 0;
c_7321476.tag = closureN_tag;
 c_7321476.fn = (function_type)__lambda_750;
c_7321476.num_args = 1;
c_7321476.num_elements = 3;
c_7321476.elements = (object *)e_7321512;
c_7321476.elements[0] = k_736170;
c_7321476.elements[1] = ((closureN)self_7313747)->elements[0];
c_7321476.elements[2] = ((closureN)self_7313747)->elements[1];

return_direct_with_clo1(data,(closure)&c_7321461,__lambda_748,  &c_7321476);; 
}

static void __lambda_750(void *data, object self_7313748, int argc, object *args) /* object self_7313748, object r_736171 */
 {
 object r_736171 = args[0];
  if( (boolean_f != r_736171) ){ 
  
closureN_type c_7321478;
object e_7321502 [3];
c_7321478.hdr.mark = gc_color_red;
 c_7321478.hdr.grayed = 0;
c_7321478.tag = closureN_tag;
 c_7321478.fn = (function_type)__lambda_751;
c_7321478.num_args = 1;
c_7321478.num_elements = 3;
c_7321478.elements = (object *)e_7321502;
c_7321478.elements[0] = ((closureN)self_7313748)->elements[0];
c_7321478.elements[1] = ((closureN)self_7313748)->elements[1];
c_7321478.elements[2] = ((closureN)self_7313748)->elements[2];




object c_7321505 = Cyc_number2string2(data,(closure)&c_7321478,1,Cyc_vector_ref(data, ((closureN)self_7313748)->elements[1], obj_int2obj(1)));
return_closcall1(data,(closure)&c_7321478,  c_7321505);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313748)->elements[0], (((closure)  ((closureN)self_7313748)->elements[0])->fn),  ((closureN)self_7313748)->elements[2]);}
;; 
}

static void __lambda_751(void *data, object self_7313749, int argc, object *args) /* object self_7313749, object r_736172 */
 {
 object r_736172 = args[0];
  
closureN_type c_7321480;
object e_7321495 [4];
c_7321480.hdr.mark = gc_color_red;
 c_7321480.hdr.grayed = 0;
c_7321480.tag = closureN_tag;
 c_7321480.fn = (function_type)__lambda_752;
c_7321480.num_args = 1;
c_7321480.num_elements = 4;
c_7321480.elements = (object *)e_7321495;
c_7321480.elements[0] = ((closureN)self_7313749)->elements[0];
c_7321480.elements[1] = ((closureN)self_7313749)->elements[1];
c_7321480.elements[2] = r_736172;
c_7321480.elements[3] = ((closureN)self_7313749)->elements[2];




object c_7321498 = Cyc_number2string2(data,(closure)&c_7321480,1,Cyc_vector_ref(data, ((closureN)self_7313749)->elements[1], obj_int2obj(2)));
return_closcall1(data,(closure)&c_7321480,  c_7321498);; 
}

static void __lambda_752(void *data, object self_7313750, int argc, object *args) /* object self_7313750, object r_736173 */
 {
 object r_736173 = args[0];
  
make_utf8_string_with_len(c_7321486, "at line ", 8, 8);

make_utf8_string_with_len(c_7321488, ", column ", 9, 9);

make_utf8_string_with_len(c_7321489, " of ", 4, 4);



make_utf8_string_with_len(c_7321493, ": ", 2, 2);

object c_7321485 = Cyc_string_append(data,  ((closureN)self_7313750)->elements[0],8,&c_7321486, ((closureN)self_7313750)->elements[2], &c_7321488, r_736173, &c_7321489, Cyc_vector_ref(data, ((closureN)self_7313750)->elements[1], obj_int2obj(0)), &c_7321493, ((closureN)self_7313750)->elements[3]);
return_direct_with_clo1(data,  ((closureN)self_7313750)->elements[0], (((closure)  ((closureN)self_7313750)->elements[0])->fn),  c_7321485);; 
}

static void __lambda_748(void *data, object self_7313751, int argc, object *args) /* object self_7313751, object k_736177 */
 {
 object k_736177 = args[0];
  if( (boolean_f != ((closureN)self_7313751)->elements[0]) ){ 
  


closureN_type c_7321467;
object e_7321472 [1];
c_7321467.hdr.mark = gc_color_red;
 c_7321467.hdr.grayed = 0;
c_7321467.tag = closureN_tag;
 c_7321467.fn = (function_type)__lambda_749;
c_7321467.num_args = 1;
c_7321467.num_elements = 1;
c_7321467.elements = (object *)e_7321472;
c_7321467.elements[0] = k_736177;

return_closcall2(data,  car(((closureN)self_7313751)->elements[2]),  &c_7321467, ((closureN)self_7313751)->elements[1]);
} else { 
  return_direct_with_clo1(data,  k_736177, (((closure)  k_736177)->fn),  boolean_f);}
;; 
}

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

static void __lambda_1467(void *data, object _, int argc, object *args) {object k = args[0]; gc_thread_data *thd = (gc_thread_data *)data;
        if (thd->exception_handler_stack) {
          thd->exception_handler_stack = cdr(thd->exception_handler_stack);
        }
        return_closcall1(data, k, thd->exception_handler_stack);  }
static void __lambda_1466(void *data, object _, int argc, object *args) {object k = args[0];object h = args[1]; gc_thread_data *thd = (gc_thread_data *)data;
        make_pair(c, h, thd->exception_handler_stack);
        thd->exception_handler_stack = &c;
        return_closcall1(data, k, &c);  }
static void __lambda_730(void *data, object _, int argc, object *args) /* closure _,object k_736145, object handler_731153_733479, object thunk_731154_733480 */
 {
object k_736145 = args[0]; object handler_731153_733479 = args[1]; object thunk_731154_733480 = args[2];
  Cyc_st_add(data, "scheme/base.sld:with-exception-handler");

closureN_type c_7321362;
object e_7321394 [2];
c_7321362.hdr.mark = gc_color_red;
 c_7321362.hdr.grayed = 0;
c_7321362.tag = closureN_tag;
 c_7321362.fn = (function_type)__lambda_731;
c_7321362.num_args = 1;
c_7321362.num_elements = 2;
c_7321362.elements = (object *)e_7321394;
c_7321362.elements[0] = k_736145;
c_7321362.elements[1] = thunk_731154_733480;


closureN_type c_7321395;
object e_7321439 [1];
c_7321395.hdr.mark = gc_color_red;
 c_7321395.hdr.grayed = 0;
c_7321395.tag = closureN_tag;
 c_7321395.fn = (function_type)__lambda_737;
c_7321395.num_args = 1;
c_7321395.num_elements = 1;
c_7321395.elements = (object *)e_7321439;
c_7321395.elements[0] = handler_731153_733479;

return_direct_with_clo1(data,(closure)&c_7321362,__lambda_731,  &c_7321395);; 
}

static void __lambda_737(void *data, object self_7313726, int argc, object *args) /* object self_7313726, object k_736151, object obj_731157_733483 */
 {
 object k_736151 = args[0]; object obj_731157_733483 = args[1];
  object r_736152;
    
if( (boolean_f != Cyc_is_pair(obj_731157_733483)) ){ 
  
  
  r_736152 = equalp(Cyc_car(data, obj_731157_733483), quote_continuable);
} else { 
  r_736152 = boolean_f;}
;
closureN_type c_7321406;
object e_7321438 [3];
c_7321406.hdr.mark = gc_color_red;
 c_7321406.hdr.grayed = 0;
c_7321406.tag = closureN_tag;
 c_7321406.fn = (function_type)__lambda_738;
c_7321406.num_args = 2;
c_7321406.num_elements = 3;
c_7321406.elements = (object *)e_7321438;
c_7321406.elements[0] = ((closureN)self_7313726)->elements[0];
c_7321406.elements[1] = k_736151;
c_7321406.elements[2] = obj_731157_733483;

return_direct_with_clo2(data,(closure)&c_7321406,__lambda_738,  boolean_f, r_736152);; 
}

static void __lambda_738(void *data, object self_7313727, int argc, object *args) /* object self_7313727, object result_731158_733484, object continuable_127_731159_733485 */
 {
 object result_731158_733484 = args[0]; object continuable_127_731159_733485 = args[1];
  
closureN_type c_7321408;
object e_7321434 [4];
c_7321408.hdr.mark = gc_color_red;
 c_7321408.hdr.grayed = 0;
c_7321408.tag = closureN_tag;
 c_7321408.fn = (function_type)__lambda_1420;
c_7321408.num_args = 1;
c_7321408.num_elements = 4;
c_7321408.elements = (object *)e_7321434;
c_7321408.elements[0] = continuable_127_731159_733485;
c_7321408.elements[1] = ((closureN)self_7313727)->elements[0];
c_7321408.elements[2] = ((closureN)self_7313727)->elements[1];
c_7321408.elements[3] = ((closureN)self_7313727)->elements[2];


pair_type local_7321437; 
return_direct_with_clo1(data,(closure)&c_7321408,__lambda_1420,  set_cell_as_expr(&local_7321437, result_731158_733484));; 
}

static void __lambda_1420(void *data, object self_7313728, int argc, object *args) /* object self_7313728, object result_731158_733484 */
 {
 object result_731158_733484 = args[0];
  
closureN_type c_7321410;
object e_7321433 [5];
c_7321410.hdr.mark = gc_color_red;
 c_7321410.hdr.grayed = 0;
c_7321410.tag = closureN_tag;
 c_7321410.fn = (function_type)__lambda_739;
c_7321410.num_args = 1;
c_7321410.num_elements = 5;
c_7321410.elements = (object *)e_7321433;
c_7321410.elements[0] = ((closureN)self_7313728)->elements[0];
c_7321410.elements[1] = ((closureN)self_7313728)->elements[1];
c_7321410.elements[2] = ((closureN)self_7313728)->elements[2];
c_7321410.elements[3] = ((closureN)self_7313728)->elements[3];
c_7321410.elements[4] = result_731158_733484;

return_direct_with_clo1(data,  __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn),  &c_7321410);; 
}

static void __lambda_739(void *data, object self_7313729, int argc, object *args) /* object self_7313729, object r_736153 */
 {

  
closureN_type c_7321413;
object e_7321429 [3];
c_7321413.hdr.mark = gc_color_red;
 c_7321413.hdr.grayed = 0;
c_7321413.tag = closureN_tag;
 c_7321413.fn = (function_type)__lambda_740;
c_7321413.num_args = 1;
c_7321413.num_elements = 3;
c_7321413.elements = (object *)e_7321429;
c_7321413.elements[0] = ((closureN)self_7313729)->elements[0];
c_7321413.elements[1] = ((closureN)self_7313729)->elements[2];
c_7321413.elements[2] = ((closureN)self_7313729)->elements[4];



return_closcall2(data,  ((closureN)self_7313729)->elements[1],  &c_7321413, Cyc_cdr(data, ((closureN)self_7313729)->elements[3]));; 
}

static void __lambda_740(void *data, object self_7313730, int argc, object *args) /* object self_7313730, object r_736155 */
 {
 object r_736155 = args[0];
  
closureN_type c_7321415;
object e_7321425 [3];
c_7321415.hdr.mark = gc_color_red;
 c_7321415.hdr.grayed = 0;
c_7321415.tag = closureN_tag;
 c_7321415.fn = (function_type)__lambda_741;
c_7321415.num_args = 1;
c_7321415.num_elements = 3;
c_7321415.elements = (object *)e_7321425;
c_7321415.elements[0] = ((closureN)self_7313730)->elements[0];
c_7321415.elements[1] = ((closureN)self_7313730)->elements[1];
c_7321415.elements[2] = ((closureN)self_7313730)->elements[2];



return_direct_with_clo1(data,(closure)&c_7321415,__lambda_741,  Cyc_set_cell(data, ((closureN)self_7313730)->elements[2], r_736155));; 
}

static void __lambda_741(void *data, object self_7313731, int argc, object *args) /* object self_7313731, object r_736154 */
 {

  if( (boolean_f != ((closureN)self_7313731)->elements[0]) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_7313731)->elements[1], (((closure)  ((closureN)self_7313731)->elements[1])->fn),  car(((closureN)self_7313731)->elements[2]));
} else { 
  
make_utf8_string_with_len(c_7321424, "exception handler returned", 26, 26);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7313731)->elements[1], &c_7321424);}
;; 
}

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

return_direct_with_clo2(data,(closure)&c_7321364,__lambda_732,  boolean_f, r_736146);; 
}

static void __lambda_732(void *data, object self_7313733, int argc, object *args) /* object self_7313733, object result_731155_733481, object my_91handler_731156_733482 */
 {
 object result_731155_733481 = args[0]; object my_91handler_731156_733482 = args[1];
  
closureN_type c_7321366;
object e_7321389 [3];
c_7321366.hdr.mark = gc_color_red;
 c_7321366.hdr.grayed = 0;
c_7321366.tag = closureN_tag;
 c_7321366.fn = (function_type)__lambda_1419;
c_7321366.num_args = 1;
c_7321366.num_elements = 3;
c_7321366.elements = (object *)e_7321389;
c_7321366.elements[0] = ((closureN)self_7313733)->elements[0];
c_7321366.elements[1] = my_91handler_731156_733482;
c_7321366.elements[2] = ((closureN)self_7313733)->elements[1];


pair_type local_7321392; 
return_direct_with_clo1(data,(closure)&c_7321366,__lambda_1419,  set_cell_as_expr(&local_7321392, result_731155_733481));; 
}

static void __lambda_1419(void *data, object self_7313734, int argc, object *args) /* object self_7313734, object result_731155_733481 */
 {
 object result_731155_733481 = args[0];
  
closureN_type c_7321368;
object e_7321387 [3];
c_7321368.hdr.mark = gc_color_red;
 c_7321368.hdr.grayed = 0;
c_7321368.tag = closureN_tag;
 c_7321368.fn = (function_type)__lambda_733;
c_7321368.num_args = 1;
c_7321368.num_elements = 3;
c_7321368.elements = (object *)e_7321387;
c_7321368.elements[0] = ((closureN)self_7313734)->elements[0];
c_7321368.elements[1] = result_731155_733481;
c_7321368.elements[2] = ((closureN)self_7313734)->elements[2];

return_direct_with_clo2(data,  __glo_Cyc_91add_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91add_91exception_91handler_scheme_base)->fn),  &c_7321368, ((closureN)self_7313734)->elements[1]);; 
}

static void __lambda_733(void *data, object self_7313735, int argc, object *args) /* object self_7313735, object r_736147 */
 {

  
closureN_type c_7321371;
object e_7321386 [2];
c_7321371.hdr.mark = gc_color_red;
 c_7321371.hdr.grayed = 0;
c_7321371.tag = closureN_tag;
 c_7321371.fn = (function_type)__lambda_734;
c_7321371.num_args = 1;
c_7321371.num_elements = 2;
c_7321371.elements = (object *)e_7321386;
c_7321371.elements[0] = ((closureN)self_7313735)->elements[0];
c_7321371.elements[1] = ((closureN)self_7313735)->elements[1];

return_closcall1(data,  ((closureN)self_7313735)->elements[2],  &c_7321371);; 
}

static void __lambda_734(void *data, object self_7313736, int argc, object *args) /* object self_7313736, object r_736150 */
 {
 object r_736150 = args[0];
  
closureN_type c_7321373;
object e_7321382 [2];
c_7321373.hdr.mark = gc_color_red;
 c_7321373.hdr.grayed = 0;
c_7321373.tag = closureN_tag;
 c_7321373.fn = (function_type)__lambda_735;
c_7321373.num_args = 1;
c_7321373.num_elements = 2;
c_7321373.elements = (object *)e_7321382;
c_7321373.elements[0] = ((closureN)self_7313736)->elements[0];
c_7321373.elements[1] = ((closureN)self_7313736)->elements[1];



return_direct_with_clo1(data,(closure)&c_7321373,__lambda_735,  Cyc_set_cell(data, ((closureN)self_7313736)->elements[1], r_736150));; 
}

static void __lambda_735(void *data, object self_7313737, int argc, object *args) /* object self_7313737, object r_736148 */
 {

  
closureN_type c_7321375;
object e_7321381 [2];
c_7321375.hdr.mark = gc_color_red;
 c_7321375.hdr.grayed = 0;
c_7321375.tag = closureN_tag;
 c_7321375.fn = (function_type)__lambda_736;
c_7321375.num_args = 1;
c_7321375.num_elements = 2;
c_7321375.elements = (object *)e_7321381;
c_7321375.elements[0] = ((closureN)self_7313737)->elements[0];
c_7321375.elements[1] = ((closureN)self_7313737)->elements[1];

return_direct_with_clo1(data,  __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn),  &c_7321375);; 
}

static void __lambda_736(void *data, object self_7313738, int argc, object *args) /* object self_7313738, object r_736149 */
 {

  

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

static void __lambda_729(void *data, object _, int argc, object *args) /* closure _,object k_736104, object exp_731147_733476, object rename_731148_733477, object compare_731149_733478 */
 {
object k_736104 = args[0]; object exp_731147_733476 = args[1];
  Cyc_st_add(data, "scheme/base.sld:with-handler");

pair_type local_7321301; 

pair_type local_7321304; 

pair_type local_7321307; 

pair_type local_7321310; 

pair_type local_7321313; 

pair_type local_7321316; 

pair_type local_7321319; 

pair_type local_7321322; 

pair_type local_7321325; 

pair_type local_7321328; 

pair_type local_7321331; 

pair_type local_7321334; 

pair_type local_7321337; 

pair_type local_7321340; 

pair_type local_7321343; 



pair_type local_7321348; 

pair_type local_7321351; 

pair_type local_7321354; 

pair_type local_7321357; 


return_direct_with_clo1(data,  k_736104, (((closure)  k_736104)->fn),  set_pair_as_expr(&local_7321301, quote_call_95cc, set_pair_as_expr(&local_7321304, set_pair_as_expr(&local_7321307, quote_lambda, set_pair_as_expr(&local_7321310, set_pair_as_expr(&local_7321313, quote_k, NULL), set_pair_as_expr(&local_7321316, set_pair_as_expr(&local_7321319, quote_with_91exception_91handler, set_pair_as_expr(&local_7321322, set_pair_as_expr(&local_7321325, quote_lambda, set_pair_as_expr(&local_7321328, set_pair_as_expr(&local_7321331, quote_obj, NULL), set_pair_as_expr(&local_7321334, set_pair_as_expr(&local_7321337, quote_k, set_pair_as_expr(&local_7321340, set_pair_as_expr(&local_7321343, Cyc_cadr(data, exp_731147_733476), set_pair_as_expr(&local_7321348, quote_obj, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7321351, set_pair_as_expr(&local_7321354, quote_lambda, set_pair_as_expr(&local_7321357, NULL, Cyc_cddr(data, exp_731147_733476))), NULL))), NULL))), NULL)));; 
}

static void __lambda_728(void *data, object _, int argc, object *args) /* closure _,object k_736095, object obj_731146_733475 */
 {
object k_736095 = args[0]; object obj_731146_733475 = args[1];
  object r_736099;
  Cyc_st_add(data, "scheme/base.sld:raise-continuable");
  
if( (boolean_f != Cyc_is_pair(obj_731146_733475)) ){ 
  r_736099 = obj_731146_733475;
} else { 
  object local_7321290 = alloca(sizeof(pair_type)); 
  r_736099 = set_cell_as_expr(local_7321290, obj_731146_733475);}
;


pair_type local_7321296; 
return_closcall2(data,  Cyc_current_exception_handler(data),  k_736095, set_pair_as_expr(&local_7321296, quote_continuable, r_736099));; 
}

static void __lambda_727(void *data, object _, int argc, object *args) /* closure _,object k_736086, object obj_731145_733474 */
 {
object k_736086 = args[0]; object obj_731145_733474 = args[1];
  object r_736090;
  Cyc_st_add(data, "scheme/base.sld:raise");
  
if( (boolean_f != Cyc_is_pair(obj_731145_733474)) ){ 
  r_736090 = obj_731145_733474;
} else { 
  object local_7321275 = alloca(sizeof(pair_type)); 
  r_736090 = set_cell_as_expr(local_7321275, obj_731145_733474);}
;


pair_type local_7321281; 
return_closcall2(data,  Cyc_current_exception_handler(data),  k_736086, set_pair_as_expr(&local_7321281, quote_raised, r_736090));; 
}

static void __lambda_726(void *data, object _, int argc, object *args) /* closure _,object k_736082, object msg_731143_733472, object args_731144_733473_raw, ... */
 {
object k_736082 = args[0]; object msg_731143_733472 = args[1];
load_varargs(args_731144_733473, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:error");

pair_type local_7321266; 
return_direct_with_clo2(data,  __glo_raise_scheme_base, (((closure)  __glo_raise_scheme_base)->fn),  k_736082, set_pair_as_expr(&local_7321266, msg_731143_733472, args_731144_733473));; 
}

static void __lambda_725(void *data, object _, int argc, object *args) /* closure _,object k_736073, object x_731141_733471 */
 {
object k_736073 = args[0]; object x_731141_733471 = args[1];
  Cyc_st_add(data, "scheme/base.sld:error-object?");
  
if( (boolean_f != Cyc_is_pair(x_731141_733471)) ){ 
  



return_direct_with_clo1(data,  k_736073, (((closure)  k_736073)->fn),  Cyc_is_string(Cyc_car(data, x_731141_733471)));
} else { 
  return_direct_with_clo1(data,  k_736073, (((closure)  k_736073)->fn),  boolean_f);}
;; 
}

static void __lambda_707(void *data, object _, int argc, object *args) /* closure _,object k_736037, object init_731114_733461, object o_731115_733462_raw, ... */
 {
object k_736037 = args[0]; object init_731114_733461 = args[1];
load_varargs(o_731115_733462, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:make-parameter");

closureN_type c_7321125;
object e_7321136 [1];
c_7321125.hdr.mark = gc_color_red;
 c_7321125.hdr.grayed = 0;
c_7321125.tag = closureN_tag;
 c_7321125.fn = (function_type)__lambda_708;
c_7321125.num_args = 0;
c_7321125.num_elements = 1;
c_7321125.elements = (object *)e_7321136;
c_7321125.elements[0] = o_731115_733462;


closureN_type c_7321137;
object e_7321252 [2];
c_7321137.hdr.mark = gc_color_red;
 c_7321137.hdr.grayed = 0;
c_7321137.tag = closureN_tag;
 c_7321137.fn = (function_type)__lambda_710;
c_7321137.num_args = 1;
c_7321137.num_elements = 2;
c_7321137.elements = (object *)e_7321252;
c_7321137.elements[0] = init_731114_733461;
c_7321137.elements[1] = k_736037;

return_direct_with_clo1(data,(closure)&c_7321125,__lambda_708,  &c_7321137);; 
}

static void __lambda_710(void *data, object self_7313708, int argc, object *args) /* object self_7313708, object converter_731118_733463 */
 {
 object converter_731118_733463 = args[0];
  
closureN_type c_7321139;
object e_7321250 [2];
c_7321139.hdr.mark = gc_color_red;
 c_7321139.hdr.grayed = 0;
c_7321139.tag = closureN_tag;
 c_7321139.fn = (function_type)__lambda_711;
c_7321139.num_args = 1;
c_7321139.num_elements = 2;
c_7321139.elements = (object *)e_7321250;
c_7321139.elements[0] = converter_731118_733463;
c_7321139.elements[1] = ((closureN)self_7313708)->elements[1];

return_closcall2(data,  converter_731118_733463,  &c_7321139, ((closureN)self_7313708)->elements[0]);; 
}

static void __lambda_711(void *data, object self_7313709, int argc, object *args) /* object self_7313709, object value_731121_733464 */
 {
 object value_731121_733464 = args[0];
  
closureN_type c_7321141;
object e_7321249 [3];
c_7321141.hdr.mark = gc_color_red;
 c_7321141.hdr.grayed = 0;
c_7321141.tag = closureN_tag;
 c_7321141.fn = (function_type)__lambda_712;
c_7321141.num_args = 1;
c_7321141.num_elements = 3;
c_7321141.elements = (object *)e_7321249;
c_7321141.elements[0] = ((closureN)self_7313709)->elements[0];
c_7321141.elements[1] = ((closureN)self_7313709)->elements[1];
c_7321141.elements[2] = value_731121_733464;

return_direct_with_clo1(data,(closure)&c_7321141,__lambda_712,  boolean_f);; 
}

static void __lambda_712(void *data, object self_7313710, int argc, object *args) /* object self_7313710, object key_731124_733465 */
 {
 object key_731124_733465 = args[0];
  
closureN_type c_7321143;
object e_7321245 [3];
c_7321143.hdr.mark = gc_color_red;
 c_7321143.hdr.grayed = 0;
c_7321143.tag = closureN_tag;
 c_7321143.fn = (function_type)__lambda_1418;
c_7321143.num_args = 1;
c_7321143.num_elements = 3;
c_7321143.elements = (object *)e_7321245;
c_7321143.elements[0] = ((closureN)self_7313710)->elements[0];
c_7321143.elements[1] = ((closureN)self_7313710)->elements[1];
c_7321143.elements[2] = ((closureN)self_7313710)->elements[2];


pair_type local_7321248; 
return_direct_with_clo1(data,(closure)&c_7321143,__lambda_1418,  set_cell_as_expr(&local_7321248, key_731124_733465));; 
}

static void __lambda_1418(void *data, object self_7313711, int argc, object *args) /* object self_7313711, object key_731124_733465 */
 {
 object key_731124_733465 = args[0];
  
closureN_type c_7321145;
object e_7321242 [4];
c_7321145.hdr.mark = gc_color_red;
 c_7321145.hdr.grayed = 0;
c_7321145.tag = closureN_tag;
 c_7321145.fn = (function_type)__lambda_713;
c_7321145.num_args = 1;
c_7321145.num_elements = 4;
c_7321145.elements = (object *)e_7321242;
c_7321145.elements[0] = ((closureN)self_7313711)->elements[0];
c_7321145.elements[1] = ((closureN)self_7313711)->elements[1];
c_7321145.elements[2] = key_731124_733465;
c_7321145.elements[3] = ((closureN)self_7313711)->elements[2];



return_direct_with_clo1(data,(closure)&c_7321145,__lambda_713,  Cyc_set_cell(data, key_731124_733465, __glo__85parameter_91id_85_scheme_base));; 
}

static void __lambda_713(void *data, object self_7313712, int argc, object *args) /* object self_7313712, object r_736040 */
 {

  
closureN_type c_7321147;
object e_7321238 [4];
c_7321147.hdr.mark = gc_color_red;
 c_7321147.hdr.grayed = 0;
c_7321147.tag = closureN_tag;
 c_7321147.fn = (function_type)__lambda_714;
c_7321147.num_args = 1;
c_7321147.num_elements = 4;
c_7321147.elements = (object *)e_7321238;
c_7321147.elements[0] = ((closureN)self_7313712)->elements[0];
c_7321147.elements[1] = ((closureN)self_7313712)->elements[1];
c_7321147.elements[2] = ((closureN)self_7313712)->elements[2];
c_7321147.elements[3] = ((closureN)self_7313712)->elements[3];


complex_num_type local_7321241; 
return_direct_with_clo1(data,(closure)&c_7321147,__lambda_714,  Cyc_fast_sum(data,&local_7321241, __glo__85parameter_91id_85_scheme_base, obj_int2obj(1)));; 
}

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


object c_7321237 = global_set_cps_id(data,(closure)&c_7321149,"__glo__85parameter_91id_85_scheme_base", __glo__85parameter_91id_85_scheme_base, r_736061);
return_closcall1(data,(closure)&c_7321149,  c_7321237);; 
}

static void __lambda_715(void *data, object self_7313714, int argc, object *args) /* object self_7313714, object r_736041 */
 {

  
closureN_type c_7321151;
object e_7321226 [3];
c_7321151.hdr.mark = gc_color_red;
 c_7321151.hdr.grayed = 0;
c_7321151.tag = closureN_tag;
 c_7321151.fn = (function_type)__lambda_716;
c_7321151.num_args = 1;
c_7321151.num_elements = 3;
c_7321151.elements = (object *)e_7321226;
c_7321151.elements[0] = ((closureN)self_7313714)->elements[0];
c_7321151.elements[1] = ((closureN)self_7313714)->elements[1];
c_7321151.elements[2] = ((closureN)self_7313714)->elements[2];


pair_type local_7321229; 


return_direct_with_clo2(data,  __glo_set_91param_91obj_67_scheme_base, (((closure)  __glo_set_91param_91obj_67_scheme_base)->fn),  &c_7321151, set_pair_as_expr(&local_7321229, car(((closureN)self_7313714)->elements[2]), ((closureN)self_7313714)->elements[3]));; 
}

static void __lambda_716(void *data, object self_7313715, int argc, object *args) /* object self_7313715, object r_736042 */
 {

  
closureN_type c_7321154;
object e_7321225 [2];
c_7321154.hdr.mark = gc_color_red;
 c_7321154.hdr.grayed = 0;
c_7321154.tag = closureN_tag;
 c_7321154.fn = (function_type)__lambda_717;
c_7321154.num_args = 0;
c_7321154.num_elements = 2;
c_7321154.elements = (object *)e_7321225;
c_7321154.elements[0] = ((closureN)self_7313715)->elements[0];
c_7321154.elements[1] = ((closureN)self_7313715)->elements[2];

return_direct_with_clo1(data,  ((closureN)self_7313715)->elements[1], (((closure)  ((closureN)self_7313715)->elements[1])->fn),  &c_7321154);; 
}

static void __lambda_717(void *data, object self_7313716, int argc, object *args) /* object self_7313716, object k_736043, object args_731126_733466_raw, ... */
 {
 object k_736043 = args[0];
load_varargs(args_731126_733466, args, 1, argc - 1);
    
if( (boolean_f != Cyc_is_null(args_731126_733466)) ){ 
  
closureN_type c_7321158;
object e_7321171 [2];
c_7321158.hdr.mark = gc_color_red;
 c_7321158.hdr.grayed = 0;
c_7321158.tag = closureN_tag;
 c_7321158.fn = (function_type)__lambda_718;
c_7321158.num_args = 1;
c_7321158.num_elements = 2;
c_7321158.elements = (object *)e_7321171;
c_7321158.elements[0] = k_736043;
c_7321158.elements[1] = ((closureN)self_7313716)->elements[1];

return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7321158);
} else { 
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, args_731126_733466), quote__121param_91set_67_125)) ){ 
  
closureN_type c_7321177;
object e_7321194 [3];
c_7321177.hdr.mark = gc_color_red;
 c_7321177.hdr.grayed = 0;
c_7321177.tag = closureN_tag;
 c_7321177.fn = (function_type)__lambda_720;
c_7321177.num_args = 1;
c_7321177.num_elements = 3;
c_7321177.elements = (object *)e_7321194;
c_7321177.elements[0] = args_731126_733466;
c_7321177.elements[1] = k_736043;
c_7321177.elements[2] = ((closureN)self_7313716)->elements[1];

return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7321177);
} else { 
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, args_731126_733466), quote__121param_91convert_125)) ){ 
  return_direct_with_clo1(data,  k_736043, (((closure)  k_736043)->fn),  ((closureN)self_7313716)->elements[0]);
} else { 
  
closureN_type c_7321202;
object e_7321224 [4];
c_7321202.hdr.mark = gc_color_red;
 c_7321202.hdr.grayed = 0;
c_7321202.tag = closureN_tag;
 c_7321202.fn = (function_type)__lambda_722;
c_7321202.num_args = 1;
c_7321202.num_elements = 4;
c_7321202.elements = (object *)e_7321224;
c_7321202.elements[0] = args_731126_733466;
c_7321202.elements[1] = ((closureN)self_7313716)->elements[0];
c_7321202.elements[2] = k_736043;
c_7321202.elements[3] = ((closureN)self_7313716)->elements[1];

return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7321202);}
;}
;}
;; 
}

static void __lambda_722(void *data, object self_7313721, int argc, object *args) /* object self_7313721, object r_736055 */
 {
 object r_736055 = args[0];
  
closureN_type c_7321204;
object e_7321218 [3];
c_7321204.hdr.mark = gc_color_red;
 c_7321204.hdr.grayed = 0;
c_7321204.tag = closureN_tag;
 c_7321204.fn = (function_type)__lambda_723;
c_7321204.num_args = 1;
c_7321204.num_elements = 3;
c_7321204.elements = (object *)e_7321218;
c_7321204.elements[0] = ((closureN)self_7313721)->elements[0];
c_7321204.elements[1] = ((closureN)self_7313721)->elements[1];
c_7321204.elements[2] = ((closureN)self_7313721)->elements[2];





return_direct_with_clo1(data,(closure)&c_7321204,__lambda_723,  assoc(data, car(((closureN)self_7313721)->elements[3]), r_736055));; 
}

static void __lambda_723(void *data, object self_7313722, int argc, object *args) /* object self_7313722, object cell_731139_733469 */
 {
 object cell_731139_733469 = args[0];
  
closureN_type c_7321207;
object e_7321214 [2];
c_7321207.hdr.mark = gc_color_red;
 c_7321207.hdr.grayed = 0;
c_7321207.tag = closureN_tag;
 c_7321207.fn = (function_type)__lambda_724;
c_7321207.num_args = 1;
c_7321207.num_elements = 2;
c_7321207.elements = (object *)e_7321214;
c_7321207.elements[0] = cell_731139_733469;
c_7321207.elements[1] = ((closureN)self_7313722)->elements[2];



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

static void __lambda_724(void *data, object self_7313723, int argc, object *args) /* object self_7313723, object r_736053 */
 {
 object r_736053 = args[0];
  
object c_7321212 = Cyc_set_cdr_cps(data,  ((closureN)self_7313723)->elements[1],((closureN)self_7313723)->elements[0], r_736053);
return_direct_with_clo1(data,  ((closureN)self_7313723)->elements[1], (((closure)  ((closureN)self_7313723)->elements[1])->fn),  c_7321212);; 
}

static void __lambda_720(void *data, object self_7313719, int argc, object *args) /* object self_7313719, object r_736050 */
 {
 object r_736050 = args[0];
  
closureN_type c_7321179;
object e_7321188 [2];
c_7321179.hdr.mark = gc_color_red;
 c_7321179.hdr.grayed = 0;
c_7321179.tag = closureN_tag;
 c_7321179.fn = (function_type)__lambda_721;
c_7321179.num_args = 1;
c_7321179.num_elements = 2;
c_7321179.elements = (object *)e_7321188;
c_7321179.elements[0] = ((closureN)self_7313719)->elements[0];
c_7321179.elements[1] = ((closureN)self_7313719)->elements[1];





return_direct_with_clo1(data,(closure)&c_7321179,__lambda_721,  assoc(data, car(((closureN)self_7313719)->elements[2]), r_736050));; 
}

static void __lambda_721(void *data, object self_7313720, int argc, object *args) /* object self_7313720, object cell_731134_733468 */
 {
 object cell_731134_733468 = args[0];
  


object c_7321184 = Cyc_set_cdr_cps(data,  ((closureN)self_7313720)->elements[1],cell_731134_733468, Cyc_cadr(data, ((closureN)self_7313720)->elements[0]));
return_direct_with_clo1(data,  ((closureN)self_7313720)->elements[1], (((closure)  ((closureN)self_7313720)->elements[1])->fn),  c_7321184);; 
}

static void __lambda_718(void *data, object self_7313717, int argc, object *args) /* object self_7313717, object pobj_731130_733467 */
 {
 object pobj_731130_733467 = args[0];
  
closureN_type c_7321160;
object e_7321165 [1];
c_7321160.hdr.mark = gc_color_red;
 c_7321160.hdr.grayed = 0;
c_7321160.tag = closureN_tag;
 c_7321160.fn = (function_type)__lambda_719;
c_7321160.num_args = 1;
c_7321160.num_elements = 1;
c_7321160.elements = (object *)e_7321165;
c_7321160.elements[0] = ((closureN)self_7313717)->elements[0];





return_direct_with_clo1(data,(closure)&c_7321160,__lambda_719,  assoc(data, car(((closureN)self_7313717)->elements[1]), pobj_731130_733467));; 
}

static void __lambda_719(void *data, object self_7313718, int argc, object *args) /* object self_7313718, object r_736046 */
 {
 object r_736046 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_7313718)->elements[0], (((closure)  ((closureN)self_7313718)->elements[0])->fn),  Cyc_cdr(data, r_736046));; 
}

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

return_direct_with_clo1(data,  k_736062,__lambda_710,  Cyc_car(data, ((closureN)self_7313724)->elements[0]));
} else { 
  
mclosure0(c_7321134, (function_type)__lambda_709);c_7321134.num_args = 1;
return_direct_with_clo1(data,  k_736062,__lambda_710,  &c_7321134);}
;; 
}

static void __lambda_709(void *data, object self_7313725, int argc, object *args) /* object self_7313725, object k_736064, object x_731140_733470 */
 {
 object k_736064 = args[0]; object x_731140_733470 = args[1];
  return_direct_with_clo1(data,  k_736064, (((closure)  k_736064)->fn),  x_731140_733470);; 
}

static void __lambda_1465(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; gc_thread_data *thd = (gc_thread_data *)data;
        make_pair(c, obj, thd->param_objs);
        thd->param_objs = &c;
        return_closcall1(data, k, &c);  }
static void __lambda_1464(void *data, object _, int argc, object *args) {object k = args[0]; gc_thread_data *thd = (gc_thread_data *)data;
        //Cyc_st_add(data, "scheme/base.sld:get-param-objs");
        return_closcall1(data, k, thd->param_objs);  }
static void __lambda_636(void *data, object _, int argc, object *args) /* closure _,object k_735723, object expr_73790_73856_731007_733354, object rename_73791_73857_731008_733355, object compare_73792_73858_731009_733356 */
 {
object k_735723 = args[0]; object expr_73790_73856_731007_733354 = args[1]; object rename_73791_73857_731008_733355 = args[2];
  Cyc_st_add(data, "scheme/base.sld:parameterize");

closureN_type c_7320172;
object e_7321118 [3];
c_7320172.hdr.mark = gc_color_red;
 c_7320172.hdr.grayed = 0;
c_7320172.tag = closureN_tag;
 c_7320172.fn = (function_type)__lambda_637;
c_7320172.num_args = 1;
c_7320172.num_elements = 3;
c_7320172.elements = (object *)e_7321118;
c_7320172.elements[0] = expr_73790_73856_731007_733354;
c_7320172.elements[1] = k_735723;
c_7320172.elements[2] = rename_73791_73857_731008_733355;



return_direct_with_clo1(data,(closure)&c_7320172,__lambda_637,  Cyc_cdr(data, expr_73790_73856_731007_733354));; 
}

static void __lambda_637(void *data, object self_7313636, int argc, object *args) /* object self_7313636, object v_931_73798_73933_731057_733404 */
 {
 object v_931_73798_73933_731057_733404 = args[0];
  
closureN_type c_7320174;
object e_7320699 [2];
c_7320174.hdr.mark = gc_color_red;
 c_7320174.hdr.grayed = 0;
c_7320174.tag = closureN_tag;
 c_7320174.fn = (function_type)__lambda_638;
c_7320174.num_args = 0;
c_7320174.num_elements = 2;
c_7320174.elements = (object *)e_7320699;
c_7320174.elements[0] = ((closureN)self_7313636)->elements[2];
c_7320174.elements[1] = v_931_73798_73933_731057_733404;


closureN_type c_7320700;
object e_7321117 [3];
c_7320700.hdr.mark = gc_color_red;
 c_7320700.hdr.grayed = 0;
c_7320700.tag = closureN_tag;
 c_7320700.fn = (function_type)__lambda_681;
c_7320700.num_args = 1;
c_7320700.num_elements = 3;
c_7320700.elements = (object *)e_7321117;
c_7320700.elements[0] = ((closureN)self_7313636)->elements[0];
c_7320700.elements[1] = ((closureN)self_7313636)->elements[1];
c_7320700.elements[2] = ((closureN)self_7313636)->elements[2];

return_direct_with_clo1(data,(closure)&c_7320174,__lambda_638,  &c_7320700);; 
}

static void __lambda_681(void *data, object self_7313637, int argc, object *args) /* object self_7313637, object tmp_73860_73862_731010_733357 */
 {
 object tmp_73860_73862_731010_733357 = args[0];
  
closureN_type c_7320702;
object e_7321110 [3];
c_7320702.hdr.mark = gc_color_red;
 c_7320702.hdr.grayed = 0;
c_7320702.tag = closureN_tag;
 c_7320702.fn = (function_type)__lambda_682;
c_7320702.num_args = 0;
c_7320702.num_elements = 3;
c_7320702.elements = (object *)e_7321110;
c_7320702.elements[0] = ((closureN)self_7313637)->elements[0];
c_7320702.elements[1] = ((closureN)self_7313637)->elements[2];
c_7320702.elements[2] = tmp_73860_73862_731010_733357;


closureN_type c_7321111;
object e_7321116 [1];
c_7321111.hdr.mark = gc_color_red;
 c_7321111.hdr.grayed = 0;
c_7321111.tag = closureN_tag;
 c_7321111.fn = (function_type)__lambda_706;
c_7321111.num_args = 1;
c_7321111.num_elements = 1;
c_7321111.elements = (object *)e_7321116;
c_7321111.elements[0] = ((closureN)self_7313637)->elements[1];

return_direct_with_clo1(data,(closure)&c_7320702,__lambda_682,  &c_7321111);; 
}

static void __lambda_706(void *data, object self_7313638, int argc, object *args) /* object self_7313638, object r_735724 */
 {
 object r_735724 = args[0];
  

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

static void __lambda_682(void *data, object self_7313639, int argc, object *args) /* object self_7313639, object k_735726 */
 {
 object k_735726 = args[0];
  if( (boolean_f != ((closureN)self_7313639)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_735726, (((closure)  k_735726)->fn),  ((closureN)self_7313639)->elements[2]);
} else { 
  
closureN_type c_7320707;
object e_7321106 [3];
c_7320707.hdr.mark = gc_color_red;
 c_7320707.hdr.grayed = 0;
c_7320707.tag = closureN_tag;
 c_7320707.fn = (function_type)__lambda_683;
c_7320707.num_args = 1;
c_7320707.num_elements = 3;
c_7320707.elements = (object *)e_7321106;
c_7320707.elements[0] = ((closureN)self_7313639)->elements[0];
c_7320707.elements[1] = k_735726;
c_7320707.elements[2] = ((closureN)self_7313639)->elements[1];



return_direct_with_clo1(data,(closure)&c_7320707,__lambda_683,  Cyc_cdr(data, ((closureN)self_7313639)->elements[0]));}
;; 
}

static void __lambda_683(void *data, object self_7313640, int argc, object *args) /* object self_7313640, object v_9330_73827_73899_731035_733382 */
 {
 object v_9330_73827_73899_731035_733382 = args[0];
  
closureN_type c_7320709;
object e_7320933 [2];
c_7320709.hdr.mark = gc_color_red;
 c_7320709.hdr.grayed = 0;
c_7320709.tag = closureN_tag;
 c_7320709.fn = (function_type)__lambda_684;
c_7320709.num_args = 0;
c_7320709.num_elements = 2;
c_7320709.elements = (object *)e_7320933;
c_7320709.elements[0] = ((closureN)self_7313640)->elements[2];
c_7320709.elements[1] = v_9330_73827_73899_731035_733382;


closureN_type c_7320934;
object e_7321105 [3];
c_7320934.hdr.mark = gc_color_red;
 c_7320934.hdr.grayed = 0;
c_7320934.tag = closureN_tag;
 c_7320934.fn = (function_type)__lambda_689;
c_7320934.num_args = 1;
c_7320934.num_elements = 3;
c_7320934.elements = (object *)e_7321105;
c_7320934.elements[0] = ((closureN)self_7313640)->elements[0];
c_7320934.elements[1] = ((closureN)self_7313640)->elements[1];
c_7320934.elements[2] = ((closureN)self_7313640)->elements[2];

return_direct_with_clo1(data,(closure)&c_7320709,__lambda_684,  &c_7320934);; 
}

static void __lambda_689(void *data, object self_7313641, int argc, object *args) /* object self_7313641, object tmp_73864_73866_731011_733358 */
 {
 object tmp_73864_73866_731011_733358 = args[0];
  if( (boolean_f != tmp_73864_73866_731011_733358) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313641)->elements[1], (((closure)  ((closureN)self_7313641)->elements[1])->fn),  tmp_73864_73866_731011_733358);
} else { 
  
closureN_type c_7320938;
object e_7321101 [3];
c_7320938.hdr.mark = gc_color_red;
 c_7320938.hdr.grayed = 0;
c_7320938.tag = closureN_tag;
 c_7320938.fn = (function_type)__lambda_690;
c_7320938.num_args = 1;
c_7320938.num_elements = 3;
c_7320938.elements = (object *)e_7321101;
c_7320938.elements[0] = ((closureN)self_7313641)->elements[0];
c_7320938.elements[1] = ((closureN)self_7313641)->elements[1];
c_7320938.elements[2] = ((closureN)self_7313641)->elements[2];



return_direct_with_clo1(data,(closure)&c_7320938,__lambda_690,  Cyc_cdr(data, ((closureN)self_7313641)->elements[0]));}
;; 
}

static void __lambda_690(void *data, object self_7313642, int argc, object *args) /* object self_7313642, object v_9347_73844_73871_731013_733360 */
 {
 object v_9347_73844_73871_731013_733360 = args[0];
  
closureN_type c_7320940;
object e_7321086 [2];
c_7320940.hdr.mark = gc_color_red;
 c_7320940.hdr.grayed = 0;
c_7320940.tag = closureN_tag;
 c_7320940.fn = (function_type)__lambda_691;
c_7320940.num_args = 0;
c_7320940.num_elements = 2;
c_7320940.elements = (object *)e_7321086;
c_7320940.elements[0] = ((closureN)self_7313642)->elements[2];
c_7320940.elements[1] = v_9347_73844_73871_731013_733360;


closureN_type c_7321087;
object e_7321100 [2];
c_7321087.hdr.mark = gc_color_red;
 c_7321087.hdr.grayed = 0;
c_7321087.tag = closureN_tag;
 c_7321087.fn = (function_type)__lambda_704;
c_7321087.num_args = 1;
c_7321087.num_elements = 2;
c_7321087.elements = (object *)e_7321100;
c_7321087.elements[0] = ((closureN)self_7313642)->elements[0];
c_7321087.elements[1] = ((closureN)self_7313642)->elements[1];

return_direct_with_clo1(data,(closure)&c_7320940,__lambda_691,  &c_7321087);; 
}

static void __lambda_704(void *data, object self_7313643, int argc, object *args) /* object self_7313643, object tmp_73868_73870_731012_733359 */
 {
 object tmp_73868_73870_731012_733359 = args[0];
  if( (boolean_f != tmp_73868_73870_731012_733359) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313643)->elements[1], (((closure)  ((closureN)self_7313643)->elements[1])->fn),  tmp_73868_73870_731012_733359);
} else { 
  
closureN_type c_7321091;
object e_7321097 [1];
c_7321091.hdr.mark = gc_color_red;
 c_7321091.hdr.grayed = 0;
c_7321091.tag = closureN_tag;
 c_7321091.fn = (function_type)__lambda_705;
c_7321091.num_args = 1;
c_7321091.num_elements = 1;
c_7321091.elements = (object *)e_7321097;
c_7321091.elements[0] = ((closureN)self_7313643)->elements[1];


make_utf8_string_with_len(c_7321098, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7321091, &c_7321098, ((closureN)self_7313643)->elements[0]);}
;; 
}

static void __lambda_705(void *data, object self_7313644, int argc, object *args) /* object self_7313644, object r_735729 */
 {
 object r_735729 = args[0];
  
pair_type local_7321096; 
return_direct_with_clo1(data,  ((closureN)self_7313644)->elements[0], (((closure)  ((closureN)self_7313644)->elements[0])->fn),  set_pair_as_expr(&local_7321096, r_735729, boolean_f));; 
}

static void __lambda_691(void *data, object self_7313645, int argc, object *args) /* object self_7313645, object k_735731 */
 {
 object k_735731 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313645)->elements[1])) ){ 
  
closureN_type c_7320945;
object e_7321081 [3];
c_7320945.hdr.mark = gc_color_red;
 c_7320945.hdr.grayed = 0;
c_7320945.tag = closureN_tag;
 c_7320945.fn = (function_type)__lambda_692;
c_7320945.num_args = 3;
c_7320945.num_elements = 3;
c_7320945.elements = (object *)e_7321081;
c_7320945.elements[0] = k_735731;
c_7320945.elements[1] = ((closureN)self_7313645)->elements[0];
c_7320945.elements[2] = ((closureN)self_7313645)->elements[1];



return_direct_with_clo3(data,(closure)&c_7320945,__lambda_692,  Cyc_car(data, ((closureN)self_7313645)->elements[1]), NULL, NULL);
} else { 
  return_direct_with_clo1(data,  k_735731, (((closure)  k_735731)->fn),  boolean_f);}
;; 
}

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

return_direct_with_clo1(data,(closure)&c_7320947,__lambda_693,  boolean_f);; 
}

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


pair_type local_7321079; 
return_direct_with_clo1(data,(closure)&c_7320949,__lambda_1417,  set_cell_as_expr(&local_7321079, lp_9350_73847_73878_731018_733365));; 
}

static void __lambda_1417(void *data, object self_7313648, int argc, object *args) /* object self_7313648, object lp_9350_73847_73878_731018_733365 */
 {
 object lp_9350_73847_73878_731018_733365 = args[0];
  
closureN_type c_7320951;
object e_7320966 [5];
c_7320951.hdr.mark = gc_color_red;
 c_7320951.hdr.grayed = 0;
c_7320951.tag = closureN_tag;
 c_7320951.fn = (function_type)__lambda_694;
c_7320951.num_args = 1;
c_7320951.num_elements = 5;
c_7320951.elements = (object *)e_7320966;
c_7320951.elements[0] = ((closureN)self_7313648)->elements[0];
c_7320951.elements[1] = lp_9350_73847_73878_731018_733365;
c_7320951.elements[2] = ((closureN)self_7313648)->elements[1];
c_7320951.elements[3] = ((closureN)self_7313648)->elements[4];
c_7320951.elements[4] = ((closureN)self_7313648)->elements[5];


closureN_type c_7320967;
object e_7321075 [3];
c_7320967.hdr.mark = gc_color_red;
 c_7320967.hdr.grayed = 0;
c_7320967.tag = closureN_tag;
 c_7320967.fn = (function_type)__lambda_696;
c_7320967.num_args = 3;
c_7320967.num_elements = 3;
c_7320967.elements = (object *)e_7321075;
c_7320967.elements[0] = lp_9350_73847_73878_731018_733365;
c_7320967.elements[1] = ((closureN)self_7313648)->elements[2];
c_7320967.elements[2] = ((closureN)self_7313648)->elements[3];

return_direct_with_clo1(data,(closure)&c_7320951,__lambda_694,  &c_7320967);; 
}

static void __lambda_696(void *data, object self_7313649, int argc, object *args) /* object self_7313649, object k_735738, object w_9349_73846_73879_731019_733366, object param_91ls51_73848_73880_731020_733367, object value_91ls52_73849_73881_731021_733368 */
 {
 object k_735738 = args[0]; object w_9349_73846_73879_731019_733366 = args[1]; object param_91ls51_73848_73880_731020_733367 = args[2]; object value_91ls52_73849_73881_731021_733368 = args[3];
    
if( (boolean_f != Cyc_is_null(w_9349_73846_73879_731019_733366)) ){ 
  
closureN_type c_7320971;
object e_7321028 [4];
c_7320971.hdr.mark = gc_color_red;
 c_7320971.hdr.grayed = 0;
c_7320971.tag = closureN_tag;
 c_7320971.fn = (function_type)__lambda_697;
c_7320971.num_args = 1;
c_7320971.num_elements = 4;
c_7320971.elements = (object *)e_7321028;
c_7320971.elements[0] = k_735738;
c_7320971.elements[1] = ((closureN)self_7313649)->elements[1];
c_7320971.elements[2] = ((closureN)self_7313649)->elements[2];
c_7320971.elements[3] = value_91ls52_73849_73881_731021_733368;

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320971, primitive_cons, NULL, param_91ls51_73848_73880_731020_733367);
} else { 
    
if( (boolean_f != Cyc_is_pair(w_9349_73846_73879_731019_733366)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_9349_73846_73879_731019_733366))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733366)))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733366))))) ){ 
  




pair_type local_7321057; 





pair_type local_7321064; 






return_closcall4(data,  car(((closureN)self_7313649)->elements[0]),  k_735738, Cyc_cdr(data, w_9349_73846_73879_731019_733366), set_pair_as_expr(&local_7321057, Cyc_car(data, Cyc_car(data, w_9349_73846_73879_731019_733366)), param_91ls51_73848_73880_731020_733367), set_pair_as_expr(&local_7321064, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_9349_73846_73879_731019_733366))), value_91ls52_73849_73881_731021_733368));
} else { 
  return_direct_with_clo1(data,  k_735738, (((closure)  k_735738)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735738, (((closure)  k_735738)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735738, (((closure)  k_735738)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735738, (((closure)  k_735738)->fn),  boolean_f);}
;}
;; 
}

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

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320973, primitive_cons, NULL, ((closureN)self_7313650)->elements[3]);; 
}

static void __lambda_698(void *data, object self_7313651, int argc, object *args) /* object self_7313651, object r_735741_7312974_7312983 */
 {
 object r_735741_7312974_7312983 = args[0];
  
closureN_type c_7320975;
object e_7321024 [3];
c_7320975.hdr.mark = gc_color_red;
 c_7320975.hdr.grayed = 0;
c_7320975.tag = closureN_tag;
 c_7320975.fn = (function_type)__lambda_699;
c_7320975.num_args = 2;
c_7320975.num_elements = 3;
c_7320975.elements = (object *)e_7321024;
c_7320975.elements[0] = ((closureN)self_7313651)->elements[0];
c_7320975.elements[1] = ((closureN)self_7313651)->elements[2];
c_7320975.elements[2] = ((closureN)self_7313651)->elements[3];

return_direct_with_clo2(data,(closure)&c_7320975,__lambda_699,  ((closureN)self_7313651)->elements[1], r_735741_7312974_7312983);; 
}

static void __lambda_699(void *data, object self_7313652, int argc, object *args) /* object self_7313652, object param_73882_731022_733369_7312975_7312984, object value_73883_731023_733370_7312976_7312985 */
 {
 object param_73882_731022_733369_7312975_7312984 = args[0]; object value_73883_731023_733370_7312976_7312985 = args[1];
  
closureN_type c_7320978;
object e_7321023 [4];
c_7320978.hdr.mark = gc_color_red;
 c_7320978.hdr.grayed = 0;
c_7320978.tag = closureN_tag;
 c_7320978.fn = (function_type)__lambda_700;
c_7320978.num_args = 1;
c_7320978.num_elements = 4;
c_7320978.elements = (object *)e_7321023;
c_7320978.elements[0] = ((closureN)self_7313652)->elements[0];
c_7320978.elements[1] = param_73882_731022_733369_7312975_7312984;
c_7320978.elements[2] = ((closureN)self_7313652)->elements[2];
c_7320978.elements[3] = value_73883_731023_733370_7312976_7312985;

return_closcall2(data,  ((closureN)self_7313652)->elements[1],  &c_7320978, quote_parameterize);; 
}

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


mmacro(c_7321015, (function_type)__lambda_703);c_7321015.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7320980,__lambda_701,  &c_7321015);; 
}

static void __lambda_703(void *data, object self_7313654, int argc, object *args) /* object self_7313654, object k_735759_738751_7312980_7312989, object param_73886_731026_733373_738752_7312981_7312990, object value_73887_731027_733374_738753_7312982_7312991 */
 {
 object k_735759_738751_7312980_7312989 = args[0]; object param_73886_731026_733373_738752_7312981_7312990 = args[1]; object value_73887_731027_733374_738753_7312982_7312991 = args[2];
  
pair_type local_7321019; 

pair_type local_7321022; 
return_direct_with_clo1(data,  k_735759_738751_7312980_7312989, (((closure)  k_735759_738751_7312980_7312989)->fn),  set_pair_as_expr(&local_7321019, param_73886_731026_733373_738752_7312981_7312990, set_pair_as_expr(&local_7321022, value_73887_731027_733374_738753_7312982_7312991, NULL)));; 
}

static void __lambda_701(void *data, object self_7313655, int argc, object *args) /* object self_7313655, object r_735758_738744_7312978_7312987 */
 {
 object r_735758_738744_7312978_7312987 = args[0];
  
closureN_type c_7320982;
object e_7321011 [3];
c_7320982.hdr.mark = gc_color_red;
 c_7320982.hdr.grayed = 0;
c_7320982.tag = closureN_tag;
 c_7320982.fn = (function_type)__lambda_702;
c_7320982.num_args = 1;
c_7320982.num_elements = 3;
c_7320982.elements = (object *)e_7321011;
c_7320982.elements[0] = ((closureN)self_7313655)->elements[0];
c_7320982.elements[1] = ((closureN)self_7313655)->elements[2];
c_7320982.elements[2] = ((closureN)self_7313655)->elements[3];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7320982, r_735758_738744_7312978_7312987, ((closureN)self_7313655)->elements[1], ((closureN)self_7313655)->elements[4]);; 
}

static void __lambda_702(void *data, object self_7313656, int argc, object *args) /* object self_7313656, object r_735753_738745_7312979_7312988 */
 {
 object r_735753_738745_7312979_7312988 = args[0];
  
pair_type local_7320987; 

pair_type local_7320990; 

pair_type local_7320994; 

pair_type local_7320997; 

make_utf8_string_with_len(c_7320998, "step", 4, 4);

pair_type local_7321001; 

pair_type local_7321004; 

pair_type local_7321007; 


return_direct_with_clo1(data,  ((closureN)self_7313656)->elements[0], (((closure)  ((closureN)self_7313656)->elements[0])->fn),  set_pair_as_expr(&local_7320987, set_pair_as_expr(&local_7320990, ((closureN)self_7313656)->elements[1], set_pair_as_expr(&local_7320994, set_pair_as_expr(&local_7320997, &c_7320998, NULL), set_pair_as_expr(&local_7321001, NULL, set_pair_as_expr(&local_7321004, r_735753_738745_7312979_7312988, set_pair_as_expr(&local_7321007, Cyc_cdr(data, ((closureN)self_7313656)->elements[2]), NULL))))), boolean_f));; 
}

static void __lambda_694(void *data, object self_7313657, int argc, object *args) /* object self_7313657, object r_735737 */
 {
 object r_735737 = args[0];
  
closureN_type c_7320953;
object e_7320962 [5];
c_7320953.hdr.mark = gc_color_red;
 c_7320953.hdr.grayed = 0;
c_7320953.tag = closureN_tag;
 c_7320953.fn = (function_type)__lambda_695;
c_7320953.num_args = 1;
c_7320953.num_elements = 5;
c_7320953.elements = (object *)e_7320962;
c_7320953.elements[0] = ((closureN)self_7313657)->elements[0];
c_7320953.elements[1] = ((closureN)self_7313657)->elements[1];
c_7320953.elements[2] = ((closureN)self_7313657)->elements[2];
c_7320953.elements[3] = ((closureN)self_7313657)->elements[3];
c_7320953.elements[4] = ((closureN)self_7313657)->elements[4];



return_direct_with_clo1(data,(closure)&c_7320953,__lambda_695,  Cyc_set_cell(data, ((closureN)self_7313657)->elements[1], r_735737));; 
}

static void __lambda_695(void *data, object self_7313658, int argc, object *args) /* object self_7313658, object r_735736 */
 {

  

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

static void __lambda_684(void *data, object self_7313659, int argc, object *args) /* object self_7313659, object k_735780 */
 {
 object k_735780 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313659)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313659)->elements[1]))) ){ 
    
  
  
  make_utf8_string_with_len(c_7320725, "step", 4, 4);
if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7313659)->elements[1])), &c_7320725)) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7313659)->elements[1])))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313659)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1]))))))) ){ 
    
  
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1])))))))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313659)->elements[1])))))) ){ 
  
closureN_type c_7320815;
object e_7320920 [3];
c_7320815.hdr.mark = gc_color_red;
 c_7320815.hdr.grayed = 0;
c_7320815.tag = closureN_tag;
 c_7320815.fn = (function_type)__lambda_685;
c_7320815.num_args = 1;
c_7320815.num_elements = 3;
c_7320815.elements = (object *)e_7320920;
c_7320815.elements[0] = k_735780;
c_7320815.elements[1] = ((closureN)self_7313659)->elements[0];
c_7320815.elements[2] = ((closureN)self_7313659)->elements[1];

return_closcall2(data,  ((closureN)self_7313659)->elements[0],  &c_7320815, quote_parameterize);
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735780, (((closure)  k_735780)->fn),  boolean_f);}
;; 
}

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

return_closcall2(data,  ((closureN)self_7313660)->elements[1],  &c_7320818, quote_p);; 
}

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

return_closcall2(data,  ((closureN)self_7313661)->elements[2],  &c_7320821, quote_old);; 
}

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

return_closcall2(data,  ((closureN)self_7313662)->elements[3],  &c_7320824, quote_new);; 
}

static void __lambda_688(void *data, object self_7313663, int argc, object *args) /* object self_7313663, object r_735835_738665 */
 {
 object r_735835_738665 = args[0];
  
pair_type local_7320829; 

pair_type local_7320832; 

pair_type local_7320836; 

pair_type local_7320839; 

make_utf8_string_with_len(c_7320840, "step", 4, 4);

pair_type local_7320843; 

pair_type local_7320846; 

pair_type local_7320849; 











pair_type local_7320863; 













pair_type local_7320879; 

pair_type local_7320883; 

pair_type local_7320887; 





pair_type local_7320895; 









pair_type local_7320907; 








return_direct_with_clo1(data,  ((closureN)self_7313663)->elements[0], (((closure)  ((closureN)self_7313663)->elements[0])->fn),  set_pair_as_expr(&local_7320829, set_pair_as_expr(&local_7320832, ((closureN)self_7313663)->elements[1], set_pair_as_expr(&local_7320836, set_pair_as_expr(&local_7320839, &c_7320840, NULL), set_pair_as_expr(&local_7320843, set_pair_as_expr(&local_7320846, set_pair_as_expr(&local_7320849, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4]))))), set_pair_as_expr(&local_7320863, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4])))))), set_pair_as_expr(&local_7320879, ((closureN)self_7313663)->elements[2], set_pair_as_expr(&local_7320883, ((closureN)self_7313663)->elements[3], set_pair_as_expr(&local_7320887, r_735835_738665, NULL))))), Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4]))), set_pair_as_expr(&local_7320895, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4])))), set_pair_as_expr(&local_7320907, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313663)->elements[4])))), NULL))))), boolean_f));; 
}

static void __lambda_638(void *data, object self_7313664, int argc, object *args) /* object self_7313664, object k_735845 */
 {
 object k_735845 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313664)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313664)->elements[1]))) ){ 
    
  
  
  make_utf8_string_with_len(c_7320190, "step", 4, 4);
if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7313664)->elements[1])), &c_7320190)) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7313664)->elements[1])))) ){ 
  
closureN_type c_7320199;
object e_7320691 [2];
c_7320199.hdr.mark = gc_color_red;
 c_7320199.hdr.grayed = 0;
c_7320199.tag = closureN_tag;
 c_7320199.fn = (function_type)__lambda_639;
c_7320199.num_args = 1;
c_7320199.num_elements = 2;
c_7320199.elements = (object *)e_7320691;
c_7320199.elements[0] = k_735845;
c_7320199.elements[1] = ((closureN)self_7313664)->elements[0];



return_direct_with_clo1(data,(closure)&c_7320199,__lambda_639,  Cyc_cdr(data, ((closureN)self_7313664)->elements[1]));
} else { 
  return_direct_with_clo1(data,  k_735845, (((closure)  k_735845)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735845, (((closure)  k_735845)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735845, (((closure)  k_735845)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735845, (((closure)  k_735845)->fn),  boolean_f);}
;; 
}

static void __lambda_639(void *data, object self_7313665, int argc, object *args) /* object self_7313665, object v_935_73802_73941_731061_733408 */
 {
 object v_935_73802_73941_731061_733408 = args[0];
    
if( (boolean_f != Cyc_is_pair(v_935_73802_73941_731061_733408)) ){ 
  
closureN_type c_7320203;
object e_7320686 [3];
c_7320203.hdr.mark = gc_color_red;
 c_7320203.hdr.grayed = 0;
c_7320203.tag = closureN_tag;
 c_7320203.fn = (function_type)__lambda_640;
c_7320203.num_args = 6;
c_7320203.num_elements = 3;
c_7320203.elements = (object *)e_7320686;
c_7320203.elements[0] = ((closureN)self_7313665)->elements[0];
c_7320203.elements[1] = ((closureN)self_7313665)->elements[1];
c_7320203.elements[2] = v_935_73802_73941_731061_733408;



return_direct_with_clo6(data,(closure)&c_7320203,__lambda_640,  Cyc_car(data, v_935_73802_73941_731061_733408), NULL, NULL, NULL, NULL, NULL);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313665)->elements[0], (((closure)  ((closureN)self_7313665)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_640(void *data, object self_7313666, int argc, object *args) /* object self_7313666, object w_937_73804_73945_731063_733410, object param_91ls9_73806_73946_731064_733411, object value_91ls10_73807_73947_731065_733412, object p_91ls11_73808_73948_731066_733413, object old_91ls12_73809_73949_731067_733414, object new_91ls13_73810_73950_731068_733415 */
 {
 object w_937_73804_73945_731063_733410 = args[0]; object param_91ls9_73806_73946_731064_733411 = args[1]; object value_91ls10_73807_73947_731065_733412 = args[2]; object p_91ls11_73808_73948_731066_733413 = args[3]; object old_91ls12_73809_73949_731067_733414 = args[4]; object new_91ls13_73810_73950_731068_733415 = args[5];
  
closureN_type c_7320205;
object e_7320685 [9];
c_7320205.hdr.mark = gc_color_red;
 c_7320205.hdr.grayed = 0;
c_7320205.tag = closureN_tag;
 c_7320205.fn = (function_type)__lambda_641;
c_7320205.num_args = 1;
c_7320205.num_elements = 9;
c_7320205.elements = (object *)e_7320685;
c_7320205.elements[0] = ((closureN)self_7313666)->elements[0];
c_7320205.elements[1] = new_91ls13_73810_73950_731068_733415;
c_7320205.elements[2] = old_91ls12_73809_73949_731067_733414;
c_7320205.elements[3] = p_91ls11_73808_73948_731066_733413;
c_7320205.elements[4] = param_91ls9_73806_73946_731064_733411;
c_7320205.elements[5] = ((closureN)self_7313666)->elements[1];
c_7320205.elements[6] = ((closureN)self_7313666)->elements[2];
c_7320205.elements[7] = value_91ls10_73807_73947_731065_733412;
c_7320205.elements[8] = w_937_73804_73945_731063_733410;

return_direct_with_clo1(data,(closure)&c_7320205,__lambda_641,  boolean_f);; 
}

static void __lambda_641(void *data, object self_7313667, int argc, object *args) /* object self_7313667, object lp_938_73805_73951_731069_733416 */
 {
 object lp_938_73805_73951_731069_733416 = args[0];
  
closureN_type c_7320207;
object e_7320681 [9];
c_7320207.hdr.mark = gc_color_red;
 c_7320207.hdr.grayed = 0;
c_7320207.tag = closureN_tag;
 c_7320207.fn = (function_type)__lambda_1416;
c_7320207.num_args = 1;
c_7320207.num_elements = 9;
c_7320207.elements = (object *)e_7320681;
c_7320207.elements[0] = ((closureN)self_7313667)->elements[0];
c_7320207.elements[1] = ((closureN)self_7313667)->elements[1];
c_7320207.elements[2] = ((closureN)self_7313667)->elements[2];
c_7320207.elements[3] = ((closureN)self_7313667)->elements[3];
c_7320207.elements[4] = ((closureN)self_7313667)->elements[4];
c_7320207.elements[5] = ((closureN)self_7313667)->elements[5];
c_7320207.elements[6] = ((closureN)self_7313667)->elements[6];
c_7320207.elements[7] = ((closureN)self_7313667)->elements[7];
c_7320207.elements[8] = ((closureN)self_7313667)->elements[8];


pair_type local_7320684; 
return_direct_with_clo1(data,(closure)&c_7320207,__lambda_1416,  set_cell_as_expr(&local_7320684, lp_938_73805_73951_731069_733416));; 
}

static void __lambda_1416(void *data, object self_7313668, int argc, object *args) /* object self_7313668, object lp_938_73805_73951_731069_733416 */
 {
 object lp_938_73805_73951_731069_733416 = args[0];
  
closureN_type c_7320209;
object e_7320227 [8];
c_7320209.hdr.mark = gc_color_red;
 c_7320209.hdr.grayed = 0;
c_7320209.tag = closureN_tag;
 c_7320209.fn = (function_type)__lambda_642;
c_7320209.num_args = 1;
c_7320209.num_elements = 8;
c_7320209.elements = (object *)e_7320227;
c_7320209.elements[0] = ((closureN)self_7313668)->elements[0];
c_7320209.elements[1] = lp_938_73805_73951_731069_733416;
c_7320209.elements[2] = ((closureN)self_7313668)->elements[1];
c_7320209.elements[3] = ((closureN)self_7313668)->elements[2];
c_7320209.elements[4] = ((closureN)self_7313668)->elements[3];
c_7320209.elements[5] = ((closureN)self_7313668)->elements[4];
c_7320209.elements[6] = ((closureN)self_7313668)->elements[7];
c_7320209.elements[7] = ((closureN)self_7313668)->elements[8];


closureN_type c_7320228;
object e_7320680 [3];
c_7320228.hdr.mark = gc_color_red;
 c_7320228.hdr.grayed = 0;
c_7320228.tag = closureN_tag;
 c_7320228.fn = (function_type)__lambda_644;
c_7320228.num_args = 6;
c_7320228.num_elements = 3;
c_7320228.elements = (object *)e_7320680;
c_7320228.elements[0] = lp_938_73805_73951_731069_733416;
c_7320228.elements[1] = ((closureN)self_7313668)->elements[5];
c_7320228.elements[2] = ((closureN)self_7313668)->elements[6];

return_direct_with_clo1(data,(closure)&c_7320209,__lambda_642,  &c_7320228);; 
}

static void __lambda_644(void *data, object self_7313669, int argc, object *args) /* object self_7313669, object k_735863, object w_937_73804_73952_731070_733417, object param_91ls9_73806_73953_731071_733418, object value_91ls10_73807_73954_731072_733419, object p_91ls11_73808_73955_731073_733420, object old_91ls12_73809_73956_731074_733421, object new_91ls13_73810_73957_731075_733422 */
 {
 object k_735863 = args[0]; object w_937_73804_73952_731070_733417 = args[1]; object param_91ls9_73806_73953_731071_733418 = args[2]; object value_91ls10_73807_73954_731072_733419 = args[3]; object p_91ls11_73808_73955_731073_733420 = args[4]; object old_91ls12_73809_73956_731074_733421 = args[5]; object new_91ls13_73810_73957_731075_733422 = args[6];
    
if( (boolean_f != Cyc_is_null(w_937_73804_73952_731070_733417)) ){ 
  
closureN_type c_7320232;
object e_7320555 [7];
c_7320232.hdr.mark = gc_color_red;
 c_7320232.hdr.grayed = 0;
c_7320232.tag = closureN_tag;
 c_7320232.fn = (function_type)__lambda_645;
c_7320232.num_args = 1;
c_7320232.num_elements = 7;
c_7320232.elements = (object *)e_7320555;
c_7320232.elements[0] = k_735863;
c_7320232.elements[1] = new_91ls13_73810_73957_731075_733422;
c_7320232.elements[2] = old_91ls12_73809_73956_731074_733421;
c_7320232.elements[3] = p_91ls11_73808_73955_731073_733420;
c_7320232.elements[4] = ((closureN)self_7313669)->elements[1];
c_7320232.elements[5] = ((closureN)self_7313669)->elements[2];
c_7320232.elements[6] = value_91ls10_73807_73954_731072_733419;

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320232, primitive_cons, NULL, param_91ls9_73806_73953_731071_733418);
} else { 
    
if( (boolean_f != Cyc_is_pair(w_937_73804_73952_731070_733417)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_937_73804_73952_731070_733417))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417))))))) ){ 
    
  
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))))))) ){ 
  




pair_type local_7320620; 





pair_type local_7320627; 







pair_type local_7320636; 









pair_type local_7320647; 











pair_type local_7320660; 












return_closcall7(data,  car(((closureN)self_7313669)->elements[0]),  k_735863, Cyc_cdr(data, w_937_73804_73952_731070_733417), set_pair_as_expr(&local_7320620, Cyc_car(data, Cyc_car(data, w_937_73804_73952_731070_733417)), param_91ls9_73806_73953_731071_733418), set_pair_as_expr(&local_7320627, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417))), value_91ls10_73807_73954_731072_733419), set_pair_as_expr(&local_7320636, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))), p_91ls11_73808_73955_731073_733420), set_pair_as_expr(&local_7320647, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417))))), old_91ls12_73809_73956_731074_733421), set_pair_as_expr(&local_7320660, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73804_73952_731070_733417)))))), new_91ls13_73810_73957_731075_733422));
} else { 
  return_direct_with_clo1(data,  k_735863, (((closure)  k_735863)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735863, (((closure)  k_735863)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735863, (((closure)  k_735863)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735863, (((closure)  k_735863)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735863, (((closure)  k_735863)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735863, (((closure)  k_735863)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_735863, (((closure)  k_735863)->fn),  boolean_f);}
;}
;; 
}

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

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320234, primitive_cons, NULL, ((closureN)self_7313670)->elements[6]);; 
}

static void __lambda_646(void *data, object self_7313671, int argc, object *args) /* object self_7313671, object r_735866_7312729_7312779 */
 {
 object r_735866_7312729_7312779 = args[0];
  
closureN_type c_7320236;
object e_7320551 [7];
c_7320236.hdr.mark = gc_color_red;
 c_7320236.hdr.grayed = 0;
c_7320236.tag = closureN_tag;
 c_7320236.fn = (function_type)__lambda_647;
c_7320236.num_args = 1;
c_7320236.num_elements = 7;
c_7320236.elements = (object *)e_7320551;
c_7320236.elements[0] = ((closureN)self_7313671)->elements[0];
c_7320236.elements[1] = ((closureN)self_7313671)->elements[1];
c_7320236.elements[2] = ((closureN)self_7313671)->elements[2];
c_7320236.elements[3] = ((closureN)self_7313671)->elements[4];
c_7320236.elements[4] = r_735866_7312729_7312779;
c_7320236.elements[5] = ((closureN)self_7313671)->elements[5];
c_7320236.elements[6] = ((closureN)self_7313671)->elements[6];

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320236, primitive_cons, NULL, ((closureN)self_7313671)->elements[3]);; 
}

static void __lambda_647(void *data, object self_7313672, int argc, object *args) /* object self_7313672, object r_735867_7312730_7312780_7312829 */
 {
 object r_735867_7312730_7312780_7312829 = args[0];
  
closureN_type c_7320238;
object e_7320549 [7];
c_7320238.hdr.mark = gc_color_red;
 c_7320238.hdr.grayed = 0;
c_7320238.tag = closureN_tag;
 c_7320238.fn = (function_type)__lambda_648;
c_7320238.num_args = 1;
c_7320238.num_elements = 7;
c_7320238.elements = (object *)e_7320549;
c_7320238.elements[0] = ((closureN)self_7313672)->elements[0];
c_7320238.elements[1] = ((closureN)self_7313672)->elements[1];
c_7320238.elements[2] = ((closureN)self_7313672)->elements[3];
c_7320238.elements[3] = ((closureN)self_7313672)->elements[4];
c_7320238.elements[4] = r_735867_7312730_7312780_7312829;
c_7320238.elements[5] = ((closureN)self_7313672)->elements[5];
c_7320238.elements[6] = ((closureN)self_7313672)->elements[6];

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320238, primitive_cons, NULL, ((closureN)self_7313672)->elements[2]);; 
}

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

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320240, primitive_cons, NULL, ((closureN)self_7313673)->elements[1]);; 
}

static void __lambda_649(void *data, object self_7313674, int argc, object *args) /* object self_7313674, object r_735869_7312732_7312782_7312831_7312879_7312926 */
 {
 object r_735869_7312732_7312782_7312831_7312879_7312926 = args[0];
  
closureN_type c_7320242;
object e_7320542 [3];
c_7320242.hdr.mark = gc_color_red;
 c_7320242.hdr.grayed = 0;
c_7320242.tag = closureN_tag;
 c_7320242.fn = (function_type)__lambda_650;
c_7320242.num_args = 5;
c_7320242.num_elements = 3;
c_7320242.elements = (object *)e_7320542;
c_7320242.elements[0] = ((closureN)self_7313674)->elements[0];
c_7320242.elements[1] = ((closureN)self_7313674)->elements[5];
c_7320242.elements[2] = ((closureN)self_7313674)->elements[6];

return_direct_with_clo5(data,(closure)&c_7320242,__lambda_650,  ((closureN)self_7313674)->elements[1], ((closureN)self_7313674)->elements[2], ((closureN)self_7313674)->elements[3], ((closureN)self_7313674)->elements[4], r_735869_7312732_7312782_7312831_7312879_7312926);; 
}

static void __lambda_650(void *data, object self_7313675, int argc, object *args) /* object self_7313675, object param_73958_731076_733423_7312733_7312783_7312832_7312880_7312927, object value_73959_731077_733424_7312734_7312784_7312833_7312881_7312928, object p_73960_731078_733425_7312735_7312785_7312834_7312882_7312929, object old_73961_731079_733426_7312736_7312786_7312835_7312883_7312930, object new_73962_731080_733427_7312737_7312787_7312836_7312884_7312931 */
 {
 object param_73958_731076_733423_7312733_7312783_7312832_7312880_7312927 = args[0]; object value_73959_731077_733424_7312734_7312784_7312833_7312881_7312928 = args[1]; object p_73960_731078_733425_7312735_7312785_7312834_7312882_7312929 = args[2]; object old_73961_731079_733426_7312736_7312786_7312835_7312883_7312930 = args[3]; object new_73962_731080_733427_7312737_7312787_7312836_7312884_7312931 = args[4];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313675)->elements[2]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313675)->elements[2])))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313675)->elements[2])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313675)->elements[2]))))) ){ 
  
closureN_type c_7320273;
object e_7320533 [8];
c_7320273.hdr.mark = gc_color_red;
 c_7320273.hdr.grayed = 0;
c_7320273.tag = closureN_tag;
 c_7320273.fn = (function_type)__lambda_651;
c_7320273.num_args = 1;
c_7320273.num_elements = 8;
c_7320273.elements = (object *)e_7320533;
c_7320273.elements[0] = ((closureN)self_7313675)->elements[0];
c_7320273.elements[1] = new_73962_731080_733427_7312737_7312787_7312836_7312884_7312931;
c_7320273.elements[2] = old_73961_731079_733426_7312736_7312786_7312835_7312883_7312930;
c_7320273.elements[3] = p_73960_731078_733425_7312735_7312785_7312834_7312882_7312929;
c_7320273.elements[4] = param_73958_731076_733423_7312733_7312783_7312832_7312880_7312927;
c_7320273.elements[5] = ((closureN)self_7313675)->elements[1];
c_7320273.elements[6] = ((closureN)self_7313675)->elements[2];
c_7320273.elements[7] = value_73959_731077_733424_7312734_7312784_7312833_7312881_7312928;

return_closcall2(data,  ((closureN)self_7313675)->elements[1],  &c_7320273, quote_let);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313675)->elements[0], (((closure)  ((closureN)self_7313675)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313675)->elements[0], (((closure)  ((closureN)self_7313675)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313675)->elements[0], (((closure)  ((closureN)self_7313675)->elements[0])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313675)->elements[0], (((closure)  ((closureN)self_7313675)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_651(void *data, object self_7313676, int argc, object *args) /* object self_7313676, object r_735880_7312738_7312788_7312837_7312885_7312932 */
 {
 object r_735880_7312738_7312788_7312837_7312885_7312932 = args[0];
  
closureN_type c_7320275;
object e_7320524 [9];
c_7320275.hdr.mark = gc_color_red;
 c_7320275.hdr.grayed = 0;
c_7320275.tag = closureN_tag;
 c_7320275.fn = (function_type)__lambda_652;
c_7320275.num_args = 1;
c_7320275.num_elements = 9;
c_7320275.elements = (object *)e_7320524;
c_7320275.elements[0] = ((closureN)self_7313676)->elements[0];
c_7320275.elements[1] = ((closureN)self_7313676)->elements[1];
c_7320275.elements[2] = ((closureN)self_7313676)->elements[2];
c_7320275.elements[3] = ((closureN)self_7313676)->elements[3];
c_7320275.elements[4] = ((closureN)self_7313676)->elements[4];
c_7320275.elements[5] = r_735880_7312738_7312788_7312837_7312885_7312932;
c_7320275.elements[6] = ((closureN)self_7313676)->elements[5];
c_7320275.elements[7] = ((closureN)self_7313676)->elements[6];
c_7320275.elements[8] = ((closureN)self_7313676)->elements[7];


mmacro(c_7320525, (function_type)__lambda_680);c_7320525.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7320275,__lambda_652,  &c_7320525);; 
}

static void __lambda_680(void *data, object self_7313677, int argc, object *args) /* object self_7313677, object k_736003_7312776_7312826_7312875_7312923_7312970, object p_73973_731087_733434_7312777_7312827_7312876_7312924_7312971, object param_73974_731088_733435_7312778_7312828_7312877_7312925_7312972 */
 {
 object k_736003_7312776_7312826_7312875_7312923_7312970 = args[0]; object p_73973_731087_733434_7312777_7312827_7312876_7312924_7312971 = args[1]; object param_73974_731088_733435_7312778_7312828_7312877_7312925_7312972 = args[2];
  
pair_type local_7320529; 

pair_type local_7320532; 
return_direct_with_clo1(data,  k_736003_7312776_7312826_7312875_7312923_7312970, (((closure)  k_736003_7312776_7312826_7312875_7312923_7312970)->fn),  set_pair_as_expr(&local_7320529, p_73973_731087_733434_7312777_7312827_7312876_7312924_7312971, set_pair_as_expr(&local_7320532, param_73974_731088_733435_7312778_7312828_7312877_7312925_7312972, NULL)));; 
}

static void __lambda_652(void *data, object self_7313678, int argc, object *args) /* object self_7313678, object r_736002_7312739_7312789_7312838_7312886_7312933 */
 {
 object r_736002_7312739_7312789_7312838_7312886_7312933 = args[0];
  
closureN_type c_7320277;
object e_7320521 [8];
c_7320277.hdr.mark = gc_color_red;
 c_7320277.hdr.grayed = 0;
c_7320277.tag = closureN_tag;
 c_7320277.fn = (function_type)__lambda_653;
c_7320277.num_args = 1;
c_7320277.num_elements = 8;
c_7320277.elements = (object *)e_7320521;
c_7320277.elements[0] = ((closureN)self_7313678)->elements[0];
c_7320277.elements[1] = ((closureN)self_7313678)->elements[1];
c_7320277.elements[2] = ((closureN)self_7313678)->elements[2];
c_7320277.elements[3] = ((closureN)self_7313678)->elements[3];
c_7320277.elements[4] = ((closureN)self_7313678)->elements[5];
c_7320277.elements[5] = ((closureN)self_7313678)->elements[6];
c_7320277.elements[6] = ((closureN)self_7313678)->elements[7];
c_7320277.elements[7] = ((closureN)self_7313678)->elements[8];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7320277, r_736002_7312739_7312789_7312838_7312886_7312933, ((closureN)self_7313678)->elements[3], ((closureN)self_7313678)->elements[4]);; 
}

static void __lambda_653(void *data, object self_7313679, int argc, object *args) /* object self_7313679, object r_735883_7312740_7312790_7312839_7312887_7312934 */
 {
 object r_735883_7312740_7312790_7312839_7312887_7312934 = args[0];
  
closureN_type c_7320280;
object e_7320520 [9];
c_7320280.hdr.mark = gc_color_red;
 c_7320280.hdr.grayed = 0;
c_7320280.tag = closureN_tag;
 c_7320280.fn = (function_type)__lambda_654;
c_7320280.num_args = 1;
c_7320280.num_elements = 9;
c_7320280.elements = (object *)e_7320520;
c_7320280.elements[0] = ((closureN)self_7313679)->elements[0];
c_7320280.elements[1] = ((closureN)self_7313679)->elements[1];
c_7320280.elements[2] = ((closureN)self_7313679)->elements[2];
c_7320280.elements[3] = ((closureN)self_7313679)->elements[3];
c_7320280.elements[4] = ((closureN)self_7313679)->elements[4];
c_7320280.elements[5] = r_735883_7312740_7312790_7312839_7312887_7312934;
c_7320280.elements[6] = ((closureN)self_7313679)->elements[5];
c_7320280.elements[7] = ((closureN)self_7313679)->elements[6];
c_7320280.elements[8] = ((closureN)self_7313679)->elements[7];

return_closcall2(data,  ((closureN)self_7313679)->elements[5],  &c_7320280, quote_let);; 
}

static void __lambda_654(void *data, object self_7313680, int argc, object *args) /* object self_7313680, object r_735889_7312741_7312791_7312840_7312888_7312935 */
 {
 object r_735889_7312741_7312791_7312840_7312888_7312935 = args[0];
  
closureN_type c_7320282;
object e_7320508 [10];
c_7320282.hdr.mark = gc_color_red;
 c_7320282.hdr.grayed = 0;
c_7320282.tag = closureN_tag;
 c_7320282.fn = (function_type)__lambda_655;
c_7320282.num_args = 1;
c_7320282.num_elements = 10;
c_7320282.elements = (object *)e_7320508;
c_7320282.elements[0] = ((closureN)self_7313680)->elements[0];
c_7320282.elements[1] = ((closureN)self_7313680)->elements[1];
c_7320282.elements[2] = ((closureN)self_7313680)->elements[2];
c_7320282.elements[3] = ((closureN)self_7313680)->elements[3];
c_7320282.elements[4] = ((closureN)self_7313680)->elements[4];
c_7320282.elements[5] = ((closureN)self_7313680)->elements[5];
c_7320282.elements[6] = r_735889_7312741_7312791_7312840_7312888_7312935;
c_7320282.elements[7] = ((closureN)self_7313680)->elements[6];
c_7320282.elements[8] = ((closureN)self_7313680)->elements[7];
c_7320282.elements[9] = ((closureN)self_7313680)->elements[8];


mmacro(c_7320509, (function_type)__lambda_679);c_7320509.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7320282,__lambda_655,  &c_7320509);; 
}

static void __lambda_679(void *data, object self_7313681, int argc, object *args) /* object self_7313681, object k_735993_7312773_7312823_7312872_7312920_7312967, object old_73975_731089_733436_7312774_7312824_7312873_7312921_7312968, object p_73976_731090_733437_7312775_7312825_7312874_7312922_7312969 */
 {
 object k_735993_7312773_7312823_7312872_7312920_7312967 = args[0]; object old_73975_731089_733436_7312774_7312824_7312873_7312921_7312968 = args[1]; object p_73976_731090_733437_7312775_7312825_7312874_7312922_7312969 = args[2];
  
pair_type local_7320513; 

pair_type local_7320516; 

pair_type local_7320519; 
return_direct_with_clo1(data,  k_735993_7312773_7312823_7312872_7312920_7312967, (((closure)  k_735993_7312773_7312823_7312872_7312920_7312967)->fn),  set_pair_as_expr(&local_7320513, old_73975_731089_733436_7312774_7312824_7312873_7312921_7312968, set_pair_as_expr(&local_7320516, set_pair_as_expr(&local_7320519, p_73976_731090_733437_7312775_7312825_7312874_7312922_7312969, NULL), NULL)));; 
}

static void __lambda_655(void *data, object self_7313682, int argc, object *args) /* object self_7313682, object r_735992_7312742_7312792_7312841_7312889_7312936 */
 {
 object r_735992_7312742_7312792_7312841_7312889_7312936 = args[0];
  
closureN_type c_7320284;
object e_7320505 [10];
c_7320284.hdr.mark = gc_color_red;
 c_7320284.hdr.grayed = 0;
c_7320284.tag = closureN_tag;
 c_7320284.fn = (function_type)__lambda_656;
c_7320284.num_args = 1;
c_7320284.num_elements = 10;
c_7320284.elements = (object *)e_7320505;
c_7320284.elements[0] = ((closureN)self_7313682)->elements[0];
c_7320284.elements[1] = ((closureN)self_7313682)->elements[1];
c_7320284.elements[2] = ((closureN)self_7313682)->elements[2];
c_7320284.elements[3] = ((closureN)self_7313682)->elements[3];
c_7320284.elements[4] = ((closureN)self_7313682)->elements[4];
c_7320284.elements[5] = ((closureN)self_7313682)->elements[5];
c_7320284.elements[6] = ((closureN)self_7313682)->elements[6];
c_7320284.elements[7] = ((closureN)self_7313682)->elements[7];
c_7320284.elements[8] = ((closureN)self_7313682)->elements[8];
c_7320284.elements[9] = ((closureN)self_7313682)->elements[9];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7320284, r_735992_7312742_7312792_7312841_7312889_7312936, ((closureN)self_7313682)->elements[2], ((closureN)self_7313682)->elements[3]);; 
}

static void __lambda_656(void *data, object self_7313683, int argc, object *args) /* object self_7313683, object r_735965_7312743_7312793_7312842_7312890_7312937 */
 {
 object r_735965_7312743_7312793_7312842_7312890_7312937 = args[0];
  
closureN_type c_7320286;
object e_7320464 [11];
c_7320286.hdr.mark = gc_color_red;
 c_7320286.hdr.grayed = 0;
c_7320286.tag = closureN_tag;
 c_7320286.fn = (function_type)__lambda_657;
c_7320286.num_args = 1;
c_7320286.num_elements = 11;
c_7320286.elements = (object *)e_7320464;
c_7320286.elements[0] = ((closureN)self_7313683)->elements[0];
c_7320286.elements[1] = ((closureN)self_7313683)->elements[1];
c_7320286.elements[2] = ((closureN)self_7313683)->elements[2];
c_7320286.elements[3] = ((closureN)self_7313683)->elements[3];
c_7320286.elements[4] = ((closureN)self_7313683)->elements[4];
c_7320286.elements[5] = ((closureN)self_7313683)->elements[5];
c_7320286.elements[6] = ((closureN)self_7313683)->elements[6];
c_7320286.elements[7] = r_735965_7312743_7312793_7312842_7312890_7312937;
c_7320286.elements[8] = ((closureN)self_7313683)->elements[7];
c_7320286.elements[9] = ((closureN)self_7313683)->elements[8];
c_7320286.elements[10] = ((closureN)self_7313683)->elements[9];


closureN_type c_7320465;
object e_7320504 [1];
c_7320465.hdr.mark = gc_color_red;
 c_7320465.hdr.grayed = 0;
c_7320465.tag = closureN_tag;
 c_7320465.fn = (function_type)__lambda_676;
c_7320465.num_args = 3;
c_7320465.num_elements = 1;
c_7320465.elements = (object *)e_7320504;
c_7320465.elements[0] = ((closureN)self_7313683)->elements[7];

return_direct_with_clo1(data,(closure)&c_7320286,__lambda_657,  &c_7320465);; 
}

static void __lambda_676(void *data, object self_7313684, int argc, object *args) /* object self_7313684, object k_735968_7312767_7312817_7312866_7312914_7312961, object new_73977_731091_733438_7312768_7312818_7312867_7312915_7312962, object p_73978_731092_733439_7312769_7312819_7312868_7312916_7312963, object value_73979_731093_733440_7312770_7312820_7312869_7312917_7312964 */
 {
 object k_735968_7312767_7312817_7312866_7312914_7312961 = args[0]; object new_73977_731091_733438_7312768_7312818_7312867_7312915_7312962 = args[1]; object p_73978_731092_733439_7312769_7312819_7312868_7312916_7312963 = args[2]; object value_73979_731093_733440_7312770_7312820_7312869_7312917_7312964 = args[3];
  
closureN_type c_7320468;
object e_7320503 [5];
c_7320468.hdr.mark = gc_color_red;
 c_7320468.hdr.grayed = 0;
c_7320468.tag = closureN_tag;
 c_7320468.fn = (function_type)__lambda_677;
c_7320468.num_args = 1;
c_7320468.num_elements = 5;
c_7320468.elements = (object *)e_7320503;
c_7320468.elements[0] = k_735968_7312767_7312817_7312866_7312914_7312961;
c_7320468.elements[1] = new_73977_731091_733438_7312768_7312818_7312867_7312915_7312962;
c_7320468.elements[2] = p_73978_731092_733439_7312769_7312819_7312868_7312916_7312963;
c_7320468.elements[3] = ((closureN)self_7313684)->elements[0];
c_7320468.elements[4] = value_73979_731093_733440_7312770_7312820_7312869_7312917_7312964;

return_closcall2(data,  ((closureN)self_7313684)->elements[0],  &c_7320468, quote_quote);; 
}

static void __lambda_677(void *data, object self_7313685, int argc, object *args) /* object self_7313685, object r_735984_7312771_7312821_7312870_7312918_7312965 */
 {
 object r_735984_7312771_7312821_7312870_7312918_7312965 = args[0];
  
closureN_type c_7320471;
object e_7320502 [5];
c_7320471.hdr.mark = gc_color_red;
 c_7320471.hdr.grayed = 0;
c_7320471.tag = closureN_tag;
 c_7320471.fn = (function_type)__lambda_678;
c_7320471.num_args = 1;
c_7320471.num_elements = 5;
c_7320471.elements = (object *)e_7320502;
c_7320471.elements[0] = ((closureN)self_7313685)->elements[0];
c_7320471.elements[1] = ((closureN)self_7313685)->elements[1];
c_7320471.elements[2] = ((closureN)self_7313685)->elements[2];
c_7320471.elements[3] = r_735984_7312771_7312821_7312870_7312918_7312965;
c_7320471.elements[4] = ((closureN)self_7313685)->elements[4];

return_closcall2(data,  ((closureN)self_7313685)->elements[3],  &c_7320471, quote__121param_91convert_125);; 
}

static void __lambda_678(void *data, object self_7313686, int argc, object *args) /* object self_7313686, object r_735987_7312772_7312822_7312871_7312919_7312966 */
 {
 object r_735987_7312772_7312822_7312871_7312919_7312966 = args[0];
  
pair_type local_7320476; 

pair_type local_7320480; 

pair_type local_7320483; 

pair_type local_7320486; 

pair_type local_7320490; 

pair_type local_7320493; 

pair_type local_7320497; 

pair_type local_7320500; 
return_direct_with_clo1(data,  ((closureN)self_7313686)->elements[0], (((closure)  ((closureN)self_7313686)->elements[0])->fn),  set_pair_as_expr(&local_7320476, ((closureN)self_7313686)->elements[1], set_pair_as_expr(&local_7320480, set_pair_as_expr(&local_7320483, set_pair_as_expr(&local_7320486, ((closureN)self_7313686)->elements[2], set_pair_as_expr(&local_7320490, set_pair_as_expr(&local_7320493, ((closureN)self_7313686)->elements[3], set_pair_as_expr(&local_7320497, r_735987_7312772_7312822_7312871_7312919_7312966, NULL)), NULL)), set_pair_as_expr(&local_7320500, ((closureN)self_7313686)->elements[4], NULL)), NULL)));; 
}

static void __lambda_657(void *data, object self_7313687, int argc, object *args) /* object self_7313687, object r_735967_7312744_7312794_7312843_7312891_7312938 */
 {
 object r_735967_7312744_7312794_7312843_7312891_7312938 = args[0];
  
closureN_type c_7320288;
object e_7320460 [10];
c_7320288.hdr.mark = gc_color_red;
 c_7320288.hdr.grayed = 0;
c_7320288.tag = closureN_tag;
 c_7320288.fn = (function_type)__lambda_658;
c_7320288.num_args = 1;
c_7320288.num_elements = 10;
c_7320288.elements = (object *)e_7320460;
c_7320288.elements[0] = ((closureN)self_7313687)->elements[0];
c_7320288.elements[1] = ((closureN)self_7313687)->elements[1];
c_7320288.elements[2] = ((closureN)self_7313687)->elements[2];
c_7320288.elements[3] = ((closureN)self_7313687)->elements[3];
c_7320288.elements[4] = ((closureN)self_7313687)->elements[4];
c_7320288.elements[5] = ((closureN)self_7313687)->elements[5];
c_7320288.elements[6] = ((closureN)self_7313687)->elements[6];
c_7320288.elements[7] = ((closureN)self_7313687)->elements[7];
c_7320288.elements[8] = ((closureN)self_7313687)->elements[8];
c_7320288.elements[9] = ((closureN)self_7313687)->elements[9];

return_direct_with_clo5(data,  __glo_map_scheme_base, (((closure)  __glo_map_scheme_base)->fn),  &c_7320288, r_735967_7312744_7312794_7312843_7312891_7312938, ((closureN)self_7313687)->elements[1], ((closureN)self_7313687)->elements[3], ((closureN)self_7313687)->elements[10]);; 
}

static void __lambda_658(void *data, object self_7313688, int argc, object *args) /* object self_7313688, object r_735966_7312745_7312795_7312844_7312892_7312939 */
 {
 object r_735966_7312745_7312795_7312844_7312892_7312939 = args[0];
  
closureN_type c_7320290;
object e_7320458 [9];
c_7320290.hdr.mark = gc_color_red;
 c_7320290.hdr.grayed = 0;
c_7320290.tag = closureN_tag;
 c_7320290.fn = (function_type)__lambda_659;
c_7320290.num_args = 1;
c_7320290.num_elements = 9;
c_7320290.elements = (object *)e_7320458;
c_7320290.elements[0] = ((closureN)self_7313688)->elements[0];
c_7320290.elements[1] = ((closureN)self_7313688)->elements[1];
c_7320290.elements[2] = ((closureN)self_7313688)->elements[2];
c_7320290.elements[3] = ((closureN)self_7313688)->elements[3];
c_7320290.elements[4] = ((closureN)self_7313688)->elements[4];
c_7320290.elements[5] = ((closureN)self_7313688)->elements[5];
c_7320290.elements[6] = ((closureN)self_7313688)->elements[6];
c_7320290.elements[7] = ((closureN)self_7313688)->elements[8];
c_7320290.elements[8] = ((closureN)self_7313688)->elements[9];

return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7320290, ((closureN)self_7313688)->elements[7], r_735966_7312745_7312795_7312844_7312892_7312939);; 
}

static void __lambda_659(void *data, object self_7313689, int argc, object *args) /* object self_7313689, object r_735892_7312746_7312796_7312845_7312893_7312940 */
 {
 object r_735892_7312746_7312796_7312845_7312893_7312940 = args[0];
  
closureN_type c_7320293;
object e_7320457 [10];
c_7320293.hdr.mark = gc_color_red;
 c_7320293.hdr.grayed = 0;
c_7320293.tag = closureN_tag;
 c_7320293.fn = (function_type)__lambda_660;
c_7320293.num_args = 1;
c_7320293.num_elements = 10;
c_7320293.elements = (object *)e_7320457;
c_7320293.elements[0] = ((closureN)self_7313689)->elements[0];
c_7320293.elements[1] = ((closureN)self_7313689)->elements[1];
c_7320293.elements[2] = ((closureN)self_7313689)->elements[2];
c_7320293.elements[3] = ((closureN)self_7313689)->elements[3];
c_7320293.elements[4] = ((closureN)self_7313689)->elements[4];
c_7320293.elements[5] = ((closureN)self_7313689)->elements[5];
c_7320293.elements[6] = ((closureN)self_7313689)->elements[6];
c_7320293.elements[7] = r_735892_7312746_7312796_7312845_7312893_7312940;
c_7320293.elements[8] = ((closureN)self_7313689)->elements[7];
c_7320293.elements[9] = ((closureN)self_7313689)->elements[8];

return_closcall2(data,  ((closureN)self_7313689)->elements[7],  &c_7320293, quote_dynamic_91wind);; 
}

static void __lambda_660(void *data, object self_7313690, int argc, object *args) /* object self_7313690, object r_735898_7312747_7312797_7312846_7312894_7312941 */
 {
 object r_735898_7312747_7312797_7312846_7312894_7312941 = args[0];
  
closureN_type c_7320296;
object e_7320456 [11];
c_7320296.hdr.mark = gc_color_red;
 c_7320296.hdr.grayed = 0;
c_7320296.tag = closureN_tag;
 c_7320296.fn = (function_type)__lambda_661;
c_7320296.num_args = 1;
c_7320296.num_elements = 11;
c_7320296.elements = (object *)e_7320456;
c_7320296.elements[0] = ((closureN)self_7313690)->elements[0];
c_7320296.elements[1] = ((closureN)self_7313690)->elements[1];
c_7320296.elements[2] = ((closureN)self_7313690)->elements[2];
c_7320296.elements[3] = ((closureN)self_7313690)->elements[3];
c_7320296.elements[4] = ((closureN)self_7313690)->elements[4];
c_7320296.elements[5] = ((closureN)self_7313690)->elements[5];
c_7320296.elements[6] = ((closureN)self_7313690)->elements[6];
c_7320296.elements[7] = ((closureN)self_7313690)->elements[7];
c_7320296.elements[8] = r_735898_7312747_7312797_7312846_7312894_7312941;
c_7320296.elements[9] = ((closureN)self_7313690)->elements[8];
c_7320296.elements[10] = ((closureN)self_7313690)->elements[9];

return_closcall2(data,  ((closureN)self_7313690)->elements[8],  &c_7320296, quote_lambda);; 
}

static void __lambda_661(void *data, object self_7313691, int argc, object *args) /* object self_7313691, object r_735940_7312748_7312798_7312847_7312895_7312942 */
 {
 object r_735940_7312748_7312798_7312847_7312895_7312942 = args[0];
  
closureN_type c_7320298;
object e_7320425 [12];
c_7320298.hdr.mark = gc_color_red;
 c_7320298.hdr.grayed = 0;
c_7320298.tag = closureN_tag;
 c_7320298.fn = (function_type)__lambda_662;
c_7320298.num_args = 1;
c_7320298.num_elements = 12;
c_7320298.elements = (object *)e_7320425;
c_7320298.elements[0] = ((closureN)self_7313691)->elements[0];
c_7320298.elements[1] = ((closureN)self_7313691)->elements[1];
c_7320298.elements[2] = ((closureN)self_7313691)->elements[2];
c_7320298.elements[3] = ((closureN)self_7313691)->elements[3];
c_7320298.elements[4] = ((closureN)self_7313691)->elements[4];
c_7320298.elements[5] = ((closureN)self_7313691)->elements[5];
c_7320298.elements[6] = ((closureN)self_7313691)->elements[6];
c_7320298.elements[7] = ((closureN)self_7313691)->elements[7];
c_7320298.elements[8] = ((closureN)self_7313691)->elements[8];
c_7320298.elements[9] = r_735940_7312748_7312798_7312847_7312895_7312942;
c_7320298.elements[10] = ((closureN)self_7313691)->elements[9];
c_7320298.elements[11] = ((closureN)self_7313691)->elements[10];


closureN_type c_7320426;
object e_7320455 [1];
c_7320426.hdr.mark = gc_color_red;
 c_7320426.hdr.grayed = 0;
c_7320426.tag = closureN_tag;
 c_7320426.fn = (function_type)__lambda_673;
c_7320426.num_args = 2;
c_7320426.num_elements = 1;
c_7320426.elements = (object *)e_7320455;
c_7320426.elements[0] = ((closureN)self_7313691)->elements[9];

return_direct_with_clo1(data,(closure)&c_7320298,__lambda_662,  &c_7320426);; 
}

static void __lambda_673(void *data, object self_7313692, int argc, object *args) /* object self_7313692, object k_735947_7312762_7312812_7312861_7312909_7312956, object p_73980_731094_733441_7312763_7312813_7312862_7312910_7312957, object new_73981_731095_733442_7312764_7312814_7312863_7312911_7312958 */
 {
 object k_735947_7312762_7312812_7312861_7312909_7312956 = args[0]; object p_73980_731094_733441_7312763_7312813_7312862_7312910_7312957 = args[1]; object new_73981_731095_733442_7312764_7312814_7312863_7312911_7312958 = args[2];
  
closureN_type c_7320429;
object e_7320454 [4];
c_7320429.hdr.mark = gc_color_red;
 c_7320429.hdr.grayed = 0;
c_7320429.tag = closureN_tag;
 c_7320429.fn = (function_type)__lambda_674;
c_7320429.num_args = 1;
c_7320429.num_elements = 4;
c_7320429.elements = (object *)e_7320454;
c_7320429.elements[0] = k_735947_7312762_7312812_7312861_7312909_7312956;
c_7320429.elements[1] = new_73981_731095_733442_7312764_7312814_7312863_7312911_7312958;
c_7320429.elements[2] = p_73980_731094_733441_7312763_7312813_7312862_7312910_7312957;
c_7320429.elements[3] = ((closureN)self_7313692)->elements[0];

return_closcall2(data,  ((closureN)self_7313692)->elements[0],  &c_7320429, quote_quote);; 
}

static void __lambda_674(void *data, object self_7313693, int argc, object *args) /* object self_7313693, object r_735955_7312765_7312815_7312864_7312912_7312959 */
 {
 object r_735955_7312765_7312815_7312864_7312912_7312959 = args[0];
  
closureN_type c_7320432;
object e_7320453 [4];
c_7320432.hdr.mark = gc_color_red;
 c_7320432.hdr.grayed = 0;
c_7320432.tag = closureN_tag;
 c_7320432.fn = (function_type)__lambda_675;
c_7320432.num_args = 1;
c_7320432.num_elements = 4;
c_7320432.elements = (object *)e_7320453;
c_7320432.elements[0] = ((closureN)self_7313693)->elements[0];
c_7320432.elements[1] = ((closureN)self_7313693)->elements[1];
c_7320432.elements[2] = ((closureN)self_7313693)->elements[2];
c_7320432.elements[3] = r_735955_7312765_7312815_7312864_7312912_7312959;

return_closcall2(data,  ((closureN)self_7313693)->elements[3],  &c_7320432, quote__121param_91set_67_125);; 
}

static void __lambda_675(void *data, object self_7313694, int argc, object *args) /* object self_7313694, object r_735958_7312766_7312816_7312865_7312913_7312960 */
 {
 object r_735958_7312766_7312816_7312865_7312913_7312960 = args[0];
  
pair_type local_7320437; 

pair_type local_7320441; 

pair_type local_7320444; 

pair_type local_7320448; 

pair_type local_7320451; 
return_direct_with_clo1(data,  ((closureN)self_7313694)->elements[0], (((closure)  ((closureN)self_7313694)->elements[0])->fn),  set_pair_as_expr(&local_7320437, ((closureN)self_7313694)->elements[2], set_pair_as_expr(&local_7320441, set_pair_as_expr(&local_7320444, ((closureN)self_7313694)->elements[3], set_pair_as_expr(&local_7320448, r_735958_7312766_7312816_7312865_7312913_7312960, NULL)), set_pair_as_expr(&local_7320451, ((closureN)self_7313694)->elements[1], NULL))));; 
}

static void __lambda_662(void *data, object self_7313695, int argc, object *args) /* object self_7313695, object r_735946_7312749_7312799_7312848_7312896_7312943 */
 {
 object r_735946_7312749_7312799_7312848_7312896_7312943 = args[0];
  
closureN_type c_7320300;
object e_7320422 [11];
c_7320300.hdr.mark = gc_color_red;
 c_7320300.hdr.grayed = 0;
c_7320300.tag = closureN_tag;
 c_7320300.fn = (function_type)__lambda_663;
c_7320300.num_args = 1;
c_7320300.num_elements = 11;
c_7320300.elements = (object *)e_7320422;
c_7320300.elements[0] = ((closureN)self_7313695)->elements[0];
c_7320300.elements[1] = ((closureN)self_7313695)->elements[2];
c_7320300.elements[2] = ((closureN)self_7313695)->elements[3];
c_7320300.elements[3] = ((closureN)self_7313695)->elements[4];
c_7320300.elements[4] = ((closureN)self_7313695)->elements[5];
c_7320300.elements[5] = ((closureN)self_7313695)->elements[6];
c_7320300.elements[6] = ((closureN)self_7313695)->elements[7];
c_7320300.elements[7] = ((closureN)self_7313695)->elements[8];
c_7320300.elements[8] = ((closureN)self_7313695)->elements[9];
c_7320300.elements[9] = ((closureN)self_7313695)->elements[10];
c_7320300.elements[10] = ((closureN)self_7313695)->elements[11];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7320300, r_735946_7312749_7312799_7312848_7312896_7312943, ((closureN)self_7313695)->elements[3], ((closureN)self_7313695)->elements[1]);; 
}

static void __lambda_663(void *data, object self_7313696, int argc, object *args) /* object self_7313696, object r_735944_7312750_7312800_7312849_7312897_7312944 */
 {
 object r_735944_7312750_7312800_7312849_7312897_7312944 = args[0];
  
closureN_type c_7320302;
object e_7320418 [11];
c_7320302.hdr.mark = gc_color_red;
 c_7320302.hdr.grayed = 0;
c_7320302.tag = closureN_tag;
 c_7320302.fn = (function_type)__lambda_664;
c_7320302.num_args = 1;
c_7320302.num_elements = 11;
c_7320302.elements = (object *)e_7320418;
c_7320302.elements[0] = ((closureN)self_7313696)->elements[0];
c_7320302.elements[1] = ((closureN)self_7313696)->elements[1];
c_7320302.elements[2] = ((closureN)self_7313696)->elements[2];
c_7320302.elements[3] = ((closureN)self_7313696)->elements[3];
c_7320302.elements[4] = ((closureN)self_7313696)->elements[4];
c_7320302.elements[5] = ((closureN)self_7313696)->elements[5];
c_7320302.elements[6] = ((closureN)self_7313696)->elements[6];
c_7320302.elements[7] = ((closureN)self_7313696)->elements[7];
c_7320302.elements[8] = ((closureN)self_7313696)->elements[8];
c_7320302.elements[9] = ((closureN)self_7313696)->elements[9];
c_7320302.elements[10] = ((closureN)self_7313696)->elements[10];


pair_type local_7320421; 
return_direct_with_clo1(data,(closure)&c_7320302,__lambda_664,  set_pair_as_expr(&local_7320421, NULL, r_735944_7312750_7312800_7312849_7312897_7312944));; 
}

static void __lambda_664(void *data, object self_7313697, int argc, object *args) /* object self_7313697, object r_735941_738424_7312751_7312801_7312850_7312898_7312945 */
 {
 object r_735941_738424_7312751_7312801_7312850_7312898_7312945 = args[0];
  
closureN_type c_7320305;
object e_7320417 [12];
c_7320305.hdr.mark = gc_color_red;
 c_7320305.hdr.grayed = 0;
c_7320305.tag = closureN_tag;
 c_7320305.fn = (function_type)__lambda_665;
c_7320305.num_args = 1;
c_7320305.num_elements = 12;
c_7320305.elements = (object *)e_7320417;
c_7320305.elements[0] = ((closureN)self_7313697)->elements[0];
c_7320305.elements[1] = ((closureN)self_7313697)->elements[1];
c_7320305.elements[2] = ((closureN)self_7313697)->elements[2];
c_7320305.elements[3] = ((closureN)self_7313697)->elements[3];
c_7320305.elements[4] = ((closureN)self_7313697)->elements[4];
c_7320305.elements[5] = ((closureN)self_7313697)->elements[5];
c_7320305.elements[6] = ((closureN)self_7313697)->elements[6];
c_7320305.elements[7] = ((closureN)self_7313697)->elements[7];
c_7320305.elements[8] = ((closureN)self_7313697)->elements[8];
c_7320305.elements[9] = r_735941_738424_7312751_7312801_7312850_7312898_7312945;
c_7320305.elements[10] = ((closureN)self_7313697)->elements[9];
c_7320305.elements[11] = ((closureN)self_7313697)->elements[10];

return_closcall2(data,  ((closureN)self_7313697)->elements[9],  &c_7320305, quote_lambda);; 
}

static void __lambda_665(void *data, object self_7313698, int argc, object *args) /* object self_7313698, object r_735934_738426_738454_7312752_7312802_7312851_7312899_7312946 */
 {
 object r_735934_738426_738454_7312752_7312802_7312851_7312899_7312946 = args[0];
  
closureN_type c_7320308;
object e_7320416 [13];
c_7320308.hdr.mark = gc_color_red;
 c_7320308.hdr.grayed = 0;
c_7320308.tag = closureN_tag;
 c_7320308.fn = (function_type)__lambda_666;
c_7320308.num_args = 1;
c_7320308.num_elements = 13;
c_7320308.elements = (object *)e_7320416;
c_7320308.elements[0] = ((closureN)self_7313698)->elements[0];
c_7320308.elements[1] = ((closureN)self_7313698)->elements[1];
c_7320308.elements[2] = ((closureN)self_7313698)->elements[2];
c_7320308.elements[3] = ((closureN)self_7313698)->elements[3];
c_7320308.elements[4] = ((closureN)self_7313698)->elements[4];
c_7320308.elements[5] = ((closureN)self_7313698)->elements[5];
c_7320308.elements[6] = ((closureN)self_7313698)->elements[6];
c_7320308.elements[7] = ((closureN)self_7313698)->elements[7];
c_7320308.elements[8] = r_735934_738426_738454_7312752_7312802_7312851_7312899_7312946;
c_7320308.elements[9] = ((closureN)self_7313698)->elements[8];
c_7320308.elements[10] = ((closureN)self_7313698)->elements[9];
c_7320308.elements[11] = ((closureN)self_7313698)->elements[10];
c_7320308.elements[12] = ((closureN)self_7313698)->elements[11];

return_closcall2(data,  ((closureN)self_7313698)->elements[10],  &c_7320308, quote_lambda);; 
}

static void __lambda_666(void *data, object self_7313699, int argc, object *args) /* object self_7313699, object r_735910_738429_738457_738483_738508_7312753_7312803_7312852_7312900_7312947 */
 {
 object r_735910_738429_738457_738483_738508_7312753_7312803_7312852_7312900_7312947 = args[0];
  
closureN_type c_7320310;
object e_7320385 [13];
c_7320310.hdr.mark = gc_color_red;
 c_7320310.hdr.grayed = 0;
c_7320310.tag = closureN_tag;
 c_7320310.fn = (function_type)__lambda_667;
c_7320310.num_args = 1;
c_7320310.num_elements = 13;
c_7320310.elements = (object *)e_7320385;
c_7320310.elements[0] = ((closureN)self_7313699)->elements[0];
c_7320310.elements[1] = ((closureN)self_7313699)->elements[1];
c_7320310.elements[2] = ((closureN)self_7313699)->elements[2];
c_7320310.elements[3] = ((closureN)self_7313699)->elements[3];
c_7320310.elements[4] = ((closureN)self_7313699)->elements[4];
c_7320310.elements[5] = ((closureN)self_7313699)->elements[5];
c_7320310.elements[6] = ((closureN)self_7313699)->elements[6];
c_7320310.elements[7] = ((closureN)self_7313699)->elements[7];
c_7320310.elements[8] = r_735910_738429_738457_738483_738508_7312753_7312803_7312852_7312900_7312947;
c_7320310.elements[9] = ((closureN)self_7313699)->elements[8];
c_7320310.elements[10] = ((closureN)self_7313699)->elements[9];
c_7320310.elements[11] = ((closureN)self_7313699)->elements[10];
c_7320310.elements[12] = ((closureN)self_7313699)->elements[12];


closureN_type c_7320386;
object e_7320415 [1];
c_7320386.hdr.mark = gc_color_red;
 c_7320386.hdr.grayed = 0;
c_7320386.tag = closureN_tag;
 c_7320386.fn = (function_type)__lambda_670;
c_7320386.num_args = 2;
c_7320386.num_elements = 1;
c_7320386.elements = (object *)e_7320415;
c_7320386.elements[0] = ((closureN)self_7313699)->elements[11];

return_direct_with_clo1(data,(closure)&c_7320310,__lambda_667,  &c_7320386);; 
}

static void __lambda_670(void *data, object self_7313700, int argc, object *args) /* object self_7313700, object k_735917_738444_738472_738498_738523_7312757_7312807_7312856_7312904_7312951, object p_73982_731096_733443_738445_738473_738499_738524_7312758_7312808_7312857_7312905_7312952, object old_73983_731097_733444_738446_738474_738500_738525_7312759_7312809_7312858_7312906_7312953 */
 {
 object k_735917_738444_738472_738498_738523_7312757_7312807_7312856_7312904_7312951 = args[0]; object p_73982_731096_733443_738445_738473_738499_738524_7312758_7312808_7312857_7312905_7312952 = args[1]; object old_73983_731097_733444_738446_738474_738500_738525_7312759_7312809_7312858_7312906_7312953 = args[2];
  
closureN_type c_7320389;
object e_7320414 [4];
c_7320389.hdr.mark = gc_color_red;
 c_7320389.hdr.grayed = 0;
c_7320389.tag = closureN_tag;
 c_7320389.fn = (function_type)__lambda_671;
c_7320389.num_args = 1;
c_7320389.num_elements = 4;
c_7320389.elements = (object *)e_7320414;
c_7320389.elements[0] = k_735917_738444_738472_738498_738523_7312757_7312807_7312856_7312904_7312951;
c_7320389.elements[1] = old_73983_731097_733444_738446_738474_738500_738525_7312759_7312809_7312858_7312906_7312953;
c_7320389.elements[2] = p_73982_731096_733443_738445_738473_738499_738524_7312758_7312808_7312857_7312905_7312952;
c_7320389.elements[3] = ((closureN)self_7313700)->elements[0];

return_closcall2(data,  ((closureN)self_7313700)->elements[0],  &c_7320389, quote_quote);; 
}

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

return_closcall2(data,  ((closureN)self_7313701)->elements[3],  &c_7320392, quote__121param_91set_67_125);; 
}

static void __lambda_672(void *data, object self_7313702, int argc, object *args) /* object self_7313702, object r_735928_738448_738476_738502_738527_7312761_7312811_7312860_7312908_7312955 */
 {
 object r_735928_738448_738476_738502_738527_7312761_7312811_7312860_7312908_7312955 = args[0];
  
pair_type local_7320397; 

pair_type local_7320401; 

pair_type local_7320404; 

pair_type local_7320408; 

pair_type local_7320411; 
return_direct_with_clo1(data,  ((closureN)self_7313702)->elements[0], (((closure)  ((closureN)self_7313702)->elements[0])->fn),  set_pair_as_expr(&local_7320397, ((closureN)self_7313702)->elements[2], set_pair_as_expr(&local_7320401, set_pair_as_expr(&local_7320404, ((closureN)self_7313702)->elements[3], set_pair_as_expr(&local_7320408, r_735928_738448_738476_738502_738527_7312761_7312811_7312860_7312908_7312955, NULL)), set_pair_as_expr(&local_7320411, ((closureN)self_7313702)->elements[1], NULL))));; 
}

static void __lambda_667(void *data, object self_7313703, int argc, object *args) /* object self_7313703, object r_735916_738430_738458_738484_738509_7312754_7312804_7312853_7312901_7312948 */
 {
 object r_735916_738430_738458_738484_738509_7312754_7312804_7312853_7312901_7312948 = args[0];
  
closureN_type c_7320312;
object e_7320382 [11];
c_7320312.hdr.mark = gc_color_red;
 c_7320312.hdr.grayed = 0;
c_7320312.tag = closureN_tag;
 c_7320312.fn = (function_type)__lambda_668;
c_7320312.num_args = 1;
c_7320312.num_elements = 11;
c_7320312.elements = (object *)e_7320382;
c_7320312.elements[0] = ((closureN)self_7313703)->elements[0];
c_7320312.elements[1] = ((closureN)self_7313703)->elements[3];
c_7320312.elements[2] = ((closureN)self_7313703)->elements[4];
c_7320312.elements[3] = ((closureN)self_7313703)->elements[5];
c_7320312.elements[4] = ((closureN)self_7313703)->elements[6];
c_7320312.elements[5] = ((closureN)self_7313703)->elements[7];
c_7320312.elements[6] = ((closureN)self_7313703)->elements[8];
c_7320312.elements[7] = ((closureN)self_7313703)->elements[9];
c_7320312.elements[8] = ((closureN)self_7313703)->elements[10];
c_7320312.elements[9] = ((closureN)self_7313703)->elements[11];
c_7320312.elements[10] = ((closureN)self_7313703)->elements[12];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7320312, r_735916_738430_738458_738484_738509_7312754_7312804_7312853_7312901_7312948, ((closureN)self_7313703)->elements[2], ((closureN)self_7313703)->elements[1]);; 
}

static void __lambda_668(void *data, object self_7313704, int argc, object *args) /* object self_7313704, object r_735914_738431_738459_738485_738510_7312755_7312805_7312854_7312902_7312949 */
 {
 object r_735914_738431_738459_738485_738510_7312755_7312805_7312854_7312902_7312949 = args[0];
  
closureN_type c_7320314;
object e_7320378 [11];
c_7320314.hdr.mark = gc_color_red;
 c_7320314.hdr.grayed = 0;
c_7320314.tag = closureN_tag;
 c_7320314.fn = (function_type)__lambda_669;
c_7320314.num_args = 1;
c_7320314.num_elements = 11;
c_7320314.elements = (object *)e_7320378;
c_7320314.elements[0] = ((closureN)self_7313704)->elements[0];
c_7320314.elements[1] = ((closureN)self_7313704)->elements[1];
c_7320314.elements[2] = ((closureN)self_7313704)->elements[2];
c_7320314.elements[3] = ((closureN)self_7313704)->elements[3];
c_7320314.elements[4] = ((closureN)self_7313704)->elements[4];
c_7320314.elements[5] = ((closureN)self_7313704)->elements[5];
c_7320314.elements[6] = ((closureN)self_7313704)->elements[6];
c_7320314.elements[7] = ((closureN)self_7313704)->elements[7];
c_7320314.elements[8] = ((closureN)self_7313704)->elements[8];
c_7320314.elements[9] = ((closureN)self_7313704)->elements[9];
c_7320314.elements[10] = ((closureN)self_7313704)->elements[10];


pair_type local_7320381; 
return_direct_with_clo1(data,(closure)&c_7320314,__lambda_669,  set_pair_as_expr(&local_7320381, NULL, r_735914_738431_738459_738485_738510_7312755_7312805_7312854_7312902_7312949));; 
}

static void __lambda_669(void *data, object self_7313705, int argc, object *args) /* object self_7313705, object r_735911_738432_738460_738486_738511_738532_7312756_7312806_7312855_7312903_7312950 */
 {
 object r_735911_738432_738460_738486_738511_738532_7312756_7312806_7312855_7312903_7312950 = args[0];
  
pair_type local_7320319; 

pair_type local_7320322; 

pair_type local_7320326; 

pair_type local_7320330; 

pair_type local_7320333; 

pair_type local_7320337; 

pair_type local_7320341; 

pair_type local_7320344; 

pair_type local_7320348; 

pair_type local_7320351; 

pair_type local_7320356; 

pair_type local_7320359; 

pair_type local_7320363; 







pair_type local_7320373; 

pair_type local_7320376; 
return_direct_with_clo1(data,  ((closureN)self_7313705)->elements[0], (((closure)  ((closureN)self_7313705)->elements[0])->fn),  set_pair_as_expr(&local_7320319, set_pair_as_expr(&local_7320322, ((closureN)self_7313705)->elements[1], set_pair_as_expr(&local_7320326, ((closureN)self_7313705)->elements[2], set_pair_as_expr(&local_7320330, set_pair_as_expr(&local_7320333, ((closureN)self_7313705)->elements[3], set_pair_as_expr(&local_7320337, ((closureN)self_7313705)->elements[4], set_pair_as_expr(&local_7320341, set_pair_as_expr(&local_7320344, ((closureN)self_7313705)->elements[5], set_pair_as_expr(&local_7320348, set_pair_as_expr(&local_7320351, ((closureN)self_7313705)->elements[8], ((closureN)self_7313705)->elements[9]), set_pair_as_expr(&local_7320356, set_pair_as_expr(&local_7320359, ((closureN)self_7313705)->elements[7], set_pair_as_expr(&local_7320363, NULL, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313705)->elements[10]))))), set_pair_as_expr(&local_7320373, set_pair_as_expr(&local_7320376, ((closureN)self_7313705)->elements[6], r_735911_738432_738460_738486_738511_738532_7312756_7312806_7312855_7312903_7312950), NULL)))), NULL))), NULL))), boolean_f));; 
}

static void __lambda_642(void *data, object self_7313706, int argc, object *args) /* object self_7313706, object r_735862 */
 {
 object r_735862 = args[0];
  
closureN_type c_7320211;
object e_7320223 [8];
c_7320211.hdr.mark = gc_color_red;
 c_7320211.hdr.grayed = 0;
c_7320211.tag = closureN_tag;
 c_7320211.fn = (function_type)__lambda_643;
c_7320211.num_args = 1;
c_7320211.num_elements = 8;
c_7320211.elements = (object *)e_7320223;
c_7320211.elements[0] = ((closureN)self_7313706)->elements[0];
c_7320211.elements[1] = ((closureN)self_7313706)->elements[1];
c_7320211.elements[2] = ((closureN)self_7313706)->elements[2];
c_7320211.elements[3] = ((closureN)self_7313706)->elements[3];
c_7320211.elements[4] = ((closureN)self_7313706)->elements[4];
c_7320211.elements[5] = ((closureN)self_7313706)->elements[5];
c_7320211.elements[6] = ((closureN)self_7313706)->elements[6];
c_7320211.elements[7] = ((closureN)self_7313706)->elements[7];



return_direct_with_clo1(data,(closure)&c_7320211,__lambda_643,  Cyc_set_cell(data, ((closureN)self_7313706)->elements[1], r_735862));; 
}

static void __lambda_643(void *data, object self_7313707, int argc, object *args) /* object self_7313707, object r_735861 */
 {

  

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

static void __lambda_1463(void *data, object _, int argc, object *args) {object k = args[0];object count = args[1];object fill = args[2]; object s = NULL;
        char ch_buf[5];
        char_type c;
        int buflen, num_cp, len;
        Cyc_check_fixnum(data, count);
        if (!obj_is_char(fill)) {
          Cyc_rt_raise2(data, "Expected character buf received", fill);
        }
        c = obj_obj2char(fill);
        if (!c) {
          buflen = 1;
        } else {
          Cyc_utf8_encode_char(ch_buf, 5, c);
          buflen = strlen(ch_buf);
        }
        num_cp = obj_obj2int(count);
        len = num_cp * buflen;
        if (len >= MAX_STACK_OBJ) {
          int heap_grown;
          s = gc_alloc(((gc_thread_data *)data)->heap, 
                       sizeof(string_type) + len + 1,
                       boolean_f, // OK to populate manually over here
                       (gc_thread_data *)data, 
                       &heap_grown);
          ((string_type *) s)->hdr.mark = ((gc_thread_data *)data)->gc_alloc_color;
          ((string_type *) s)->hdr.grayed = 0;
          ((string_type *) s)->hdr.immutable = 0;
          ((string_type *) s)->tag = string_tag; 
          ((string_type *) s)->len = len;
          ((string_type *) s)->num_cp = num_cp;
          ((string_type *) s)->str = (((char *)s) + sizeof(string_type));
        } else {
          s = alloca(sizeof(string_type));
          ((string_type *)s)->hdr.mark = gc_color_red; 
          ((string_type *)s)->hdr.grayed = 0;
          ((string_type *)s)->hdr.immutable = 0;
          ((string_type *)s)->tag = string_tag; 
          ((string_type *)s)->len = len;
          ((string_type *)s)->num_cp = num_cp;
          ((string_type *)s)->str = alloca(sizeof(char) * (len + 1));
        }
        if (buflen == 1) { /* Fast path */
          memset(((string_type *)s)->str, ch_buf[0], len);
        } else {
          char *buf = ((string_type *)s)->str;
          int bi, si, slen = buflen;
          for (bi = 0, si = 0; bi < len; bi++, si++) {
            buf[bi] = ch_buf[si % slen];
          }
        }
        ((string_type *)s)->str[len] = '\0';
        return_closcall1(data, k, s);
       }
static void __lambda_635(void *data, object _, int argc, object *args) /* closure _,object k_735717, object k_73784_733352, object fill_73785_733353_raw, ... */
 {
object k_735717 = args[0]; object k_73784_733352 = args[1];
load_varargs(fill_73785_733353, args, 2, argc - 2);
  object r_735718;
  Cyc_st_add(data, "scheme/base.sld:make-string");
  
if( (boolean_f != Cyc_is_null(fill_73785_733353)) ){ 
  r_735718 = obj_char2obj(32);
} else { 
  
  r_735718 = Cyc_car(data, fill_73785_733353);}
;return_direct_with_clo3(data,  __glo_Cyc_91make_91string_scheme_base, (((closure)  __glo_Cyc_91make_91string_scheme_base)->fn),  k_735717, k_73784_733352, r_735718);; 
}

static void __lambda_634(void *data, object _, int argc, object *args) /* closure _,object k_735714, object chars_73783_733351_raw, ... */
 {
object k_735714 = args[0];
load_varargs(chars_73783_733351, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:string");

object c_7320159 = Cyc_list2string(data,  k_735714,chars_73783_733351);
return_direct_with_clo1(data,  k_735714, (((closure)  k_735714)->fn),  c_7320159);; 
}

static void __lambda_627(void *data, object _, int argc, object *args) /* closure _,object k_735704, object type_127_73777_733346, object obj_73778_733347, object objs_73779_733348 */
 {
object k_735704 = args[0]; object type_127_73777_733346 = args[1]; object obj_73778_733347 = args[2]; object objs_73779_733348 = args[3];
  Cyc_st_add(data, "scheme/base.sld:Cyc-obj=?");

closureN_type c_7320127;
object e_7320154 [3];
c_7320127.hdr.mark = gc_color_red;
 c_7320127.hdr.grayed = 0;
c_7320127.tag = closureN_tag;
 c_7320127.fn = (function_type)__lambda_628;
c_7320127.num_args = 1;
c_7320127.num_elements = 3;
c_7320127.elements = (object *)e_7320154;
c_7320127.elements[0] = k_735704;
c_7320127.elements[1] = obj_73778_733347;
c_7320127.elements[2] = objs_73779_733348;

return_closcall2(data,  type_127_73777_733346,  &c_7320127, obj_73778_733347);; 
}

static void __lambda_628(void *data, object self_7313630, int argc, object *args) /* object self_7313630, object r_735705 */
 {
 object r_735705 = args[0];
  if( (boolean_f != r_735705) ){ 
  
closureN_type c_7320129;
object e_7320132 [1];
c_7320129.hdr.mark = gc_color_red;
 c_7320129.hdr.grayed = 0;
c_7320129.tag = closureN_tag;
 c_7320129.fn = (function_type)__lambda_629;
c_7320129.num_args = 1;
c_7320129.num_elements = 1;
c_7320129.elements = (object *)e_7320132;
c_7320129.elements[0] = ((closureN)self_7313630)->elements[0];


closureN_type c_7320133;
object e_7320151 [2];
c_7320133.hdr.mark = gc_color_red;
 c_7320133.hdr.grayed = 0;
c_7320133.tag = closureN_tag;
 c_7320133.fn = (function_type)__lambda_630;
c_7320133.num_args = 1;
c_7320133.num_elements = 2;
c_7320133.elements = (object *)e_7320151;
c_7320133.elements[0] = ((closureN)self_7313630)->elements[1];
c_7320133.elements[1] = ((closureN)self_7313630)->elements[2];

return_direct_with_clo1(data,(closure)&c_7320129,__lambda_629,  &c_7320133);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313630)->elements[0], (((closure)  ((closureN)self_7313630)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_630(void *data, object self_7313631, int argc, object *args) /* object self_7313631, object k_735707, object return_73781_733349 */
 {
 object k_735707 = args[0]; object return_73781_733349 = args[1];
  
closureN_type c_7320135;
object e_7320142 [2];
c_7320135.hdr.mark = gc_color_red;
 c_7320135.hdr.grayed = 0;
c_7320135.tag = closureN_tag;
 c_7320135.fn = (function_type)__lambda_631;
c_7320135.num_args = 1;
c_7320135.num_elements = 2;
c_7320135.elements = (object *)e_7320142;
c_7320135.elements[0] = k_735707;
c_7320135.elements[1] = ((closureN)self_7313631)->elements[1];


closureN_type c_7320143;
object e_7320150 [2];
c_7320143.hdr.mark = gc_color_red;
 c_7320143.hdr.grayed = 0;
c_7320143.tag = closureN_tag;
 c_7320143.fn = (function_type)__lambda_633;
c_7320143.num_args = 1;
c_7320143.num_elements = 2;
c_7320143.elements = (object *)e_7320150;
c_7320143.elements[0] = ((closureN)self_7313631)->elements[0];
c_7320143.elements[1] = return_73781_733349;

return_direct_with_clo1(data,(closure)&c_7320135,__lambda_631,  &c_7320143);; 
}

static void __lambda_633(void *data, object self_7313632, int argc, object *args) /* object self_7313632, object k_735710, object o_73782_733350 */
 {
 object k_735710 = args[0]; object o_73782_733350 = args[1];
    
if( (boolean_f != Cyc_eq(o_73782_733350, ((closureN)self_7313632)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_735710, (((closure)  k_735710)->fn),  Cyc_VOID);
} else { 
  return_closcall2(data,  ((closureN)self_7313632)->elements[1],  k_735710, boolean_f);}
;; 
}

static void __lambda_631(void *data, object self_7313633, int argc, object *args) /* object self_7313633, object r_735709 */
 {
 object r_735709 = args[0];
  
closureN_type c_7320137;
object e_7320140 [1];
c_7320137.hdr.mark = gc_color_red;
 c_7320137.hdr.grayed = 0;
c_7320137.tag = closureN_tag;
 c_7320137.fn = (function_type)__lambda_632;
c_7320137.num_args = 1;
c_7320137.num_elements = 1;
c_7320137.elements = (object *)e_7320140;
c_7320137.elements[0] = ((closureN)self_7313633)->elements[0];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7320137, r_735709, ((closureN)self_7313633)->elements[1]);; 
}

static void __lambda_632(void *data, object self_7313634, int argc, object *args) /* object self_7313634, object r_735708 */
 {

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

static void __lambda_629(void *data, object self_7313635, int argc, object *args) /* object self_7313635, object r_735706 */
 {
 object r_735706 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_7313635)->elements[0], r_735706);; 
}

static void __lambda_626(void *data, object _, int argc, object *args) /* closure _,object k_735700, object sym1_73774_733343, object sym2_73775_733344, object syms_73776_733345_raw, ... */
 {
object k_735700 = args[0]; object sym1_73774_733343 = args[1]; object sym2_73775_733344 = args[2];
load_varargs(syms_73776_733345, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:symbol=?");

pair_type local_7320124; 
return_direct_with_clo4(data,  __glo_Cyc_91obj_123_127_scheme_base, (((closure)  __glo_Cyc_91obj_123_127_scheme_base)->fn),  k_735700, primitive_symbol_127, sym1_73774_733343, set_pair_as_expr(&local_7320124, sym2_73775_733344, syms_73776_733345));; 
}

static void __lambda_625(void *data, object _, int argc, object *args) /* closure _,object k_735696, object b1_73771_733340, object b2_73772_733341, object bs_73773_733342_raw, ... */
 {
object k_735696 = args[0]; object b1_73771_733340 = args[1]; object b2_73772_733341 = args[2];
load_varargs(bs_73773_733342, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:boolean=?");

pair_type local_7320119; 
return_direct_with_clo4(data,  __glo_Cyc_91obj_123_127_scheme_base, (((closure)  __glo_Cyc_91obj_123_127_scheme_base)->fn),  k_735696, primitive_boolean_127, b1_73771_733340, set_pair_as_expr(&local_7320119, b2_73772_733341, bs_73773_733342));; 
}

static void __lambda_612(void *data, object _, int argc, object *args) /* closure _,object k_735675, object vec_73759_733332, object fill_73760_733333, object opts_73761_733334_raw, ... */
 {
object k_735675 = args[0]; object vec_73759_733332 = args[1]; object fill_73760_733333 = args[2];
load_varargs(opts_73761_733334, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:vector-fill!");

closureN_type c_7319985;
object e_7320114 [4];
c_7319985.hdr.mark = gc_color_red;
 c_7319985.hdr.grayed = 0;
c_7319985.tag = closureN_tag;
 c_7319985.fn = (function_type)__lambda_613;
c_7319985.num_args = 4;
c_7319985.num_elements = 4;
c_7319985.elements = (object *)e_7320114;
c_7319985.elements[0] = fill_73760_733333;
c_7319985.elements[1] = k_735675;
c_7319985.elements[2] = opts_73761_733334;
c_7319985.elements[3] = vec_73759_733332;

return_direct_with_clo4(data,(closure)&c_7319985,__lambda_613,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_613(void *data, object self_7313614, int argc, object *args) /* object self_7313614, object len_73762_733335, object start_73763_733336, object end_73764_733337, object loop_73765_733338 */
 {
 object len_73762_733335 = args[0]; object start_73763_733336 = args[1]; object end_73764_733337 = args[2]; object loop_73765_733338 = args[3];
  
closureN_type c_7319987;
object e_7320110 [7];
c_7319987.hdr.mark = gc_color_red;
 c_7319987.hdr.grayed = 0;
c_7319987.tag = closureN_tag;
 c_7319987.fn = (function_type)__lambda_1415;
c_7319987.num_args = 1;
c_7319987.num_elements = 7;
c_7319987.elements = (object *)e_7320110;
c_7319987.elements[0] = end_73764_733337;
c_7319987.elements[1] = ((closureN)self_7313614)->elements[0];
c_7319987.elements[2] = ((closureN)self_7313614)->elements[1];
c_7319987.elements[3] = loop_73765_733338;
c_7319987.elements[4] = ((closureN)self_7313614)->elements[2];
c_7319987.elements[5] = start_73763_733336;
c_7319987.elements[6] = ((closureN)self_7313614)->elements[3];


pair_type local_7320113; 
return_direct_with_clo1(data,(closure)&c_7319987,__lambda_1415,  set_cell_as_expr(&local_7320113, len_73762_733335));; 
}

static void __lambda_1415(void *data, object self_7313615, int argc, object *args) /* object self_7313615, object len_73762_733335 */
 {
 object len_73762_733335 = args[0];
  
closureN_type c_7319989;
object e_7320105 [7];
c_7319989.hdr.mark = gc_color_red;
 c_7319989.hdr.grayed = 0;
c_7319989.tag = closureN_tag;
 c_7319989.fn = (function_type)__lambda_1414;
c_7319989.num_args = 1;
c_7319989.num_elements = 7;
c_7319989.elements = (object *)e_7320105;
c_7319989.elements[0] = ((closureN)self_7313615)->elements[0];
c_7319989.elements[1] = ((closureN)self_7313615)->elements[1];
c_7319989.elements[2] = ((closureN)self_7313615)->elements[2];
c_7319989.elements[3] = len_73762_733335;
c_7319989.elements[4] = ((closureN)self_7313615)->elements[3];
c_7319989.elements[5] = ((closureN)self_7313615)->elements[4];
c_7319989.elements[6] = ((closureN)self_7313615)->elements[6];


pair_type local_7320108; 
return_direct_with_clo1(data,(closure)&c_7319989,__lambda_1414,  set_cell_as_expr(&local_7320108, ((closureN)self_7313615)->elements[5]));; 
}

static void __lambda_1414(void *data, object self_7313616, int argc, object *args) /* object self_7313616, object start_73763_733336 */
 {
 object start_73763_733336 = args[0];
  
closureN_type c_7319991;
object e_7320100 [7];
c_7319991.hdr.mark = gc_color_red;
 c_7319991.hdr.grayed = 0;
c_7319991.tag = closureN_tag;
 c_7319991.fn = (function_type)__lambda_1413;
c_7319991.num_args = 1;
c_7319991.num_elements = 7;
c_7319991.elements = (object *)e_7320100;
c_7319991.elements[0] = ((closureN)self_7313616)->elements[1];
c_7319991.elements[1] = ((closureN)self_7313616)->elements[2];
c_7319991.elements[2] = ((closureN)self_7313616)->elements[3];
c_7319991.elements[3] = ((closureN)self_7313616)->elements[4];
c_7319991.elements[4] = ((closureN)self_7313616)->elements[5];
c_7319991.elements[5] = start_73763_733336;
c_7319991.elements[6] = ((closureN)self_7313616)->elements[6];


pair_type local_7320103; 
return_direct_with_clo1(data,(closure)&c_7319991,__lambda_1413,  set_cell_as_expr(&local_7320103, ((closureN)self_7313616)->elements[0]));; 
}

static void __lambda_1413(void *data, object self_7313617, int argc, object *args) /* object self_7313617, object end_73764_733337 */
 {
 object end_73764_733337 = args[0];
  
closureN_type c_7319993;
object e_7320095 [7];
c_7319993.hdr.mark = gc_color_red;
 c_7319993.hdr.grayed = 0;
c_7319993.tag = closureN_tag;
 c_7319993.fn = (function_type)__lambda_1412;
c_7319993.num_args = 1;
c_7319993.num_elements = 7;
c_7319993.elements = (object *)e_7320095;
c_7319993.elements[0] = end_73764_733337;
c_7319993.elements[1] = ((closureN)self_7313617)->elements[0];
c_7319993.elements[2] = ((closureN)self_7313617)->elements[1];
c_7319993.elements[3] = ((closureN)self_7313617)->elements[2];
c_7319993.elements[4] = ((closureN)self_7313617)->elements[4];
c_7319993.elements[5] = ((closureN)self_7313617)->elements[5];
c_7319993.elements[6] = ((closureN)self_7313617)->elements[6];


pair_type local_7320098; 
return_direct_with_clo1(data,(closure)&c_7319993,__lambda_1412,  set_cell_as_expr(&local_7320098, ((closureN)self_7313617)->elements[3]));; 
}

static void __lambda_1412(void *data, object self_7313618, int argc, object *args) /* object self_7313618, object loop_73765_733338 */
 {
 object loop_73765_733338 = args[0];
  
closureN_type c_7319995;
object e_7320091 [8];
c_7319995.hdr.mark = gc_color_red;
 c_7319995.hdr.grayed = 0;
c_7319995.tag = closureN_tag;
 c_7319995.fn = (function_type)__lambda_614;
c_7319995.num_args = 1;
c_7319995.num_elements = 8;
c_7319995.elements = (object *)e_7320091;
c_7319995.elements[0] = ((closureN)self_7313618)->elements[0];
c_7319995.elements[1] = ((closureN)self_7313618)->elements[1];
c_7319995.elements[2] = ((closureN)self_7313618)->elements[2];
c_7319995.elements[3] = ((closureN)self_7313618)->elements[3];
c_7319995.elements[4] = loop_73765_733338;
c_7319995.elements[5] = ((closureN)self_7313618)->elements[4];
c_7319995.elements[6] = ((closureN)self_7313618)->elements[5];
c_7319995.elements[7] = ((closureN)self_7313618)->elements[6];



return_direct_with_clo1(data,(closure)&c_7319995,__lambda_614,  Cyc_vector_length(data, ((closureN)self_7313618)->elements[6]));; 
}

static void __lambda_614(void *data, object self_7313619, int argc, object *args) /* object self_7313619, object r_735693 */
 {
 object r_735693 = args[0];
  
closureN_type c_7319997;
object e_7320087 [8];
c_7319997.hdr.mark = gc_color_red;
 c_7319997.hdr.grayed = 0;
c_7319997.tag = closureN_tag;
 c_7319997.fn = (function_type)__lambda_615;
c_7319997.num_args = 1;
c_7319997.num_elements = 8;
c_7319997.elements = (object *)e_7320087;
c_7319997.elements[0] = ((closureN)self_7313619)->elements[0];
c_7319997.elements[1] = ((closureN)self_7313619)->elements[1];
c_7319997.elements[2] = ((closureN)self_7313619)->elements[2];
c_7319997.elements[3] = ((closureN)self_7313619)->elements[3];
c_7319997.elements[4] = ((closureN)self_7313619)->elements[4];
c_7319997.elements[5] = ((closureN)self_7313619)->elements[5];
c_7319997.elements[6] = ((closureN)self_7313619)->elements[6];
c_7319997.elements[7] = ((closureN)self_7313619)->elements[7];



return_direct_with_clo1(data,(closure)&c_7319997,__lambda_615,  Cyc_set_cell(data, ((closureN)self_7313619)->elements[3], r_735693));; 
}

static void __lambda_615(void *data, object self_7313620, int argc, object *args) /* object self_7313620, object r_735676 */
 {

  object r_735689;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313620)->elements[5]), obj_int2obj(0))) ){ 
  
  r_735689 = Cyc_car(data, ((closureN)self_7313620)->elements[5]);
} else { 
  r_735689 = obj_int2obj(0);}
;
closureN_type c_7320010;
object e_7320083 [8];
c_7320010.hdr.mark = gc_color_red;
 c_7320010.hdr.grayed = 0;
c_7320010.tag = closureN_tag;
 c_7320010.fn = (function_type)__lambda_616;
c_7320010.num_args = 1;
c_7320010.num_elements = 8;
c_7320010.elements = (object *)e_7320083;
c_7320010.elements[0] = ((closureN)self_7313620)->elements[0];
c_7320010.elements[1] = ((closureN)self_7313620)->elements[1];
c_7320010.elements[2] = ((closureN)self_7313620)->elements[2];
c_7320010.elements[3] = ((closureN)self_7313620)->elements[3];
c_7320010.elements[4] = ((closureN)self_7313620)->elements[4];
c_7320010.elements[5] = ((closureN)self_7313620)->elements[5];
c_7320010.elements[6] = ((closureN)self_7313620)->elements[6];
c_7320010.elements[7] = ((closureN)self_7313620)->elements[7];



return_direct_with_clo1(data,(closure)&c_7320010,__lambda_616,  Cyc_set_cell(data, ((closureN)self_7313620)->elements[6], r_735689));; 
}

static void __lambda_616(void *data, object self_7313621, int argc, object *args) /* object self_7313621, object r_735677 */
 {

  
closureN_type c_7320012;
object e_7320026 [2];
c_7320012.hdr.mark = gc_color_red;
 c_7320012.hdr.grayed = 0;
c_7320012.tag = closureN_tag;
 c_7320012.fn = (function_type)__lambda_617;
c_7320012.num_args = 0;
c_7320012.num_elements = 2;
c_7320012.elements = (object *)e_7320026;
c_7320012.elements[0] = ((closureN)self_7313621)->elements[3];
c_7320012.elements[1] = ((closureN)self_7313621)->elements[5];


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

return_direct_with_clo1(data,(closure)&c_7320012,__lambda_617,  &c_7320027);; 
}

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



return_direct_with_clo1(data,(closure)&c_7320029,__lambda_619,  Cyc_set_cell(data, ((closureN)self_7313622)->elements[0], r_735685));; 
}

static void __lambda_619(void *data, object self_7313623, int argc, object *args) /* object self_7313623, object r_735678 */
 {

  
closureN_type c_7320031;
object e_7320046 [3];
c_7320031.hdr.mark = gc_color_red;
 c_7320031.hdr.grayed = 0;
c_7320031.tag = closureN_tag;
 c_7320031.fn = (function_type)__lambda_620;
c_7320031.num_args = 1;
c_7320031.num_elements = 3;
c_7320031.elements = (object *)e_7320046;
c_7320031.elements[0] = ((closureN)self_7313623)->elements[2];
c_7320031.elements[1] = ((closureN)self_7313623)->elements[3];
c_7320031.elements[2] = ((closureN)self_7313623)->elements[4];


closureN_type c_7320047;
object e_7320077 [4];
c_7320047.hdr.mark = gc_color_red;
 c_7320047.hdr.grayed = 0;
c_7320047.tag = closureN_tag;
 c_7320047.fn = (function_type)__lambda_622;
c_7320047.num_args = 1;
c_7320047.num_elements = 4;
c_7320047.elements = (object *)e_7320077;
c_7320047.elements[0] = ((closureN)self_7313623)->elements[0];
c_7320047.elements[1] = ((closureN)self_7313623)->elements[1];
c_7320047.elements[2] = ((closureN)self_7313623)->elements[3];
c_7320047.elements[3] = ((closureN)self_7313623)->elements[5];

return_direct_with_clo1(data,(closure)&c_7320031,__lambda_620,  &c_7320047);; 
}

static void __lambda_622(void *data, object self_7313624, int argc, object *args) /* object self_7313624, object k_735681, object i_73766_733339 */
 {
 object k_735681 = args[0]; object i_73766_733339 = args[1];
  
closureN_type c_7320049;
object e_7320071 [5];
c_7320049.hdr.mark = gc_color_red;
 c_7320049.hdr.grayed = 0;
c_7320049.tag = closureN_tag;
 c_7320049.fn = (function_type)__lambda_623;
c_7320049.num_args = 1;
c_7320049.num_elements = 5;
c_7320049.elements = (object *)e_7320071;
c_7320049.elements[0] = ((closureN)self_7313624)->elements[1];
c_7320049.elements[1] = i_73766_733339;
c_7320049.elements[2] = k_735681;
c_7320049.elements[3] = ((closureN)self_7313624)->elements[2];
c_7320049.elements[4] = ((closureN)self_7313624)->elements[3];





return_direct_with_clo1(data,(closure)&c_7320049,__lambda_623,  Cyc_num_fast_eq_op(data, i_73766_733339, car(((closureN)self_7313624)->elements[0])));; 
}

static void __lambda_623(void *data, object self_7313625, int argc, object *args) /* object self_7313625, object r_735682 */
 {
 object r_735682 = args[0];
  if( (boolean_f != r_735682) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313625)->elements[2], (((closure)  ((closureN)self_7313625)->elements[2])->fn),  ((closureN)self_7313625)->elements[4]);
} else { 
  
closureN_type c_7320054;
object e_7320064 [3];
c_7320054.hdr.mark = gc_color_red;
 c_7320054.hdr.grayed = 0;
c_7320054.tag = closureN_tag;
 c_7320054.fn = (function_type)__lambda_624;
c_7320054.num_args = 1;
c_7320054.num_elements = 3;
c_7320054.elements = (object *)e_7320064;
c_7320054.elements[0] = ((closureN)self_7313625)->elements[1];
c_7320054.elements[1] = ((closureN)self_7313625)->elements[2];
c_7320054.elements[2] = ((closureN)self_7313625)->elements[3];


object c_7320067 = Cyc_vector_set_cps(data,(closure)&c_7320054,((closureN)self_7313625)->elements[4], ((closureN)self_7313625)->elements[1], ((closureN)self_7313625)->elements[0]);
return_closcall1(data,(closure)&c_7320054,  c_7320067);}
;; 
}

static void __lambda_624(void *data, object self_7313626, int argc, object *args) /* object self_7313626, object r_735683 */
 {

  


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

static void __lambda_620(void *data, object self_7313627, int argc, object *args) /* object self_7313627, object r_735680 */
 {
 object r_735680 = args[0];
  
closureN_type c_7320033;
object e_7320042 [3];
c_7320033.hdr.mark = gc_color_red;
 c_7320033.hdr.grayed = 0;
c_7320033.tag = closureN_tag;
 c_7320033.fn = (function_type)__lambda_621;
c_7320033.num_args = 1;
c_7320033.num_elements = 3;
c_7320033.elements = (object *)e_7320042;
c_7320033.elements[0] = ((closureN)self_7313627)->elements[0];
c_7320033.elements[1] = ((closureN)self_7313627)->elements[1];
c_7320033.elements[2] = ((closureN)self_7313627)->elements[2];



return_direct_with_clo1(data,(closure)&c_7320033,__lambda_621,  Cyc_set_cell(data, ((closureN)self_7313627)->elements[1], r_735680));; 
}

static void __lambda_621(void *data, object self_7313628, int argc, object *args) /* object self_7313628, object r_735679 */
 {

  



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

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

return_direct_with_clo1(data,  k_735686,__lambda_618,  Cyc_cadr(data, ((closureN)self_7313629)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735686,__lambda_618,  car(((closureN)self_7313629)->elements[0]));}
;; 
}

static void __lambda_601(void *data, object _, int argc, object *args) /* closure _,object k_735652, object to_73745_733322, object at_73746_733323, object from_73747_733324, object opts_73748_733325_raw, ... */
 {
object k_735652 = args[0]; object to_73745_733322 = args[1]; object at_73746_733323 = args[2]; object from_73747_733324 = args[3];
load_varargs(opts_73748_733325, args, 4, argc - 4);
  Cyc_st_add(data, "scheme/base.sld:vector-copy!");

closureN_type c_7319854;
object e_7319982 [5];
c_7319854.hdr.mark = gc_color_red;
 c_7319854.hdr.grayed = 0;
c_7319854.tag = closureN_tag;
 c_7319854.fn = (function_type)__lambda_602;
c_7319854.num_args = 4;
c_7319854.num_elements = 5;
c_7319854.elements = (object *)e_7319982;
c_7319854.elements[0] = at_73746_733323;
c_7319854.elements[1] = from_73747_733324;
c_7319854.elements[2] = k_735652;
c_7319854.elements[3] = opts_73748_733325;
c_7319854.elements[4] = to_73745_733322;

return_direct_with_clo4(data,(closure)&c_7319854,__lambda_602,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_602(void *data, object self_7313600, int argc, object *args) /* object self_7313600, object len_73749_733326, object start_73750_733327, object end_73751_733328, object loop_73752_733329 */
 {
 object len_73749_733326 = args[0]; object start_73750_733327 = args[1]; object end_73751_733328 = args[2]; object loop_73752_733329 = args[3];
  
closureN_type c_7319856;
object e_7319978 [8];
c_7319856.hdr.mark = gc_color_red;
 c_7319856.hdr.grayed = 0;
c_7319856.tag = closureN_tag;
 c_7319856.fn = (function_type)__lambda_1411;
c_7319856.num_args = 1;
c_7319856.num_elements = 8;
c_7319856.elements = (object *)e_7319978;
c_7319856.elements[0] = ((closureN)self_7313600)->elements[0];
c_7319856.elements[1] = end_73751_733328;
c_7319856.elements[2] = ((closureN)self_7313600)->elements[1];
c_7319856.elements[3] = ((closureN)self_7313600)->elements[2];
c_7319856.elements[4] = loop_73752_733329;
c_7319856.elements[5] = ((closureN)self_7313600)->elements[3];
c_7319856.elements[6] = start_73750_733327;
c_7319856.elements[7] = ((closureN)self_7313600)->elements[4];


pair_type local_7319981; 
return_direct_with_clo1(data,(closure)&c_7319856,__lambda_1411,  set_cell_as_expr(&local_7319981, len_73749_733326));; 
}

static void __lambda_1411(void *data, object self_7313601, int argc, object *args) /* object self_7313601, object len_73749_733326 */
 {
 object len_73749_733326 = args[0];
  
closureN_type c_7319858;
object e_7319973 [8];
c_7319858.hdr.mark = gc_color_red;
 c_7319858.hdr.grayed = 0;
c_7319858.tag = closureN_tag;
 c_7319858.fn = (function_type)__lambda_1410;
c_7319858.num_args = 1;
c_7319858.num_elements = 8;
c_7319858.elements = (object *)e_7319973;
c_7319858.elements[0] = ((closureN)self_7313601)->elements[0];
c_7319858.elements[1] = ((closureN)self_7313601)->elements[1];
c_7319858.elements[2] = ((closureN)self_7313601)->elements[2];
c_7319858.elements[3] = ((closureN)self_7313601)->elements[3];
c_7319858.elements[4] = len_73749_733326;
c_7319858.elements[5] = ((closureN)self_7313601)->elements[4];
c_7319858.elements[6] = ((closureN)self_7313601)->elements[5];
c_7319858.elements[7] = ((closureN)self_7313601)->elements[7];


pair_type local_7319976; 
return_direct_with_clo1(data,(closure)&c_7319858,__lambda_1410,  set_cell_as_expr(&local_7319976, ((closureN)self_7313601)->elements[6]));; 
}

static void __lambda_1410(void *data, object self_7313602, int argc, object *args) /* object self_7313602, object start_73750_733327 */
 {
 object start_73750_733327 = args[0];
  
closureN_type c_7319860;
object e_7319968 [8];
c_7319860.hdr.mark = gc_color_red;
 c_7319860.hdr.grayed = 0;
c_7319860.tag = closureN_tag;
 c_7319860.fn = (function_type)__lambda_1409;
c_7319860.num_args = 1;
c_7319860.num_elements = 8;
c_7319860.elements = (object *)e_7319968;
c_7319860.elements[0] = ((closureN)self_7313602)->elements[0];
c_7319860.elements[1] = ((closureN)self_7313602)->elements[2];
c_7319860.elements[2] = ((closureN)self_7313602)->elements[3];
c_7319860.elements[3] = ((closureN)self_7313602)->elements[4];
c_7319860.elements[4] = ((closureN)self_7313602)->elements[5];
c_7319860.elements[5] = ((closureN)self_7313602)->elements[6];
c_7319860.elements[6] = start_73750_733327;
c_7319860.elements[7] = ((closureN)self_7313602)->elements[7];


pair_type local_7319971; 
return_direct_with_clo1(data,(closure)&c_7319860,__lambda_1409,  set_cell_as_expr(&local_7319971, ((closureN)self_7313602)->elements[1]));; 
}

static void __lambda_1409(void *data, object self_7313603, int argc, object *args) /* object self_7313603, object end_73751_733328 */
 {
 object end_73751_733328 = args[0];
  
closureN_type c_7319862;
object e_7319963 [8];
c_7319862.hdr.mark = gc_color_red;
 c_7319862.hdr.grayed = 0;
c_7319862.tag = closureN_tag;
 c_7319862.fn = (function_type)__lambda_1408;
c_7319862.num_args = 1;
c_7319862.num_elements = 8;
c_7319862.elements = (object *)e_7319963;
c_7319862.elements[0] = ((closureN)self_7313603)->elements[0];
c_7319862.elements[1] = end_73751_733328;
c_7319862.elements[2] = ((closureN)self_7313603)->elements[1];
c_7319862.elements[3] = ((closureN)self_7313603)->elements[2];
c_7319862.elements[4] = ((closureN)self_7313603)->elements[3];
c_7319862.elements[5] = ((closureN)self_7313603)->elements[5];
c_7319862.elements[6] = ((closureN)self_7313603)->elements[6];
c_7319862.elements[7] = ((closureN)self_7313603)->elements[7];


pair_type local_7319966; 
return_direct_with_clo1(data,(closure)&c_7319862,__lambda_1408,  set_cell_as_expr(&local_7319966, ((closureN)self_7313603)->elements[4]));; 
}

static void __lambda_1408(void *data, object self_7313604, int argc, object *args) /* object self_7313604, object loop_73752_733329 */
 {
 object loop_73752_733329 = args[0];
  
closureN_type c_7319864;
object e_7319956 [9];
c_7319864.hdr.mark = gc_color_red;
 c_7319864.hdr.grayed = 0;
c_7319864.tag = closureN_tag;
 c_7319864.fn = (function_type)__lambda_603;
c_7319864.num_args = 1;
c_7319864.num_elements = 9;
c_7319864.elements = (object *)e_7319956;
c_7319864.elements[0] = ((closureN)self_7313604)->elements[0];
c_7319864.elements[1] = ((closureN)self_7313604)->elements[1];
c_7319864.elements[2] = ((closureN)self_7313604)->elements[2];
c_7319864.elements[3] = ((closureN)self_7313604)->elements[3];
c_7319864.elements[4] = ((closureN)self_7313604)->elements[4];
c_7319864.elements[5] = loop_73752_733329;
c_7319864.elements[6] = ((closureN)self_7313604)->elements[5];
c_7319864.elements[7] = ((closureN)self_7313604)->elements[6];
c_7319864.elements[8] = ((closureN)self_7313604)->elements[7];





return_direct_with_clo1(data,(closure)&c_7319864,__lambda_603,  Cyc_set_cell(data, ((closureN)self_7313604)->elements[4], Cyc_vector_length(data, ((closureN)self_7313604)->elements[2])));; 
}

static void __lambda_603(void *data, object self_7313605, int argc, object *args) /* object self_7313605, object r_735653 */
 {

  object r_735668;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313605)->elements[6]), obj_int2obj(0))) ){ 
  
  r_735668 = Cyc_car(data, ((closureN)self_7313605)->elements[6]);
} else { 
  r_735668 = obj_int2obj(0);}
;
closureN_type c_7319877;
object e_7319952 [9];
c_7319877.hdr.mark = gc_color_red;
 c_7319877.hdr.grayed = 0;
c_7319877.tag = closureN_tag;
 c_7319877.fn = (function_type)__lambda_604;
c_7319877.num_args = 1;
c_7319877.num_elements = 9;
c_7319877.elements = (object *)e_7319952;
c_7319877.elements[0] = ((closureN)self_7313605)->elements[0];
c_7319877.elements[1] = ((closureN)self_7313605)->elements[1];
c_7319877.elements[2] = ((closureN)self_7313605)->elements[2];
c_7319877.elements[3] = ((closureN)self_7313605)->elements[3];
c_7319877.elements[4] = ((closureN)self_7313605)->elements[4];
c_7319877.elements[5] = ((closureN)self_7313605)->elements[5];
c_7319877.elements[6] = ((closureN)self_7313605)->elements[6];
c_7319877.elements[7] = ((closureN)self_7313605)->elements[7];
c_7319877.elements[8] = ((closureN)self_7313605)->elements[8];



return_direct_with_clo1(data,(closure)&c_7319877,__lambda_604,  Cyc_set_cell(data, ((closureN)self_7313605)->elements[7], r_735668));; 
}

static void __lambda_604(void *data, object self_7313606, int argc, object *args) /* object self_7313606, object r_735654 */
 {

  
closureN_type c_7319879;
object e_7319893 [2];
c_7319879.hdr.mark = gc_color_red;
 c_7319879.hdr.grayed = 0;
c_7319879.tag = closureN_tag;
 c_7319879.fn = (function_type)__lambda_605;
c_7319879.num_args = 0;
c_7319879.num_elements = 2;
c_7319879.elements = (object *)e_7319893;
c_7319879.elements[0] = ((closureN)self_7313606)->elements[4];
c_7319879.elements[1] = ((closureN)self_7313606)->elements[6];


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

return_direct_with_clo1(data,(closure)&c_7319879,__lambda_605,  &c_7319894);; 
}

static void __lambda_606(void *data, object self_7313607, int argc, object *args) /* object self_7313607, object r_735664 */
 {
 object r_735664 = args[0];
  
closureN_type c_7319896;
object e_7319947 [7];
c_7319896.hdr.mark = gc_color_red;
 c_7319896.hdr.grayed = 0;
c_7319896.tag = closureN_tag;
 c_7319896.fn = (function_type)__lambda_607;
c_7319896.num_args = 1;
c_7319896.num_elements = 7;
c_7319896.elements = (object *)e_7319947;
c_7319896.elements[0] = ((closureN)self_7313607)->elements[0];
c_7319896.elements[1] = ((closureN)self_7313607)->elements[1];
c_7319896.elements[2] = ((closureN)self_7313607)->elements[2];
c_7319896.elements[3] = ((closureN)self_7313607)->elements[3];
c_7319896.elements[4] = ((closureN)self_7313607)->elements[4];
c_7319896.elements[5] = ((closureN)self_7313607)->elements[5];
c_7319896.elements[6] = ((closureN)self_7313607)->elements[6];



return_direct_with_clo1(data,(closure)&c_7319896,__lambda_607,  Cyc_set_cell(data, ((closureN)self_7313607)->elements[1], r_735664));; 
}

static void __lambda_607(void *data, object self_7313608, int argc, object *args) /* object self_7313608, object r_735655 */
 {

  
closureN_type c_7319898;
object e_7319914 [4];
c_7319898.hdr.mark = gc_color_red;
 c_7319898.hdr.grayed = 0;
c_7319898.tag = closureN_tag;
 c_7319898.fn = (function_type)__lambda_608;
c_7319898.num_args = 1;
c_7319898.num_elements = 4;
c_7319898.elements = (object *)e_7319914;
c_7319898.elements[0] = ((closureN)self_7313608)->elements[0];
c_7319898.elements[1] = ((closureN)self_7313608)->elements[3];
c_7319898.elements[2] = ((closureN)self_7313608)->elements[4];
c_7319898.elements[3] = ((closureN)self_7313608)->elements[5];


closureN_type c_7319915;
object e_7319946 [4];
c_7319915.hdr.mark = gc_color_red;
 c_7319915.hdr.grayed = 0;
c_7319915.tag = closureN_tag;
 c_7319915.fn = (function_type)__lambda_610;
c_7319915.num_args = 2;
c_7319915.num_elements = 4;
c_7319915.elements = (object *)e_7319946;
c_7319915.elements[0] = ((closureN)self_7313608)->elements[1];
c_7319915.elements[1] = ((closureN)self_7313608)->elements[2];
c_7319915.elements[2] = ((closureN)self_7313608)->elements[4];
c_7319915.elements[3] = ((closureN)self_7313608)->elements[6];

return_direct_with_clo1(data,(closure)&c_7319898,__lambda_608,  &c_7319915);; 
}

static void __lambda_610(void *data, object self_7313609, int argc, object *args) /* object self_7313609, object k_735658, object i_91at_73753_733330, object i_91from_73754_733331 */
 {
 object k_735658 = args[0]; object i_91at_73753_733330 = args[1]; object i_91from_73754_733331 = args[2];
    
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73754_733331, car(((closureN)self_7313609)->elements[0]))) ){ 
  return_direct_with_clo1(data,  k_735658, (((closure)  k_735658)->fn),  ((closureN)self_7313609)->elements[3]);
} else { 
  
closureN_type c_7319924;
object e_7319938 [4];
c_7319924.hdr.mark = gc_color_red;
 c_7319924.hdr.grayed = 0;
c_7319924.tag = closureN_tag;
 c_7319924.fn = (function_type)__lambda_611;
c_7319924.num_args = 1;
c_7319924.num_elements = 4;
c_7319924.elements = (object *)e_7319938;
c_7319924.elements[0] = i_91at_73753_733330;
c_7319924.elements[1] = i_91from_73754_733331;
c_7319924.elements[2] = k_735658;
c_7319924.elements[3] = ((closureN)self_7313609)->elements[2];




object c_7319941 = Cyc_vector_set_cps(data,(closure)&c_7319924,((closureN)self_7313609)->elements[3], i_91at_73753_733330, Cyc_vector_ref(data, ((closureN)self_7313609)->elements[1], i_91from_73754_733331));
return_closcall1(data,(closure)&c_7319924,  c_7319941);}
;; 
}

static void __lambda_611(void *data, object self_7313610, int argc, object *args) /* object self_7313610, object r_735660 */
 {

  


complex_num_type local_7319932; 

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

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



return_direct_with_clo1(data,(closure)&c_7319900,__lambda_609,  Cyc_set_cell(data, ((closureN)self_7313611)->elements[2], r_735657));; 
}

static void __lambda_609(void *data, object self_7313612, int argc, object *args) /* object self_7313612, object r_735656 */
 {

  



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

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

return_direct_with_clo1(data,  k_735665,__lambda_606,  Cyc_cadr(data, ((closureN)self_7313613)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735665,__lambda_606,  car(((closureN)self_7313613)->elements[0]));}
;; 
}

static void __lambda_588(void *data, object _, int argc, object *args) /* closure _,object k_735627, object vec_73733_733314, object opts_73734_733315_raw, ... */
 {
object k_735627 = args[0]; object vec_73733_733314 = args[1];
load_varargs(opts_73734_733315, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:vector-copy");

closureN_type c_7319705;
object e_7319851 [3];
c_7319705.hdr.mark = gc_color_red;
 c_7319705.hdr.grayed = 0;
c_7319705.tag = closureN_tag;
 c_7319705.fn = (function_type)__lambda_589;
c_7319705.num_args = 4;
c_7319705.num_elements = 3;
c_7319705.elements = (object *)e_7319851;
c_7319705.elements[0] = k_735627;
c_7319705.elements[1] = opts_73734_733315;
c_7319705.elements[2] = vec_73733_733314;

return_direct_with_clo4(data,(closure)&c_7319705,__lambda_589,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_589(void *data, object self_7313584, int argc, object *args) /* object self_7313584, object len_73735_733316, object start_73736_733317, object end_73737_733318, object loop_73738_733319 */
 {
 object len_73735_733316 = args[0]; object start_73736_733317 = args[1]; object end_73737_733318 = args[2]; object loop_73738_733319 = args[3];
  
closureN_type c_7319707;
object e_7319847 [6];
c_7319707.hdr.mark = gc_color_red;
 c_7319707.hdr.grayed = 0;
c_7319707.tag = closureN_tag;
 c_7319707.fn = (function_type)__lambda_1407;
c_7319707.num_args = 1;
c_7319707.num_elements = 6;
c_7319707.elements = (object *)e_7319847;
c_7319707.elements[0] = end_73737_733318;
c_7319707.elements[1] = ((closureN)self_7313584)->elements[0];
c_7319707.elements[2] = loop_73738_733319;
c_7319707.elements[3] = ((closureN)self_7313584)->elements[1];
c_7319707.elements[4] = start_73736_733317;
c_7319707.elements[5] = ((closureN)self_7313584)->elements[2];


pair_type local_7319850; 
return_direct_with_clo1(data,(closure)&c_7319707,__lambda_1407,  set_cell_as_expr(&local_7319850, len_73735_733316));; 
}

static void __lambda_1407(void *data, object self_7313585, int argc, object *args) /* object self_7313585, object len_73735_733316 */
 {
 object len_73735_733316 = args[0];
  
closureN_type c_7319709;
object e_7319842 [6];
c_7319709.hdr.mark = gc_color_red;
 c_7319709.hdr.grayed = 0;
c_7319709.tag = closureN_tag;
 c_7319709.fn = (function_type)__lambda_1406;
c_7319709.num_args = 1;
c_7319709.num_elements = 6;
c_7319709.elements = (object *)e_7319842;
c_7319709.elements[0] = ((closureN)self_7313585)->elements[0];
c_7319709.elements[1] = ((closureN)self_7313585)->elements[1];
c_7319709.elements[2] = len_73735_733316;
c_7319709.elements[3] = ((closureN)self_7313585)->elements[2];
c_7319709.elements[4] = ((closureN)self_7313585)->elements[3];
c_7319709.elements[5] = ((closureN)self_7313585)->elements[5];


pair_type local_7319845; 
return_direct_with_clo1(data,(closure)&c_7319709,__lambda_1406,  set_cell_as_expr(&local_7319845, ((closureN)self_7313585)->elements[4]));; 
}

static void __lambda_1406(void *data, object self_7313586, int argc, object *args) /* object self_7313586, object start_73736_733317 */
 {
 object start_73736_733317 = args[0];
  
closureN_type c_7319711;
object e_7319837 [6];
c_7319711.hdr.mark = gc_color_red;
 c_7319711.hdr.grayed = 0;
c_7319711.tag = closureN_tag;
 c_7319711.fn = (function_type)__lambda_1405;
c_7319711.num_args = 1;
c_7319711.num_elements = 6;
c_7319711.elements = (object *)e_7319837;
c_7319711.elements[0] = ((closureN)self_7313586)->elements[1];
c_7319711.elements[1] = ((closureN)self_7313586)->elements[2];
c_7319711.elements[2] = ((closureN)self_7313586)->elements[3];
c_7319711.elements[3] = ((closureN)self_7313586)->elements[4];
c_7319711.elements[4] = start_73736_733317;
c_7319711.elements[5] = ((closureN)self_7313586)->elements[5];


pair_type local_7319840; 
return_direct_with_clo1(data,(closure)&c_7319711,__lambda_1405,  set_cell_as_expr(&local_7319840, ((closureN)self_7313586)->elements[0]));; 
}

static void __lambda_1405(void *data, object self_7313587, int argc, object *args) /* object self_7313587, object end_73737_733318 */
 {
 object end_73737_733318 = args[0];
  
closureN_type c_7319713;
object e_7319832 [6];
c_7319713.hdr.mark = gc_color_red;
 c_7319713.hdr.grayed = 0;
c_7319713.tag = closureN_tag;
 c_7319713.fn = (function_type)__lambda_1404;
c_7319713.num_args = 1;
c_7319713.num_elements = 6;
c_7319713.elements = (object *)e_7319832;
c_7319713.elements[0] = end_73737_733318;
c_7319713.elements[1] = ((closureN)self_7313587)->elements[0];
c_7319713.elements[2] = ((closureN)self_7313587)->elements[1];
c_7319713.elements[3] = ((closureN)self_7313587)->elements[3];
c_7319713.elements[4] = ((closureN)self_7313587)->elements[4];
c_7319713.elements[5] = ((closureN)self_7313587)->elements[5];


pair_type local_7319835; 
return_direct_with_clo1(data,(closure)&c_7319713,__lambda_1404,  set_cell_as_expr(&local_7319835, ((closureN)self_7313587)->elements[2]));; 
}

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





return_direct_with_clo1(data,(closure)&c_7319715,__lambda_590,  Cyc_set_cell(data, ((closureN)self_7313588)->elements[2], Cyc_vector_length(data, ((closureN)self_7313588)->elements[5])));; 
}

static void __lambda_590(void *data, object self_7313589, int argc, object *args) /* object self_7313589, object r_735628 */
 {

  object r_735645;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313589)->elements[4]), obj_int2obj(0))) ){ 
  
  r_735645 = Cyc_car(data, ((closureN)self_7313589)->elements[4]);
} else { 
  r_735645 = obj_int2obj(0);}
;
closureN_type c_7319728;
object e_7319821 [7];
c_7319728.hdr.mark = gc_color_red;
 c_7319728.hdr.grayed = 0;
c_7319728.tag = closureN_tag;
 c_7319728.fn = (function_type)__lambda_591;
c_7319728.num_args = 1;
c_7319728.num_elements = 7;
c_7319728.elements = (object *)e_7319821;
c_7319728.elements[0] = ((closureN)self_7313589)->elements[0];
c_7319728.elements[1] = ((closureN)self_7313589)->elements[1];
c_7319728.elements[2] = ((closureN)self_7313589)->elements[2];
c_7319728.elements[3] = ((closureN)self_7313589)->elements[3];
c_7319728.elements[4] = ((closureN)self_7313589)->elements[4];
c_7319728.elements[5] = ((closureN)self_7313589)->elements[5];
c_7319728.elements[6] = ((closureN)self_7313589)->elements[6];



return_direct_with_clo1(data,(closure)&c_7319728,__lambda_591,  Cyc_set_cell(data, ((closureN)self_7313589)->elements[5], r_735645));; 
}

static void __lambda_591(void *data, object self_7313590, int argc, object *args) /* object self_7313590, object r_735629 */
 {

  
closureN_type c_7319730;
object e_7319744 [2];
c_7319730.hdr.mark = gc_color_red;
 c_7319730.hdr.grayed = 0;
c_7319730.tag = closureN_tag;
 c_7319730.fn = (function_type)__lambda_592;
c_7319730.num_args = 0;
c_7319730.num_elements = 2;
c_7319730.elements = (object *)e_7319744;
c_7319730.elements[0] = ((closureN)self_7313590)->elements[2];
c_7319730.elements[1] = ((closureN)self_7313590)->elements[4];


closureN_type c_7319745;
object e_7319820 [5];
c_7319745.hdr.mark = gc_color_red;
 c_7319745.hdr.grayed = 0;
c_7319745.tag = closureN_tag;
 c_7319745.fn = (function_type)__lambda_593;
c_7319745.num_args = 1;
c_7319745.num_elements = 5;
c_7319745.elements = (object *)e_7319820;
c_7319745.elements[0] = ((closureN)self_7313590)->elements[0];
c_7319745.elements[1] = ((closureN)self_7313590)->elements[1];
c_7319745.elements[2] = ((closureN)self_7313590)->elements[3];
c_7319745.elements[3] = ((closureN)self_7313590)->elements[5];
c_7319745.elements[4] = ((closureN)self_7313590)->elements[6];

return_direct_with_clo1(data,(closure)&c_7319730,__lambda_592,  &c_7319745);; 
}

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



return_direct_with_clo1(data,(closure)&c_7319747,__lambda_594,  Cyc_set_cell(data, ((closureN)self_7313591)->elements[0], r_735641));; 
}

static void __lambda_594(void *data, object self_7313592, int argc, object *args) /* object self_7313592, object r_735630 */
 {

  
closureN_type c_7319749;
object e_7319782 [4];
c_7319749.hdr.mark = gc_color_red;
 c_7319749.hdr.grayed = 0;
c_7319749.tag = closureN_tag;
 c_7319749.fn = (function_type)__lambda_595;
c_7319749.num_args = 1;
c_7319749.num_elements = 4;
c_7319749.elements = (object *)e_7319782;
c_7319749.elements[0] = ((closureN)self_7313592)->elements[0];
c_7319749.elements[1] = ((closureN)self_7313592)->elements[1];
c_7319749.elements[2] = ((closureN)self_7313592)->elements[2];
c_7319749.elements[3] = ((closureN)self_7313592)->elements[3];


closureN_type c_7319783;
object e_7319815 [4];
c_7319783.hdr.mark = gc_color_red;
 c_7319783.hdr.grayed = 0;
c_7319783.tag = closureN_tag;
 c_7319783.fn = (function_type)__lambda_599;
c_7319783.num_args = 2;
c_7319783.num_elements = 4;
c_7319783.elements = (object *)e_7319815;
c_7319783.elements[0] = ((closureN)self_7313592)->elements[0];
c_7319783.elements[1] = ((closureN)self_7313592)->elements[2];
c_7319783.elements[2] = ((closureN)self_7313592)->elements[3];
c_7319783.elements[3] = ((closureN)self_7313592)->elements[4];

return_direct_with_clo1(data,(closure)&c_7319749,__lambda_595,  &c_7319783);; 
}

static void __lambda_599(void *data, object self_7313593, int argc, object *args) /* object self_7313593, object k_735635, object i_73739_733320, object new_91vec_73740_733321 */
 {
 object k_735635 = args[0]; object i_73739_733320 = args[1]; object new_91vec_73740_733321 = args[2];
    
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73739_733320, car(((closureN)self_7313593)->elements[0]))) ){ 
  return_direct_with_clo1(data,  k_735635, (((closure)  k_735635)->fn),  new_91vec_73740_733321);
} else { 
  
closureN_type c_7319791;
object e_7319802 [4];
c_7319791.hdr.mark = gc_color_red;
 c_7319791.hdr.grayed = 0;
c_7319791.tag = closureN_tag;
 c_7319791.fn = (function_type)__lambda_600;
c_7319791.num_args = 1;
c_7319791.num_elements = 4;
c_7319791.elements = (object *)e_7319802;
c_7319791.elements[0] = i_73739_733320;
c_7319791.elements[1] = k_735635;
c_7319791.elements[2] = ((closureN)self_7313593)->elements[1];
c_7319791.elements[3] = new_91vec_73740_733321;


complex_num_type local_7319808; 





object c_7319805 = Cyc_vector_set_cps(data,(closure)&c_7319791,new_91vec_73740_733321, Cyc_fast_sub(data,&local_7319808, i_73739_733320, car(((closureN)self_7313593)->elements[2])), Cyc_vector_ref(data, ((closureN)self_7313593)->elements[3], i_73739_733320));
return_closcall1(data,(closure)&c_7319791,  c_7319805);}
;; 
}

static void __lambda_600(void *data, object self_7313594, int argc, object *args) /* object self_7313594, object r_735637 */
 {

  


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

static void __lambda_595(void *data, object self_7313595, int argc, object *args) /* object self_7313595, object r_735634 */
 {
 object r_735634 = args[0];
  
closureN_type c_7319751;
object e_7319778 [4];
c_7319751.hdr.mark = gc_color_red;
 c_7319751.hdr.grayed = 0;
c_7319751.tag = closureN_tag;
 c_7319751.fn = (function_type)__lambda_596;
c_7319751.num_args = 1;
c_7319751.num_elements = 4;
c_7319751.elements = (object *)e_7319778;
c_7319751.elements[0] = ((closureN)self_7313595)->elements[0];
c_7319751.elements[1] = ((closureN)self_7313595)->elements[1];
c_7319751.elements[2] = ((closureN)self_7313595)->elements[2];
c_7319751.elements[3] = ((closureN)self_7313595)->elements[3];



return_direct_with_clo1(data,(closure)&c_7319751,__lambda_596,  Cyc_set_cell(data, ((closureN)self_7313595)->elements[2], r_735634));; 
}

static void __lambda_596(void *data, object self_7313596, int argc, object *args) /* object self_7313596, object r_735631 */
 {

  
closureN_type c_7319753;
object e_7319768 [3];
c_7319753.hdr.mark = gc_color_red;
 c_7319753.hdr.grayed = 0;
c_7319753.tag = closureN_tag;
 c_7319753.fn = (function_type)__lambda_597;
c_7319753.num_args = 1;
c_7319753.num_elements = 3;
c_7319753.elements = (object *)e_7319768;
c_7319753.elements[0] = ((closureN)self_7313596)->elements[1];
c_7319753.elements[1] = ((closureN)self_7313596)->elements[2];
c_7319753.elements[2] = ((closureN)self_7313596)->elements[3];


complex_num_type local_7319771; 




return_direct_with_clo1(data,(closure)&c_7319753,__lambda_597,  Cyc_fast_sub(data,&local_7319771, car(((closureN)self_7313596)->elements[0]), car(((closureN)self_7313596)->elements[3])));; 
}

static void __lambda_597(void *data, object self_7313597, int argc, object *args) /* object self_7313597, object r_735633 */
 {
 object r_735633 = args[0];
  
closureN_type c_7319755;
object e_7319764 [3];
c_7319755.hdr.mark = gc_color_red;
 c_7319755.hdr.grayed = 0;
c_7319755.tag = closureN_tag;
 c_7319755.fn = (function_type)__lambda_598;
c_7319755.num_args = 1;
c_7319755.num_elements = 3;
c_7319755.elements = (object *)e_7319764;
c_7319755.elements[0] = ((closureN)self_7313597)->elements[0];
c_7319755.elements[1] = ((closureN)self_7313597)->elements[1];
c_7319755.elements[2] = ((closureN)self_7313597)->elements[2];


object c_7319767 = Cyc_make_vector(data,(closure)&c_7319755,2,r_735633, boolean_f);
return_closcall1(data,(closure)&c_7319755,  c_7319767);; 
}

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



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

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

return_direct_with_clo1(data,  k_735642,__lambda_593,  Cyc_cadr(data, ((closureN)self_7313599)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735642,__lambda_593,  car(((closureN)self_7313599)->elements[0]));}
;; 
}

static void __lambda_585(void *data, object _, int argc, object *args) /* closure _,object k_735622, object vecs_73732_733313_raw, ... */
 {
object k_735622 = args[0];
load_varargs(vecs_73732_733313, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:vector-append");

closureN_type c_7319690;
object e_7319702 [1];
c_7319690.hdr.mark = gc_color_red;
 c_7319690.hdr.grayed = 0;
c_7319690.tag = closureN_tag;
 c_7319690.fn = (function_type)__lambda_586;
c_7319690.num_args = 1;
c_7319690.num_elements = 1;
c_7319690.elements = (object *)e_7319702;
c_7319690.elements[0] = k_735622;

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319690, __glo_vector_91_125list_scheme_base, vecs_73732_733313);; 
}

static void __lambda_586(void *data, object self_7313582, int argc, object *args) /* object self_7313582, object r_735624 */
 {
 object r_735624 = args[0];
  
closureN_type c_7319692;
object e_7319698 [1];
c_7319692.hdr.mark = gc_color_red;
 c_7319692.hdr.grayed = 0;
c_7319692.tag = closureN_tag;
 c_7319692.fn = (function_type)__lambda_587;
c_7319692.num_args = 1;
c_7319692.num_elements = 1;
c_7319692.elements = (object *)e_7319698;
c_7319692.elements[0] = ((closureN)self_7313582)->elements[0];


object c_7319701 = apply(data,(closure)&c_7319692,__glo_append_scheme_base, r_735624);
return_closcall1(data,(closure)&c_7319692,  c_7319701);; 
}

static void __lambda_587(void *data, object self_7313583, int argc, object *args) /* object self_7313583, object r_735623 */
 {
 object r_735623 = args[0];
  
object c_7319697 = Cyc_list2vector(data,  ((closureN)self_7313583)->elements[0],r_735623);
return_direct_with_clo1(data,  ((closureN)self_7313583)->elements[0], (((closure)  ((closureN)self_7313583)->elements[0])->fn),  c_7319697);; 
}

static void __lambda_582(void *data, object _, int argc, object *args) /* closure _,object k_735615, object func_73726_733310, object vec1_73727_733311, object vecs_73728_733312_raw, ... */
 {
object k_735615 = args[0]; object func_73726_733310 = args[1]; object vec1_73727_733311 = args[2];
load_varargs(vecs_73728_733312, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:vector-for-each");

closureN_type c_7319669;
object e_7319687 [3];
c_7319669.hdr.mark = gc_color_red;
 c_7319669.hdr.grayed = 0;
c_7319669.tag = closureN_tag;
 c_7319669.fn = (function_type)__lambda_583;
c_7319669.num_args = 1;
c_7319669.num_elements = 3;
c_7319669.elements = (object *)e_7319687;
c_7319669.elements[0] = func_73726_733310;
c_7319669.elements[1] = k_735615;
c_7319669.elements[2] = vecs_73728_733312;

return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7319669, vec1_73727_733311);; 
}

static void __lambda_583(void *data, object self_7313580, int argc, object *args) /* object self_7313580, object r_735618 */
 {
 object r_735618 = args[0];
  
closureN_type c_7319671;
object e_7319685 [3];
c_7319671.hdr.mark = gc_color_red;
 c_7319671.hdr.grayed = 0;
c_7319671.tag = closureN_tag;
 c_7319671.fn = (function_type)__lambda_584;
c_7319671.num_args = 1;
c_7319671.num_elements = 3;
c_7319671.elements = (object *)e_7319685;
c_7319671.elements[0] = ((closureN)self_7313580)->elements[0];
c_7319671.elements[1] = ((closureN)self_7313580)->elements[1];
c_7319671.elements[2] = r_735618;

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319671, __glo_vector_91_125list_scheme_base, ((closureN)self_7313580)->elements[2]);; 
}

static void __lambda_584(void *data, object self_7313581, int argc, object *args) /* object self_7313581, object r_735619 */
 {
 object r_735619 = args[0];
  
pair_type local_7319679; 

pair_type local_7319683; 

object c_7319676 = apply(data,  ((closureN)self_7313581)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7319679, ((closureN)self_7313581)->elements[0], set_pair_as_expr(&local_7319683, ((closureN)self_7313581)->elements[2], r_735619)));
return_direct_with_clo1(data,  ((closureN)self_7313581)->elements[1], (((closure)  ((closureN)self_7313581)->elements[1])->fn),  c_7319676);; 
}

static void __lambda_578(void *data, object _, int argc, object *args) /* closure _,object k_735607, object func_73720_733307, object vec1_73721_733308, object vecs_73722_733309_raw, ... */
 {
object k_735607 = args[0]; object func_73720_733307 = args[1]; object vec1_73721_733308 = args[2];
load_varargs(vecs_73722_733309, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:vector-map");

closureN_type c_7319642;
object e_7319666 [3];
c_7319642.hdr.mark = gc_color_red;
 c_7319642.hdr.grayed = 0;
c_7319642.tag = closureN_tag;
 c_7319642.fn = (function_type)__lambda_579;
c_7319642.num_args = 1;
c_7319642.num_elements = 3;
c_7319642.elements = (object *)e_7319666;
c_7319642.elements[0] = func_73720_733307;
c_7319642.elements[1] = k_735607;
c_7319642.elements[2] = vecs_73722_733309;

return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7319642, vec1_73721_733308);; 
}

static void __lambda_579(void *data, object self_7313577, int argc, object *args) /* object self_7313577, object r_735611 */
 {
 object r_735611 = args[0];
  
closureN_type c_7319644;
object e_7319664 [3];
c_7319644.hdr.mark = gc_color_red;
 c_7319644.hdr.grayed = 0;
c_7319644.tag = closureN_tag;
 c_7319644.fn = (function_type)__lambda_580;
c_7319644.num_args = 1;
c_7319644.num_elements = 3;
c_7319644.elements = (object *)e_7319664;
c_7319644.elements[0] = ((closureN)self_7313577)->elements[0];
c_7319644.elements[1] = ((closureN)self_7313577)->elements[1];
c_7319644.elements[2] = r_735611;

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319644, __glo_vector_91_125list_scheme_base, ((closureN)self_7313577)->elements[2]);; 
}

static void __lambda_580(void *data, object self_7313578, int argc, object *args) /* object self_7313578, object r_735612 */
 {
 object r_735612 = args[0];
  
closureN_type c_7319646;
object e_7319652 [1];
c_7319646.hdr.mark = gc_color_red;
 c_7319646.hdr.grayed = 0;
c_7319646.tag = closureN_tag;
 c_7319646.fn = (function_type)__lambda_581;
c_7319646.num_args = 1;
c_7319646.num_elements = 1;
c_7319646.elements = (object *)e_7319652;
c_7319646.elements[0] = ((closureN)self_7313578)->elements[1];


pair_type local_7319658; 

pair_type local_7319662; 

object c_7319655 = apply(data,(closure)&c_7319646,__glo_map_scheme_base, set_pair_as_expr(&local_7319658, ((closureN)self_7313578)->elements[0], set_pair_as_expr(&local_7319662, ((closureN)self_7313578)->elements[2], r_735612)));
return_closcall1(data,(closure)&c_7319646,  c_7319655);; 
}

static void __lambda_581(void *data, object self_7313579, int argc, object *args) /* object self_7313579, object r_735608 */
 {
 object r_735608 = args[0];
  
object c_7319651 = Cyc_list2vector(data,  ((closureN)self_7313579)->elements[0],r_735608);
return_direct_with_clo1(data,  ((closureN)self_7313579)->elements[0], (((closure)  ((closureN)self_7313579)->elements[0])->fn),  c_7319651);; 
}

static void __lambda_575(void *data, object _, int argc, object *args) /* closure _,object k_735600, object func_73714_733304, object str1_73715_733305, object strs_73716_733306_raw, ... */
 {
object k_735600 = args[0]; object func_73714_733304 = args[1]; object str1_73715_733305 = args[2];
load_varargs(strs_73716_733306, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:string-for-each");

closureN_type c_7319621;
object e_7319639 [3];
c_7319621.hdr.mark = gc_color_red;
 c_7319621.hdr.grayed = 0;
c_7319621.tag = closureN_tag;
 c_7319621.fn = (function_type)__lambda_576;
c_7319621.num_args = 1;
c_7319621.num_elements = 3;
c_7319621.elements = (object *)e_7319639;
c_7319621.elements[0] = func_73714_733304;
c_7319621.elements[1] = k_735600;
c_7319621.elements[2] = strs_73716_733306;

return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7319621, str1_73715_733305);; 
}

static void __lambda_576(void *data, object self_7313575, int argc, object *args) /* object self_7313575, object r_735603 */
 {
 object r_735603 = args[0];
  
closureN_type c_7319623;
object e_7319637 [3];
c_7319623.hdr.mark = gc_color_red;
 c_7319623.hdr.grayed = 0;
c_7319623.tag = closureN_tag;
 c_7319623.fn = (function_type)__lambda_577;
c_7319623.num_args = 1;
c_7319623.num_elements = 3;
c_7319623.elements = (object *)e_7319637;
c_7319623.elements[0] = ((closureN)self_7313575)->elements[0];
c_7319623.elements[1] = ((closureN)self_7313575)->elements[1];
c_7319623.elements[2] = r_735603;

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319623, __glo_string_91_125list_scheme_base, ((closureN)self_7313575)->elements[2]);; 
}

static void __lambda_577(void *data, object self_7313576, int argc, object *args) /* object self_7313576, object r_735604 */
 {
 object r_735604 = args[0];
  
pair_type local_7319631; 

pair_type local_7319635; 

object c_7319628 = apply(data,  ((closureN)self_7313576)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7319631, ((closureN)self_7313576)->elements[0], set_pair_as_expr(&local_7319635, ((closureN)self_7313576)->elements[2], r_735604)));
return_direct_with_clo1(data,  ((closureN)self_7313576)->elements[1], (((closure)  ((closureN)self_7313576)->elements[1])->fn),  c_7319628);; 
}

static void __lambda_571(void *data, object _, int argc, object *args) /* closure _,object k_735592, object func_73708_733301, object str1_73709_733302, object strs_73710_733303_raw, ... */
 {
object k_735592 = args[0]; object func_73708_733301 = args[1]; object str1_73709_733302 = args[2];
load_varargs(strs_73710_733303, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:string-map");

closureN_type c_7319594;
object e_7319618 [3];
c_7319594.hdr.mark = gc_color_red;
 c_7319594.hdr.grayed = 0;
c_7319594.tag = closureN_tag;
 c_7319594.fn = (function_type)__lambda_572;
c_7319594.num_args = 1;
c_7319594.num_elements = 3;
c_7319594.elements = (object *)e_7319618;
c_7319594.elements[0] = func_73708_733301;
c_7319594.elements[1] = k_735592;
c_7319594.elements[2] = strs_73710_733303;

return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7319594, str1_73709_733302);; 
}

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

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319596, __glo_string_91_125list_scheme_base, ((closureN)self_7313572)->elements[2]);; 
}

static void __lambda_573(void *data, object self_7313573, int argc, object *args) /* object self_7313573, object r_735597 */
 {
 object r_735597 = args[0];
  
closureN_type c_7319598;
object e_7319604 [1];
c_7319598.hdr.mark = gc_color_red;
 c_7319598.hdr.grayed = 0;
c_7319598.tag = closureN_tag;
 c_7319598.fn = (function_type)__lambda_574;
c_7319598.num_args = 1;
c_7319598.num_elements = 1;
c_7319598.elements = (object *)e_7319604;
c_7319598.elements[0] = ((closureN)self_7313573)->elements[1];


pair_type local_7319610; 

pair_type local_7319614; 

object c_7319607 = apply(data,(closure)&c_7319598,__glo_map_scheme_base, set_pair_as_expr(&local_7319610, ((closureN)self_7313573)->elements[0], set_pair_as_expr(&local_7319614, ((closureN)self_7313573)->elements[2], r_735597)));
return_closcall1(data,(closure)&c_7319598,  c_7319607);; 
}

static void __lambda_574(void *data, object self_7313574, int argc, object *args) /* object self_7313574, object r_735593 */
 {
 object r_735593 = args[0];
  
object c_7319603 = Cyc_list2string(data,  ((closureN)self_7313574)->elements[0],r_735593);
return_direct_with_clo1(data,  ((closureN)self_7313574)->elements[0], (((closure)  ((closureN)self_7313574)->elements[0])->fn),  c_7319603);; 
}

static void __lambda_559(void *data, object _, int argc, object *args) /* closure _,object k_735571, object str_73696_733293, object fill_73697_733294, object opts_73698_733295_raw, ... */
 {
object k_735571 = args[0]; object str_73696_733293 = args[1]; object fill_73697_733294 = args[2];
load_varargs(opts_73698_733295, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:string-fill!");

closureN_type c_7319465;
object e_7319591 [4];
c_7319465.hdr.mark = gc_color_red;
 c_7319465.hdr.grayed = 0;
c_7319465.tag = closureN_tag;
 c_7319465.fn = (function_type)__lambda_560;
c_7319465.num_args = 4;
c_7319465.num_elements = 4;
c_7319465.elements = (object *)e_7319591;
c_7319465.elements[0] = fill_73697_733294;
c_7319465.elements[1] = k_735571;
c_7319465.elements[2] = opts_73698_733295;
c_7319465.elements[3] = str_73696_733293;

return_direct_with_clo4(data,(closure)&c_7319465,__lambda_560,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_560(void *data, object self_7313557, int argc, object *args) /* object self_7313557, object len_73699_733296, object start_73700_733297, object end_73701_733298, object loop_73702_733299 */
 {
 object len_73699_733296 = args[0]; object start_73700_733297 = args[1]; object end_73701_733298 = args[2]; object loop_73702_733299 = args[3];
  
closureN_type c_7319467;
object e_7319587 [7];
c_7319467.hdr.mark = gc_color_red;
 c_7319467.hdr.grayed = 0;
c_7319467.tag = closureN_tag;
 c_7319467.fn = (function_type)__lambda_1403;
c_7319467.num_args = 1;
c_7319467.num_elements = 7;
c_7319467.elements = (object *)e_7319587;
c_7319467.elements[0] = end_73701_733298;
c_7319467.elements[1] = ((closureN)self_7313557)->elements[0];
c_7319467.elements[2] = ((closureN)self_7313557)->elements[1];
c_7319467.elements[3] = loop_73702_733299;
c_7319467.elements[4] = ((closureN)self_7313557)->elements[2];
c_7319467.elements[5] = start_73700_733297;
c_7319467.elements[6] = ((closureN)self_7313557)->elements[3];


pair_type local_7319590; 
return_direct_with_clo1(data,(closure)&c_7319467,__lambda_1403,  set_cell_as_expr(&local_7319590, len_73699_733296));; 
}

static void __lambda_1403(void *data, object self_7313558, int argc, object *args) /* object self_7313558, object len_73699_733296 */
 {
 object len_73699_733296 = args[0];
  
closureN_type c_7319469;
object e_7319582 [7];
c_7319469.hdr.mark = gc_color_red;
 c_7319469.hdr.grayed = 0;
c_7319469.tag = closureN_tag;
 c_7319469.fn = (function_type)__lambda_1402;
c_7319469.num_args = 1;
c_7319469.num_elements = 7;
c_7319469.elements = (object *)e_7319582;
c_7319469.elements[0] = ((closureN)self_7313558)->elements[0];
c_7319469.elements[1] = ((closureN)self_7313558)->elements[1];
c_7319469.elements[2] = ((closureN)self_7313558)->elements[2];
c_7319469.elements[3] = len_73699_733296;
c_7319469.elements[4] = ((closureN)self_7313558)->elements[3];
c_7319469.elements[5] = ((closureN)self_7313558)->elements[4];
c_7319469.elements[6] = ((closureN)self_7313558)->elements[6];


pair_type local_7319585; 
return_direct_with_clo1(data,(closure)&c_7319469,__lambda_1402,  set_cell_as_expr(&local_7319585, ((closureN)self_7313558)->elements[5]));; 
}

static void __lambda_1402(void *data, object self_7313559, int argc, object *args) /* object self_7313559, object start_73700_733297 */
 {
 object start_73700_733297 = args[0];
  
closureN_type c_7319471;
object e_7319577 [7];
c_7319471.hdr.mark = gc_color_red;
 c_7319471.hdr.grayed = 0;
c_7319471.tag = closureN_tag;
 c_7319471.fn = (function_type)__lambda_1401;
c_7319471.num_args = 1;
c_7319471.num_elements = 7;
c_7319471.elements = (object *)e_7319577;
c_7319471.elements[0] = ((closureN)self_7313559)->elements[1];
c_7319471.elements[1] = ((closureN)self_7313559)->elements[2];
c_7319471.elements[2] = ((closureN)self_7313559)->elements[3];
c_7319471.elements[3] = ((closureN)self_7313559)->elements[4];
c_7319471.elements[4] = ((closureN)self_7313559)->elements[5];
c_7319471.elements[5] = start_73700_733297;
c_7319471.elements[6] = ((closureN)self_7313559)->elements[6];


pair_type local_7319580; 
return_direct_with_clo1(data,(closure)&c_7319471,__lambda_1401,  set_cell_as_expr(&local_7319580, ((closureN)self_7313559)->elements[0]));; 
}

static void __lambda_1401(void *data, object self_7313560, int argc, object *args) /* object self_7313560, object end_73701_733298 */
 {
 object end_73701_733298 = args[0];
  
closureN_type c_7319473;
object e_7319572 [7];
c_7319473.hdr.mark = gc_color_red;
 c_7319473.hdr.grayed = 0;
c_7319473.tag = closureN_tag;
 c_7319473.fn = (function_type)__lambda_1400;
c_7319473.num_args = 1;
c_7319473.num_elements = 7;
c_7319473.elements = (object *)e_7319572;
c_7319473.elements[0] = end_73701_733298;
c_7319473.elements[1] = ((closureN)self_7313560)->elements[0];
c_7319473.elements[2] = ((closureN)self_7313560)->elements[1];
c_7319473.elements[3] = ((closureN)self_7313560)->elements[2];
c_7319473.elements[4] = ((closureN)self_7313560)->elements[4];
c_7319473.elements[5] = ((closureN)self_7313560)->elements[5];
c_7319473.elements[6] = ((closureN)self_7313560)->elements[6];


pair_type local_7319575; 
return_direct_with_clo1(data,(closure)&c_7319473,__lambda_1400,  set_cell_as_expr(&local_7319575, ((closureN)self_7313560)->elements[3]));; 
}

static void __lambda_1400(void *data, object self_7313561, int argc, object *args) /* object self_7313561, object loop_73702_733299 */
 {
 object loop_73702_733299 = args[0];
  
closureN_type c_7319475;
object e_7319568 [8];
c_7319475.hdr.mark = gc_color_red;
 c_7319475.hdr.grayed = 0;
c_7319475.tag = closureN_tag;
 c_7319475.fn = (function_type)__lambda_561;
c_7319475.num_args = 1;
c_7319475.num_elements = 8;
c_7319475.elements = (object *)e_7319568;
c_7319475.elements[0] = ((closureN)self_7313561)->elements[0];
c_7319475.elements[1] = ((closureN)self_7313561)->elements[1];
c_7319475.elements[2] = ((closureN)self_7313561)->elements[2];
c_7319475.elements[3] = ((closureN)self_7313561)->elements[3];
c_7319475.elements[4] = loop_73702_733299;
c_7319475.elements[5] = ((closureN)self_7313561)->elements[4];
c_7319475.elements[6] = ((closureN)self_7313561)->elements[5];
c_7319475.elements[7] = ((closureN)self_7313561)->elements[6];



return_direct_with_clo1(data,(closure)&c_7319475,__lambda_561,  Cyc_string_length(data, ((closureN)self_7313561)->elements[6]));; 
}

static void __lambda_561(void *data, object self_7313562, int argc, object *args) /* object self_7313562, object r_735589 */
 {
 object r_735589 = args[0];
  
closureN_type c_7319477;
object e_7319564 [8];
c_7319477.hdr.mark = gc_color_red;
 c_7319477.hdr.grayed = 0;
c_7319477.tag = closureN_tag;
 c_7319477.fn = (function_type)__lambda_562;
c_7319477.num_args = 1;
c_7319477.num_elements = 8;
c_7319477.elements = (object *)e_7319564;
c_7319477.elements[0] = ((closureN)self_7313562)->elements[0];
c_7319477.elements[1] = ((closureN)self_7313562)->elements[1];
c_7319477.elements[2] = ((closureN)self_7313562)->elements[2];
c_7319477.elements[3] = ((closureN)self_7313562)->elements[3];
c_7319477.elements[4] = ((closureN)self_7313562)->elements[4];
c_7319477.elements[5] = ((closureN)self_7313562)->elements[5];
c_7319477.elements[6] = ((closureN)self_7313562)->elements[6];
c_7319477.elements[7] = ((closureN)self_7313562)->elements[7];



return_direct_with_clo1(data,(closure)&c_7319477,__lambda_562,  Cyc_set_cell(data, ((closureN)self_7313562)->elements[3], r_735589));; 
}

static void __lambda_562(void *data, object self_7313563, int argc, object *args) /* object self_7313563, object r_735572 */
 {

  object r_735585;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313563)->elements[5]), obj_int2obj(0))) ){ 
  
  r_735585 = Cyc_car(data, ((closureN)self_7313563)->elements[5]);
} else { 
  r_735585 = obj_int2obj(0);}
;
closureN_type c_7319490;
object e_7319560 [8];
c_7319490.hdr.mark = gc_color_red;
 c_7319490.hdr.grayed = 0;
c_7319490.tag = closureN_tag;
 c_7319490.fn = (function_type)__lambda_563;
c_7319490.num_args = 1;
c_7319490.num_elements = 8;
c_7319490.elements = (object *)e_7319560;
c_7319490.elements[0] = ((closureN)self_7313563)->elements[0];
c_7319490.elements[1] = ((closureN)self_7313563)->elements[1];
c_7319490.elements[2] = ((closureN)self_7313563)->elements[2];
c_7319490.elements[3] = ((closureN)self_7313563)->elements[3];
c_7319490.elements[4] = ((closureN)self_7313563)->elements[4];
c_7319490.elements[5] = ((closureN)self_7313563)->elements[5];
c_7319490.elements[6] = ((closureN)self_7313563)->elements[6];
c_7319490.elements[7] = ((closureN)self_7313563)->elements[7];



return_direct_with_clo1(data,(closure)&c_7319490,__lambda_563,  Cyc_set_cell(data, ((closureN)self_7313563)->elements[6], r_735585));; 
}

static void __lambda_563(void *data, object self_7313564, int argc, object *args) /* object self_7313564, object r_735573 */
 {

  
closureN_type c_7319492;
object e_7319506 [2];
c_7319492.hdr.mark = gc_color_red;
 c_7319492.hdr.grayed = 0;
c_7319492.tag = closureN_tag;
 c_7319492.fn = (function_type)__lambda_564;
c_7319492.num_args = 0;
c_7319492.num_elements = 2;
c_7319492.elements = (object *)e_7319506;
c_7319492.elements[0] = ((closureN)self_7313564)->elements[3];
c_7319492.elements[1] = ((closureN)self_7313564)->elements[5];


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

return_direct_with_clo1(data,(closure)&c_7319492,__lambda_564,  &c_7319507);; 
}

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



return_direct_with_clo1(data,(closure)&c_7319509,__lambda_566,  Cyc_set_cell(data, ((closureN)self_7313565)->elements[0], r_735581));; 
}

static void __lambda_566(void *data, object self_7313566, int argc, object *args) /* object self_7313566, object r_735574 */
 {

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


closureN_type c_7319527;
object e_7319554 [4];
c_7319527.hdr.mark = gc_color_red;
 c_7319527.hdr.grayed = 0;
c_7319527.tag = closureN_tag;
 c_7319527.fn = (function_type)__lambda_569;
c_7319527.num_args = 1;
c_7319527.num_elements = 4;
c_7319527.elements = (object *)e_7319554;
c_7319527.elements[0] = ((closureN)self_7313566)->elements[0];
c_7319527.elements[1] = ((closureN)self_7313566)->elements[1];
c_7319527.elements[2] = ((closureN)self_7313566)->elements[3];
c_7319527.elements[3] = ((closureN)self_7313566)->elements[5];

return_direct_with_clo1(data,(closure)&c_7319511,__lambda_567,  &c_7319527);; 
}

static void __lambda_569(void *data, object self_7313567, int argc, object *args) /* object self_7313567, object k_735577, object i_73703_733300 */
 {
 object k_735577 = args[0]; object i_73703_733300 = args[1];
  
closureN_type c_7319529;
object e_7319548 [5];
c_7319529.hdr.mark = gc_color_red;
 c_7319529.hdr.grayed = 0;
c_7319529.tag = closureN_tag;
 c_7319529.fn = (function_type)__lambda_570;
c_7319529.num_args = 1;
c_7319529.num_elements = 5;
c_7319529.elements = (object *)e_7319548;
c_7319529.elements[0] = ((closureN)self_7313567)->elements[1];
c_7319529.elements[1] = i_73703_733300;
c_7319529.elements[2] = k_735577;
c_7319529.elements[3] = ((closureN)self_7313567)->elements[2];
c_7319529.elements[4] = ((closureN)self_7313567)->elements[3];





return_direct_with_clo1(data,(closure)&c_7319529,__lambda_570,  Cyc_num_fast_eq_op(data, i_73703_733300, car(((closureN)self_7313567)->elements[0])));; 
}

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


complex_num_type local_7319541; 
return_closcall2(data,  car(((closureN)self_7313568)->elements[3]),  ((closureN)self_7313568)->elements[2], Cyc_fast_sum(data,&local_7319541, ((closureN)self_7313568)->elements[1], obj_int2obj(1)));;}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_7319513,__lambda_568,  Cyc_set_cell(data, ((closureN)self_7313569)->elements[1], r_735576));; 
}

static void __lambda_568(void *data, object self_7313570, int argc, object *args) /* object self_7313570, object r_735575 */
 {

  



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

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

return_direct_with_clo1(data,  k_735582,__lambda_565,  Cyc_cadr(data, ((closureN)self_7313571)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735582,__lambda_565,  car(((closureN)self_7313571)->elements[0]));}
;; 
}

static void __lambda_549(void *data, object _, int argc, object *args) /* closure _,object k_735548, object to_73682_733283, object at_73683_733284, object from_73684_733285, object opts_73685_733286_raw, ... */
 {
object k_735548 = args[0]; object to_73682_733283 = args[1]; object at_73683_733284 = args[2]; object from_73684_733285 = args[3];
load_varargs(opts_73685_733286, args, 4, argc - 4);
  Cyc_st_add(data, "scheme/base.sld:string-copy!");

closureN_type c_7319340;
object e_7319462 [5];
c_7319340.hdr.mark = gc_color_red;
 c_7319340.hdr.grayed = 0;
c_7319340.tag = closureN_tag;
 c_7319340.fn = (function_type)__lambda_550;
c_7319340.num_args = 4;
c_7319340.num_elements = 5;
c_7319340.elements = (object *)e_7319462;
c_7319340.elements[0] = at_73683_733284;
c_7319340.elements[1] = from_73684_733285;
c_7319340.elements[2] = k_735548;
c_7319340.elements[3] = opts_73685_733286;
c_7319340.elements[4] = to_73682_733283;

return_direct_with_clo4(data,(closure)&c_7319340,__lambda_550,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_550(void *data, object self_7313544, int argc, object *args) /* object self_7313544, object len_73686_733287, object start_73687_733288, object end_73688_733289, object loop_73689_733290 */
 {
 object len_73686_733287 = args[0]; object start_73687_733288 = args[1]; object end_73688_733289 = args[2]; object loop_73689_733290 = args[3];
  
closureN_type c_7319342;
object e_7319458 [8];
c_7319342.hdr.mark = gc_color_red;
 c_7319342.hdr.grayed = 0;
c_7319342.tag = closureN_tag;
 c_7319342.fn = (function_type)__lambda_1399;
c_7319342.num_args = 1;
c_7319342.num_elements = 8;
c_7319342.elements = (object *)e_7319458;
c_7319342.elements[0] = ((closureN)self_7313544)->elements[0];
c_7319342.elements[1] = end_73688_733289;
c_7319342.elements[2] = ((closureN)self_7313544)->elements[1];
c_7319342.elements[3] = ((closureN)self_7313544)->elements[2];
c_7319342.elements[4] = loop_73689_733290;
c_7319342.elements[5] = ((closureN)self_7313544)->elements[3];
c_7319342.elements[6] = start_73687_733288;
c_7319342.elements[7] = ((closureN)self_7313544)->elements[4];


pair_type local_7319461; 
return_direct_with_clo1(data,(closure)&c_7319342,__lambda_1399,  set_cell_as_expr(&local_7319461, len_73686_733287));; 
}

static void __lambda_1399(void *data, object self_7313545, int argc, object *args) /* object self_7313545, object len_73686_733287 */
 {
 object len_73686_733287 = args[0];
  
closureN_type c_7319344;
object e_7319453 [8];
c_7319344.hdr.mark = gc_color_red;
 c_7319344.hdr.grayed = 0;
c_7319344.tag = closureN_tag;
 c_7319344.fn = (function_type)__lambda_1398;
c_7319344.num_args = 1;
c_7319344.num_elements = 8;
c_7319344.elements = (object *)e_7319453;
c_7319344.elements[0] = ((closureN)self_7313545)->elements[0];
c_7319344.elements[1] = ((closureN)self_7313545)->elements[1];
c_7319344.elements[2] = ((closureN)self_7313545)->elements[2];
c_7319344.elements[3] = ((closureN)self_7313545)->elements[3];
c_7319344.elements[4] = len_73686_733287;
c_7319344.elements[5] = ((closureN)self_7313545)->elements[4];
c_7319344.elements[6] = ((closureN)self_7313545)->elements[5];
c_7319344.elements[7] = ((closureN)self_7313545)->elements[7];


pair_type local_7319456; 
return_direct_with_clo1(data,(closure)&c_7319344,__lambda_1398,  set_cell_as_expr(&local_7319456, ((closureN)self_7313545)->elements[6]));; 
}

static void __lambda_1398(void *data, object self_7313546, int argc, object *args) /* object self_7313546, object start_73687_733288 */
 {
 object start_73687_733288 = args[0];
  
closureN_type c_7319346;
object e_7319448 [8];
c_7319346.hdr.mark = gc_color_red;
 c_7319346.hdr.grayed = 0;
c_7319346.tag = closureN_tag;
 c_7319346.fn = (function_type)__lambda_1397;
c_7319346.num_args = 1;
c_7319346.num_elements = 8;
c_7319346.elements = (object *)e_7319448;
c_7319346.elements[0] = ((closureN)self_7313546)->elements[0];
c_7319346.elements[1] = ((closureN)self_7313546)->elements[2];
c_7319346.elements[2] = ((closureN)self_7313546)->elements[3];
c_7319346.elements[3] = ((closureN)self_7313546)->elements[4];
c_7319346.elements[4] = ((closureN)self_7313546)->elements[5];
c_7319346.elements[5] = ((closureN)self_7313546)->elements[6];
c_7319346.elements[6] = start_73687_733288;
c_7319346.elements[7] = ((closureN)self_7313546)->elements[7];


pair_type local_7319451; 
return_direct_with_clo1(data,(closure)&c_7319346,__lambda_1397,  set_cell_as_expr(&local_7319451, ((closureN)self_7313546)->elements[1]));; 
}

static void __lambda_1397(void *data, object self_7313547, int argc, object *args) /* object self_7313547, object end_73688_733289 */
 {
 object end_73688_733289 = args[0];
  
closureN_type c_7319348;
object e_7319443 [8];
c_7319348.hdr.mark = gc_color_red;
 c_7319348.hdr.grayed = 0;
c_7319348.tag = closureN_tag;
 c_7319348.fn = (function_type)__lambda_1396;
c_7319348.num_args = 1;
c_7319348.num_elements = 8;
c_7319348.elements = (object *)e_7319443;
c_7319348.elements[0] = ((closureN)self_7313547)->elements[0];
c_7319348.elements[1] = end_73688_733289;
c_7319348.elements[2] = ((closureN)self_7313547)->elements[1];
c_7319348.elements[3] = ((closureN)self_7313547)->elements[2];
c_7319348.elements[4] = ((closureN)self_7313547)->elements[3];
c_7319348.elements[5] = ((closureN)self_7313547)->elements[5];
c_7319348.elements[6] = ((closureN)self_7313547)->elements[6];
c_7319348.elements[7] = ((closureN)self_7313547)->elements[7];


pair_type local_7319446; 
return_direct_with_clo1(data,(closure)&c_7319348,__lambda_1396,  set_cell_as_expr(&local_7319446, ((closureN)self_7313547)->elements[4]));; 
}

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





return_direct_with_clo1(data,(closure)&c_7319350,__lambda_551,  Cyc_set_cell(data, ((closureN)self_7313548)->elements[4], Cyc_string_length(data, ((closureN)self_7313548)->elements[2])));; 
}

static void __lambda_551(void *data, object self_7313549, int argc, object *args) /* object self_7313549, object r_735549 */
 {

  object r_735564;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313549)->elements[6]), obj_int2obj(0))) ){ 
  
  r_735564 = Cyc_car(data, ((closureN)self_7313549)->elements[6]);
} else { 
  r_735564 = obj_int2obj(0);}
;
closureN_type c_7319363;
object e_7319432 [9];
c_7319363.hdr.mark = gc_color_red;
 c_7319363.hdr.grayed = 0;
c_7319363.tag = closureN_tag;
 c_7319363.fn = (function_type)__lambda_552;
c_7319363.num_args = 1;
c_7319363.num_elements = 9;
c_7319363.elements = (object *)e_7319432;
c_7319363.elements[0] = ((closureN)self_7313549)->elements[0];
c_7319363.elements[1] = ((closureN)self_7313549)->elements[1];
c_7319363.elements[2] = ((closureN)self_7313549)->elements[2];
c_7319363.elements[3] = ((closureN)self_7313549)->elements[3];
c_7319363.elements[4] = ((closureN)self_7313549)->elements[4];
c_7319363.elements[5] = ((closureN)self_7313549)->elements[5];
c_7319363.elements[6] = ((closureN)self_7313549)->elements[6];
c_7319363.elements[7] = ((closureN)self_7313549)->elements[7];
c_7319363.elements[8] = ((closureN)self_7313549)->elements[8];



return_direct_with_clo1(data,(closure)&c_7319363,__lambda_552,  Cyc_set_cell(data, ((closureN)self_7313549)->elements[7], r_735564));; 
}

static void __lambda_552(void *data, object self_7313550, int argc, object *args) /* object self_7313550, object r_735550 */
 {

  
closureN_type c_7319365;
object e_7319379 [2];
c_7319365.hdr.mark = gc_color_red;
 c_7319365.hdr.grayed = 0;
c_7319365.tag = closureN_tag;
 c_7319365.fn = (function_type)__lambda_553;
c_7319365.num_args = 0;
c_7319365.num_elements = 2;
c_7319365.elements = (object *)e_7319379;
c_7319365.elements[0] = ((closureN)self_7313550)->elements[4];
c_7319365.elements[1] = ((closureN)self_7313550)->elements[6];


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

return_direct_with_clo1(data,(closure)&c_7319365,__lambda_553,  &c_7319380);; 
}

static void __lambda_554(void *data, object self_7313551, int argc, object *args) /* object self_7313551, object r_735560 */
 {
 object r_735560 = args[0];
  
closureN_type c_7319382;
object e_7319427 [7];
c_7319382.hdr.mark = gc_color_red;
 c_7319382.hdr.grayed = 0;
c_7319382.tag = closureN_tag;
 c_7319382.fn = (function_type)__lambda_555;
c_7319382.num_args = 1;
c_7319382.num_elements = 7;
c_7319382.elements = (object *)e_7319427;
c_7319382.elements[0] = ((closureN)self_7313551)->elements[0];
c_7319382.elements[1] = ((closureN)self_7313551)->elements[1];
c_7319382.elements[2] = ((closureN)self_7313551)->elements[2];
c_7319382.elements[3] = ((closureN)self_7313551)->elements[3];
c_7319382.elements[4] = ((closureN)self_7313551)->elements[4];
c_7319382.elements[5] = ((closureN)self_7313551)->elements[5];
c_7319382.elements[6] = ((closureN)self_7313551)->elements[6];



return_direct_with_clo1(data,(closure)&c_7319382,__lambda_555,  Cyc_set_cell(data, ((closureN)self_7313551)->elements[1], r_735560));; 
}

static void __lambda_555(void *data, object self_7313552, int argc, object *args) /* object self_7313552, object r_735551 */
 {

  
closureN_type c_7319384;
object e_7319400 [4];
c_7319384.hdr.mark = gc_color_red;
 c_7319384.hdr.grayed = 0;
c_7319384.tag = closureN_tag;
 c_7319384.fn = (function_type)__lambda_556;
c_7319384.num_args = 1;
c_7319384.num_elements = 4;
c_7319384.elements = (object *)e_7319400;
c_7319384.elements[0] = ((closureN)self_7313552)->elements[0];
c_7319384.elements[1] = ((closureN)self_7313552)->elements[3];
c_7319384.elements[2] = ((closureN)self_7313552)->elements[4];
c_7319384.elements[3] = ((closureN)self_7313552)->elements[5];


closureN_type c_7319401;
object e_7319426 [4];
c_7319401.hdr.mark = gc_color_red;
 c_7319401.hdr.grayed = 0;
c_7319401.tag = closureN_tag;
 c_7319401.fn = (function_type)__lambda_558;
c_7319401.num_args = 2;
c_7319401.num_elements = 4;
c_7319401.elements = (object *)e_7319426;
c_7319401.elements[0] = ((closureN)self_7313552)->elements[1];
c_7319401.elements[1] = ((closureN)self_7313552)->elements[2];
c_7319401.elements[2] = ((closureN)self_7313552)->elements[4];
c_7319401.elements[3] = ((closureN)self_7313552)->elements[6];

return_direct_with_clo1(data,(closure)&c_7319384,__lambda_556,  &c_7319401);; 
}

static void __lambda_558(void *data, object self_7313553, int argc, object *args) /* object self_7313553, object k_735554, object i_91at_73690_733291, object i_91from_73691_733292 */
 {
 object k_735554 = args[0]; object i_91at_73690_733291 = args[1]; object i_91from_73691_733292 = args[2];
    
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73691_733292, car(((closureN)self_7313553)->elements[0]))) ){ 
  return_direct_with_clo1(data,  k_735554, (((closure)  k_735554)->fn),  ((closureN)self_7313553)->elements[3]);
} else { 
  
  
  Cyc_string_set(data, ((closureN)self_7313553)->elements[3], i_91at_73690_733291, Cyc_string_ref(data, ((closureN)self_7313553)->elements[1], i_91from_73691_733292));


complex_num_type local_7319416; 

complex_num_type local_7319419; 
return_closcall3(data,  car(((closureN)self_7313553)->elements[2]),  k_735554, Cyc_fast_sum(data,&local_7319416, i_91at_73690_733291, obj_int2obj(1)), Cyc_fast_sum(data,&local_7319419, i_91from_73691_733292, obj_int2obj(1)));;}
;; 
}

static void __lambda_556(void *data, object self_7313554, int argc, object *args) /* object self_7313554, object r_735553 */
 {
 object r_735553 = args[0];
  
closureN_type c_7319386;
object e_7319396 [4];
c_7319386.hdr.mark = gc_color_red;
 c_7319386.hdr.grayed = 0;
c_7319386.tag = closureN_tag;
 c_7319386.fn = (function_type)__lambda_557;
c_7319386.num_args = 1;
c_7319386.num_elements = 4;
c_7319386.elements = (object *)e_7319396;
c_7319386.elements[0] = ((closureN)self_7313554)->elements[0];
c_7319386.elements[1] = ((closureN)self_7313554)->elements[1];
c_7319386.elements[2] = ((closureN)self_7313554)->elements[2];
c_7319386.elements[3] = ((closureN)self_7313554)->elements[3];



return_direct_with_clo1(data,(closure)&c_7319386,__lambda_557,  Cyc_set_cell(data, ((closureN)self_7313554)->elements[2], r_735553));; 
}

static void __lambda_557(void *data, object self_7313555, int argc, object *args) /* object self_7313555, object r_735552 */
 {

  



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

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

return_direct_with_clo1(data,  k_735561,__lambda_554,  Cyc_cadr(data, ((closureN)self_7313556)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735561,__lambda_554,  car(((closureN)self_7313556)->elements[0]));}
;; 
}

static void __lambda_542(void *data, object _, int argc, object *args) /* closure _,object k_735533, object str_73677_733278, object opts_73678_733279_raw, ... */
 {
object k_735533 = args[0]; object str_73677_733278 = args[1];
load_varargs(opts_73678_733279, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:string-copy");

closureN_type c_7319254;
object e_7319337 [3];
c_7319254.hdr.mark = gc_color_red;
 c_7319254.hdr.grayed = 0;
c_7319254.tag = closureN_tag;
 c_7319254.fn = (function_type)__lambda_543;
c_7319254.num_args = 3;
c_7319254.num_elements = 3;
c_7319254.elements = (object *)e_7319337;
c_7319254.elements[0] = k_735533;
c_7319254.elements[1] = opts_73678_733279;
c_7319254.elements[2] = str_73677_733278;

return_direct_with_clo3(data,(closure)&c_7319254,__lambda_543,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_543(void *data, object self_7313535, int argc, object *args) /* object self_7313535, object len_73679_733280, object start_73680_733281, object end_73681_733282 */
 {
 object len_73679_733280 = args[0]; object start_73680_733281 = args[1]; object end_73681_733282 = args[2];
  
closureN_type c_7319256;
object e_7319333 [5];
c_7319256.hdr.mark = gc_color_red;
 c_7319256.hdr.grayed = 0;
c_7319256.tag = closureN_tag;
 c_7319256.fn = (function_type)__lambda_1395;
c_7319256.num_args = 1;
c_7319256.num_elements = 5;
c_7319256.elements = (object *)e_7319333;
c_7319256.elements[0] = end_73681_733282;
c_7319256.elements[1] = ((closureN)self_7313535)->elements[0];
c_7319256.elements[2] = ((closureN)self_7313535)->elements[1];
c_7319256.elements[3] = start_73680_733281;
c_7319256.elements[4] = ((closureN)self_7313535)->elements[2];


pair_type local_7319336; 
return_direct_with_clo1(data,(closure)&c_7319256,__lambda_1395,  set_cell_as_expr(&local_7319336, len_73679_733280));; 
}

static void __lambda_1395(void *data, object self_7313536, int argc, object *args) /* object self_7313536, object len_73679_733280 */
 {
 object len_73679_733280 = args[0];
  
closureN_type c_7319258;
object e_7319328 [5];
c_7319258.hdr.mark = gc_color_red;
 c_7319258.hdr.grayed = 0;
c_7319258.tag = closureN_tag;
 c_7319258.fn = (function_type)__lambda_1394;
c_7319258.num_args = 1;
c_7319258.num_elements = 5;
c_7319258.elements = (object *)e_7319328;
c_7319258.elements[0] = ((closureN)self_7313536)->elements[0];
c_7319258.elements[1] = ((closureN)self_7313536)->elements[1];
c_7319258.elements[2] = len_73679_733280;
c_7319258.elements[3] = ((closureN)self_7313536)->elements[2];
c_7319258.elements[4] = ((closureN)self_7313536)->elements[4];


pair_type local_7319331; 
return_direct_with_clo1(data,(closure)&c_7319258,__lambda_1394,  set_cell_as_expr(&local_7319331, ((closureN)self_7313536)->elements[3]));; 
}

static void __lambda_1394(void *data, object self_7313537, int argc, object *args) /* object self_7313537, object start_73680_733281 */
 {
 object start_73680_733281 = args[0];
  
closureN_type c_7319260;
object e_7319323 [5];
c_7319260.hdr.mark = gc_color_red;
 c_7319260.hdr.grayed = 0;
c_7319260.tag = closureN_tag;
 c_7319260.fn = (function_type)__lambda_1393;
c_7319260.num_args = 1;
c_7319260.num_elements = 5;
c_7319260.elements = (object *)e_7319323;
c_7319260.elements[0] = ((closureN)self_7313537)->elements[1];
c_7319260.elements[1] = ((closureN)self_7313537)->elements[2];
c_7319260.elements[2] = ((closureN)self_7313537)->elements[3];
c_7319260.elements[3] = start_73680_733281;
c_7319260.elements[4] = ((closureN)self_7313537)->elements[4];


pair_type local_7319326; 
return_direct_with_clo1(data,(closure)&c_7319260,__lambda_1393,  set_cell_as_expr(&local_7319326, ((closureN)self_7313537)->elements[0]));; 
}

static void __lambda_1393(void *data, object self_7313538, int argc, object *args) /* object self_7313538, object end_73681_733282 */
 {
 object end_73681_733282 = args[0];
  
closureN_type c_7319262;
object e_7319316 [6];
c_7319262.hdr.mark = gc_color_red;
 c_7319262.hdr.grayed = 0;
c_7319262.tag = closureN_tag;
 c_7319262.fn = (function_type)__lambda_544;
c_7319262.num_args = 1;
c_7319262.num_elements = 6;
c_7319262.elements = (object *)e_7319316;
c_7319262.elements[0] = end_73681_733282;
c_7319262.elements[1] = ((closureN)self_7313538)->elements[0];
c_7319262.elements[2] = ((closureN)self_7313538)->elements[1];
c_7319262.elements[3] = ((closureN)self_7313538)->elements[2];
c_7319262.elements[4] = ((closureN)self_7313538)->elements[3];
c_7319262.elements[5] = ((closureN)self_7313538)->elements[4];





return_direct_with_clo1(data,(closure)&c_7319262,__lambda_544,  Cyc_set_cell(data, ((closureN)self_7313538)->elements[1], Cyc_string_length(data, ((closureN)self_7313538)->elements[4])));; 
}

static void __lambda_544(void *data, object self_7313539, int argc, object *args) /* object self_7313539, object r_735534 */
 {

  object r_735541;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313539)->elements[3]), obj_int2obj(0))) ){ 
  
  r_735541 = Cyc_car(data, ((closureN)self_7313539)->elements[3]);
} else { 
  r_735541 = obj_int2obj(0);}
;
closureN_type c_7319275;
object e_7319312 [6];
c_7319275.hdr.mark = gc_color_red;
 c_7319275.hdr.grayed = 0;
c_7319275.tag = closureN_tag;
 c_7319275.fn = (function_type)__lambda_545;
c_7319275.num_args = 1;
c_7319275.num_elements = 6;
c_7319275.elements = (object *)e_7319312;
c_7319275.elements[0] = ((closureN)self_7313539)->elements[0];
c_7319275.elements[1] = ((closureN)self_7313539)->elements[1];
c_7319275.elements[2] = ((closureN)self_7313539)->elements[2];
c_7319275.elements[3] = ((closureN)self_7313539)->elements[3];
c_7319275.elements[4] = ((closureN)self_7313539)->elements[4];
c_7319275.elements[5] = ((closureN)self_7313539)->elements[5];



return_direct_with_clo1(data,(closure)&c_7319275,__lambda_545,  Cyc_set_cell(data, ((closureN)self_7313539)->elements[4], r_735541));; 
}

static void __lambda_545(void *data, object self_7313540, int argc, object *args) /* object self_7313540, object r_735535 */
 {

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


closureN_type c_7319292;
object e_7319311 [4];
c_7319292.hdr.mark = gc_color_red;
 c_7319292.hdr.grayed = 0;
c_7319292.tag = closureN_tag;
 c_7319292.fn = (function_type)__lambda_547;
c_7319292.num_args = 1;
c_7319292.num_elements = 4;
c_7319292.elements = (object *)e_7319311;
c_7319292.elements[0] = ((closureN)self_7313540)->elements[0];
c_7319292.elements[1] = ((closureN)self_7313540)->elements[1];
c_7319292.elements[2] = ((closureN)self_7313540)->elements[4];
c_7319292.elements[3] = ((closureN)self_7313540)->elements[5];

return_direct_with_clo1(data,(closure)&c_7319277,__lambda_546,  &c_7319292);; 
}

static void __lambda_547(void *data, object self_7313541, int argc, object *args) /* object self_7313541, object r_735537 */
 {
 object r_735537 = args[0];
  
closureN_type c_7319294;
object e_7319307 [4];
c_7319294.hdr.mark = gc_color_red;
 c_7319294.hdr.grayed = 0;
c_7319294.tag = closureN_tag;
 c_7319294.fn = (function_type)__lambda_548;
c_7319294.num_args = 1;
c_7319294.num_elements = 4;
c_7319294.elements = (object *)e_7319307;
c_7319294.elements[0] = ((closureN)self_7313541)->elements[0];
c_7319294.elements[1] = ((closureN)self_7313541)->elements[1];
c_7319294.elements[2] = ((closureN)self_7313541)->elements[2];
c_7319294.elements[3] = ((closureN)self_7313541)->elements[3];



return_direct_with_clo1(data,(closure)&c_7319294,__lambda_548,  Cyc_set_cell(data, ((closureN)self_7313541)->elements[0], r_735537));; 
}

static void __lambda_548(void *data, object self_7313542, int argc, object *args) /* object self_7313542, object r_735536 */
 {

  




object c_7319299 = Cyc_substring(data,  ((closureN)self_7313542)->elements[1],((closureN)self_7313542)->elements[3], car(((closureN)self_7313542)->elements[2]), car(((closureN)self_7313542)->elements[0]));
return_direct_with_clo1(data,  ((closureN)self_7313542)->elements[1], (((closure)  ((closureN)self_7313542)->elements[1])->fn),  c_7319299);; 
}

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

return_direct_with_clo1(data,  k_735538,__lambda_547,  Cyc_cadr(data, ((closureN)self_7313543)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735538,__lambda_547,  car(((closureN)self_7313543)->elements[0]));}
;; 
}

static void __lambda_540(void *data, object _, int argc, object *args) /* closure _,object k_735528, object str_73675_733276, object opts_73676_733277_raw, ... */
 {
object k_735528 = args[0]; object str_73675_733276 = args[1];
load_varargs(opts_73676_733277, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:string->vector");

closureN_type c_7319239;
object e_7319245 [1];
c_7319239.hdr.mark = gc_color_red;
 c_7319239.hdr.grayed = 0;
c_7319239.tag = closureN_tag;
 c_7319239.fn = (function_type)__lambda_541;
c_7319239.num_args = 1;
c_7319239.num_elements = 1;
c_7319239.elements = (object *)e_7319245;
c_7319239.elements[0] = k_735528;


pair_type local_7319251; 

object c_7319248 = apply(data,(closure)&c_7319239,__glo_string_91_125list_scheme_base, set_pair_as_expr(&local_7319251, str_73675_733276, opts_73676_733277));
return_closcall1(data,(closure)&c_7319239,  c_7319248);; 
}

static void __lambda_541(void *data, object self_7313534, int argc, object *args) /* object self_7313534, object r_735529 */
 {
 object r_735529 = args[0];
  
object c_7319244 = Cyc_list2vector(data,  ((closureN)self_7313534)->elements[0],r_735529);
return_direct_with_clo1(data,  ((closureN)self_7313534)->elements[0], (((closure)  ((closureN)self_7313534)->elements[0])->fn),  c_7319244);; 
}

static void __lambda_530(void *data, object _, int argc, object *args) /* closure _,object k_735505, object str_73667_733268, object opts_73668_733269_raw, ... */
 {
object k_735505 = args[0]; object str_73667_733268 = args[1];
load_varargs(opts_73668_733269, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:string->list");

closureN_type c_7319120;
object e_7319236 [3];
c_7319120.hdr.mark = gc_color_red;
 c_7319120.hdr.grayed = 0;
c_7319120.tag = closureN_tag;
 c_7319120.fn = (function_type)__lambda_531;
c_7319120.num_args = 4;
c_7319120.num_elements = 3;
c_7319120.elements = (object *)e_7319236;
c_7319120.elements[0] = k_735505;
c_7319120.elements[1] = opts_73668_733269;
c_7319120.elements[2] = str_73667_733268;

return_direct_with_clo4(data,(closure)&c_7319120,__lambda_531,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_531(void *data, object self_7313521, int argc, object *args) /* object self_7313521, object len_73669_733270, object start_73670_733271, object end_73671_733272, object loop_73672_733273 */
 {
 object len_73669_733270 = args[0]; object start_73670_733271 = args[1]; object end_73671_733272 = args[2]; object loop_73672_733273 = args[3];
  
closureN_type c_7319122;
object e_7319232 [6];
c_7319122.hdr.mark = gc_color_red;
 c_7319122.hdr.grayed = 0;
c_7319122.tag = closureN_tag;
 c_7319122.fn = (function_type)__lambda_1392;
c_7319122.num_args = 1;
c_7319122.num_elements = 6;
c_7319122.elements = (object *)e_7319232;
c_7319122.elements[0] = end_73671_733272;
c_7319122.elements[1] = ((closureN)self_7313521)->elements[0];
c_7319122.elements[2] = loop_73672_733273;
c_7319122.elements[3] = ((closureN)self_7313521)->elements[1];
c_7319122.elements[4] = start_73670_733271;
c_7319122.elements[5] = ((closureN)self_7313521)->elements[2];


pair_type local_7319235; 
return_direct_with_clo1(data,(closure)&c_7319122,__lambda_1392,  set_cell_as_expr(&local_7319235, len_73669_733270));; 
}

static void __lambda_1392(void *data, object self_7313522, int argc, object *args) /* object self_7313522, object len_73669_733270 */
 {
 object len_73669_733270 = args[0];
  
closureN_type c_7319124;
object e_7319227 [6];
c_7319124.hdr.mark = gc_color_red;
 c_7319124.hdr.grayed = 0;
c_7319124.tag = closureN_tag;
 c_7319124.fn = (function_type)__lambda_1391;
c_7319124.num_args = 1;
c_7319124.num_elements = 6;
c_7319124.elements = (object *)e_7319227;
c_7319124.elements[0] = ((closureN)self_7313522)->elements[0];
c_7319124.elements[1] = ((closureN)self_7313522)->elements[1];
c_7319124.elements[2] = len_73669_733270;
c_7319124.elements[3] = ((closureN)self_7313522)->elements[2];
c_7319124.elements[4] = ((closureN)self_7313522)->elements[3];
c_7319124.elements[5] = ((closureN)self_7313522)->elements[5];


pair_type local_7319230; 
return_direct_with_clo1(data,(closure)&c_7319124,__lambda_1391,  set_cell_as_expr(&local_7319230, ((closureN)self_7313522)->elements[4]));; 
}

static void __lambda_1391(void *data, object self_7313523, int argc, object *args) /* object self_7313523, object start_73670_733271 */
 {
 object start_73670_733271 = args[0];
  
closureN_type c_7319126;
object e_7319222 [6];
c_7319126.hdr.mark = gc_color_red;
 c_7319126.hdr.grayed = 0;
c_7319126.tag = closureN_tag;
 c_7319126.fn = (function_type)__lambda_1390;
c_7319126.num_args = 1;
c_7319126.num_elements = 6;
c_7319126.elements = (object *)e_7319222;
c_7319126.elements[0] = ((closureN)self_7313523)->elements[1];
c_7319126.elements[1] = ((closureN)self_7313523)->elements[2];
c_7319126.elements[2] = ((closureN)self_7313523)->elements[3];
c_7319126.elements[3] = ((closureN)self_7313523)->elements[4];
c_7319126.elements[4] = start_73670_733271;
c_7319126.elements[5] = ((closureN)self_7313523)->elements[5];


pair_type local_7319225; 
return_direct_with_clo1(data,(closure)&c_7319126,__lambda_1390,  set_cell_as_expr(&local_7319225, ((closureN)self_7313523)->elements[0]));; 
}

static void __lambda_1390(void *data, object self_7313524, int argc, object *args) /* object self_7313524, object end_73671_733272 */
 {
 object end_73671_733272 = args[0];
  
closureN_type c_7319128;
object e_7319217 [6];
c_7319128.hdr.mark = gc_color_red;
 c_7319128.hdr.grayed = 0;
c_7319128.tag = closureN_tag;
 c_7319128.fn = (function_type)__lambda_1389;
c_7319128.num_args = 1;
c_7319128.num_elements = 6;
c_7319128.elements = (object *)e_7319217;
c_7319128.elements[0] = end_73671_733272;
c_7319128.elements[1] = ((closureN)self_7313524)->elements[0];
c_7319128.elements[2] = ((closureN)self_7313524)->elements[1];
c_7319128.elements[3] = ((closureN)self_7313524)->elements[3];
c_7319128.elements[4] = ((closureN)self_7313524)->elements[4];
c_7319128.elements[5] = ((closureN)self_7313524)->elements[5];


pair_type local_7319220; 
return_direct_with_clo1(data,(closure)&c_7319128,__lambda_1389,  set_cell_as_expr(&local_7319220, ((closureN)self_7313524)->elements[2]));; 
}

static void __lambda_1389(void *data, object self_7313525, int argc, object *args) /* object self_7313525, object loop_73672_733273 */
 {
 object loop_73672_733273 = args[0];
  
closureN_type c_7319130;
object e_7319210 [7];
c_7319130.hdr.mark = gc_color_red;
 c_7319130.hdr.grayed = 0;
c_7319130.tag = closureN_tag;
 c_7319130.fn = (function_type)__lambda_532;
c_7319130.num_args = 1;
c_7319130.num_elements = 7;
c_7319130.elements = (object *)e_7319210;
c_7319130.elements[0] = ((closureN)self_7313525)->elements[0];
c_7319130.elements[1] = ((closureN)self_7313525)->elements[1];
c_7319130.elements[2] = ((closureN)self_7313525)->elements[2];
c_7319130.elements[3] = loop_73672_733273;
c_7319130.elements[4] = ((closureN)self_7313525)->elements[3];
c_7319130.elements[5] = ((closureN)self_7313525)->elements[4];
c_7319130.elements[6] = ((closureN)self_7313525)->elements[5];





return_direct_with_clo1(data,(closure)&c_7319130,__lambda_532,  Cyc_set_cell(data, ((closureN)self_7313525)->elements[2], Cyc_string_length(data, ((closureN)self_7313525)->elements[5])));; 
}

static void __lambda_532(void *data, object self_7313526, int argc, object *args) /* object self_7313526, object r_735506 */
 {

  object r_735521;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313526)->elements[4]), obj_int2obj(0))) ){ 
  
  r_735521 = Cyc_car(data, ((closureN)self_7313526)->elements[4]);
} else { 
  r_735521 = obj_int2obj(0);}
;
closureN_type c_7319143;
object e_7319206 [7];
c_7319143.hdr.mark = gc_color_red;
 c_7319143.hdr.grayed = 0;
c_7319143.tag = closureN_tag;
 c_7319143.fn = (function_type)__lambda_533;
c_7319143.num_args = 1;
c_7319143.num_elements = 7;
c_7319143.elements = (object *)e_7319206;
c_7319143.elements[0] = ((closureN)self_7313526)->elements[0];
c_7319143.elements[1] = ((closureN)self_7313526)->elements[1];
c_7319143.elements[2] = ((closureN)self_7313526)->elements[2];
c_7319143.elements[3] = ((closureN)self_7313526)->elements[3];
c_7319143.elements[4] = ((closureN)self_7313526)->elements[4];
c_7319143.elements[5] = ((closureN)self_7313526)->elements[5];
c_7319143.elements[6] = ((closureN)self_7313526)->elements[6];



return_direct_with_clo1(data,(closure)&c_7319143,__lambda_533,  Cyc_set_cell(data, ((closureN)self_7313526)->elements[5], r_735521));; 
}

static void __lambda_533(void *data, object self_7313527, int argc, object *args) /* object self_7313527, object r_735507 */
 {

  
closureN_type c_7319145;
object e_7319159 [2];
c_7319145.hdr.mark = gc_color_red;
 c_7319145.hdr.grayed = 0;
c_7319145.tag = closureN_tag;
 c_7319145.fn = (function_type)__lambda_534;
c_7319145.num_args = 0;
c_7319145.num_elements = 2;
c_7319145.elements = (object *)e_7319159;
c_7319145.elements[0] = ((closureN)self_7313527)->elements[2];
c_7319145.elements[1] = ((closureN)self_7313527)->elements[4];


closureN_type c_7319160;
object e_7319205 [5];
c_7319160.hdr.mark = gc_color_red;
 c_7319160.hdr.grayed = 0;
c_7319160.tag = closureN_tag;
 c_7319160.fn = (function_type)__lambda_535;
c_7319160.num_args = 1;
c_7319160.num_elements = 5;
c_7319160.elements = (object *)e_7319205;
c_7319160.elements[0] = ((closureN)self_7313527)->elements[0];
c_7319160.elements[1] = ((closureN)self_7313527)->elements[1];
c_7319160.elements[2] = ((closureN)self_7313527)->elements[3];
c_7319160.elements[3] = ((closureN)self_7313527)->elements[5];
c_7319160.elements[4] = ((closureN)self_7313527)->elements[6];

return_direct_with_clo1(data,(closure)&c_7319145,__lambda_534,  &c_7319160);; 
}

static void __lambda_535(void *data, object self_7313528, int argc, object *args) /* object self_7313528, object r_735517 */
 {
 object r_735517 = args[0];
  
closureN_type c_7319162;
object e_7319201 [5];
c_7319162.hdr.mark = gc_color_red;
 c_7319162.hdr.grayed = 0;
c_7319162.tag = closureN_tag;
 c_7319162.fn = (function_type)__lambda_536;
c_7319162.num_args = 1;
c_7319162.num_elements = 5;
c_7319162.elements = (object *)e_7319201;
c_7319162.elements[0] = ((closureN)self_7313528)->elements[0];
c_7319162.elements[1] = ((closureN)self_7313528)->elements[1];
c_7319162.elements[2] = ((closureN)self_7313528)->elements[2];
c_7319162.elements[3] = ((closureN)self_7313528)->elements[3];
c_7319162.elements[4] = ((closureN)self_7313528)->elements[4];



return_direct_with_clo1(data,(closure)&c_7319162,__lambda_536,  Cyc_set_cell(data, ((closureN)self_7313528)->elements[0], r_735517));; 
}

static void __lambda_536(void *data, object self_7313529, int argc, object *args) /* object self_7313529, object r_735508 */
 {

  
closureN_type c_7319164;
object e_7319179 [3];
c_7319164.hdr.mark = gc_color_red;
 c_7319164.hdr.grayed = 0;
c_7319164.tag = closureN_tag;
 c_7319164.fn = (function_type)__lambda_537;
c_7319164.num_args = 1;
c_7319164.num_elements = 3;
c_7319164.elements = (object *)e_7319179;
c_7319164.elements[0] = ((closureN)self_7313529)->elements[1];
c_7319164.elements[1] = ((closureN)self_7313529)->elements[2];
c_7319164.elements[2] = ((closureN)self_7313529)->elements[3];


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

return_direct_with_clo1(data,(closure)&c_7319164,__lambda_537,  &c_7319180);; 
}

static void __lambda_539(void *data, object self_7313530, int argc, object *args) /* object self_7313530, object k_735512, object i_73673_733274, object lst_73674_733275 */
 {
 object k_735512 = args[0]; object i_73673_733274 = args[1]; object lst_73674_733275 = args[2];
    
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73673_733274, car(((closureN)self_7313530)->elements[0]))) ){ 
  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735512, primitive_cons, NULL, lst_73674_733275);
} else { 
  


complex_num_type local_7319193; 

pair_type local_7319196; 


return_closcall3(data,  car(((closureN)self_7313530)->elements[1]),  k_735512, Cyc_fast_sum(data,&local_7319193, i_73673_733274, obj_int2obj(1)), set_pair_as_expr(&local_7319196, Cyc_string_ref(data, ((closureN)self_7313530)->elements[2], i_73673_733274), lst_73674_733275));}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_7319166,__lambda_538,  Cyc_set_cell(data, ((closureN)self_7313531)->elements[1], r_735511));; 
}

static void __lambda_538(void *data, object self_7313532, int argc, object *args) /* object self_7313532, object r_735509 */
 {

  



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

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

return_direct_with_clo1(data,  k_735518,__lambda_535,  Cyc_cadr(data, ((closureN)self_7313533)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735518,__lambda_535,  car(((closureN)self_7313533)->elements[0]));}
;; 
}

static void __lambda_528(void *data, object _, int argc, object *args) /* closure _,object k_735500, object vec_73664_733265, object opts_73665_733266_raw, ... */
 {
object k_735500 = args[0]; object vec_73664_733265 = args[1];
load_varargs(opts_73665_733266, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:vector->string");

closureN_type c_7319105;
object e_7319111 [1];
c_7319105.hdr.mark = gc_color_red;
 c_7319105.hdr.grayed = 0;
c_7319105.tag = closureN_tag;
 c_7319105.fn = (function_type)__lambda_529;
c_7319105.num_args = 1;
c_7319105.num_elements = 1;
c_7319105.elements = (object *)e_7319111;
c_7319105.elements[0] = k_735500;


pair_type local_7319117; 

object c_7319114 = apply(data,(closure)&c_7319105,__glo_vector_91_125list_scheme_base, set_pair_as_expr(&local_7319117, vec_73664_733265, opts_73665_733266));
return_closcall1(data,(closure)&c_7319105,  c_7319114);; 
}

static void __lambda_529(void *data, object self_7313520, int argc, object *args) /* object self_7313520, object lst_73666_733267 */
 {
 object lst_73666_733267 = args[0];
  
object c_7319110 = Cyc_list2string(data,  ((closureN)self_7313520)->elements[0],lst_73666_733267);
return_direct_with_clo1(data,  ((closureN)self_7313520)->elements[0], (((closure)  ((closureN)self_7313520)->elements[0])->fn),  c_7319110);; 
}

static void __lambda_521(void *data, object _, int argc, object *args) /* closure _,object k_735485, object str_73659_733260, object opts_73660_733261_raw, ... */
 {
object k_735485 = args[0]; object str_73659_733260 = args[1];
load_varargs(opts_73660_733261, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:string->utf8");

closureN_type c_7319019;
object e_7319102 [3];
c_7319019.hdr.mark = gc_color_red;
 c_7319019.hdr.grayed = 0;
c_7319019.tag = closureN_tag;
 c_7319019.fn = (function_type)__lambda_522;
c_7319019.num_args = 3;
c_7319019.num_elements = 3;
c_7319019.elements = (object *)e_7319102;
c_7319019.elements[0] = k_735485;
c_7319019.elements[1] = opts_73660_733261;
c_7319019.elements[2] = str_73659_733260;

return_direct_with_clo3(data,(closure)&c_7319019,__lambda_522,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_522(void *data, object self_7313511, int argc, object *args) /* object self_7313511, object len_73661_733262, object start_73662_733263, object end_73663_733264 */
 {
 object len_73661_733262 = args[0]; object start_73662_733263 = args[1]; object end_73663_733264 = args[2];
  
closureN_type c_7319021;
object e_7319098 [5];
c_7319021.hdr.mark = gc_color_red;
 c_7319021.hdr.grayed = 0;
c_7319021.tag = closureN_tag;
 c_7319021.fn = (function_type)__lambda_1388;
c_7319021.num_args = 1;
c_7319021.num_elements = 5;
c_7319021.elements = (object *)e_7319098;
c_7319021.elements[0] = end_73663_733264;
c_7319021.elements[1] = ((closureN)self_7313511)->elements[0];
c_7319021.elements[2] = ((closureN)self_7313511)->elements[1];
c_7319021.elements[3] = start_73662_733263;
c_7319021.elements[4] = ((closureN)self_7313511)->elements[2];


pair_type local_7319101; 
return_direct_with_clo1(data,(closure)&c_7319021,__lambda_1388,  set_cell_as_expr(&local_7319101, len_73661_733262));; 
}

static void __lambda_1388(void *data, object self_7313512, int argc, object *args) /* object self_7313512, object len_73661_733262 */
 {
 object len_73661_733262 = args[0];
  
closureN_type c_7319023;
object e_7319093 [5];
c_7319023.hdr.mark = gc_color_red;
 c_7319023.hdr.grayed = 0;
c_7319023.tag = closureN_tag;
 c_7319023.fn = (function_type)__lambda_1387;
c_7319023.num_args = 1;
c_7319023.num_elements = 5;
c_7319023.elements = (object *)e_7319093;
c_7319023.elements[0] = ((closureN)self_7313512)->elements[0];
c_7319023.elements[1] = ((closureN)self_7313512)->elements[1];
c_7319023.elements[2] = len_73661_733262;
c_7319023.elements[3] = ((closureN)self_7313512)->elements[2];
c_7319023.elements[4] = ((closureN)self_7313512)->elements[4];


pair_type local_7319096; 
return_direct_with_clo1(data,(closure)&c_7319023,__lambda_1387,  set_cell_as_expr(&local_7319096, ((closureN)self_7313512)->elements[3]));; 
}

static void __lambda_1387(void *data, object self_7313513, int argc, object *args) /* object self_7313513, object start_73662_733263 */
 {
 object start_73662_733263 = args[0];
  
closureN_type c_7319025;
object e_7319088 [5];
c_7319025.hdr.mark = gc_color_red;
 c_7319025.hdr.grayed = 0;
c_7319025.tag = closureN_tag;
 c_7319025.fn = (function_type)__lambda_1386;
c_7319025.num_args = 1;
c_7319025.num_elements = 5;
c_7319025.elements = (object *)e_7319088;
c_7319025.elements[0] = ((closureN)self_7313513)->elements[1];
c_7319025.elements[1] = ((closureN)self_7313513)->elements[2];
c_7319025.elements[2] = ((closureN)self_7313513)->elements[3];
c_7319025.elements[3] = start_73662_733263;
c_7319025.elements[4] = ((closureN)self_7313513)->elements[4];


pair_type local_7319091; 
return_direct_with_clo1(data,(closure)&c_7319025,__lambda_1386,  set_cell_as_expr(&local_7319091, ((closureN)self_7313513)->elements[0]));; 
}

static void __lambda_1386(void *data, object self_7313514, int argc, object *args) /* object self_7313514, object end_73663_733264 */
 {
 object end_73663_733264 = args[0];
  
closureN_type c_7319027;
object e_7319081 [6];
c_7319027.hdr.mark = gc_color_red;
 c_7319027.hdr.grayed = 0;
c_7319027.tag = closureN_tag;
 c_7319027.fn = (function_type)__lambda_523;
c_7319027.num_args = 1;
c_7319027.num_elements = 6;
c_7319027.elements = (object *)e_7319081;
c_7319027.elements[0] = end_73663_733264;
c_7319027.elements[1] = ((closureN)self_7313514)->elements[0];
c_7319027.elements[2] = ((closureN)self_7313514)->elements[1];
c_7319027.elements[3] = ((closureN)self_7313514)->elements[2];
c_7319027.elements[4] = ((closureN)self_7313514)->elements[3];
c_7319027.elements[5] = ((closureN)self_7313514)->elements[4];





return_direct_with_clo1(data,(closure)&c_7319027,__lambda_523,  Cyc_set_cell(data, ((closureN)self_7313514)->elements[1], Cyc_string_length(data, ((closureN)self_7313514)->elements[4])));; 
}

static void __lambda_523(void *data, object self_7313515, int argc, object *args) /* object self_7313515, object r_735486 */
 {

  object r_735493;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313515)->elements[3]), obj_int2obj(0))) ){ 
  
  r_735493 = Cyc_car(data, ((closureN)self_7313515)->elements[3]);
} else { 
  r_735493 = obj_int2obj(0);}
;
closureN_type c_7319040;
object e_7319077 [6];
c_7319040.hdr.mark = gc_color_red;
 c_7319040.hdr.grayed = 0;
c_7319040.tag = closureN_tag;
 c_7319040.fn = (function_type)__lambda_524;
c_7319040.num_args = 1;
c_7319040.num_elements = 6;
c_7319040.elements = (object *)e_7319077;
c_7319040.elements[0] = ((closureN)self_7313515)->elements[0];
c_7319040.elements[1] = ((closureN)self_7313515)->elements[1];
c_7319040.elements[2] = ((closureN)self_7313515)->elements[2];
c_7319040.elements[3] = ((closureN)self_7313515)->elements[3];
c_7319040.elements[4] = ((closureN)self_7313515)->elements[4];
c_7319040.elements[5] = ((closureN)self_7313515)->elements[5];



return_direct_with_clo1(data,(closure)&c_7319040,__lambda_524,  Cyc_set_cell(data, ((closureN)self_7313515)->elements[4], r_735493));; 
}

static void __lambda_524(void *data, object self_7313516, int argc, object *args) /* object self_7313516, object r_735487 */
 {

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


closureN_type c_7319057;
object e_7319076 [4];
c_7319057.hdr.mark = gc_color_red;
 c_7319057.hdr.grayed = 0;
c_7319057.tag = closureN_tag;
 c_7319057.fn = (function_type)__lambda_526;
c_7319057.num_args = 1;
c_7319057.num_elements = 4;
c_7319057.elements = (object *)e_7319076;
c_7319057.elements[0] = ((closureN)self_7313516)->elements[0];
c_7319057.elements[1] = ((closureN)self_7313516)->elements[1];
c_7319057.elements[2] = ((closureN)self_7313516)->elements[4];
c_7319057.elements[3] = ((closureN)self_7313516)->elements[5];

return_direct_with_clo1(data,(closure)&c_7319042,__lambda_525,  &c_7319057);; 
}

static void __lambda_526(void *data, object self_7313517, int argc, object *args) /* object self_7313517, object r_735489 */
 {
 object r_735489 = args[0];
  
closureN_type c_7319059;
object e_7319072 [4];
c_7319059.hdr.mark = gc_color_red;
 c_7319059.hdr.grayed = 0;
c_7319059.tag = closureN_tag;
 c_7319059.fn = (function_type)__lambda_527;
c_7319059.num_args = 1;
c_7319059.num_elements = 4;
c_7319059.elements = (object *)e_7319072;
c_7319059.elements[0] = ((closureN)self_7313517)->elements[0];
c_7319059.elements[1] = ((closureN)self_7313517)->elements[1];
c_7319059.elements[2] = ((closureN)self_7313517)->elements[2];
c_7319059.elements[3] = ((closureN)self_7313517)->elements[3];



return_direct_with_clo1(data,(closure)&c_7319059,__lambda_527,  Cyc_set_cell(data, ((closureN)self_7313517)->elements[0], r_735489));; 
}

static void __lambda_527(void *data, object self_7313518, int argc, object *args) /* object self_7313518, object r_735488 */
 {

  




object c_7319064 = Cyc_string2utf8(data,  ((closureN)self_7313518)->elements[1],((closureN)self_7313518)->elements[3], car(((closureN)self_7313518)->elements[2]), car(((closureN)self_7313518)->elements[0]));
return_direct_with_clo1(data,  ((closureN)self_7313518)->elements[1], (((closure)  ((closureN)self_7313518)->elements[1])->fn),  c_7319064);; 
}

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

return_direct_with_clo1(data,  k_735490,__lambda_526,  Cyc_cadr(data, ((closureN)self_7313519)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735490,__lambda_526,  car(((closureN)self_7313519)->elements[0]));}
;; 
}

static void __lambda_514(void *data, object _, int argc, object *args) /* closure _,object k_735470, object bv_73654_733255, object opts_73655_733256_raw, ... */
 {
object k_735470 = args[0]; object bv_73654_733255 = args[1];
load_varargs(opts_73655_733256, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:utf8->string");

closureN_type c_7318933;
object e_7319016 [3];
c_7318933.hdr.mark = gc_color_red;
 c_7318933.hdr.grayed = 0;
c_7318933.tag = closureN_tag;
 c_7318933.fn = (function_type)__lambda_515;
c_7318933.num_args = 3;
c_7318933.num_elements = 3;
c_7318933.elements = (object *)e_7319016;
c_7318933.elements[0] = bv_73654_733255;
c_7318933.elements[1] = k_735470;
c_7318933.elements[2] = opts_73655_733256;

return_direct_with_clo3(data,(closure)&c_7318933,__lambda_515,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_515(void *data, object self_7313502, int argc, object *args) /* object self_7313502, object len_73656_733257, object start_73657_733258, object end_73658_733259 */
 {
 object len_73656_733257 = args[0]; object start_73657_733258 = args[1]; object end_73658_733259 = args[2];
  
closureN_type c_7318935;
object e_7319012 [5];
c_7318935.hdr.mark = gc_color_red;
 c_7318935.hdr.grayed = 0;
c_7318935.tag = closureN_tag;
 c_7318935.fn = (function_type)__lambda_1385;
c_7318935.num_args = 1;
c_7318935.num_elements = 5;
c_7318935.elements = (object *)e_7319012;
c_7318935.elements[0] = ((closureN)self_7313502)->elements[0];
c_7318935.elements[1] = end_73658_733259;
c_7318935.elements[2] = ((closureN)self_7313502)->elements[1];
c_7318935.elements[3] = ((closureN)self_7313502)->elements[2];
c_7318935.elements[4] = start_73657_733258;


pair_type local_7319015; 
return_direct_with_clo1(data,(closure)&c_7318935,__lambda_1385,  set_cell_as_expr(&local_7319015, len_73656_733257));; 
}

static void __lambda_1385(void *data, object self_7313503, int argc, object *args) /* object self_7313503, object len_73656_733257 */
 {
 object len_73656_733257 = args[0];
  
closureN_type c_7318937;
object e_7319007 [5];
c_7318937.hdr.mark = gc_color_red;
 c_7318937.hdr.grayed = 0;
c_7318937.tag = closureN_tag;
 c_7318937.fn = (function_type)__lambda_1384;
c_7318937.num_args = 1;
c_7318937.num_elements = 5;
c_7318937.elements = (object *)e_7319007;
c_7318937.elements[0] = ((closureN)self_7313503)->elements[0];
c_7318937.elements[1] = ((closureN)self_7313503)->elements[1];
c_7318937.elements[2] = ((closureN)self_7313503)->elements[2];
c_7318937.elements[3] = len_73656_733257;
c_7318937.elements[4] = ((closureN)self_7313503)->elements[3];


pair_type local_7319010; 
return_direct_with_clo1(data,(closure)&c_7318937,__lambda_1384,  set_cell_as_expr(&local_7319010, ((closureN)self_7313503)->elements[4]));; 
}

static void __lambda_1384(void *data, object self_7313504, int argc, object *args) /* object self_7313504, object start_73657_733258 */
 {
 object start_73657_733258 = args[0];
  
closureN_type c_7318939;
object e_7319002 [5];
c_7318939.hdr.mark = gc_color_red;
 c_7318939.hdr.grayed = 0;
c_7318939.tag = closureN_tag;
 c_7318939.fn = (function_type)__lambda_1383;
c_7318939.num_args = 1;
c_7318939.num_elements = 5;
c_7318939.elements = (object *)e_7319002;
c_7318939.elements[0] = ((closureN)self_7313504)->elements[0];
c_7318939.elements[1] = ((closureN)self_7313504)->elements[2];
c_7318939.elements[2] = ((closureN)self_7313504)->elements[3];
c_7318939.elements[3] = ((closureN)self_7313504)->elements[4];
c_7318939.elements[4] = start_73657_733258;


pair_type local_7319005; 
return_direct_with_clo1(data,(closure)&c_7318939,__lambda_1383,  set_cell_as_expr(&local_7319005, ((closureN)self_7313504)->elements[1]));; 
}

static void __lambda_1383(void *data, object self_7313505, int argc, object *args) /* object self_7313505, object end_73658_733259 */
 {
 object end_73658_733259 = args[0];
  
closureN_type c_7318941;
object e_7318995 [6];
c_7318941.hdr.mark = gc_color_red;
 c_7318941.hdr.grayed = 0;
c_7318941.tag = closureN_tag;
 c_7318941.fn = (function_type)__lambda_516;
c_7318941.num_args = 1;
c_7318941.num_elements = 6;
c_7318941.elements = (object *)e_7318995;
c_7318941.elements[0] = ((closureN)self_7313505)->elements[0];
c_7318941.elements[1] = end_73658_733259;
c_7318941.elements[2] = ((closureN)self_7313505)->elements[1];
c_7318941.elements[3] = ((closureN)self_7313505)->elements[2];
c_7318941.elements[4] = ((closureN)self_7313505)->elements[3];
c_7318941.elements[5] = ((closureN)self_7313505)->elements[4];





return_direct_with_clo1(data,(closure)&c_7318941,__lambda_516,  Cyc_set_cell(data, ((closureN)self_7313505)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7313505)->elements[0])));; 
}

static void __lambda_516(void *data, object self_7313506, int argc, object *args) /* object self_7313506, object r_735471 */
 {

  object r_735478;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313506)->elements[4]), obj_int2obj(0))) ){ 
  
  r_735478 = Cyc_car(data, ((closureN)self_7313506)->elements[4]);
} else { 
  r_735478 = obj_int2obj(0);}
;
closureN_type c_7318954;
object e_7318991 [6];
c_7318954.hdr.mark = gc_color_red;
 c_7318954.hdr.grayed = 0;
c_7318954.tag = closureN_tag;
 c_7318954.fn = (function_type)__lambda_517;
c_7318954.num_args = 1;
c_7318954.num_elements = 6;
c_7318954.elements = (object *)e_7318991;
c_7318954.elements[0] = ((closureN)self_7313506)->elements[0];
c_7318954.elements[1] = ((closureN)self_7313506)->elements[1];
c_7318954.elements[2] = ((closureN)self_7313506)->elements[2];
c_7318954.elements[3] = ((closureN)self_7313506)->elements[3];
c_7318954.elements[4] = ((closureN)self_7313506)->elements[4];
c_7318954.elements[5] = ((closureN)self_7313506)->elements[5];



return_direct_with_clo1(data,(closure)&c_7318954,__lambda_517,  Cyc_set_cell(data, ((closureN)self_7313506)->elements[5], r_735478));; 
}

static void __lambda_517(void *data, object self_7313507, int argc, object *args) /* object self_7313507, object r_735472 */
 {

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


closureN_type c_7318971;
object e_7318990 [4];
c_7318971.hdr.mark = gc_color_red;
 c_7318971.hdr.grayed = 0;
c_7318971.tag = closureN_tag;
 c_7318971.fn = (function_type)__lambda_519;
c_7318971.num_args = 1;
c_7318971.num_elements = 4;
c_7318971.elements = (object *)e_7318990;
c_7318971.elements[0] = ((closureN)self_7313507)->elements[0];
c_7318971.elements[1] = ((closureN)self_7313507)->elements[1];
c_7318971.elements[2] = ((closureN)self_7313507)->elements[2];
c_7318971.elements[3] = ((closureN)self_7313507)->elements[5];

return_direct_with_clo1(data,(closure)&c_7318956,__lambda_518,  &c_7318971);; 
}

static void __lambda_519(void *data, object self_7313508, int argc, object *args) /* object self_7313508, object r_735474 */
 {
 object r_735474 = args[0];
  
closureN_type c_7318973;
object e_7318986 [4];
c_7318973.hdr.mark = gc_color_red;
 c_7318973.hdr.grayed = 0;
c_7318973.tag = closureN_tag;
 c_7318973.fn = (function_type)__lambda_520;
c_7318973.num_args = 1;
c_7318973.num_elements = 4;
c_7318973.elements = (object *)e_7318986;
c_7318973.elements[0] = ((closureN)self_7313508)->elements[0];
c_7318973.elements[1] = ((closureN)self_7313508)->elements[1];
c_7318973.elements[2] = ((closureN)self_7313508)->elements[2];
c_7318973.elements[3] = ((closureN)self_7313508)->elements[3];



return_direct_with_clo1(data,(closure)&c_7318973,__lambda_520,  Cyc_set_cell(data, ((closureN)self_7313508)->elements[1], r_735474));; 
}

static void __lambda_520(void *data, object self_7313509, int argc, object *args) /* object self_7313509, object r_735473 */
 {

  




object c_7318978 = Cyc_utf82string(data,  ((closureN)self_7313509)->elements[2],((closureN)self_7313509)->elements[0], car(((closureN)self_7313509)->elements[3]), car(((closureN)self_7313509)->elements[1]));
return_direct_with_clo1(data,  ((closureN)self_7313509)->elements[2], (((closure)  ((closureN)self_7313509)->elements[2])->fn),  c_7318978);; 
}

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

return_direct_with_clo1(data,  k_735475,__lambda_519,  Cyc_cadr(data, ((closureN)self_7313510)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735475,__lambda_519,  car(((closureN)self_7313510)->elements[0]));}
;; 
}

static void __lambda_493(void *data, object _, int argc, object *args) /* closure _,object k_735433, object to_73619_733236, object at_73620_733237, object from_73621_733238, object o_73622_733239_raw, ... */
 {
object k_735433 = args[0]; object to_73619_733236 = args[1]; object at_73620_733237 = args[2]; object from_73621_733238 = args[3];
load_varargs(o_73622_733239, args, 4, argc - 4);
  object start_73625_733240;
  Cyc_st_add(data, "scheme/base.sld:bytevector-copy!");
  
if( (boolean_f != Cyc_is_pair(o_73622_733239)) ){ 
  
  start_73625_733240 = Cyc_car(data, o_73622_733239);
} else { 
  start_73625_733240 = obj_int2obj(0);}
;
closureN_type c_7318737;
object e_7318763 [2];
c_7318737.hdr.mark = gc_color_red;
 c_7318737.hdr.grayed = 0;
c_7318737.tag = closureN_tag;
 c_7318737.fn = (function_type)__lambda_494;
c_7318737.num_args = 0;
c_7318737.num_elements = 2;
c_7318737.elements = (object *)e_7318763;
c_7318737.elements[0] = from_73621_733238;
c_7318737.elements[1] = o_73622_733239;


closureN_type c_7318764;
object e_7318930 [5];
c_7318764.hdr.mark = gc_color_red;
 c_7318764.hdr.grayed = 0;
c_7318764.tag = closureN_tag;
 c_7318764.fn = (function_type)__lambda_497;
c_7318764.num_args = 1;
c_7318764.num_elements = 5;
c_7318764.elements = (object *)e_7318930;
c_7318764.elements[0] = at_73620_733237;
c_7318764.elements[1] = from_73621_733238;
c_7318764.elements[2] = k_735433;
c_7318764.elements[3] = start_73625_733240;
c_7318764.elements[4] = to_73619_733236;

return_direct_with_clo1(data,(closure)&c_7318737,__lambda_494,  &c_7318764);; 
}

static void __lambda_497(void *data, object self_7313480, int argc, object *args) /* object self_7313480, object end_73628_733241 */
 {
 object end_73628_733241 = args[0];
  
closureN_type c_7318766;
object e_7318926 [6];
c_7318766.hdr.mark = gc_color_red;
 c_7318766.hdr.grayed = 0;
c_7318766.tag = closureN_tag;
 c_7318766.fn = (function_type)__lambda_498;
c_7318766.num_args = 1;
c_7318766.num_elements = 6;
c_7318766.elements = (object *)e_7318926;
c_7318766.elements[0] = ((closureN)self_7313480)->elements[0];
c_7318766.elements[1] = end_73628_733241;
c_7318766.elements[2] = ((closureN)self_7313480)->elements[1];
c_7318766.elements[3] = ((closureN)self_7313480)->elements[2];
c_7318766.elements[4] = ((closureN)self_7313480)->elements[3];
c_7318766.elements[5] = ((closureN)self_7313480)->elements[4];



return_direct_with_clo1(data,(closure)&c_7318766,__lambda_498,  Cyc_bytevector_length(data, ((closureN)self_7313480)->elements[4]));; 
}

static void __lambda_498(void *data, object self_7313481, int argc, object *args) /* object self_7313481, object r_735460 */
 {
 object r_735460 = args[0];
  
closureN_type c_7318768;
object e_7318916 [6];
c_7318768.hdr.mark = gc_color_red;
 c_7318768.hdr.grayed = 0;
c_7318768.tag = closureN_tag;
 c_7318768.fn = (function_type)__lambda_499;
c_7318768.num_args = 1;
c_7318768.num_elements = 6;
c_7318768.elements = (object *)e_7318916;
c_7318768.elements[0] = ((closureN)self_7313481)->elements[0];
c_7318768.elements[1] = ((closureN)self_7313481)->elements[1];
c_7318768.elements[2] = ((closureN)self_7313481)->elements[2];
c_7318768.elements[3] = ((closureN)self_7313481)->elements[3];
c_7318768.elements[4] = ((closureN)self_7313481)->elements[4];
c_7318768.elements[5] = ((closureN)self_7313481)->elements[5];


complex_num_type local_7318920; 

complex_num_type local_7318924; 
return_direct_with_clo3(data,  __glo_min_scheme_base, (((closure)  __glo_min_scheme_base)->fn),  &c_7318768, ((closureN)self_7313481)->elements[1], Cyc_fast_sum(data,&local_7318920, ((closureN)self_7313481)->elements[4], Cyc_fast_sub(data,&local_7318924, r_735460, ((closureN)self_7313481)->elements[0])));; 
}

static void __lambda_499(void *data, object self_7313482, int argc, object *args) /* object self_7313482, object limit_73631_733242 */
 {
 object limit_73631_733242 = args[0];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313482)->elements[0], ((closureN)self_7313482)->elements[4])) ){ 
  
closureN_type c_7318774;
object e_7318835 [4];
c_7318774.hdr.mark = gc_color_red;
 c_7318774.hdr.grayed = 0;
c_7318774.tag = closureN_tag;
 c_7318774.fn = (function_type)__lambda_500;
c_7318774.num_args = 2;
c_7318774.num_elements = 4;
c_7318774.elements = (object *)e_7318835;
c_7318774.elements[0] = ((closureN)self_7313482)->elements[2];
c_7318774.elements[1] = ((closureN)self_7313482)->elements[3];
c_7318774.elements[2] = limit_73631_733242;
c_7318774.elements[3] = ((closureN)self_7313482)->elements[5];

return_direct_with_clo2(data,(closure)&c_7318774,__lambda_500,  ((closureN)self_7313482)->elements[0], ((closureN)self_7313482)->elements[4]);
} else { 
  
closureN_type c_7318839;
object e_7318900 [4];
c_7318839.hdr.mark = gc_color_red;
 c_7318839.hdr.grayed = 0;
c_7318839.tag = closureN_tag;
 c_7318839.fn = (function_type)__lambda_507;
c_7318839.num_args = 2;
c_7318839.num_elements = 4;
c_7318839.elements = (object *)e_7318900;
c_7318839.elements[0] = ((closureN)self_7313482)->elements[2];
c_7318839.elements[1] = ((closureN)self_7313482)->elements[3];
c_7318839.elements[2] = ((closureN)self_7313482)->elements[4];
c_7318839.elements[3] = ((closureN)self_7313482)->elements[5];


complex_num_type local_7318903; 

complex_num_type local_7318907; 

complex_num_type local_7318910; 

complex_num_type local_7318915; 
return_direct_with_clo2(data,(closure)&c_7318839,__lambda_507,  Cyc_fast_sum(data,&local_7318903, ((closureN)self_7313482)->elements[0], Cyc_fast_sub(data,&local_7318907, Cyc_fast_sub(data,&local_7318910, ((closureN)self_7313482)->elements[1], ((closureN)self_7313482)->elements[4]), obj_int2obj(1))), Cyc_fast_sub(data,&local_7318915, limit_73631_733242, obj_int2obj(1)));}
;; 
}

static void __lambda_507(void *data, object self_7313491, int argc, object *args) /* object self_7313491, object i_73647_733249, object j_73648_733250 */
 {
 object i_73647_733249 = args[0]; object j_73648_733250 = args[1];
  
closureN_type c_7318841;
object e_7318899 [6];
c_7318841.hdr.mark = gc_color_red;
 c_7318841.hdr.grayed = 0;
c_7318841.tag = closureN_tag;
 c_7318841.fn = (function_type)__lambda_508;
c_7318841.num_args = 1;
c_7318841.num_elements = 6;
c_7318841.elements = (object *)e_7318899;
c_7318841.elements[0] = ((closureN)self_7313491)->elements[0];
c_7318841.elements[1] = i_73647_733249;
c_7318841.elements[2] = j_73648_733250;
c_7318841.elements[3] = ((closureN)self_7313491)->elements[1];
c_7318841.elements[4] = ((closureN)self_7313491)->elements[2];
c_7318841.elements[5] = ((closureN)self_7313491)->elements[3];

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

static void __lambda_508(void *data, object self_7313492, int argc, object *args) /* object self_7313492, object lp_73643_73649_733251 */
 {
 object lp_73643_73649_733251 = args[0];
  
closureN_type c_7318843;
object e_7318895 [6];
c_7318843.hdr.mark = gc_color_red;
 c_7318843.hdr.grayed = 0;
c_7318843.tag = closureN_tag;
 c_7318843.fn = (function_type)__lambda_1382;
c_7318843.num_args = 1;
c_7318843.num_elements = 6;
c_7318843.elements = (object *)e_7318895;
c_7318843.elements[0] = ((closureN)self_7313492)->elements[0];
c_7318843.elements[1] = ((closureN)self_7313492)->elements[1];
c_7318843.elements[2] = ((closureN)self_7313492)->elements[2];
c_7318843.elements[3] = ((closureN)self_7313492)->elements[3];
c_7318843.elements[4] = ((closureN)self_7313492)->elements[4];
c_7318843.elements[5] = ((closureN)self_7313492)->elements[5];


pair_type local_7318898; 
return_direct_with_clo1(data,(closure)&c_7318843,__lambda_1382,  set_cell_as_expr(&local_7318898, lp_73643_73649_733251));; 
}

static void __lambda_1382(void *data, object self_7313493, int argc, object *args) /* object self_7313493, object lp_73643_73649_733251 */
 {
 object lp_73643_73649_733251 = args[0];
  
closureN_type c_7318845;
object e_7318859 [4];
c_7318845.hdr.mark = gc_color_red;
 c_7318845.hdr.grayed = 0;
c_7318845.tag = closureN_tag;
 c_7318845.fn = (function_type)__lambda_509;
c_7318845.num_args = 1;
c_7318845.num_elements = 4;
c_7318845.elements = (object *)e_7318859;
c_7318845.elements[0] = ((closureN)self_7313493)->elements[1];
c_7318845.elements[1] = ((closureN)self_7313493)->elements[2];
c_7318845.elements[2] = ((closureN)self_7313493)->elements[3];
c_7318845.elements[3] = lp_73643_73649_733251;


closureN_type c_7318860;
object e_7318894 [4];
c_7318860.hdr.mark = gc_color_red;
 c_7318860.hdr.grayed = 0;
c_7318860.tag = closureN_tag;
 c_7318860.fn = (function_type)__lambda_511;
c_7318860.num_args = 2;
c_7318860.num_elements = 4;
c_7318860.elements = (object *)e_7318894;
c_7318860.elements[0] = ((closureN)self_7313493)->elements[0];
c_7318860.elements[1] = lp_73643_73649_733251;
c_7318860.elements[2] = ((closureN)self_7313493)->elements[4];
c_7318860.elements[3] = ((closureN)self_7313493)->elements[5];

return_direct_with_clo1(data,(closure)&c_7318845,__lambda_509,  &c_7318860);; 
}

static void __lambda_511(void *data, object self_7313494, int argc, object *args) /* object self_7313494, object k_735450, object i_73650_733252, object j_73651_733253 */
 {
 object k_735450 = args[0]; object i_73650_733252 = args[1]; object j_73651_733253 = args[2];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, j_73651_733253, ((closureN)self_7313494)->elements[2])) ){ 
  

return_direct_with_clo1(data,  k_735450, (((closure)  k_735450)->fn),  Cyc_num_fast_lt_op(data, j_73651_733253, ((closureN)self_7313494)->elements[2]));
} else { 
  
closureN_type c_7318869;
object e_7318890 [5];
c_7318869.hdr.mark = gc_color_red;
 c_7318869.hdr.grayed = 0;
c_7318869.tag = closureN_tag;
 c_7318869.fn = (function_type)__lambda_512;
c_7318869.num_args = 1;
c_7318869.num_elements = 5;
c_7318869.elements = (object *)e_7318890;
c_7318869.elements[0] = i_73650_733252;
c_7318869.elements[1] = j_73651_733253;
c_7318869.elements[2] = k_735450;
c_7318869.elements[3] = ((closureN)self_7313494)->elements[1];
c_7318869.elements[4] = ((closureN)self_7313494)->elements[3];



return_closcall1(data,(closure)&c_7318869,  Cyc_bytevector_u8_ref(data, ((closureN)self_7313494)->elements[0], j_73651_733253));}
;; 
}

static void __lambda_512(void *data, object self_7313495, int argc, object *args) /* object self_7313495, object r_735455 */
 {
 object r_735455 = args[0];
  
closureN_type c_7318871;
object e_7318885 [4];
c_7318871.hdr.mark = gc_color_red;
 c_7318871.hdr.grayed = 0;
c_7318871.tag = closureN_tag;
 c_7318871.fn = (function_type)__lambda_513;
c_7318871.num_args = 1;
c_7318871.num_elements = 4;
c_7318871.elements = (object *)e_7318885;
c_7318871.elements[0] = ((closureN)self_7313495)->elements[0];
c_7318871.elements[1] = ((closureN)self_7313495)->elements[1];
c_7318871.elements[2] = ((closureN)self_7313495)->elements[2];
c_7318871.elements[3] = ((closureN)self_7313495)->elements[3];



return_closcall1(data,(closure)&c_7318871,  Cyc_bytevector_u8_set(data, ((closureN)self_7313495)->elements[4], ((closureN)self_7313495)->elements[0], r_735455));; 
}

static void __lambda_513(void *data, object self_7313496, int argc, object *args) /* object self_7313496, object r_735452 */
 {

  


complex_num_type local_7318879; 

complex_num_type local_7318883; 
return_closcall3(data,  car(((closureN)self_7313496)->elements[3]),  ((closureN)self_7313496)->elements[2], Cyc_fast_sub(data,&local_7318879, ((closureN)self_7313496)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7318883, ((closureN)self_7313496)->elements[1], obj_int2obj(1)));; 
}

static void __lambda_509(void *data, object self_7313497, int argc, object *args) /* object self_7313497, object r_735449 */
 {
 object r_735449 = args[0];
  
closureN_type c_7318847;
object e_7318855 [4];
c_7318847.hdr.mark = gc_color_red;
 c_7318847.hdr.grayed = 0;
c_7318847.tag = closureN_tag;
 c_7318847.fn = (function_type)__lambda_510;
c_7318847.num_args = 1;
c_7318847.num_elements = 4;
c_7318847.elements = (object *)e_7318855;
c_7318847.elements[0] = ((closureN)self_7313497)->elements[0];
c_7318847.elements[1] = ((closureN)self_7313497)->elements[1];
c_7318847.elements[2] = ((closureN)self_7313497)->elements[2];
c_7318847.elements[3] = ((closureN)self_7313497)->elements[3];



return_direct_with_clo1(data,(closure)&c_7318847,__lambda_510,  Cyc_set_cell(data, ((closureN)self_7313497)->elements[3], r_735449));; 
}

static void __lambda_510(void *data, object self_7313498, int argc, object *args) /* object self_7313498, object r_735448 */
 {

  

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

static void __lambda_500(void *data, object self_7313483, int argc, object *args) /* object self_7313483, object i_73637_733243, object j_73638_733244 */
 {
 object i_73637_733243 = args[0]; object j_73638_733244 = args[1];
  
closureN_type c_7318776;
object e_7318834 [6];
c_7318776.hdr.mark = gc_color_red;
 c_7318776.hdr.grayed = 0;
c_7318776.tag = closureN_tag;
 c_7318776.fn = (function_type)__lambda_501;
c_7318776.num_args = 1;
c_7318776.num_elements = 6;
c_7318776.elements = (object *)e_7318834;
c_7318776.elements[0] = ((closureN)self_7313483)->elements[0];
c_7318776.elements[1] = i_73637_733243;
c_7318776.elements[2] = j_73638_733244;
c_7318776.elements[3] = ((closureN)self_7313483)->elements[1];
c_7318776.elements[4] = ((closureN)self_7313483)->elements[2];
c_7318776.elements[5] = ((closureN)self_7313483)->elements[3];

return_direct_with_clo1(data,(closure)&c_7318776,__lambda_501,  boolean_f);; 
}

static void __lambda_501(void *data, object self_7313484, int argc, object *args) /* object self_7313484, object lp_73633_73639_733245 */
 {
 object lp_73633_73639_733245 = args[0];
  
closureN_type c_7318778;
object e_7318830 [6];
c_7318778.hdr.mark = gc_color_red;
 c_7318778.hdr.grayed = 0;
c_7318778.tag = closureN_tag;
 c_7318778.fn = (function_type)__lambda_1381;
c_7318778.num_args = 1;
c_7318778.num_elements = 6;
c_7318778.elements = (object *)e_7318830;
c_7318778.elements[0] = ((closureN)self_7313484)->elements[0];
c_7318778.elements[1] = ((closureN)self_7313484)->elements[1];
c_7318778.elements[2] = ((closureN)self_7313484)->elements[2];
c_7318778.elements[3] = ((closureN)self_7313484)->elements[3];
c_7318778.elements[4] = ((closureN)self_7313484)->elements[4];
c_7318778.elements[5] = ((closureN)self_7313484)->elements[5];


pair_type local_7318833; 
return_direct_with_clo1(data,(closure)&c_7318778,__lambda_1381,  set_cell_as_expr(&local_7318833, lp_73633_73639_733245));; 
}

static void __lambda_1381(void *data, object self_7313485, int argc, object *args) /* object self_7313485, object lp_73633_73639_733245 */
 {
 object lp_73633_73639_733245 = args[0];
  
closureN_type c_7318780;
object e_7318794 [4];
c_7318780.hdr.mark = gc_color_red;
 c_7318780.hdr.grayed = 0;
c_7318780.tag = closureN_tag;
 c_7318780.fn = (function_type)__lambda_502;
c_7318780.num_args = 1;
c_7318780.num_elements = 4;
c_7318780.elements = (object *)e_7318794;
c_7318780.elements[0] = ((closureN)self_7313485)->elements[1];
c_7318780.elements[1] = ((closureN)self_7313485)->elements[2];
c_7318780.elements[2] = ((closureN)self_7313485)->elements[3];
c_7318780.elements[3] = lp_73633_73639_733245;


closureN_type c_7318795;
object e_7318829 [4];
c_7318795.hdr.mark = gc_color_red;
 c_7318795.hdr.grayed = 0;
c_7318795.tag = closureN_tag;
 c_7318795.fn = (function_type)__lambda_504;
c_7318795.num_args = 2;
c_7318795.num_elements = 4;
c_7318795.elements = (object *)e_7318829;
c_7318795.elements[0] = ((closureN)self_7313485)->elements[0];
c_7318795.elements[1] = ((closureN)self_7313485)->elements[4];
c_7318795.elements[2] = lp_73633_73639_733245;
c_7318795.elements[3] = ((closureN)self_7313485)->elements[5];

return_direct_with_clo1(data,(closure)&c_7318780,__lambda_502,  &c_7318795);; 
}

static void __lambda_504(void *data, object self_7313486, int argc, object *args) /* object self_7313486, object k_735440, object i_73640_733246, object j_73641_733247 */
 {
 object k_735440 = args[0]; object i_73640_733246 = args[1]; object j_73641_733247 = args[2];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, j_73641_733247, ((closureN)self_7313486)->elements[1])) ){ 
  

return_direct_with_clo1(data,  k_735440, (((closure)  k_735440)->fn),  Cyc_num_fast_gte_op(data, j_73641_733247, ((closureN)self_7313486)->elements[1]));
} else { 
  
closureN_type c_7318804;
object e_7318825 [5];
c_7318804.hdr.mark = gc_color_red;
 c_7318804.hdr.grayed = 0;
c_7318804.tag = closureN_tag;
 c_7318804.fn = (function_type)__lambda_505;
c_7318804.num_args = 1;
c_7318804.num_elements = 5;
c_7318804.elements = (object *)e_7318825;
c_7318804.elements[0] = i_73640_733246;
c_7318804.elements[1] = j_73641_733247;
c_7318804.elements[2] = k_735440;
c_7318804.elements[3] = ((closureN)self_7313486)->elements[2];
c_7318804.elements[4] = ((closureN)self_7313486)->elements[3];



return_closcall1(data,(closure)&c_7318804,  Cyc_bytevector_u8_ref(data, ((closureN)self_7313486)->elements[0], j_73641_733247));}
;; 
}

static void __lambda_505(void *data, object self_7313487, int argc, object *args) /* object self_7313487, object r_735445 */
 {
 object r_735445 = args[0];
  
closureN_type c_7318806;
object e_7318820 [4];
c_7318806.hdr.mark = gc_color_red;
 c_7318806.hdr.grayed = 0;
c_7318806.tag = closureN_tag;
 c_7318806.fn = (function_type)__lambda_506;
c_7318806.num_args = 1;
c_7318806.num_elements = 4;
c_7318806.elements = (object *)e_7318820;
c_7318806.elements[0] = ((closureN)self_7313487)->elements[0];
c_7318806.elements[1] = ((closureN)self_7313487)->elements[1];
c_7318806.elements[2] = ((closureN)self_7313487)->elements[2];
c_7318806.elements[3] = ((closureN)self_7313487)->elements[3];



return_closcall1(data,(closure)&c_7318806,  Cyc_bytevector_u8_set(data, ((closureN)self_7313487)->elements[4], ((closureN)self_7313487)->elements[0], r_735445));; 
}

static void __lambda_506(void *data, object self_7313488, int argc, object *args) /* object self_7313488, object r_735442 */
 {

  


complex_num_type local_7318814; 

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

static void __lambda_502(void *data, object self_7313489, int argc, object *args) /* object self_7313489, object r_735439 */
 {
 object r_735439 = args[0];
  
closureN_type c_7318782;
object e_7318790 [4];
c_7318782.hdr.mark = gc_color_red;
 c_7318782.hdr.grayed = 0;
c_7318782.tag = closureN_tag;
 c_7318782.fn = (function_type)__lambda_503;
c_7318782.num_args = 1;
c_7318782.num_elements = 4;
c_7318782.elements = (object *)e_7318790;
c_7318782.elements[0] = ((closureN)self_7313489)->elements[0];
c_7318782.elements[1] = ((closureN)self_7313489)->elements[1];
c_7318782.elements[2] = ((closureN)self_7313489)->elements[2];
c_7318782.elements[3] = ((closureN)self_7313489)->elements[3];



return_direct_with_clo1(data,(closure)&c_7318782,__lambda_503,  Cyc_set_cell(data, ((closureN)self_7313489)->elements[3], r_735439));; 
}

static void __lambda_503(void *data, object self_7313490, int argc, object *args) /* object self_7313490, object r_735438 */
 {

  

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

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


closureN_type c_7318751;
object e_7318762 [3];
c_7318751.hdr.mark = gc_color_red;
 c_7318751.hdr.grayed = 0;
c_7318751.tag = closureN_tag;
 c_7318751.fn = (function_type)__lambda_496;
c_7318751.num_args = 1;
c_7318751.num_elements = 3;
c_7318751.elements = (object *)e_7318762;
c_7318751.elements[0] = ((closureN)self_7313499)->elements[0];
c_7318751.elements[1] = k_735461;
c_7318751.elements[2] = ((closureN)self_7313499)->elements[1];

return_direct_with_clo1(data,(closure)&c_7318739,__lambda_495,  &c_7318751);; 
}

static void __lambda_496(void *data, object self_7313500, int argc, object *args) /* object self_7313500, object r_735462 */
 {
 object r_735462 = args[0];
  if( (boolean_f != r_735462) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_7313500)->elements[1], (((closure)  ((closureN)self_7313500)->elements[1])->fn),  Cyc_cadr(data, ((closureN)self_7313500)->elements[2]));
} else { 
  

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

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



return_direct_with_clo1(data,  k_735463,__lambda_496,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313501)->elements[0])));
} else { 
  return_direct_with_clo1(data,  k_735463,__lambda_496,  boolean_f);}
;; 
}

static void __lambda_486(void *data, object _, int argc, object *args) /* closure _,object k_735418, object bv_73614_733231, object opts_73615_733232_raw, ... */
 {
object k_735418 = args[0]; object bv_73614_733231 = args[1];
load_varargs(opts_73615_733232, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:bytevector-copy");

closureN_type c_7318644;
object e_7318727 [3];
c_7318644.hdr.mark = gc_color_red;
 c_7318644.hdr.grayed = 0;
c_7318644.tag = closureN_tag;
 c_7318644.fn = (function_type)__lambda_487;
c_7318644.num_args = 3;
c_7318644.num_elements = 3;
c_7318644.elements = (object *)e_7318727;
c_7318644.elements[0] = bv_73614_733231;
c_7318644.elements[1] = k_735418;
c_7318644.elements[2] = opts_73615_733232;

return_direct_with_clo3(data,(closure)&c_7318644,__lambda_487,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_487(void *data, object self_7313471, int argc, object *args) /* object self_7313471, object len_73616_733233, object start_73617_733234, object end_73618_733235 */
 {
 object len_73616_733233 = args[0]; object start_73617_733234 = args[1]; object end_73618_733235 = args[2];
  
closureN_type c_7318646;
object e_7318723 [5];
c_7318646.hdr.mark = gc_color_red;
 c_7318646.hdr.grayed = 0;
c_7318646.tag = closureN_tag;
 c_7318646.fn = (function_type)__lambda_1380;
c_7318646.num_args = 1;
c_7318646.num_elements = 5;
c_7318646.elements = (object *)e_7318723;
c_7318646.elements[0] = ((closureN)self_7313471)->elements[0];
c_7318646.elements[1] = end_73618_733235;
c_7318646.elements[2] = ((closureN)self_7313471)->elements[1];
c_7318646.elements[3] = ((closureN)self_7313471)->elements[2];
c_7318646.elements[4] = start_73617_733234;


pair_type local_7318726; 
return_direct_with_clo1(data,(closure)&c_7318646,__lambda_1380,  set_cell_as_expr(&local_7318726, len_73616_733233));; 
}

static void __lambda_1380(void *data, object self_7313472, int argc, object *args) /* object self_7313472, object len_73616_733233 */
 {
 object len_73616_733233 = args[0];
  
closureN_type c_7318648;
object e_7318718 [5];
c_7318648.hdr.mark = gc_color_red;
 c_7318648.hdr.grayed = 0;
c_7318648.tag = closureN_tag;
 c_7318648.fn = (function_type)__lambda_1379;
c_7318648.num_args = 1;
c_7318648.num_elements = 5;
c_7318648.elements = (object *)e_7318718;
c_7318648.elements[0] = ((closureN)self_7313472)->elements[0];
c_7318648.elements[1] = ((closureN)self_7313472)->elements[1];
c_7318648.elements[2] = ((closureN)self_7313472)->elements[2];
c_7318648.elements[3] = len_73616_733233;
c_7318648.elements[4] = ((closureN)self_7313472)->elements[3];


pair_type local_7318721; 
return_direct_with_clo1(data,(closure)&c_7318648,__lambda_1379,  set_cell_as_expr(&local_7318721, ((closureN)self_7313472)->elements[4]));; 
}

static void __lambda_1379(void *data, object self_7313473, int argc, object *args) /* object self_7313473, object start_73617_733234 */
 {
 object start_73617_733234 = args[0];
  
closureN_type c_7318650;
object e_7318713 [5];
c_7318650.hdr.mark = gc_color_red;
 c_7318650.hdr.grayed = 0;
c_7318650.tag = closureN_tag;
 c_7318650.fn = (function_type)__lambda_1378;
c_7318650.num_args = 1;
c_7318650.num_elements = 5;
c_7318650.elements = (object *)e_7318713;
c_7318650.elements[0] = ((closureN)self_7313473)->elements[0];
c_7318650.elements[1] = ((closureN)self_7313473)->elements[2];
c_7318650.elements[2] = ((closureN)self_7313473)->elements[3];
c_7318650.elements[3] = ((closureN)self_7313473)->elements[4];
c_7318650.elements[4] = start_73617_733234;


pair_type local_7318716; 
return_direct_with_clo1(data,(closure)&c_7318650,__lambda_1378,  set_cell_as_expr(&local_7318716, ((closureN)self_7313473)->elements[1]));; 
}

static void __lambda_1378(void *data, object self_7313474, int argc, object *args) /* object self_7313474, object end_73618_733235 */
 {
 object end_73618_733235 = args[0];
  
closureN_type c_7318652;
object e_7318706 [6];
c_7318652.hdr.mark = gc_color_red;
 c_7318652.hdr.grayed = 0;
c_7318652.tag = closureN_tag;
 c_7318652.fn = (function_type)__lambda_488;
c_7318652.num_args = 1;
c_7318652.num_elements = 6;
c_7318652.elements = (object *)e_7318706;
c_7318652.elements[0] = ((closureN)self_7313474)->elements[0];
c_7318652.elements[1] = end_73618_733235;
c_7318652.elements[2] = ((closureN)self_7313474)->elements[1];
c_7318652.elements[3] = ((closureN)self_7313474)->elements[2];
c_7318652.elements[4] = ((closureN)self_7313474)->elements[3];
c_7318652.elements[5] = ((closureN)self_7313474)->elements[4];





return_direct_with_clo1(data,(closure)&c_7318652,__lambda_488,  Cyc_set_cell(data, ((closureN)self_7313474)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7313474)->elements[0])));; 
}

static void __lambda_488(void *data, object self_7313475, int argc, object *args) /* object self_7313475, object r_735419 */
 {

  object r_735426;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313475)->elements[4]), obj_int2obj(0))) ){ 
  
  r_735426 = Cyc_car(data, ((closureN)self_7313475)->elements[4]);
} else { 
  r_735426 = obj_int2obj(0);}
;
closureN_type c_7318665;
object e_7318702 [6];
c_7318665.hdr.mark = gc_color_red;
 c_7318665.hdr.grayed = 0;
c_7318665.tag = closureN_tag;
 c_7318665.fn = (function_type)__lambda_489;
c_7318665.num_args = 1;
c_7318665.num_elements = 6;
c_7318665.elements = (object *)e_7318702;
c_7318665.elements[0] = ((closureN)self_7313475)->elements[0];
c_7318665.elements[1] = ((closureN)self_7313475)->elements[1];
c_7318665.elements[2] = ((closureN)self_7313475)->elements[2];
c_7318665.elements[3] = ((closureN)self_7313475)->elements[3];
c_7318665.elements[4] = ((closureN)self_7313475)->elements[4];
c_7318665.elements[5] = ((closureN)self_7313475)->elements[5];



return_direct_with_clo1(data,(closure)&c_7318665,__lambda_489,  Cyc_set_cell(data, ((closureN)self_7313475)->elements[5], r_735426));; 
}

static void __lambda_489(void *data, object self_7313476, int argc, object *args) /* object self_7313476, object r_735420 */
 {

  
closureN_type c_7318667;
object e_7318681 [2];
c_7318667.hdr.mark = gc_color_red;
 c_7318667.hdr.grayed = 0;
c_7318667.tag = closureN_tag;
 c_7318667.fn = (function_type)__lambda_490;
c_7318667.num_args = 0;
c_7318667.num_elements = 2;
c_7318667.elements = (object *)e_7318681;
c_7318667.elements[0] = ((closureN)self_7313476)->elements[3];
c_7318667.elements[1] = ((closureN)self_7313476)->elements[4];


closureN_type c_7318682;
object e_7318701 [4];
c_7318682.hdr.mark = gc_color_red;
 c_7318682.hdr.grayed = 0;
c_7318682.tag = closureN_tag;
 c_7318682.fn = (function_type)__lambda_491;
c_7318682.num_args = 1;
c_7318682.num_elements = 4;
c_7318682.elements = (object *)e_7318701;
c_7318682.elements[0] = ((closureN)self_7313476)->elements[0];
c_7318682.elements[1] = ((closureN)self_7313476)->elements[1];
c_7318682.elements[2] = ((closureN)self_7313476)->elements[2];
c_7318682.elements[3] = ((closureN)self_7313476)->elements[5];

return_direct_with_clo1(data,(closure)&c_7318667,__lambda_490,  &c_7318682);; 
}

static void __lambda_491(void *data, object self_7313477, int argc, object *args) /* object self_7313477, object r_735422 */
 {
 object r_735422 = args[0];
  
closureN_type c_7318684;
object e_7318697 [4];
c_7318684.hdr.mark = gc_color_red;
 c_7318684.hdr.grayed = 0;
c_7318684.tag = closureN_tag;
 c_7318684.fn = (function_type)__lambda_492;
c_7318684.num_args = 1;
c_7318684.num_elements = 4;
c_7318684.elements = (object *)e_7318697;
c_7318684.elements[0] = ((closureN)self_7313477)->elements[0];
c_7318684.elements[1] = ((closureN)self_7313477)->elements[1];
c_7318684.elements[2] = ((closureN)self_7313477)->elements[2];
c_7318684.elements[3] = ((closureN)self_7313477)->elements[3];



return_direct_with_clo1(data,(closure)&c_7318684,__lambda_492,  Cyc_set_cell(data, ((closureN)self_7313477)->elements[1], r_735422));; 
}

static void __lambda_492(void *data, object self_7313478, int argc, object *args) /* object self_7313478, object r_735421 */
 {

  




object c_7318689 = Cyc_bytevector_copy(data,  ((closureN)self_7313478)->elements[2],((closureN)self_7313478)->elements[0], car(((closureN)self_7313478)->elements[3]), car(((closureN)self_7313478)->elements[1]));
return_direct_with_clo1(data,  ((closureN)self_7313478)->elements[2], (((closure)  ((closureN)self_7313478)->elements[2])->fn),  c_7318689);; 
}

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

return_direct_with_clo1(data,  k_735423,__lambda_491,  Cyc_cadr(data, ((closureN)self_7313479)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735423,__lambda_491,  car(((closureN)self_7313479)->elements[0]));}
;; 
}

static void __lambda_476(void *data, object _, int argc, object *args) /* closure _,object k_735395, object vec_73606_733223, object opts_73607_733224_raw, ... */
 {
object k_735395 = args[0]; object vec_73606_733223 = args[1];
load_varargs(opts_73607_733224, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:vector->list");

closureN_type c_7318525;
object e_7318641 [3];
c_7318525.hdr.mark = gc_color_red;
 c_7318525.hdr.grayed = 0;
c_7318525.tag = closureN_tag;
 c_7318525.fn = (function_type)__lambda_477;
c_7318525.num_args = 4;
c_7318525.num_elements = 3;
c_7318525.elements = (object *)e_7318641;
c_7318525.elements[0] = k_735395;
c_7318525.elements[1] = opts_73607_733224;
c_7318525.elements[2] = vec_73606_733223;

return_direct_with_clo4(data,(closure)&c_7318525,__lambda_477,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_477(void *data, object self_7313458, int argc, object *args) /* object self_7313458, object len_73608_733225, object start_73609_733226, object end_73610_733227, object loop_73611_733228 */
 {
 object len_73608_733225 = args[0]; object start_73609_733226 = args[1]; object end_73610_733227 = args[2]; object loop_73611_733228 = args[3];
  
closureN_type c_7318527;
object e_7318637 [6];
c_7318527.hdr.mark = gc_color_red;
 c_7318527.hdr.grayed = 0;
c_7318527.tag = closureN_tag;
 c_7318527.fn = (function_type)__lambda_1377;
c_7318527.num_args = 1;
c_7318527.num_elements = 6;
c_7318527.elements = (object *)e_7318637;
c_7318527.elements[0] = end_73610_733227;
c_7318527.elements[1] = ((closureN)self_7313458)->elements[0];
c_7318527.elements[2] = loop_73611_733228;
c_7318527.elements[3] = ((closureN)self_7313458)->elements[1];
c_7318527.elements[4] = start_73609_733226;
c_7318527.elements[5] = ((closureN)self_7313458)->elements[2];


pair_type local_7318640; 
return_direct_with_clo1(data,(closure)&c_7318527,__lambda_1377,  set_cell_as_expr(&local_7318640, len_73608_733225));; 
}

static void __lambda_1377(void *data, object self_7313459, int argc, object *args) /* object self_7313459, object len_73608_733225 */
 {
 object len_73608_733225 = args[0];
  
closureN_type c_7318529;
object e_7318632 [6];
c_7318529.hdr.mark = gc_color_red;
 c_7318529.hdr.grayed = 0;
c_7318529.tag = closureN_tag;
 c_7318529.fn = (function_type)__lambda_1376;
c_7318529.num_args = 1;
c_7318529.num_elements = 6;
c_7318529.elements = (object *)e_7318632;
c_7318529.elements[0] = ((closureN)self_7313459)->elements[0];
c_7318529.elements[1] = ((closureN)self_7313459)->elements[1];
c_7318529.elements[2] = len_73608_733225;
c_7318529.elements[3] = ((closureN)self_7313459)->elements[2];
c_7318529.elements[4] = ((closureN)self_7313459)->elements[3];
c_7318529.elements[5] = ((closureN)self_7313459)->elements[5];


pair_type local_7318635; 
return_direct_with_clo1(data,(closure)&c_7318529,__lambda_1376,  set_cell_as_expr(&local_7318635, ((closureN)self_7313459)->elements[4]));; 
}

static void __lambda_1376(void *data, object self_7313460, int argc, object *args) /* object self_7313460, object start_73609_733226 */
 {
 object start_73609_733226 = args[0];
  
closureN_type c_7318531;
object e_7318627 [6];
c_7318531.hdr.mark = gc_color_red;
 c_7318531.hdr.grayed = 0;
c_7318531.tag = closureN_tag;
 c_7318531.fn = (function_type)__lambda_1375;
c_7318531.num_args = 1;
c_7318531.num_elements = 6;
c_7318531.elements = (object *)e_7318627;
c_7318531.elements[0] = ((closureN)self_7313460)->elements[1];
c_7318531.elements[1] = ((closureN)self_7313460)->elements[2];
c_7318531.elements[2] = ((closureN)self_7313460)->elements[3];
c_7318531.elements[3] = ((closureN)self_7313460)->elements[4];
c_7318531.elements[4] = start_73609_733226;
c_7318531.elements[5] = ((closureN)self_7313460)->elements[5];


pair_type local_7318630; 
return_direct_with_clo1(data,(closure)&c_7318531,__lambda_1375,  set_cell_as_expr(&local_7318630, ((closureN)self_7313460)->elements[0]));; 
}

static void __lambda_1375(void *data, object self_7313461, int argc, object *args) /* object self_7313461, object end_73610_733227 */
 {
 object end_73610_733227 = args[0];
  
closureN_type c_7318533;
object e_7318622 [6];
c_7318533.hdr.mark = gc_color_red;
 c_7318533.hdr.grayed = 0;
c_7318533.tag = closureN_tag;
 c_7318533.fn = (function_type)__lambda_1374;
c_7318533.num_args = 1;
c_7318533.num_elements = 6;
c_7318533.elements = (object *)e_7318622;
c_7318533.elements[0] = end_73610_733227;
c_7318533.elements[1] = ((closureN)self_7313461)->elements[0];
c_7318533.elements[2] = ((closureN)self_7313461)->elements[1];
c_7318533.elements[3] = ((closureN)self_7313461)->elements[3];
c_7318533.elements[4] = ((closureN)self_7313461)->elements[4];
c_7318533.elements[5] = ((closureN)self_7313461)->elements[5];


pair_type local_7318625; 
return_direct_with_clo1(data,(closure)&c_7318533,__lambda_1374,  set_cell_as_expr(&local_7318625, ((closureN)self_7313461)->elements[2]));; 
}

static void __lambda_1374(void *data, object self_7313462, int argc, object *args) /* object self_7313462, object loop_73611_733228 */
 {
 object loop_73611_733228 = args[0];
  
closureN_type c_7318535;
object e_7318615 [7];
c_7318535.hdr.mark = gc_color_red;
 c_7318535.hdr.grayed = 0;
c_7318535.tag = closureN_tag;
 c_7318535.fn = (function_type)__lambda_478;
c_7318535.num_args = 1;
c_7318535.num_elements = 7;
c_7318535.elements = (object *)e_7318615;
c_7318535.elements[0] = ((closureN)self_7313462)->elements[0];
c_7318535.elements[1] = ((closureN)self_7313462)->elements[1];
c_7318535.elements[2] = ((closureN)self_7313462)->elements[2];
c_7318535.elements[3] = loop_73611_733228;
c_7318535.elements[4] = ((closureN)self_7313462)->elements[3];
c_7318535.elements[5] = ((closureN)self_7313462)->elements[4];
c_7318535.elements[6] = ((closureN)self_7313462)->elements[5];





return_direct_with_clo1(data,(closure)&c_7318535,__lambda_478,  Cyc_set_cell(data, ((closureN)self_7313462)->elements[2], Cyc_vector_length(data, ((closureN)self_7313462)->elements[5])));; 
}

static void __lambda_478(void *data, object self_7313463, int argc, object *args) /* object self_7313463, object r_735396 */
 {

  object r_735411;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313463)->elements[4]), obj_int2obj(0))) ){ 
  
  r_735411 = Cyc_car(data, ((closureN)self_7313463)->elements[4]);
} else { 
  r_735411 = obj_int2obj(0);}
;
closureN_type c_7318548;
object e_7318611 [7];
c_7318548.hdr.mark = gc_color_red;
 c_7318548.hdr.grayed = 0;
c_7318548.tag = closureN_tag;
 c_7318548.fn = (function_type)__lambda_479;
c_7318548.num_args = 1;
c_7318548.num_elements = 7;
c_7318548.elements = (object *)e_7318611;
c_7318548.elements[0] = ((closureN)self_7313463)->elements[0];
c_7318548.elements[1] = ((closureN)self_7313463)->elements[1];
c_7318548.elements[2] = ((closureN)self_7313463)->elements[2];
c_7318548.elements[3] = ((closureN)self_7313463)->elements[3];
c_7318548.elements[4] = ((closureN)self_7313463)->elements[4];
c_7318548.elements[5] = ((closureN)self_7313463)->elements[5];
c_7318548.elements[6] = ((closureN)self_7313463)->elements[6];



return_direct_with_clo1(data,(closure)&c_7318548,__lambda_479,  Cyc_set_cell(data, ((closureN)self_7313463)->elements[5], r_735411));; 
}

static void __lambda_479(void *data, object self_7313464, int argc, object *args) /* object self_7313464, object r_735397 */
 {

  
closureN_type c_7318550;
object e_7318564 [2];
c_7318550.hdr.mark = gc_color_red;
 c_7318550.hdr.grayed = 0;
c_7318550.tag = closureN_tag;
 c_7318550.fn = (function_type)__lambda_480;
c_7318550.num_args = 0;
c_7318550.num_elements = 2;
c_7318550.elements = (object *)e_7318564;
c_7318550.elements[0] = ((closureN)self_7313464)->elements[2];
c_7318550.elements[1] = ((closureN)self_7313464)->elements[4];


closureN_type c_7318565;
object e_7318610 [5];
c_7318565.hdr.mark = gc_color_red;
 c_7318565.hdr.grayed = 0;
c_7318565.tag = closureN_tag;
 c_7318565.fn = (function_type)__lambda_481;
c_7318565.num_args = 1;
c_7318565.num_elements = 5;
c_7318565.elements = (object *)e_7318610;
c_7318565.elements[0] = ((closureN)self_7313464)->elements[0];
c_7318565.elements[1] = ((closureN)self_7313464)->elements[1];
c_7318565.elements[2] = ((closureN)self_7313464)->elements[3];
c_7318565.elements[3] = ((closureN)self_7313464)->elements[5];
c_7318565.elements[4] = ((closureN)self_7313464)->elements[6];

return_direct_with_clo1(data,(closure)&c_7318550,__lambda_480,  &c_7318565);; 
}

static void __lambda_481(void *data, object self_7313465, int argc, object *args) /* object self_7313465, object r_735407 */
 {
 object r_735407 = args[0];
  
closureN_type c_7318567;
object e_7318606 [5];
c_7318567.hdr.mark = gc_color_red;
 c_7318567.hdr.grayed = 0;
c_7318567.tag = closureN_tag;
 c_7318567.fn = (function_type)__lambda_482;
c_7318567.num_args = 1;
c_7318567.num_elements = 5;
c_7318567.elements = (object *)e_7318606;
c_7318567.elements[0] = ((closureN)self_7313465)->elements[0];
c_7318567.elements[1] = ((closureN)self_7313465)->elements[1];
c_7318567.elements[2] = ((closureN)self_7313465)->elements[2];
c_7318567.elements[3] = ((closureN)self_7313465)->elements[3];
c_7318567.elements[4] = ((closureN)self_7313465)->elements[4];



return_direct_with_clo1(data,(closure)&c_7318567,__lambda_482,  Cyc_set_cell(data, ((closureN)self_7313465)->elements[0], r_735407));; 
}

static void __lambda_482(void *data, object self_7313466, int argc, object *args) /* object self_7313466, object r_735398 */
 {

  
closureN_type c_7318569;
object e_7318584 [3];
c_7318569.hdr.mark = gc_color_red;
 c_7318569.hdr.grayed = 0;
c_7318569.tag = closureN_tag;
 c_7318569.fn = (function_type)__lambda_483;
c_7318569.num_args = 1;
c_7318569.num_elements = 3;
c_7318569.elements = (object *)e_7318584;
c_7318569.elements[0] = ((closureN)self_7313466)->elements[1];
c_7318569.elements[1] = ((closureN)self_7313466)->elements[2];
c_7318569.elements[2] = ((closureN)self_7313466)->elements[3];


closureN_type c_7318585;
object e_7318605 [3];
c_7318585.hdr.mark = gc_color_red;
 c_7318585.hdr.grayed = 0;
c_7318585.tag = closureN_tag;
 c_7318585.fn = (function_type)__lambda_485;
c_7318585.num_args = 2;
c_7318585.num_elements = 3;
c_7318585.elements = (object *)e_7318605;
c_7318585.elements[0] = ((closureN)self_7313466)->elements[0];
c_7318585.elements[1] = ((closureN)self_7313466)->elements[2];
c_7318585.elements[2] = ((closureN)self_7313466)->elements[4];

return_direct_with_clo1(data,(closure)&c_7318569,__lambda_483,  &c_7318585);; 
}

static void __lambda_485(void *data, object self_7313467, int argc, object *args) /* object self_7313467, object k_735402, object i_73612_733229, object lst_73613_733230 */
 {
 object k_735402 = args[0]; object i_73612_733229 = args[1]; object lst_73613_733230 = args[2];
    
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73612_733229, car(((closureN)self_7313467)->elements[0]))) ){ 
  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735402, primitive_cons, NULL, lst_73613_733230);
} else { 
  


complex_num_type local_7318598; 

pair_type local_7318601; 


return_closcall3(data,  car(((closureN)self_7313467)->elements[1]),  k_735402, Cyc_fast_sum(data,&local_7318598, i_73612_733229, obj_int2obj(1)), set_pair_as_expr(&local_7318601, Cyc_vector_ref(data, ((closureN)self_7313467)->elements[2], i_73612_733229), lst_73613_733230));}
;; 
}

static void __lambda_483(void *data, object self_7313468, int argc, object *args) /* object self_7313468, object r_735401 */
 {
 object r_735401 = args[0];
  
closureN_type c_7318571;
object e_7318580 [3];
c_7318571.hdr.mark = gc_color_red;
 c_7318571.hdr.grayed = 0;
c_7318571.tag = closureN_tag;
 c_7318571.fn = (function_type)__lambda_484;
c_7318571.num_args = 1;
c_7318571.num_elements = 3;
c_7318571.elements = (object *)e_7318580;
c_7318571.elements[0] = ((closureN)self_7313468)->elements[0];
c_7318571.elements[1] = ((closureN)self_7313468)->elements[1];
c_7318571.elements[2] = ((closureN)self_7313468)->elements[2];



return_direct_with_clo1(data,(closure)&c_7318571,__lambda_484,  Cyc_set_cell(data, ((closureN)self_7313468)->elements[1], r_735401));; 
}

static void __lambda_484(void *data, object self_7313469, int argc, object *args) /* object self_7313469, object r_735399 */
 {

  



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

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

return_direct_with_clo1(data,  k_735408,__lambda_481,  Cyc_cadr(data, ((closureN)self_7313470)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735408,__lambda_481,  car(((closureN)self_7313470)->elements[0]));}
;; 
}

static void __lambda_475(void *data, object _, int argc, object *args) /* closure _,object k_735392, object objs_73605_733222_raw, ... */
 {
object k_735392 = args[0];
load_varargs(objs_73605_733222, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:vector");

object c_7318522 = Cyc_list2vector(data,  k_735392,objs_73605_733222);
return_direct_with_clo1(data,  k_735392, (((closure)  k_735392)->fn),  c_7318522);; 
}

static void __lambda_474(void *data, object _, int argc, object *args) /* closure _,object k_735388, object lst_73604_733221 */
 {
object k_735388 = args[0]; object lst_73604_733221 = args[1];
  Cyc_st_add(data, "scheme/base.sld:reverse");
return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735388, primitive_cons, NULL, lst_73604_733221);; 
}

static void __lambda_472(void *data, object _, int argc, object *args) /* closure _,object k_735384, object lst_73600_733217, object k_73601_733218, object obj_73602_733219 */
 {
object k_735384 = args[0]; object lst_73600_733217 = args[1]; object k_73601_733218 = args[2]; object obj_73602_733219 = args[3];
  Cyc_st_add(data, "scheme/base.sld:list-set!");

closureN_type c_7318508;
object e_7318515 [2];
c_7318508.hdr.mark = gc_color_red;
 c_7318508.hdr.grayed = 0;
c_7318508.tag = closureN_tag;
 c_7318508.fn = (function_type)__lambda_473;
c_7318508.num_args = 1;
c_7318508.num_elements = 2;
c_7318508.elements = (object *)e_7318515;
c_7318508.elements[0] = k_735384;
c_7318508.elements[1] = obj_73602_733219;

return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7318508, lst_73600_733217, k_73601_733218);; 
}

static void __lambda_473(void *data, object self_7313457, int argc, object *args) /* object self_7313457, object kth_73603_733220 */
 {
 object kth_73603_733220 = args[0];
  
object c_7318513 = Cyc_set_car_cps(data,  ((closureN)self_7313457)->elements[0],kth_73603_733220, ((closureN)self_7313457)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_7313457)->elements[0], (((closure)  ((closureN)self_7313457)->elements[0])->fn),  c_7318513);; 
}

static void __lambda_470(void *data, object _, int argc, object *args) /* closure _,object k_735380, object lst_73598_733215, object k_73599_733216 */
 {
object k_735380 = args[0]; object lst_73598_733215 = args[1]; object k_73599_733216 = args[2];
  Cyc_st_add(data, "scheme/base.sld:list-ref");

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

return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7318500, lst_73598_733215, k_73599_733216);; 
}

static void __lambda_471(void *data, object self_7313456, int argc, object *args) /* object self_7313456, object r_735381 */
 {
 object r_735381 = args[0];
  

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

static void __lambda_469(void *data, object _, int argc, object *args) /* closure _,object k_735374, object lst_73596_733213, object k_73597_733214 */
 {
object k_735374 = args[0]; object lst_73596_733213 = args[1]; object k_73597_733214 = args[2];
  Cyc_st_add(data, "scheme/base.sld:list-tail");
  
if( (boolean_f != Cyc_num_fast_eq_op(data, k_73597_733214, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  k_735374, (((closure)  k_735374)->fn),  lst_73596_733213);
} else { 
  


complex_num_type local_7318497; 
return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  k_735374, Cyc_cdr(data, lst_73596_733213), Cyc_fast_sub(data,&local_7318497, k_73597_733214, obj_int2obj(1)));}
;; 
}

static void __lambda_457(void *data, object _, int argc, object *args) /* closure _,object k_735353, object f_73587_733205, object lis1_73588_733206, object lists_73589_733207_raw, ... */
 {
object k_735353 = args[0]; object f_73587_733205 = args[1]; object lis1_73588_733206 = args[2];
load_varargs(lists_73589_733207, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:for-each");
  
if( (boolean_f != Cyc_is_null(lis1_73588_733206)) ){ 
  return_direct_with_clo1(data,  k_735353, (((closure)  k_735353)->fn),  Cyc_VOID);
} else { 
    
if( (boolean_f != Cyc_is_pair(lists_73589_733207)) ){ 
  
closureN_type c_7318408;
object e_7318466 [2];
c_7318408.hdr.mark = gc_color_red;
 c_7318408.hdr.grayed = 0;
c_7318408.tag = closureN_tag;
 c_7318408.fn = (function_type)__lambda_458;
c_7318408.num_args = 1;
c_7318408.num_elements = 2;
c_7318408.elements = (object *)e_7318466;
c_7318408.elements[0] = f_73587_733205;
c_7318408.elements[1] = k_735353;


pair_type local_7318469; 
return_direct_with_clo1(data,(closure)&c_7318408,__lambda_458,  set_pair_as_expr(&local_7318469, lis1_73588_733206, lists_73589_733207));
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, lis1_73588_733206))) ){ 
  

return_closcall2(data,  f_73587_733205,  k_735353, Cyc_car(data, lis1_73588_733206));
} else { 
  
closureN_type c_7318478;
object e_7318485 [3];
c_7318478.hdr.mark = gc_color_red;
 c_7318478.hdr.grayed = 0;
c_7318478.tag = closureN_tag;
 c_7318478.fn = (function_type)__lambda_468;
c_7318478.num_args = 1;
c_7318478.num_elements = 3;
c_7318478.elements = (object *)e_7318485;
c_7318478.elements[0] = f_73587_733205;
c_7318478.elements[1] = k_735353;
c_7318478.elements[2] = lis1_73588_733206;



return_closcall2(data,  f_73587_733205,  &c_7318478, Cyc_car(data, lis1_73588_733206));}
;}
;}
;; 
}

static void __lambda_468(void *data, object self_7313455, int argc, object *args) /* object self_7313455, object r_735368 */
 {

  

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  ((closureN)self_7313455)->elements[1], ((closureN)self_7313455)->elements[0], Cyc_cdr(data, ((closureN)self_7313455)->elements[2]));; 
}

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

return_direct_with_clo1(data,(closure)&c_7318410,__lambda_459,  boolean_f);; 
}

static void __lambda_459(void *data, object self_7313445, int argc, object *args) /* object self_7313445, object recur_73592_733209 */
 {
 object recur_73592_733209 = args[0];
  
closureN_type c_7318412;
object e_7318461 [3];
c_7318412.hdr.mark = gc_color_red;
 c_7318412.hdr.grayed = 0;
c_7318412.tag = closureN_tag;
 c_7318412.fn = (function_type)__lambda_1373;
c_7318412.num_args = 1;
c_7318412.num_elements = 3;
c_7318412.elements = (object *)e_7318461;
c_7318412.elements[0] = ((closureN)self_7313445)->elements[0];
c_7318412.elements[1] = ((closureN)self_7313445)->elements[1];
c_7318412.elements[2] = ((closureN)self_7313445)->elements[2];


pair_type local_7318464; 
return_direct_with_clo1(data,(closure)&c_7318412,__lambda_1373,  set_cell_as_expr(&local_7318464, recur_73592_733209));; 
}

static void __lambda_1373(void *data, object self_7313446, int argc, object *args) /* object self_7313446, object recur_73592_733209 */
 {
 object recur_73592_733209 = args[0];
  
closureN_type c_7318414;
object e_7318427 [3];
c_7318414.hdr.mark = gc_color_red;
 c_7318414.hdr.grayed = 0;
c_7318414.tag = closureN_tag;
 c_7318414.fn = (function_type)__lambda_460;
c_7318414.num_args = 1;
c_7318414.num_elements = 3;
c_7318414.elements = (object *)e_7318427;
c_7318414.elements[0] = ((closureN)self_7313446)->elements[1];
c_7318414.elements[1] = ((closureN)self_7313446)->elements[2];
c_7318414.elements[2] = recur_73592_733209;


closureN_type c_7318428;
object e_7318460 [2];
c_7318428.hdr.mark = gc_color_red;
 c_7318428.hdr.grayed = 0;
c_7318428.tag = closureN_tag;
 c_7318428.fn = (function_type)__lambda_462;
c_7318428.num_args = 1;
c_7318428.num_elements = 2;
c_7318428.elements = (object *)e_7318460;
c_7318428.elements[0] = ((closureN)self_7313446)->elements[0];
c_7318428.elements[1] = recur_73592_733209;

return_direct_with_clo1(data,(closure)&c_7318414,__lambda_460,  &c_7318428);; 
}

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


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

return_direct_with_clo1(data,(closure)&c_7318430,__lambda_463,  &c_7318456);; 
}

static void __lambda_467(void *data, object self_7313448, int argc, object *args) /* object self_7313448, object k_735365 */
 {
 object k_735365 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_scheme_base, (((closure)  __glo__75cars_87cdrs_scheme_base)->fn),  k_735365, ((closureN)self_7313448)->elements[0]);; 
}

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


closureN_type c_7318437;
object e_7318454 [2];
c_7318437.hdr.mark = gc_color_red;
 c_7318437.hdr.grayed = 0;
c_7318437.tag = closureN_tag;
 c_7318437.fn = (function_type)__lambda_465;
c_7318437.num_args = 2;
c_7318437.num_elements = 2;
c_7318437.elements = (object *)e_7318454;
c_7318437.elements[0] = ((closureN)self_7313449)->elements[0];
c_7318437.elements[1] = ((closureN)self_7313449)->elements[2];

return_direct_with_clo1(data,(closure)&c_7318432,__lambda_464,  &c_7318437);; 
}

static void __lambda_465(void *data, object self_7313450, int argc, object *args) /* object self_7313450, object k_735362, object cars_73594_733211, object cdrs_73595_733212 */
 {
 object k_735362 = args[0]; object cars_73594_733211 = args[1]; object cdrs_73595_733212 = args[2];
    
if( (boolean_f != Cyc_is_pair(cars_73594_733211)) ){ 
  
closureN_type c_7318441;
object e_7318448 [3];
c_7318441.hdr.mark = gc_color_red;
 c_7318441.hdr.grayed = 0;
c_7318441.tag = closureN_tag;
 c_7318441.fn = (function_type)__lambda_466;
c_7318441.num_args = 1;
c_7318441.num_elements = 3;
c_7318441.elements = (object *)e_7318448;
c_7318441.elements[0] = cdrs_73595_733212;
c_7318441.elements[1] = k_735362;
c_7318441.elements[2] = ((closureN)self_7313450)->elements[1];


object c_7318451 = apply(data,(closure)&c_7318441,((closureN)self_7313450)->elements[0], cars_73594_733211);
return_closcall1(data,(closure)&c_7318441,  c_7318451);
} else { 
  return_direct_with_clo1(data,  k_735362, (((closure)  k_735362)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_466(void *data, object self_7313451, int argc, object *args) /* object self_7313451, object r_735364 */
 {

  

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

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

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



return_direct_with_clo1(data,(closure)&c_7318416,__lambda_461,  Cyc_set_cell(data, ((closureN)self_7313453)->elements[2], r_735358));; 
}

static void __lambda_461(void *data, object self_7313454, int argc, object *args) /* object self_7313454, object r_735357 */
 {

  

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

static void __lambda_455(void *data, object _, int argc, object *args) /* closure _,object k_735342, object f_73580_733201, object lst1_73581_733202, object lst2_73582_733203 */
 {
object k_735342 = args[0]; object f_73580_733201 = args[1]; object lst1_73581_733202 = args[2]; object lst2_73582_733203 = args[3];
  object r_735343;
  Cyc_st_add(data, "scheme/base.sld:Cyc-for-each-loop-2");
  
if( (boolean_f != Cyc_is_null(lst1_73581_733202)) ){ 
  
  r_735343 = Cyc_is_null(lst1_73581_733202);
} else { 
  
  r_735343 = Cyc_is_null(lst2_73582_733203);}
;if( (boolean_f != r_735343) ){ 
  
complex_num_type local_7318384; 
return_direct_with_clo1(data,  k_735342, (((closure)  k_735342)->fn),  ((inline_function_type)
                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7318384));
} else { 
  
closureN_type c_7318386;
object e_7318396 [4];
c_7318386.hdr.mark = gc_color_red;
 c_7318386.hdr.grayed = 0;
c_7318386.tag = closureN_tag;
 c_7318386.fn = (function_type)__lambda_456;
c_7318386.num_args = 1;
c_7318386.num_elements = 4;
c_7318386.elements = (object *)e_7318396;
c_7318386.elements[0] = f_73580_733201;
c_7318386.elements[1] = k_735342;
c_7318386.elements[2] = lst1_73581_733202;
c_7318386.elements[3] = lst2_73582_733203;





return_closcall3(data,  f_73580_733201,  &c_7318386, Cyc_car(data, lst1_73581_733202), Cyc_car(data, lst2_73582_733203));}
;; 
}

static void __lambda_456(void *data, object self_7313443, int argc, object *args) /* object self_7313443, object r_735344 */
 {

  



return_direct_with_clo4(data,  __glo_Cyc_91for_91each_91loop_912_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_912_scheme_base)->fn),  ((closureN)self_7313443)->elements[1], ((closureN)self_7313443)->elements[0], Cyc_cdr(data, ((closureN)self_7313443)->elements[2]), Cyc_cdr(data, ((closureN)self_7313443)->elements[3]));; 
}

static void __lambda_453(void *data, object _, int argc, object *args) /* closure _,object k_735335, object f_73578_733199, object lst_73579_733200 */
 {
object k_735335 = args[0]; object f_73578_733199 = args[1]; object lst_73579_733200 = args[2];
  Cyc_st_add(data, "scheme/base.sld:Cyc-for-each-loop-1");
  
if( (boolean_f != Cyc_is_null(lst_73579_733200)) ){ 
  
complex_num_type local_7318359; 
return_direct_with_clo1(data,  k_735335, (((closure)  k_735335)->fn),  ((inline_function_type)
                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7318359));
} else { 
  
closureN_type c_7318361;
object e_7318368 [3];
c_7318361.hdr.mark = gc_color_red;
 c_7318361.hdr.grayed = 0;
c_7318361.tag = closureN_tag;
 c_7318361.fn = (function_type)__lambda_454;
c_7318361.num_args = 1;
c_7318361.num_elements = 3;
c_7318361.elements = (object *)e_7318368;
c_7318361.elements[0] = f_73578_733199;
c_7318361.elements[1] = k_735335;
c_7318361.elements[2] = lst_73579_733200;



return_closcall2(data,  f_73578_733199,  &c_7318361, Cyc_car(data, lst_73579_733200));}
;; 
}

static void __lambda_454(void *data, object self_7313442, int argc, object *args) /* object self_7313442, object r_735337 */
 {

  

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  ((closureN)self_7313442)->elements[1], ((closureN)self_7313442)->elements[0], Cyc_cdr(data, ((closureN)self_7313442)->elements[2]));; 
}

static void __lambda_450(void *data, object _, int argc, object *args) /* closure _,object k_735323, object f_73571_733195, object lst1_73572_733196, object lst2_73573_733197 */
 {
object k_735323 = args[0]; object f_73571_733195 = args[1]; object lst1_73572_733196 = args[2]; object lst2_73573_733197 = args[3];
  object r_735324;
  Cyc_st_add(data, "scheme/base.sld:Cyc-map-loop-2");
  
if( (boolean_f != Cyc_is_null(lst1_73572_733196)) ){ 
  
  r_735324 = Cyc_is_null(lst1_73572_733196);
} else { 
  
  r_735324 = Cyc_is_null(lst2_73573_733197);}
;if( (boolean_f != r_735324) ){ 
  return_direct_with_clo1(data,  k_735323, (((closure)  k_735323)->fn),  NULL);
} else { 
  
closureN_type c_7318331;
object e_7318348 [4];
c_7318331.hdr.mark = gc_color_red;
 c_7318331.hdr.grayed = 0;
c_7318331.tag = closureN_tag;
 c_7318331.fn = (function_type)__lambda_451;
c_7318331.num_args = 1;
c_7318331.num_elements = 4;
c_7318331.elements = (object *)e_7318348;
c_7318331.elements[0] = f_73571_733195;
c_7318331.elements[1] = k_735323;
c_7318331.elements[2] = lst1_73572_733196;
c_7318331.elements[3] = lst2_73573_733197;





return_closcall3(data,  f_73571_733195,  &c_7318331, Cyc_car(data, lst1_73572_733196), Cyc_car(data, lst2_73573_733197));}
;; 
}

static void __lambda_451(void *data, object self_7313440, int argc, object *args) /* object self_7313440, object r_735325 */
 {
 object r_735325 = args[0];
  
closureN_type c_7318333;
object e_7318340 [2];
c_7318333.hdr.mark = gc_color_red;
 c_7318333.hdr.grayed = 0;
c_7318333.tag = closureN_tag;
 c_7318333.fn = (function_type)__lambda_452;
c_7318333.num_args = 1;
c_7318333.num_elements = 2;
c_7318333.elements = (object *)e_7318340;
c_7318333.elements[0] = ((closureN)self_7313440)->elements[1];
c_7318333.elements[1] = r_735325;





return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318333, ((closureN)self_7313440)->elements[0], Cyc_cdr(data, ((closureN)self_7313440)->elements[2]), Cyc_cdr(data, ((closureN)self_7313440)->elements[3]));; 
}

static void __lambda_452(void *data, object self_7313441, int argc, object *args) /* object self_7313441, object r_735326 */
 {
 object r_735326 = args[0];
  
pair_type local_7318338; 
return_direct_with_clo1(data,  ((closureN)self_7313441)->elements[0], (((closure)  ((closureN)self_7313441)->elements[0])->fn),  set_pair_as_expr(&local_7318338, ((closureN)self_7313441)->elements[1], r_735326));; 
}

static void __lambda_447(void *data, object _, int argc, object *args) /* closure _,object k_735315, object f_73569_733193, object lst_73570_733194 */
 {
object k_735315 = args[0]; object f_73569_733193 = args[1]; object lst_73570_733194 = args[2];
  Cyc_st_add(data, "scheme/base.sld:Cyc-map-loop-1");
  
if( (boolean_f != Cyc_is_null(lst_73570_733194)) ){ 
  return_direct_with_clo1(data,  k_735315, (((closure)  k_735315)->fn),  NULL);
} else { 
  
closureN_type c_7318302;
object e_7318316 [3];
c_7318302.hdr.mark = gc_color_red;
 c_7318302.hdr.grayed = 0;
c_7318302.tag = closureN_tag;
 c_7318302.fn = (function_type)__lambda_448;
c_7318302.num_args = 1;
c_7318302.num_elements = 3;
c_7318302.elements = (object *)e_7318316;
c_7318302.elements[0] = f_73569_733193;
c_7318302.elements[1] = k_735315;
c_7318302.elements[2] = lst_73570_733194;



return_closcall2(data,  f_73569_733193,  &c_7318302, Cyc_car(data, lst_73570_733194));}
;; 
}

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



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318304, ((closureN)self_7313438)->elements[0], Cyc_cdr(data, ((closureN)self_7313438)->elements[2]));; 
}

static void __lambda_449(void *data, object self_7313439, int argc, object *args) /* object self_7313439, object r_735318 */
 {
 object r_735318 = args[0];
  
pair_type local_7318309; 
return_direct_with_clo1(data,  ((closureN)self_7313439)->elements[0], (((closure)  ((closureN)self_7313439)->elements[0])->fn),  set_pair_as_expr(&local_7318309, ((closureN)self_7313439)->elements[1], r_735318));; 
}

static void __lambda_432(void *data, object _, int argc, object *args) /* closure _,object k_735296, object f_73557_733182, object lis1_73558_733183, object lists_73559_733184_raw, ... */
 {
object k_735296 = args[0]; object f_73557_733182 = args[1]; object lis1_73558_733183 = args[2];
load_varargs(lists_73559_733184, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:map");
  
if( (boolean_f != Cyc_is_pair(lists_73559_733184)) ){ 
  
closureN_type c_7318210;
object e_7318275 [2];
c_7318210.hdr.mark = gc_color_red;
 c_7318210.hdr.grayed = 0;
c_7318210.tag = closureN_tag;
 c_7318210.fn = (function_type)__lambda_433;
c_7318210.num_args = 1;
c_7318210.num_elements = 2;
c_7318210.elements = (object *)e_7318275;
c_7318210.elements[0] = f_73557_733182;
c_7318210.elements[1] = k_735296;


pair_type local_7318278; 
return_direct_with_clo1(data,(closure)&c_7318210,__lambda_433,  set_pair_as_expr(&local_7318278, lis1_73558_733183, lists_73559_733184));
} else { 
  
closureN_type c_7318280;
object e_7318284 [2];
c_7318280.hdr.mark = gc_color_red;
 c_7318280.hdr.grayed = 0;
c_7318280.tag = closureN_tag;
 c_7318280.fn = (function_type)__lambda_444;
c_7318280.num_args = 1;
c_7318280.num_elements = 2;
c_7318280.elements = (object *)e_7318284;
c_7318280.elements[0] = k_735296;
c_7318280.elements[1] = lis1_73558_733183;


closureN_type c_7318285;
object e_7318296 [1];
c_7318285.hdr.mark = gc_color_red;
 c_7318285.hdr.grayed = 0;
c_7318285.tag = closureN_tag;
 c_7318285.fn = (function_type)__lambda_445;
c_7318285.num_args = 2;
c_7318285.num_elements = 1;
c_7318285.elements = (object *)e_7318296;
c_7318285.elements[0] = f_73557_733182;

return_direct_with_clo1(data,(closure)&c_7318280,__lambda_444,  &c_7318285);}
;; 
}

static void __lambda_445(void *data, object self_7313435, int argc, object *args) /* object self_7313435, object k_735311, object x_73567_733191, object y_73568_733192 */
 {
 object k_735311 = args[0]; object x_73567_733191 = args[1]; object y_73568_733192 = args[2];
  
closureN_type c_7318288;
object e_7318295 [2];
c_7318288.hdr.mark = gc_color_red;
 c_7318288.hdr.grayed = 0;
c_7318288.tag = closureN_tag;
 c_7318288.fn = (function_type)__lambda_446;
c_7318288.num_args = 1;
c_7318288.num_elements = 2;
c_7318288.elements = (object *)e_7318295;
c_7318288.elements[0] = k_735311;
c_7318288.elements[1] = y_73568_733192;

return_closcall2(data,  ((closureN)self_7313435)->elements[0],  &c_7318288, x_73567_733191);; 
}

static void __lambda_446(void *data, object self_7313436, int argc, object *args) /* object self_7313436, object r_735312 */
 {
 object r_735312 = args[0];
  
pair_type local_7318293; 
return_direct_with_clo1(data,  ((closureN)self_7313436)->elements[0], (((closure)  ((closureN)self_7313436)->elements[0])->fn),  set_pair_as_expr(&local_7318293, r_735312, ((closureN)self_7313436)->elements[1]));; 
}

static void __lambda_444(void *data, object self_7313437, int argc, object *args) /* object self_7313437, object r_735309 */
 {
 object r_735309 = args[0];
  return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_7313437)->elements[0], r_735309, NULL, ((closureN)self_7313437)->elements[1]);; 
}

static void __lambda_433(void *data, object self_7313423, int argc, object *args) /* object self_7313423, object lists_73561_733185 */
 {
 object lists_73561_733185 = args[0];
  
closureN_type c_7318212;
object e_7318274 [3];
c_7318212.hdr.mark = gc_color_red;
 c_7318212.hdr.grayed = 0;
c_7318212.tag = closureN_tag;
 c_7318212.fn = (function_type)__lambda_434;
c_7318212.num_args = 1;
c_7318212.num_elements = 3;
c_7318212.elements = (object *)e_7318274;
c_7318212.elements[0] = ((closureN)self_7313423)->elements[0];
c_7318212.elements[1] = ((closureN)self_7313423)->elements[1];
c_7318212.elements[2] = lists_73561_733185;

return_direct_with_clo1(data,(closure)&c_7318212,__lambda_434,  boolean_f);; 
}

static void __lambda_434(void *data, object self_7313424, int argc, object *args) /* object self_7313424, object recur_73562_733186 */
 {
 object recur_73562_733186 = args[0];
  
closureN_type c_7318214;
object e_7318270 [3];
c_7318214.hdr.mark = gc_color_red;
 c_7318214.hdr.grayed = 0;
c_7318214.tag = closureN_tag;
 c_7318214.fn = (function_type)__lambda_1372;
c_7318214.num_args = 1;
c_7318214.num_elements = 3;
c_7318214.elements = (object *)e_7318270;
c_7318214.elements[0] = ((closureN)self_7313424)->elements[0];
c_7318214.elements[1] = ((closureN)self_7313424)->elements[1];
c_7318214.elements[2] = ((closureN)self_7313424)->elements[2];


pair_type local_7318273; 
return_direct_with_clo1(data,(closure)&c_7318214,__lambda_1372,  set_cell_as_expr(&local_7318273, recur_73562_733186));; 
}

static void __lambda_1372(void *data, object self_7313425, int argc, object *args) /* object self_7313425, object recur_73562_733186 */
 {
 object recur_73562_733186 = args[0];
  
closureN_type c_7318216;
object e_7318229 [3];
c_7318216.hdr.mark = gc_color_red;
 c_7318216.hdr.grayed = 0;
c_7318216.tag = closureN_tag;
 c_7318216.fn = (function_type)__lambda_435;
c_7318216.num_args = 1;
c_7318216.num_elements = 3;
c_7318216.elements = (object *)e_7318229;
c_7318216.elements[0] = ((closureN)self_7313425)->elements[1];
c_7318216.elements[1] = ((closureN)self_7313425)->elements[2];
c_7318216.elements[2] = recur_73562_733186;


closureN_type c_7318230;
object e_7318269 [2];
c_7318230.hdr.mark = gc_color_red;
 c_7318230.hdr.grayed = 0;
c_7318230.tag = closureN_tag;
 c_7318230.fn = (function_type)__lambda_437;
c_7318230.num_args = 1;
c_7318230.num_elements = 2;
c_7318230.elements = (object *)e_7318269;
c_7318230.elements[0] = ((closureN)self_7313425)->elements[0];
c_7318230.elements[1] = recur_73562_733186;

return_direct_with_clo1(data,(closure)&c_7318216,__lambda_435,  &c_7318230);; 
}

static void __lambda_437(void *data, object self_7313426, int argc, object *args) /* object self_7313426, object k_735301, object lists_73563_733187 */
 {
 object k_735301 = args[0]; object lists_73563_733187 = args[1];
  
closureN_type c_7318232;
object e_7318264 [3];
c_7318232.hdr.mark = gc_color_red;
 c_7318232.hdr.grayed = 0;
c_7318232.tag = closureN_tag;
 c_7318232.fn = (function_type)__lambda_438;
c_7318232.num_args = 1;
c_7318232.num_elements = 3;
c_7318232.elements = (object *)e_7318264;
c_7318232.elements[0] = ((closureN)self_7313426)->elements[0];
c_7318232.elements[1] = k_735301;
c_7318232.elements[2] = ((closureN)self_7313426)->elements[1];


closureN_type c_7318265;
object e_7318268 [1];
c_7318265.hdr.mark = gc_color_red;
 c_7318265.hdr.grayed = 0;
c_7318265.tag = closureN_tag;
 c_7318265.fn = (function_type)__lambda_443;
c_7318265.num_args = 0;
c_7318265.num_elements = 1;
c_7318265.elements = (object *)e_7318268;
c_7318265.elements[0] = lists_73563_733187;

return_direct_with_clo1(data,(closure)&c_7318232,__lambda_438,  &c_7318265);; 
}

static void __lambda_443(void *data, object self_7313427, int argc, object *args) /* object self_7313427, object k_735308 */
 {
 object k_735308 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_scheme_base, (((closure)  __glo__75cars_87cdrs_scheme_base)->fn),  k_735308, ((closureN)self_7313427)->elements[0]);; 
}

static void __lambda_438(void *data, object self_7313428, int argc, object *args) /* object self_7313428, object r_735302 */
 {
 object r_735302 = args[0];
  
closureN_type c_7318234;
object e_7318238 [2];
c_7318234.hdr.mark = gc_color_red;
 c_7318234.hdr.grayed = 0;
c_7318234.tag = closureN_tag;
 c_7318234.fn = (function_type)__lambda_439;
c_7318234.num_args = 1;
c_7318234.num_elements = 2;
c_7318234.elements = (object *)e_7318238;
c_7318234.elements[0] = ((closureN)self_7313428)->elements[1];
c_7318234.elements[1] = r_735302;


closureN_type c_7318239;
object e_7318263 [2];
c_7318239.hdr.mark = gc_color_red;
 c_7318239.hdr.grayed = 0;
c_7318239.tag = closureN_tag;
 c_7318239.fn = (function_type)__lambda_440;
c_7318239.num_args = 2;
c_7318239.num_elements = 2;
c_7318239.elements = (object *)e_7318263;
c_7318239.elements[0] = ((closureN)self_7313428)->elements[0];
c_7318239.elements[1] = ((closureN)self_7313428)->elements[2];

return_direct_with_clo1(data,(closure)&c_7318234,__lambda_439,  &c_7318239);; 
}

static void __lambda_440(void *data, object self_7313429, int argc, object *args) /* object self_7313429, object k_735304, object cars_73564_733188, object cdrs_73565_733189 */
 {
 object k_735304 = args[0]; object cars_73564_733188 = args[1]; object cdrs_73565_733189 = args[2];
    
if( (boolean_f != Cyc_is_pair(cars_73564_733188)) ){ 
  
closureN_type c_7318243;
object e_7318257 [3];
c_7318243.hdr.mark = gc_color_red;
 c_7318243.hdr.grayed = 0;
c_7318243.tag = closureN_tag;
 c_7318243.fn = (function_type)__lambda_441;
c_7318243.num_args = 1;
c_7318243.num_elements = 3;
c_7318243.elements = (object *)e_7318257;
c_7318243.elements[0] = cdrs_73565_733189;
c_7318243.elements[1] = k_735304;
c_7318243.elements[2] = ((closureN)self_7313429)->elements[1];


object c_7318260 = apply(data,(closure)&c_7318243,((closureN)self_7313429)->elements[0], cars_73564_733188);
return_closcall1(data,(closure)&c_7318243,  c_7318260);
} else { 
  return_direct_with_clo1(data,  k_735304, (((closure)  k_735304)->fn),  NULL);}
;; 
}

static void __lambda_441(void *data, object self_7313430, int argc, object *args) /* object self_7313430, object x_73566_733190 */
 {
 object x_73566_733190 = args[0];
  


closureN_type c_7318248;
object e_7318255 [2];
c_7318248.hdr.mark = gc_color_red;
 c_7318248.hdr.grayed = 0;
c_7318248.tag = closureN_tag;
 c_7318248.fn = (function_type)__lambda_442;
c_7318248.num_args = 1;
c_7318248.num_elements = 2;
c_7318248.elements = (object *)e_7318255;
c_7318248.elements[0] = ((closureN)self_7313430)->elements[1];
c_7318248.elements[1] = x_73566_733190;

return_closcall2(data,  car(((closureN)self_7313430)->elements[2]),  &c_7318248, ((closureN)self_7313430)->elements[0]);; 
}

static void __lambda_442(void *data, object self_7313431, int argc, object *args) /* object self_7313431, object r_735307 */
 {
 object r_735307 = args[0];
  
pair_type local_7318253; 
return_direct_with_clo1(data,  ((closureN)self_7313431)->elements[0], (((closure)  ((closureN)self_7313431)->elements[0])->fn),  set_pair_as_expr(&local_7318253, ((closureN)self_7313431)->elements[1], r_735307));; 
}

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

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



return_direct_with_clo1(data,(closure)&c_7318218,__lambda_436,  Cyc_set_cell(data, ((closureN)self_7313433)->elements[2], r_735300));; 
}

static void __lambda_436(void *data, object self_7313434, int argc, object *args) /* object self_7313434, object r_735299 */
 {

  

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

static void __lambda_412(void *data, object _, int argc, object *args) /* closure _,object k_735268, object lists_73545_733171 */
 {
object k_735268 = args[0]; object lists_73545_733171 = args[1];
  Cyc_st_add(data, "scheme/base.sld:%cars+cdrs");

closureN_type c_7318096;
object e_7318099 [1];
c_7318096.hdr.mark = gc_color_red;
 c_7318096.hdr.grayed = 0;
c_7318096.tag = closureN_tag;
 c_7318096.fn = (function_type)__lambda_413;
c_7318096.num_args = 1;
c_7318096.num_elements = 1;
c_7318096.elements = (object *)e_7318099;
c_7318096.elements[0] = k_735268;


closureN_type c_7318100;
object e_7318205 [1];
c_7318100.hdr.mark = gc_color_red;
 c_7318100.hdr.grayed = 0;
c_7318100.tag = closureN_tag;
 c_7318100.fn = (function_type)__lambda_414;
c_7318100.num_args = 1;
c_7318100.num_elements = 1;
c_7318100.elements = (object *)e_7318205;
c_7318100.elements[0] = lists_73545_733171;

return_direct_with_clo1(data,(closure)&c_7318096,__lambda_413,  &c_7318100);; 
}

static void __lambda_414(void *data, object self_7313403, int argc, object *args) /* object self_7313403, object k_735270, object abort_73546_733172 */
 {
 object k_735270 = args[0]; object abort_73546_733172 = args[1];
  
closureN_type c_7318102;
object e_7318203 [2];
c_7318102.hdr.mark = gc_color_red;
 c_7318102.hdr.grayed = 0;
c_7318102.tag = closureN_tag;
 c_7318102.fn = (function_type)__lambda_415;
c_7318102.num_args = 1;
c_7318102.num_elements = 2;
c_7318102.elements = (object *)e_7318203;
c_7318102.elements[0] = abort_73546_733172;
c_7318102.elements[1] = k_735270;

return_direct_with_clo1(data,(closure)&c_7318102,__lambda_415,  ((closureN)self_7313403)->elements[0]);; 
}

static void __lambda_415(void *data, object self_7313404, int argc, object *args) /* object self_7313404, object lists_73548_733173 */
 {
 object lists_73548_733173 = args[0];
  
closureN_type c_7318104;
object e_7318202 [3];
c_7318104.hdr.mark = gc_color_red;
 c_7318104.hdr.grayed = 0;
c_7318104.tag = closureN_tag;
 c_7318104.fn = (function_type)__lambda_416;
c_7318104.num_args = 1;
c_7318104.num_elements = 3;
c_7318104.elements = (object *)e_7318202;
c_7318104.elements[0] = ((closureN)self_7313404)->elements[0];
c_7318104.elements[1] = ((closureN)self_7313404)->elements[1];
c_7318104.elements[2] = lists_73548_733173;

return_direct_with_clo1(data,(closure)&c_7318104,__lambda_416,  boolean_f);; 
}

static void __lambda_416(void *data, object self_7313405, int argc, object *args) /* object self_7313405, object recur_73549_733174 */
 {
 object recur_73549_733174 = args[0];
  
closureN_type c_7318106;
object e_7318198 [3];
c_7318106.hdr.mark = gc_color_red;
 c_7318106.hdr.grayed = 0;
c_7318106.tag = closureN_tag;
 c_7318106.fn = (function_type)__lambda_1371;
c_7318106.num_args = 1;
c_7318106.num_elements = 3;
c_7318106.elements = (object *)e_7318198;
c_7318106.elements[0] = ((closureN)self_7313405)->elements[0];
c_7318106.elements[1] = ((closureN)self_7313405)->elements[1];
c_7318106.elements[2] = ((closureN)self_7313405)->elements[2];


pair_type local_7318201; 
return_direct_with_clo1(data,(closure)&c_7318106,__lambda_1371,  set_cell_as_expr(&local_7318201, recur_73549_733174));; 
}

static void __lambda_1371(void *data, object self_7313406, int argc, object *args) /* object self_7313406, object recur_73549_733174 */
 {
 object recur_73549_733174 = args[0];
  
closureN_type c_7318108;
object e_7318121 [3];
c_7318108.hdr.mark = gc_color_red;
 c_7318108.hdr.grayed = 0;
c_7318108.tag = closureN_tag;
 c_7318108.fn = (function_type)__lambda_417;
c_7318108.num_args = 1;
c_7318108.num_elements = 3;
c_7318108.elements = (object *)e_7318121;
c_7318108.elements[0] = ((closureN)self_7313406)->elements[1];
c_7318108.elements[1] = ((closureN)self_7313406)->elements[2];
c_7318108.elements[2] = recur_73549_733174;


closureN_type c_7318122;
object e_7318197 [2];
c_7318122.hdr.mark = gc_color_red;
 c_7318122.hdr.grayed = 0;
c_7318122.tag = closureN_tag;
 c_7318122.fn = (function_type)__lambda_419;
c_7318122.num_args = 1;
c_7318122.num_elements = 2;
c_7318122.elements = (object *)e_7318197;
c_7318122.elements[0] = ((closureN)self_7313406)->elements[0];
c_7318122.elements[1] = recur_73549_733174;

return_direct_with_clo1(data,(closure)&c_7318108,__lambda_417,  &c_7318122);; 
}

static void __lambda_419(void *data, object self_7313407, int argc, object *args) /* object self_7313407, object k_735273, object lists_73550_733175 */
 {
 object k_735273 = args[0]; object lists_73550_733175 = args[1];
    
if( (boolean_f != Cyc_is_pair(lists_73550_733175)) ){ 
  
closureN_type c_7318126;
object e_7318186 [3];
c_7318126.hdr.mark = gc_color_red;
 c_7318126.hdr.grayed = 0;
c_7318126.tag = closureN_tag;
 c_7318126.fn = (function_type)__lambda_420;
c_7318126.num_args = 1;
c_7318126.num_elements = 3;
c_7318126.elements = (object *)e_7318186;
c_7318126.elements[0] = ((closureN)self_7313407)->elements[0];
c_7318126.elements[1] = k_735273;
c_7318126.elements[2] = ((closureN)self_7313407)->elements[1];


closureN_type c_7318187;
object e_7318195 [1];
c_7318187.hdr.mark = gc_color_red;
 c_7318187.hdr.grayed = 0;
c_7318187.tag = closureN_tag;
 c_7318187.fn = (function_type)__lambda_431;
c_7318187.num_args = 0;
c_7318187.num_elements = 1;
c_7318187.elements = (object *)e_7318195;
c_7318187.elements[0] = lists_73550_733175;

return_direct_with_clo1(data,(closure)&c_7318126,__lambda_420,  &c_7318187);
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735273, NULL, NULL);}
;; 
}

static void __lambda_431(void *data, object self_7313408, int argc, object *args) /* object self_7313408, object k_735291 */
 {
 object k_735291 = args[0];
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735291, Cyc_car(data, ((closureN)self_7313408)->elements[0]), Cyc_cdr(data, ((closureN)self_7313408)->elements[0]));; 
}

static void __lambda_420(void *data, object self_7313409, int argc, object *args) /* object self_7313409, object r_735275 */
 {
 object r_735275 = args[0];
  
closureN_type c_7318128;
object e_7318132 [2];
c_7318128.hdr.mark = gc_color_red;
 c_7318128.hdr.grayed = 0;
c_7318128.tag = closureN_tag;
 c_7318128.fn = (function_type)__lambda_421;
c_7318128.num_args = 1;
c_7318128.num_elements = 2;
c_7318128.elements = (object *)e_7318132;
c_7318128.elements[0] = ((closureN)self_7313409)->elements[1];
c_7318128.elements[1] = r_735275;


closureN_type c_7318133;
object e_7318185 [2];
c_7318133.hdr.mark = gc_color_red;
 c_7318133.hdr.grayed = 0;
c_7318133.tag = closureN_tag;
 c_7318133.fn = (function_type)__lambda_422;
c_7318133.num_args = 2;
c_7318133.num_elements = 2;
c_7318133.elements = (object *)e_7318185;
c_7318133.elements[0] = ((closureN)self_7313409)->elements[0];
c_7318133.elements[1] = ((closureN)self_7313409)->elements[2];

return_direct_with_clo1(data,(closure)&c_7318128,__lambda_421,  &c_7318133);; 
}

static void __lambda_422(void *data, object self_7313410, int argc, object *args) /* object self_7313410, object k_735277, object list_73551_733176, object other_91lists_73552_733177 */
 {
 object k_735277 = args[0]; object list_73551_733176 = args[1]; object other_91lists_73552_733177 = args[2];
    
if( (boolean_f != Cyc_is_null(list_73551_733176)) ){ 
  return_closcall3(data,  ((closureN)self_7313410)->elements[0],  k_735277, NULL, NULL);
} else { 
  
closureN_type c_7318139;
object e_7318175 [3];
c_7318139.hdr.mark = gc_color_red;
 c_7318139.hdr.grayed = 0;
c_7318139.tag = closureN_tag;
 c_7318139.fn = (function_type)__lambda_423;
c_7318139.num_args = 1;
c_7318139.num_elements = 3;
c_7318139.elements = (object *)e_7318175;
c_7318139.elements[0] = k_735277;
c_7318139.elements[1] = other_91lists_73552_733177;
c_7318139.elements[2] = ((closureN)self_7313410)->elements[1];


closureN_type c_7318176;
object e_7318184 [1];
c_7318176.hdr.mark = gc_color_red;
 c_7318176.hdr.grayed = 0;
c_7318176.tag = closureN_tag;
 c_7318176.fn = (function_type)__lambda_430;
c_7318176.num_args = 0;
c_7318176.num_elements = 1;
c_7318176.elements = (object *)e_7318184;
c_7318176.elements[0] = list_73551_733176;

return_direct_with_clo1(data,(closure)&c_7318139,__lambda_423,  &c_7318176);}
;; 
}

static void __lambda_430(void *data, object self_7313411, int argc, object *args) /* object self_7313411, object k_735290 */
 {
 object k_735290 = args[0];
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735290, Cyc_car(data, ((closureN)self_7313411)->elements[0]), Cyc_cdr(data, ((closureN)self_7313411)->elements[0]));; 
}

static void __lambda_423(void *data, object self_7313412, int argc, object *args) /* object self_7313412, object r_735281 */
 {
 object r_735281 = args[0];
  
closureN_type c_7318141;
object e_7318145 [2];
c_7318141.hdr.mark = gc_color_red;
 c_7318141.hdr.grayed = 0;
c_7318141.tag = closureN_tag;
 c_7318141.fn = (function_type)__lambda_424;
c_7318141.num_args = 1;
c_7318141.num_elements = 2;
c_7318141.elements = (object *)e_7318145;
c_7318141.elements[0] = ((closureN)self_7313412)->elements[0];
c_7318141.elements[1] = r_735281;


closureN_type c_7318146;
object e_7318174 [2];
c_7318146.hdr.mark = gc_color_red;
 c_7318146.hdr.grayed = 0;
c_7318146.tag = closureN_tag;
 c_7318146.fn = (function_type)__lambda_425;
c_7318146.num_args = 2;
c_7318146.num_elements = 2;
c_7318146.elements = (object *)e_7318174;
c_7318146.elements[0] = ((closureN)self_7313412)->elements[1];
c_7318146.elements[1] = ((closureN)self_7313412)->elements[2];

return_direct_with_clo1(data,(closure)&c_7318141,__lambda_424,  &c_7318146);; 
}

static void __lambda_425(void *data, object self_7313413, int argc, object *args) /* object self_7313413, object k_735283, object a_73553_733178, object d_73554_733179 */
 {
 object k_735283 = args[0]; object a_73553_733178 = args[1]; object d_73554_733179 = args[2];
  
closureN_type c_7318148;
object e_7318166 [3];
c_7318148.hdr.mark = gc_color_red;
 c_7318148.hdr.grayed = 0;
c_7318148.tag = closureN_tag;
 c_7318148.fn = (function_type)__lambda_426;
c_7318148.num_args = 1;
c_7318148.num_elements = 3;
c_7318148.elements = (object *)e_7318166;
c_7318148.elements[0] = a_73553_733178;
c_7318148.elements[1] = d_73554_733179;
c_7318148.elements[2] = k_735283;


closureN_type c_7318167;
object e_7318173 [2];
c_7318167.hdr.mark = gc_color_red;
 c_7318167.hdr.grayed = 0;
c_7318167.tag = closureN_tag;
 c_7318167.fn = (function_type)__lambda_429;
c_7318167.num_args = 0;
c_7318167.num_elements = 2;
c_7318167.elements = (object *)e_7318173;
c_7318167.elements[0] = ((closureN)self_7313413)->elements[0];
c_7318167.elements[1] = ((closureN)self_7313413)->elements[1];

return_direct_with_clo1(data,(closure)&c_7318148,__lambda_426,  &c_7318167);; 
}

static void __lambda_429(void *data, object self_7313414, int argc, object *args) /* object self_7313414, object k_735289 */
 {
 object k_735289 = args[0];
  

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

static void __lambda_426(void *data, object self_7313415, int argc, object *args) /* object self_7313415, object r_735284 */
 {
 object r_735284 = args[0];
  
closureN_type c_7318150;
object e_7318154 [2];
c_7318150.hdr.mark = gc_color_red;
 c_7318150.hdr.grayed = 0;
c_7318150.tag = closureN_tag;
 c_7318150.fn = (function_type)__lambda_427;
c_7318150.num_args = 1;
c_7318150.num_elements = 2;
c_7318150.elements = (object *)e_7318154;
c_7318150.elements[0] = ((closureN)self_7313415)->elements[2];
c_7318150.elements[1] = r_735284;


closureN_type c_7318155;
object e_7318165 [2];
c_7318155.hdr.mark = gc_color_red;
 c_7318155.hdr.grayed = 0;
c_7318155.tag = closureN_tag;
 c_7318155.fn = (function_type)__lambda_428;
c_7318155.num_args = 2;
c_7318155.num_elements = 2;
c_7318155.elements = (object *)e_7318165;
c_7318155.elements[0] = ((closureN)self_7313415)->elements[0];
c_7318155.elements[1] = ((closureN)self_7313415)->elements[1];

return_direct_with_clo1(data,(closure)&c_7318150,__lambda_427,  &c_7318155);; 
}

static void __lambda_428(void *data, object self_7313416, int argc, object *args) /* object self_7313416, object k_735286, object cars_73555_733180, object cdrs_73556_733181 */
 {
 object k_735286 = args[0]; object cars_73555_733180 = args[1]; object cdrs_73556_733181 = args[2];
  
pair_type local_7318159; 

pair_type local_7318163; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735286, set_pair_as_expr(&local_7318159, ((closureN)self_7313416)->elements[0], cars_73555_733180), set_pair_as_expr(&local_7318163, ((closureN)self_7313416)->elements[1], cdrs_73556_733181));; 
}

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

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

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

static void __lambda_417(void *data, object self_7313420, int argc, object *args) /* object self_7313420, object r_735272 */
 {
 object r_735272 = args[0];
  
closureN_type c_7318110;
object e_7318117 [3];
c_7318110.hdr.mark = gc_color_red;
 c_7318110.hdr.grayed = 0;
c_7318110.tag = closureN_tag;
 c_7318110.fn = (function_type)__lambda_418;
c_7318110.num_args = 1;
c_7318110.num_elements = 3;
c_7318110.elements = (object *)e_7318117;
c_7318110.elements[0] = ((closureN)self_7313420)->elements[0];
c_7318110.elements[1] = ((closureN)self_7313420)->elements[1];
c_7318110.elements[2] = ((closureN)self_7313420)->elements[2];



return_direct_with_clo1(data,(closure)&c_7318110,__lambda_418,  Cyc_set_cell(data, ((closureN)self_7313420)->elements[2], r_735272));; 
}

static void __lambda_418(void *data, object self_7313421, int argc, object *args) /* object self_7313421, object r_735271 */
 {

  

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

static void __lambda_413(void *data, object self_7313422, int argc, object *args) /* object self_7313422, object r_735269 */
 {
 object r_735269 = args[0];
  return_direct_with_clo2(data,  __glo_call_91with_91current_91continuation_scheme_base, (((closure)  __glo_call_91with_91current_91continuation_scheme_base)->fn),  ((closureN)self_7313422)->elements[0], r_735269);; 
}

static void __lambda_411(void *data, object _, int argc, object *args) /* closure _,object k_735263, object pair_73544_733170 */
 {
object k_735263 = args[0]; object pair_73544_733170 = args[1];
  Cyc_st_add(data, "scheme/base.sld:car+cdr");




return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735263, Cyc_car(data, pair_73544_733170), Cyc_cdr(data, pair_73544_733170));; 
}

static void __lambda_410(void *data, object _, int argc, object *args) /* closure _,object k_735244, object expr_73535_733164, object rename_73536_733165, object compare_73537_733166 */
 {
object k_735244 = args[0]; object expr_73535_733164 = args[1];
  Cyc_st_add(data, "scheme/base.sld:receive");

pair_type local_7318060; 

pair_type local_7318063; 

pair_type local_7318066; 

pair_type local_7318069; 

pair_type local_7318072; 



pair_type local_7318077; 

pair_type local_7318080; 

pair_type local_7318083; 




return_direct_with_clo1(data,  k_735244, (((closure)  k_735244)->fn),  set_pair_as_expr(&local_7318060, quote_call_91with_91values, set_pair_as_expr(&local_7318063, set_pair_as_expr(&local_7318066, quote_lambda, set_pair_as_expr(&local_7318069, NULL, set_pair_as_expr(&local_7318072, Cyc_caddr(data, expr_73535_733164), NULL))), set_pair_as_expr(&local_7318077, set_pair_as_expr(&local_7318080, quote_lambda, set_pair_as_expr(&local_7318083, Cyc_cadr(data, expr_73535_733164), Cyc_cdddr(data, expr_73535_733164))), NULL))));; 
}

static void __lambda_403(void *data, object _, int argc, object *args) /* closure _,object k_735232, object ls_73528_733158 */
 {
object k_735232 = args[0]; object ls_73528_733158 = args[1];
  Cyc_st_add(data, "scheme/base.sld:list-copy");

closureN_type c_7318008;
object e_7318055 [1];
c_7318008.hdr.mark = gc_color_red;
 c_7318008.hdr.grayed = 0;
c_7318008.tag = closureN_tag;
 c_7318008.fn = (function_type)__lambda_404;
c_7318008.num_args = 2;
c_7318008.num_elements = 1;
c_7318008.elements = (object *)e_7318055;
c_7318008.elements[0] = k_735232;

return_direct_with_clo2(data,(closure)&c_7318008,__lambda_404,  ls_73528_733158, NULL);; 
}

static void __lambda_404(void *data, object self_7313396, int argc, object *args) /* object self_7313396, object ls_73530_733159, object res_73531_733160 */
 {
 object ls_73530_733159 = args[0]; object res_73531_733160 = args[1];
  
closureN_type c_7318010;
object e_7318054 [3];
c_7318010.hdr.mark = gc_color_red;
 c_7318010.hdr.grayed = 0;
c_7318010.tag = closureN_tag;
 c_7318010.fn = (function_type)__lambda_405;
c_7318010.num_args = 1;
c_7318010.num_elements = 3;
c_7318010.elements = (object *)e_7318054;
c_7318010.elements[0] = ((closureN)self_7313396)->elements[0];
c_7318010.elements[1] = ls_73530_733159;
c_7318010.elements[2] = res_73531_733160;

return_direct_with_clo1(data,(closure)&c_7318010,__lambda_405,  boolean_f);; 
}

static void __lambda_405(void *data, object self_7313397, int argc, object *args) /* object self_7313397, object lp_73532_733161 */
 {
 object lp_73532_733161 = args[0];
  
closureN_type c_7318012;
object e_7318050 [3];
c_7318012.hdr.mark = gc_color_red;
 c_7318012.hdr.grayed = 0;
c_7318012.tag = closureN_tag;
 c_7318012.fn = (function_type)__lambda_1370;
c_7318012.num_args = 1;
c_7318012.num_elements = 3;
c_7318012.elements = (object *)e_7318050;
c_7318012.elements[0] = ((closureN)self_7313397)->elements[0];
c_7318012.elements[1] = ((closureN)self_7313397)->elements[1];
c_7318012.elements[2] = ((closureN)self_7313397)->elements[2];


pair_type local_7318053; 
return_direct_with_clo1(data,(closure)&c_7318012,__lambda_1370,  set_cell_as_expr(&local_7318053, lp_73532_733161));; 
}

static void __lambda_1370(void *data, object self_7313398, int argc, object *args) /* object self_7313398, object lp_73532_733161 */
 {
 object lp_73532_733161 = args[0];
  
closureN_type c_7318014;
object e_7318028 [4];
c_7318014.hdr.mark = gc_color_red;
 c_7318014.hdr.grayed = 0;
c_7318014.tag = closureN_tag;
 c_7318014.fn = (function_type)__lambda_406;
c_7318014.num_args = 1;
c_7318014.num_elements = 4;
c_7318014.elements = (object *)e_7318028;
c_7318014.elements[0] = ((closureN)self_7313398)->elements[0];
c_7318014.elements[1] = lp_73532_733161;
c_7318014.elements[2] = ((closureN)self_7313398)->elements[1];
c_7318014.elements[3] = ((closureN)self_7313398)->elements[2];


closureN_type c_7318029;
object e_7318049 [1];
c_7318029.hdr.mark = gc_color_red;
 c_7318029.hdr.grayed = 0;
c_7318029.tag = closureN_tag;
 c_7318029.fn = (function_type)__lambda_408;
c_7318029.num_args = 2;
c_7318029.num_elements = 1;
c_7318029.elements = (object *)e_7318049;
c_7318029.elements[0] = lp_73532_733161;

return_direct_with_clo1(data,(closure)&c_7318014,__lambda_406,  &c_7318029);; 
}

static void __lambda_408(void *data, object self_7313399, int argc, object *args) /* object self_7313399, object k_735236, object ls_73533_733162, object res_73534_733163 */
 {
 object k_735236 = args[0]; object ls_73533_733162 = args[1]; object res_73534_733163 = args[2];
    
if( (boolean_f != Cyc_is_pair(ls_73533_733162)) ){ 
  




pair_type local_7318040; 


return_closcall3(data,  car(((closureN)self_7313399)->elements[0]),  k_735236, Cyc_cdr(data, ls_73533_733162), set_pair_as_expr(&local_7318040, Cyc_car(data, ls_73533_733162), res_73534_733163));
} else { 
  
closureN_type c_7318044;
object e_7318048 [2];
c_7318044.hdr.mark = gc_color_red;
 c_7318044.hdr.grayed = 0;
c_7318044.tag = closureN_tag;
 c_7318044.fn = (function_type)__lambda_409;
c_7318044.num_args = 1;
c_7318044.num_elements = 2;
c_7318044.elements = (object *)e_7318048;
c_7318044.elements[0] = k_735236;
c_7318044.elements[1] = ls_73533_733162;

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318044, primitive_cons, NULL, res_73534_733163);}
;; 
}

static void __lambda_409(void *data, object self_7313400, int argc, object *args) /* object self_7313400, object r_735241_7312727 */
 {
 object r_735241_7312727 = args[0];
  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  ((closureN)self_7313400)->elements[0], r_735241_7312727, ((closureN)self_7313400)->elements[1]);; 
}

static void __lambda_406(void *data, object self_7313401, int argc, object *args) /* object self_7313401, object r_735235 */
 {
 object r_735235 = args[0];
  
closureN_type c_7318016;
object e_7318024 [4];
c_7318016.hdr.mark = gc_color_red;
 c_7318016.hdr.grayed = 0;
c_7318016.tag = closureN_tag;
 c_7318016.fn = (function_type)__lambda_407;
c_7318016.num_args = 1;
c_7318016.num_elements = 4;
c_7318016.elements = (object *)e_7318024;
c_7318016.elements[0] = ((closureN)self_7313401)->elements[0];
c_7318016.elements[1] = ((closureN)self_7313401)->elements[1];
c_7318016.elements[2] = ((closureN)self_7313401)->elements[2];
c_7318016.elements[3] = ((closureN)self_7313401)->elements[3];



return_direct_with_clo1(data,(closure)&c_7318016,__lambda_407,  Cyc_set_cell(data, ((closureN)self_7313401)->elements[1], r_735235));; 
}

static void __lambda_407(void *data, object self_7313402, int argc, object *args) /* object self_7313402, object r_735234 */
 {

  

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

static void __lambda_396(void *data, object _, int argc, object *args) /* closure _,object k_735219, object k_73522_733152, object fill_73523_733153_raw, ... */
 {
object k_735219 = args[0]; object k_73522_733152 = args[1];
load_varargs(fill_73523_733153, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:make-list");

closureN_type c_7317938;
object e_7318005 [3];
c_7317938.hdr.mark = gc_color_red;
 c_7317938.hdr.grayed = 0;
c_7317938.tag = closureN_tag;
 c_7317938.fn = (function_type)__lambda_397;
c_7317938.num_args = 2;
c_7317938.num_elements = 3;
c_7317938.elements = (object *)e_7318005;
c_7317938.elements[0] = fill_73523_733153;
c_7317938.elements[1] = k_735219;
c_7317938.elements[2] = k_73522_733152;

return_direct_with_clo2(data,(closure)&c_7317938,__lambda_397,  boolean_f, boolean_f);; 
}

static void __lambda_397(void *data, object self_7313388, int argc, object *args) /* object self_7313388, object x_73524_733154, object make_73525_733155 */
 {
 object x_73524_733154 = args[0]; object make_73525_733155 = args[1];
  
closureN_type c_7317940;
object e_7318001 [4];
c_7317940.hdr.mark = gc_color_red;
 c_7317940.hdr.grayed = 0;
c_7317940.tag = closureN_tag;
 c_7317940.fn = (function_type)__lambda_1369;
c_7317940.num_args = 1;
c_7317940.num_elements = 4;
c_7317940.elements = (object *)e_7318001;
c_7317940.elements[0] = ((closureN)self_7313388)->elements[0];
c_7317940.elements[1] = ((closureN)self_7313388)->elements[1];
c_7317940.elements[2] = ((closureN)self_7313388)->elements[2];
c_7317940.elements[3] = make_73525_733155;


pair_type local_7318004; 
return_direct_with_clo1(data,(closure)&c_7317940,__lambda_1369,  set_cell_as_expr(&local_7318004, x_73524_733154));; 
}

static void __lambda_1369(void *data, object self_7313389, int argc, object *args) /* object self_7313389, object x_73524_733154 */
 {
 object x_73524_733154 = args[0];
  
closureN_type c_7317942;
object e_7317996 [4];
c_7317942.hdr.mark = gc_color_red;
 c_7317942.hdr.grayed = 0;
c_7317942.tag = closureN_tag;
 c_7317942.fn = (function_type)__lambda_1368;
c_7317942.num_args = 1;
c_7317942.num_elements = 4;
c_7317942.elements = (object *)e_7317996;
c_7317942.elements[0] = ((closureN)self_7313389)->elements[0];
c_7317942.elements[1] = ((closureN)self_7313389)->elements[1];
c_7317942.elements[2] = ((closureN)self_7313389)->elements[2];
c_7317942.elements[3] = x_73524_733154;


pair_type local_7317999; 
return_direct_with_clo1(data,(closure)&c_7317942,__lambda_1368,  set_cell_as_expr(&local_7317999, ((closureN)self_7313389)->elements[3]));; 
}

static void __lambda_1368(void *data, object self_7313390, int argc, object *args) /* object self_7313390, object make_73525_733155 */
 {
 object make_73525_733155 = args[0];
  object r_735227;
    
if( (boolean_f != Cyc_is_null(((closureN)self_7313390)->elements[0])) ){ 
  r_735227 = boolean_f;
} else { 
  
  r_735227 = Cyc_car(data, ((closureN)self_7313390)->elements[0]);}
;
closureN_type c_7317953;
object e_7317992 [4];
c_7317953.hdr.mark = gc_color_red;
 c_7317953.hdr.grayed = 0;
c_7317953.tag = closureN_tag;
 c_7317953.fn = (function_type)__lambda_398;
c_7317953.num_args = 1;
c_7317953.num_elements = 4;
c_7317953.elements = (object *)e_7317992;
c_7317953.elements[0] = ((closureN)self_7313390)->elements[1];
c_7317953.elements[1] = ((closureN)self_7313390)->elements[2];
c_7317953.elements[2] = make_73525_733155;
c_7317953.elements[3] = ((closureN)self_7313390)->elements[3];



return_direct_with_clo1(data,(closure)&c_7317953,__lambda_398,  Cyc_set_cell(data, ((closureN)self_7313390)->elements[3], r_735227));; 
}

static void __lambda_398(void *data, object self_7313391, int argc, object *args) /* object self_7313391, object r_735220 */
 {

  
closureN_type c_7317955;
object e_7317971 [4];
c_7317955.hdr.mark = gc_color_red;
 c_7317955.hdr.grayed = 0;
c_7317955.tag = closureN_tag;
 c_7317955.fn = (function_type)__lambda_399;
c_7317955.num_args = 1;
c_7317955.num_elements = 4;
c_7317955.elements = (object *)e_7317971;
c_7317955.elements[0] = ((closureN)self_7313391)->elements[0];
c_7317955.elements[1] = ((closureN)self_7313391)->elements[1];
c_7317955.elements[2] = ((closureN)self_7313391)->elements[2];
c_7317955.elements[3] = ((closureN)self_7313391)->elements[3];


closureN_type c_7317972;
object e_7317991 [1];
c_7317972.hdr.mark = gc_color_red;
 c_7317972.hdr.grayed = 0;
c_7317972.tag = closureN_tag;
 c_7317972.fn = (function_type)__lambda_401;
c_7317972.num_args = 2;
c_7317972.num_elements = 1;
c_7317972.elements = (object *)e_7317991;
c_7317972.elements[0] = ((closureN)self_7313391)->elements[2];

return_direct_with_clo1(data,(closure)&c_7317955,__lambda_399,  &c_7317972);; 
}

static void __lambda_401(void *data, object self_7313392, int argc, object *args) /* object self_7313392, object k_735223, object n_73526_733156, object obj_73527_733157 */
 {
 object k_735223 = args[0]; object n_73526_733156 = args[1]; object obj_73527_733157 = args[2];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, n_73526_733156, obj_int2obj(0))) ){ 
  


closureN_type c_7317979;
object e_7317986 [2];
c_7317979.hdr.mark = gc_color_red;
 c_7317979.hdr.grayed = 0;
c_7317979.tag = closureN_tag;
 c_7317979.fn = (function_type)__lambda_402;
c_7317979.num_args = 1;
c_7317979.num_elements = 2;
c_7317979.elements = (object *)e_7317986;
c_7317979.elements[0] = k_735223;
c_7317979.elements[1] = obj_73527_733157;


complex_num_type local_7317989; 
return_closcall3(data,  car(((closureN)self_7313392)->elements[0]),  &c_7317979, Cyc_fast_sub(data,&local_7317989, n_73526_733156, obj_int2obj(1)), obj_73527_733157);
} else { 
  return_direct_with_clo1(data,  k_735223, (((closure)  k_735223)->fn),  NULL);}
;; 
}

static void __lambda_402(void *data, object self_7313393, int argc, object *args) /* object self_7313393, object r_735225 */
 {
 object r_735225 = args[0];
  
pair_type local_7317984; 
return_direct_with_clo1(data,  ((closureN)self_7313393)->elements[0], (((closure)  ((closureN)self_7313393)->elements[0])->fn),  set_pair_as_expr(&local_7317984, ((closureN)self_7313393)->elements[1], r_735225));; 
}

static void __lambda_399(void *data, object self_7313394, int argc, object *args) /* object self_7313394, object r_735222 */
 {
 object r_735222 = args[0];
  
closureN_type c_7317957;
object e_7317967 [4];
c_7317957.hdr.mark = gc_color_red;
 c_7317957.hdr.grayed = 0;
c_7317957.tag = closureN_tag;
 c_7317957.fn = (function_type)__lambda_400;
c_7317957.num_args = 1;
c_7317957.num_elements = 4;
c_7317957.elements = (object *)e_7317967;
c_7317957.elements[0] = ((closureN)self_7313394)->elements[0];
c_7317957.elements[1] = ((closureN)self_7313394)->elements[1];
c_7317957.elements[2] = ((closureN)self_7313394)->elements[2];
c_7317957.elements[3] = ((closureN)self_7313394)->elements[3];



return_direct_with_clo1(data,(closure)&c_7317957,__lambda_400,  Cyc_set_cell(data, ((closureN)self_7313394)->elements[2], r_735222));; 
}

static void __lambda_400(void *data, object self_7313395, int argc, object *args) /* object self_7313395, object r_735221 */
 {

  



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

static void __lambda_395(void *data, object _, int argc, object *args) /* closure _,object k_735216, object objs_73521_733151_raw, ... */
 {
object k_735216 = args[0];
load_varargs(objs_73521_733151, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:list");
return_direct_with_clo1(data,  k_735216, (((closure)  k_735216)->fn),  objs_73521_733151);; 
}

static void __lambda_386(void *data, object _, int argc, object *args) /* closure _,object k_735201, object lst_73514_733141_raw, ... */
 {
object k_735201 = args[0];
load_varargs(lst_73514_733141, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:append");

closureN_type c_7317871;
object e_7317933 [2];
c_7317871.hdr.mark = gc_color_red;
 c_7317871.hdr.grayed = 0;
c_7317871.tag = closureN_tag;
 c_7317871.fn = (function_type)__lambda_387;
c_7317871.num_args = 1;
c_7317871.num_elements = 2;
c_7317871.elements = (object *)e_7317933;
c_7317871.elements[0] = k_735201;
c_7317871.elements[1] = lst_73514_733141;

return_direct_with_clo1(data,(closure)&c_7317871,__lambda_387,  boolean_f);; 
}

static void __lambda_387(void *data, object self_7313379, int argc, object *args) /* object self_7313379, object append_912_733143 */
 {
 object append_912_733143 = args[0];
  
closureN_type c_7317873;
object e_7317929 [2];
c_7317873.hdr.mark = gc_color_red;
 c_7317873.hdr.grayed = 0;
c_7317873.tag = closureN_tag;
 c_7317873.fn = (function_type)__lambda_1367;
c_7317873.num_args = 1;
c_7317873.num_elements = 2;
c_7317873.elements = (object *)e_7317929;
c_7317873.elements[0] = ((closureN)self_7313379)->elements[0];
c_7317873.elements[1] = ((closureN)self_7313379)->elements[1];


pair_type local_7317932; 
return_direct_with_clo1(data,(closure)&c_7317873,__lambda_1367,  set_cell_as_expr(&local_7317932, append_912_733143));; 
}

static void __lambda_1367(void *data, object self_7313380, int argc, object *args) /* object self_7313380, object append_912_733143 */
 {
 object append_912_733143 = args[0];
  
closureN_type c_7317875;
object e_7317915 [3];
c_7317875.hdr.mark = gc_color_red;
 c_7317875.hdr.grayed = 0;
c_7317875.tag = closureN_tag;
 c_7317875.fn = (function_type)__lambda_388;
c_7317875.num_args = 1;
c_7317875.num_elements = 3;
c_7317875.elements = (object *)e_7317915;
c_7317875.elements[0] = append_912_733143;
c_7317875.elements[1] = ((closureN)self_7313380)->elements[0];
c_7317875.elements[2] = ((closureN)self_7313380)->elements[1];


mclosure0(c_7317916, (function_type)__lambda_392);c_7317916.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7317875,__lambda_388,  &c_7317916);; 
}

static void __lambda_392(void *data, object self_7313381, int argc, object *args) /* object self_7313381, object k_735211, object inlist_73515_733145, object alist_73516_733146 */
 {
 object k_735211 = args[0]; object inlist_73515_733145 = args[1]; object alist_73516_733146 = args[2];
  
closureN_type c_7317918;
object e_7317923 [3];
c_7317918.hdr.mark = gc_color_red;
 c_7317918.hdr.grayed = 0;
c_7317918.tag = closureN_tag;
 c_7317918.fn = (function_type)__lambda_393;
c_7317918.num_args = 1;
c_7317918.num_elements = 3;
c_7317918.elements = (object *)e_7317923;
c_7317918.elements[0] = alist_73516_733146;
c_7317918.elements[1] = inlist_73515_733145;
c_7317918.elements[2] = k_735211;


mclosure0(c_7317924, (function_type)__lambda_394);c_7317924.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7317918,__lambda_393,  &c_7317924);; 
}

static void __lambda_394(void *data, object self_7313382, int argc, object *args) /* object self_7313382, object k_735213, object ap_73517_733147, object in_73518_733148 */
 {
 object k_735213 = args[0]; object ap_73517_733147 = args[1]; object in_73518_733148 = args[2];
  
pair_type local_7317928; 
return_direct_with_clo1(data,  k_735213, (((closure)  k_735213)->fn),  set_pair_as_expr(&local_7317928, ap_73517_733147, in_73518_733148));; 
}

static void __lambda_393(void *data, object self_7313383, int argc, object *args) /* object self_7313383, object r_735212 */
 {
 object r_735212 = args[0];
  return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_7313383)->elements[2], r_735212, ((closureN)self_7313383)->elements[0], ((closureN)self_7313383)->elements[1]);; 
}

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



return_direct_with_clo1(data,(closure)&c_7317877,__lambda_389,  Cyc_set_cell(data, ((closureN)self_7313384)->elements[0], r_735210));; 
}

static void __lambda_389(void *data, object self_7313385, int argc, object *args) /* object self_7313385, object r_735202 */
 {

    
if( (boolean_f != Cyc_is_null(((closureN)self_7313385)->elements[2])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313385)->elements[1], (((closure)  ((closureN)self_7313385)->elements[1])->fn),  ((closureN)self_7313385)->elements[2]);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313385)->elements[2]))) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_7313385)->elements[1], (((closure)  ((closureN)self_7313385)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7313385)->elements[2]));
} else { 
  
closureN_type c_7317895;
object e_7317904 [2];
c_7317895.hdr.mark = gc_color_red;
 c_7317895.hdr.grayed = 0;
c_7317895.tag = closureN_tag;
 c_7317895.fn = (function_type)__lambda_390;
c_7317895.num_args = 1;
c_7317895.num_elements = 2;
c_7317895.elements = (object *)e_7317904;
c_7317895.elements[0] = ((closureN)self_7313385)->elements[1];
c_7317895.elements[1] = ((closureN)self_7313385)->elements[2];


closureN_type c_7317905;
object e_7317910 [1];
c_7317905.hdr.mark = gc_color_red;
 c_7317905.hdr.grayed = 0;
c_7317905.tag = closureN_tag;
 c_7317905.fn = (function_type)__lambda_391;
c_7317905.num_args = 2;
c_7317905.num_elements = 1;
c_7317905.elements = (object *)e_7317910;
c_7317905.elements[0] = ((closureN)self_7313385)->elements[0];

return_direct_with_clo1(data,(closure)&c_7317895,__lambda_390,  &c_7317905);}
;}
;; 
}

static void __lambda_391(void *data, object self_7313386, int argc, object *args) /* object self_7313386, object k_735208, object a_73519_733149, object b_73520_733150 */
 {
 object k_735208 = args[0]; object a_73519_733149 = args[1]; object b_73520_733150 = args[2];
  

return_closcall3(data,  car(((closureN)self_7313386)->elements[0]),  k_735208, b_73520_733150, a_73519_733149);; 
}

static void __lambda_390(void *data, object self_7313387, int argc, object *args) /* object self_7313387, object r_735205 */
 {
 object r_735205 = args[0];
  



return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7313387)->elements[0], r_735205, Cyc_car(data, ((closureN)self_7313387)->elements[1]), Cyc_cdr(data, ((closureN)self_7313387)->elements[1]));; 
}

static object __lambda_1462(void *data, object ptr,object n_73513_733140) {

  Cyc_st_add(data, "scheme/base.sld:negative?");


return_copy(ptr,  Cyc_num_fast_lt_op(data, n_73513_733140, obj_int2obj(0)));; 
}

static void __lambda_385(void *data, object _, int argc, object *args) /* closure _,object k_735198, object n_73513_733140 */
 {
object k_735198 = args[0]; object n_73513_733140 = args[1];
  Cyc_st_add(data, "scheme/base.sld:negative?");


return_direct_with_clo1(data,  k_735198, (((closure)  k_735198)->fn),  Cyc_num_fast_lt_op(data, n_73513_733140, obj_int2obj(0)));; 
}

static object __lambda_1461(void *data, object ptr,object n_73512_733139) {

  Cyc_st_add(data, "scheme/base.sld:positive?");


return_copy(ptr,  Cyc_num_fast_gt_op(data, n_73512_733139, obj_int2obj(0)));; 
}

static void __lambda_384(void *data, object _, int argc, object *args) /* closure _,object k_735195, object n_73512_733139 */
 {
object k_735195 = args[0]; object n_73512_733139 = args[1];
  Cyc_st_add(data, "scheme/base.sld:positive?");


return_direct_with_clo1(data,  k_735195, (((closure)  k_735195)->fn),  Cyc_num_fast_gt_op(data, n_73512_733139, obj_int2obj(0)));; 
}

static object __lambda_1460(void *data, object ptr,object n_73511_733138) {

  Cyc_st_add(data, "scheme/base.sld:zero?");


return_copy(ptr,  Cyc_num_fast_eq_op(data, n_73511_733138, obj_int2obj(0)));; 
}

static void __lambda_383(void *data, object _, int argc, object *args) /* closure _,object k_735192, object n_73511_733138 */
 {
object k_735192 = args[0]; object n_73511_733138 = args[1];
  Cyc_st_add(data, "scheme/base.sld:zero?");


return_direct_with_clo1(data,  k_735192, (((closure)  k_735192)->fn),  Cyc_num_fast_eq_op(data, n_73511_733138, obj_int2obj(0)));; 
}

static object __lambda_1459(void *data, object ptr, object o) { return Cyc_is_list(o); }
static void __lambda_1458(void *data, object _, int argc, object *args) {object k = args[0];object o = args[1]; return_closcall1(data, k, Cyc_is_list(o)); }
static object __lambda_1457(void *data, object ptr,object x_73510_733137) {

  Cyc_st_add(data, "scheme/base.sld:not");
if( (boolean_f != x_73510_733137) ){ 
  return_copy(ptr,  boolean_f);
} else { 
  return_copy(ptr,  boolean_t);}
;; 
}

static void __lambda_382(void *data, object _, int argc, object *args) /* closure _,object k_735189, object x_73510_733137 */
 {
object k_735189 = args[0]; object x_73510_733137 = args[1];
  Cyc_st_add(data, "scheme/base.sld:not");
if( (boolean_f != x_73510_733137) ){ 
  return_direct_with_clo1(data,  k_735189, (((closure)  k_735189)->fn),  boolean_f);
} else { 
  return_direct_with_clo1(data,  k_735189, (((closure)  k_735189)->fn),  boolean_t);}
;; 
}

static void __lambda_381(void *data, object _, int argc, object *args) /* closure _,object k_735185, object port_73509_733136_raw, ... */
 {
object k_735185 = args[0];
load_varargs(port_73509_733136, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:newline");

pair_type local_7317836; 

object c_7317833 = apply(data,  k_735185,__glo_write_91char_scheme_base, set_pair_as_expr(&local_7317836, obj_char2obj(10), port_73509_733136));
return_direct_with_clo1(data,  k_735185, (((closure)  k_735185)->fn),  c_7317833);; 
}

static void __lambda_379(void *data, object _, int argc, object *args) /* closure _,object k_735179, object char_73507_733134, object port_73508_733135_raw, ... */
 {
object k_735179 = args[0]; object char_73507_733134 = args[1];
load_varargs(port_73508_733135, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:write-char");
  
if( (boolean_f != Cyc_is_null(port_73508_733135)) ){ 
  
closureN_type c_7317817;
object e_7317823 [2];
c_7317817.hdr.mark = gc_color_red;
 c_7317817.hdr.grayed = 0;
c_7317817.tag = closureN_tag;
 c_7317817.fn = (function_type)__lambda_380;
c_7317817.num_args = 1;
c_7317817.num_elements = 2;
c_7317817.elements = (object *)e_7317823;
c_7317817.elements[0] = char_73507_733134;
c_7317817.elements[1] = k_735179;

return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317817);
} else { 
  



return_direct_with_clo1(data,  k_735179, (((closure)  k_735179)->fn),  Cyc_write_char(data, char_73507_733134, Cyc_car(data, port_73508_733135)));}
;; 
}

static void __lambda_380(void *data, object self_7313378, int argc, object *args) /* object self_7313378, object r_735181 */
 {
 object r_735181 = args[0];
  

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

static object __lambda_1456(void *data, object ptr, object bv, object port, object start, object end) { return Cyc_write_bytevector(data, bv, port, start, end); }
static void __lambda_1455(void *data, object _, int argc, object *args) {object k = args[0];object bv = args[1];object port = args[2];object start = args[3];object end = args[4]; return_closcall1(data, k, Cyc_write_bytevector(data, bv, port, start, end)); }
static void __lambda_369(void *data, object _, int argc, object *args) /* closure _,object k_735159, object vec_73501_733128, object opts_73502_733129_raw, ... */
 {
object k_735159 = args[0]; object vec_73501_733128 = args[1];
load_varargs(opts_73502_733129, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:write-bytevector");

closureN_type c_7317696;
object e_7317810 [3];
c_7317696.hdr.mark = gc_color_red;
 c_7317696.hdr.grayed = 0;
c_7317696.tag = closureN_tag;
 c_7317696.fn = (function_type)__lambda_370;
c_7317696.num_args = 4;
c_7317696.num_elements = 3;
c_7317696.elements = (object *)e_7317810;
c_7317696.elements[0] = k_735159;
c_7317696.elements[1] = opts_73502_733129;
c_7317696.elements[2] = vec_73501_733128;

return_direct_with_clo4(data,(closure)&c_7317696,__lambda_370,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_370(void *data, object self_7313365, int argc, object *args) /* object self_7313365, object len_73503_733130, object port_73504_733131, object start_73505_733132, object end_73506_733133 */
 {
 object len_73503_733130 = args[0]; object port_73504_733131 = args[1]; object start_73505_733132 = args[2]; object end_73506_733133 = args[3];
  
closureN_type c_7317698;
object e_7317806 [6];
c_7317698.hdr.mark = gc_color_red;
 c_7317698.hdr.grayed = 0;
c_7317698.tag = closureN_tag;
 c_7317698.fn = (function_type)__lambda_1366;
c_7317698.num_args = 1;
c_7317698.num_elements = 6;
c_7317698.elements = (object *)e_7317806;
c_7317698.elements[0] = end_73506_733133;
c_7317698.elements[1] = ((closureN)self_7313365)->elements[0];
c_7317698.elements[2] = ((closureN)self_7313365)->elements[1];
c_7317698.elements[3] = port_73504_733131;
c_7317698.elements[4] = start_73505_733132;
c_7317698.elements[5] = ((closureN)self_7313365)->elements[2];


pair_type local_7317809; 
return_direct_with_clo1(data,(closure)&c_7317698,__lambda_1366,  set_cell_as_expr(&local_7317809, len_73503_733130));; 
}

static void __lambda_1366(void *data, object self_7313366, int argc, object *args) /* object self_7313366, object len_73503_733130 */
 {
 object len_73503_733130 = args[0];
  
closureN_type c_7317700;
object e_7317801 [6];
c_7317700.hdr.mark = gc_color_red;
 c_7317700.hdr.grayed = 0;
c_7317700.tag = closureN_tag;
 c_7317700.fn = (function_type)__lambda_1365;
c_7317700.num_args = 1;
c_7317700.num_elements = 6;
c_7317700.elements = (object *)e_7317801;
c_7317700.elements[0] = ((closureN)self_7313366)->elements[0];
c_7317700.elements[1] = ((closureN)self_7313366)->elements[1];
c_7317700.elements[2] = len_73503_733130;
c_7317700.elements[3] = ((closureN)self_7313366)->elements[2];
c_7317700.elements[4] = ((closureN)self_7313366)->elements[4];
c_7317700.elements[5] = ((closureN)self_7313366)->elements[5];


pair_type local_7317804; 
return_direct_with_clo1(data,(closure)&c_7317700,__lambda_1365,  set_cell_as_expr(&local_7317804, ((closureN)self_7313366)->elements[3]));; 
}

static void __lambda_1365(void *data, object self_7313367, int argc, object *args) /* object self_7313367, object port_73504_733131 */
 {
 object port_73504_733131 = args[0];
  
closureN_type c_7317702;
object e_7317796 [6];
c_7317702.hdr.mark = gc_color_red;
 c_7317702.hdr.grayed = 0;
c_7317702.tag = closureN_tag;
 c_7317702.fn = (function_type)__lambda_1364;
c_7317702.num_args = 1;
c_7317702.num_elements = 6;
c_7317702.elements = (object *)e_7317796;
c_7317702.elements[0] = ((closureN)self_7313367)->elements[0];
c_7317702.elements[1] = ((closureN)self_7313367)->elements[1];
c_7317702.elements[2] = ((closureN)self_7313367)->elements[2];
c_7317702.elements[3] = ((closureN)self_7313367)->elements[3];
c_7317702.elements[4] = port_73504_733131;
c_7317702.elements[5] = ((closureN)self_7313367)->elements[5];


pair_type local_7317799; 
return_direct_with_clo1(data,(closure)&c_7317702,__lambda_1364,  set_cell_as_expr(&local_7317799, ((closureN)self_7313367)->elements[4]));; 
}

static void __lambda_1364(void *data, object self_7313368, int argc, object *args) /* object self_7313368, object start_73505_733132 */
 {
 object start_73505_733132 = args[0];
  
closureN_type c_7317704;
object e_7317791 [6];
c_7317704.hdr.mark = gc_color_red;
 c_7317704.hdr.grayed = 0;
c_7317704.tag = closureN_tag;
 c_7317704.fn = (function_type)__lambda_1363;
c_7317704.num_args = 1;
c_7317704.num_elements = 6;
c_7317704.elements = (object *)e_7317791;
c_7317704.elements[0] = ((closureN)self_7313368)->elements[1];
c_7317704.elements[1] = ((closureN)self_7313368)->elements[2];
c_7317704.elements[2] = ((closureN)self_7313368)->elements[3];
c_7317704.elements[3] = ((closureN)self_7313368)->elements[4];
c_7317704.elements[4] = start_73505_733132;
c_7317704.elements[5] = ((closureN)self_7313368)->elements[5];


pair_type local_7317794; 
return_direct_with_clo1(data,(closure)&c_7317704,__lambda_1363,  set_cell_as_expr(&local_7317794, ((closureN)self_7313368)->elements[0]));; 
}

static void __lambda_1363(void *data, object self_7313369, int argc, object *args) /* object self_7313369, object end_73506_733133 */
 {
 object end_73506_733133 = args[0];
  
closureN_type c_7317706;
object e_7317784 [7];
c_7317706.hdr.mark = gc_color_red;
 c_7317706.hdr.grayed = 0;
c_7317706.tag = closureN_tag;
 c_7317706.fn = (function_type)__lambda_371;
c_7317706.num_args = 1;
c_7317706.num_elements = 7;
c_7317706.elements = (object *)e_7317784;
c_7317706.elements[0] = end_73506_733133;
c_7317706.elements[1] = ((closureN)self_7313369)->elements[0];
c_7317706.elements[2] = ((closureN)self_7313369)->elements[1];
c_7317706.elements[3] = ((closureN)self_7313369)->elements[2];
c_7317706.elements[4] = ((closureN)self_7313369)->elements[3];
c_7317706.elements[5] = ((closureN)self_7313369)->elements[4];
c_7317706.elements[6] = ((closureN)self_7313369)->elements[5];





return_direct_with_clo1(data,(closure)&c_7317706,__lambda_371,  Cyc_set_cell(data, ((closureN)self_7313369)->elements[1], Cyc_bytevector_length(data, ((closureN)self_7313369)->elements[5])));; 
}

static void __lambda_371(void *data, object self_7313370, int argc, object *args) /* object self_7313370, object r_735160 */
 {

  
closureN_type c_7317708;
object e_7317719 [1];
c_7317708.hdr.mark = gc_color_red;
 c_7317708.hdr.grayed = 0;
c_7317708.tag = closureN_tag;
 c_7317708.fn = (function_type)__lambda_372;
c_7317708.num_args = 0;
c_7317708.num_elements = 1;
c_7317708.elements = (object *)e_7317719;
c_7317708.elements[0] = ((closureN)self_7313370)->elements[3];


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

return_direct_with_clo1(data,(closure)&c_7317708,__lambda_372,  &c_7317720);; 
}

static void __lambda_373(void *data, object self_7313371, int argc, object *args) /* object self_7313371, object r_735172 */
 {
 object r_735172 = args[0];
  
closureN_type c_7317722;
object e_7317779 [7];
c_7317722.hdr.mark = gc_color_red;
 c_7317722.hdr.grayed = 0;
c_7317722.tag = closureN_tag;
 c_7317722.fn = (function_type)__lambda_374;
c_7317722.num_args = 1;
c_7317722.num_elements = 7;
c_7317722.elements = (object *)e_7317779;
c_7317722.elements[0] = ((closureN)self_7313371)->elements[0];
c_7317722.elements[1] = ((closureN)self_7313371)->elements[1];
c_7317722.elements[2] = ((closureN)self_7313371)->elements[2];
c_7317722.elements[3] = ((closureN)self_7313371)->elements[3];
c_7317722.elements[4] = ((closureN)self_7313371)->elements[4];
c_7317722.elements[5] = ((closureN)self_7313371)->elements[5];
c_7317722.elements[6] = ((closureN)self_7313371)->elements[6];



return_direct_with_clo1(data,(closure)&c_7317722,__lambda_374,  Cyc_set_cell(data, ((closureN)self_7313371)->elements[4], r_735172));; 
}

static void __lambda_374(void *data, object self_7313372, int argc, object *args) /* object self_7313372, object r_735161 */
 {

  object r_735168;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313372)->elements[3]), obj_int2obj(1))) ){ 
  
  r_735168 = Cyc_cadr(data, ((closureN)self_7313372)->elements[3]);
} else { 
  r_735168 = obj_int2obj(0);}
;
closureN_type c_7317735;
object e_7317775 [7];
c_7317735.hdr.mark = gc_color_red;
 c_7317735.hdr.grayed = 0;
c_7317735.tag = closureN_tag;
 c_7317735.fn = (function_type)__lambda_375;
c_7317735.num_args = 1;
c_7317735.num_elements = 7;
c_7317735.elements = (object *)e_7317775;
c_7317735.elements[0] = ((closureN)self_7313372)->elements[0];
c_7317735.elements[1] = ((closureN)self_7313372)->elements[1];
c_7317735.elements[2] = ((closureN)self_7313372)->elements[2];
c_7317735.elements[3] = ((closureN)self_7313372)->elements[3];
c_7317735.elements[4] = ((closureN)self_7313372)->elements[4];
c_7317735.elements[5] = ((closureN)self_7313372)->elements[5];
c_7317735.elements[6] = ((closureN)self_7313372)->elements[6];



return_direct_with_clo1(data,(closure)&c_7317735,__lambda_375,  Cyc_set_cell(data, ((closureN)self_7313372)->elements[5], r_735168));; 
}

static void __lambda_375(void *data, object self_7313373, int argc, object *args) /* object self_7313373, object r_735162 */
 {

  
closureN_type c_7317737;
object e_7317751 [2];
c_7317737.hdr.mark = gc_color_red;
 c_7317737.hdr.grayed = 0;
c_7317737.tag = closureN_tag;
 c_7317737.fn = (function_type)__lambda_376;
c_7317737.num_args = 0;
c_7317737.num_elements = 2;
c_7317737.elements = (object *)e_7317751;
c_7317737.elements[0] = ((closureN)self_7313373)->elements[2];
c_7317737.elements[1] = ((closureN)self_7313373)->elements[3];


closureN_type c_7317752;
object e_7317774 [5];
c_7317752.hdr.mark = gc_color_red;
 c_7317752.hdr.grayed = 0;
c_7317752.tag = closureN_tag;
 c_7317752.fn = (function_type)__lambda_377;
c_7317752.num_args = 1;
c_7317752.num_elements = 5;
c_7317752.elements = (object *)e_7317774;
c_7317752.elements[0] = ((closureN)self_7313373)->elements[0];
c_7317752.elements[1] = ((closureN)self_7313373)->elements[1];
c_7317752.elements[2] = ((closureN)self_7313373)->elements[4];
c_7317752.elements[3] = ((closureN)self_7313373)->elements[5];
c_7317752.elements[4] = ((closureN)self_7313373)->elements[6];

return_direct_with_clo1(data,(closure)&c_7317737,__lambda_376,  &c_7317752);; 
}

static void __lambda_377(void *data, object self_7313374, int argc, object *args) /* object self_7313374, object r_735164 */
 {
 object r_735164 = args[0];
  
closureN_type c_7317754;
object e_7317770 [5];
c_7317754.hdr.mark = gc_color_red;
 c_7317754.hdr.grayed = 0;
c_7317754.tag = closureN_tag;
 c_7317754.fn = (function_type)__lambda_378;
c_7317754.num_args = 1;
c_7317754.num_elements = 5;
c_7317754.elements = (object *)e_7317770;
c_7317754.elements[0] = ((closureN)self_7313374)->elements[0];
c_7317754.elements[1] = ((closureN)self_7313374)->elements[1];
c_7317754.elements[2] = ((closureN)self_7313374)->elements[2];
c_7317754.elements[3] = ((closureN)self_7313374)->elements[3];
c_7317754.elements[4] = ((closureN)self_7313374)->elements[4];



return_direct_with_clo1(data,(closure)&c_7317754,__lambda_378,  Cyc_set_cell(data, ((closureN)self_7313374)->elements[0], r_735164));; 
}

static void __lambda_378(void *data, object self_7313375, int argc, object *args) /* object self_7313375, object r_735163 */
 {

  
complex_num_type local_7317759; 






return_direct_with_clo1(data,  ((closureN)self_7313375)->elements[1], (((closure)  ((closureN)self_7313375)->elements[1])->fn),  ((inline_function_type)
                   ((closure)__glo__75write_91bytevector_191_191inline_191_191_scheme_base)->fn)(data,&local_7317759, ((closureN)self_7313375)->elements[4], car(((closureN)self_7313375)->elements[2]), car(((closureN)self_7313375)->elements[3]), car(((closureN)self_7313375)->elements[0])));; 
}

static void __lambda_376(void *data, object self_7313376, int argc, object *args) /* object self_7313376, object k_735165 */
 {
 object k_735165 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313376)->elements[1]), obj_int2obj(2))) ){ 
  

return_direct_with_clo1(data,  k_735165,__lambda_377,  Cyc_caddr(data, ((closureN)self_7313376)->elements[1]));
} else { 
  

return_direct_with_clo1(data,  k_735165,__lambda_377,  car(((closureN)self_7313376)->elements[0]));}
;; 
}

static void __lambda_372(void *data, object self_7313377, int argc, object *args) /* object self_7313377, object k_735173 */
 {
 object k_735173 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313377)->elements[0]), obj_int2obj(0))) ){ 
  

return_direct_with_clo1(data,  k_735173, (((closure)  k_735173)->fn),  Cyc_car(data, ((closureN)self_7313377)->elements[0]));
} else { 
  return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  k_735173);}
;; 
}

static void __lambda_352(void *data, object _, int argc, object *args) /* closure _,object k_735128, object vec_73473_733117, object o_73474_733118_raw, ... */
 {
object k_735128 = args[0]; object vec_73473_733117 = args[1];
load_varargs(o_73474_733118, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:read-bytevector!");

closureN_type c_7317551;
object e_7317560 [1];
c_7317551.hdr.mark = gc_color_red;
 c_7317551.hdr.grayed = 0;
c_7317551.tag = closureN_tag;
 c_7317551.fn = (function_type)__lambda_353;
c_7317551.num_args = 0;
c_7317551.num_elements = 1;
c_7317551.elements = (object *)e_7317560;
c_7317551.elements[0] = o_73474_733118;


closureN_type c_7317561;
object e_7317693 [3];
c_7317561.hdr.mark = gc_color_red;
 c_7317561.hdr.grayed = 0;
c_7317561.tag = closureN_tag;
 c_7317561.fn = (function_type)__lambda_354;
c_7317561.num_args = 1;
c_7317561.num_elements = 3;
c_7317561.elements = (object *)e_7317693;
c_7317561.elements[0] = k_735128;
c_7317561.elements[1] = o_73474_733118;
c_7317561.elements[2] = vec_73473_733117;

return_direct_with_clo1(data,(closure)&c_7317551,__lambda_353,  &c_7317561);; 
}

static void __lambda_354(void *data, object self_7313348, int argc, object *args) /* object self_7313348, object in_73477_733119 */
 {
 object in_73477_733119 = args[0];
  object o_73480_733120;
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313348)->elements[1])) ){ 
  
  o_73480_733120 = Cyc_cdr(data, ((closureN)self_7313348)->elements[1]);
} else { 
  o_73480_733120 = ((closureN)self_7313348)->elements[1];}
;
closureN_type c_7317573;
object e_7317582 [1];
c_7317573.hdr.mark = gc_color_red;
 c_7317573.hdr.grayed = 0;
c_7317573.tag = closureN_tag;
 c_7317573.fn = (function_type)__lambda_355;
c_7317573.num_args = 0;
c_7317573.num_elements = 1;
c_7317573.elements = (object *)e_7317582;
c_7317573.elements[0] = o_73480_733120;


closureN_type c_7317583;
object e_7317692 [4];
c_7317583.hdr.mark = gc_color_red;
 c_7317583.hdr.grayed = 0;
c_7317583.tag = closureN_tag;
 c_7317583.fn = (function_type)__lambda_356;
c_7317583.num_args = 1;
c_7317583.num_elements = 4;
c_7317583.elements = (object *)e_7317692;
c_7317583.elements[0] = in_73477_733119;
c_7317583.elements[1] = ((closureN)self_7313348)->elements[0];
c_7317583.elements[2] = o_73480_733120;
c_7317583.elements[3] = ((closureN)self_7313348)->elements[2];

return_direct_with_clo1(data,(closure)&c_7317573,__lambda_355,  &c_7317583);; 
}

static void __lambda_356(void *data, object self_7313349, int argc, object *args) /* object self_7313349, object start_73483_733121 */
 {
 object start_73483_733121 = args[0];
  
closureN_type c_7317585;
object e_7317611 [2];
c_7317585.hdr.mark = gc_color_red;
 c_7317585.hdr.grayed = 0;
c_7317585.tag = closureN_tag;
 c_7317585.fn = (function_type)__lambda_357;
c_7317585.num_args = 0;
c_7317585.num_elements = 2;
c_7317585.elements = (object *)e_7317611;
c_7317585.elements[0] = ((closureN)self_7313349)->elements[2];
c_7317585.elements[1] = ((closureN)self_7313349)->elements[3];


closureN_type c_7317612;
object e_7317691 [4];
c_7317612.hdr.mark = gc_color_red;
 c_7317612.hdr.grayed = 0;
c_7317612.tag = closureN_tag;
 c_7317612.fn = (function_type)__lambda_360;
c_7317612.num_args = 1;
c_7317612.num_elements = 4;
c_7317612.elements = (object *)e_7317691;
c_7317612.elements[0] = ((closureN)self_7313349)->elements[0];
c_7317612.elements[1] = ((closureN)self_7313349)->elements[1];
c_7317612.elements[2] = start_73483_733121;
c_7317612.elements[3] = ((closureN)self_7313349)->elements[3];

return_direct_with_clo1(data,(closure)&c_7317585,__lambda_357,  &c_7317612);; 
}

static void __lambda_360(void *data, object self_7313350, int argc, object *args) /* object self_7313350, object end_73486_733122 */
 {
 object end_73486_733122 = args[0];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, ((closureN)self_7313350)->elements[2], end_73486_733122)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313350)->elements[1], (((closure)  ((closureN)self_7313350)->elements[1])->fn),  obj_int2obj(0));
} else { 
  
closureN_type c_7317619;
object e_7317685 [3];
c_7317619.hdr.mark = gc_color_red;
 c_7317619.hdr.grayed = 0;
c_7317619.tag = closureN_tag;
 c_7317619.fn = (function_type)__lambda_361;
c_7317619.num_args = 1;
c_7317619.num_elements = 3;
c_7317619.elements = (object *)e_7317685;
c_7317619.elements[0] = ((closureN)self_7313350)->elements[1];
c_7317619.elements[1] = ((closureN)self_7313350)->elements[2];
c_7317619.elements[2] = ((closureN)self_7313350)->elements[3];


complex_num_type local_7317688; 
return_direct_with_clo3(data,  __glo_read_91bytevector_scheme_base, (((closure)  __glo_read_91bytevector_scheme_base)->fn),  &c_7317619, Cyc_fast_sub(data,&local_7317688, end_73486_733122, ((closureN)self_7313350)->elements[2]), ((closureN)self_7313350)->elements[0]);}
;; 
}

static void __lambda_361(void *data, object self_7313351, int argc, object *args) /* object self_7313351, object res_73488_733123 */
 {
 object res_73488_733123 = args[0];
    
if( (boolean_f != Cyc_is_eof_object(res_73488_733123)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313351)->elements[0], (((closure)  ((closureN)self_7313351)->elements[0])->fn),  res_73488_733123);
} else { 
  
closureN_type c_7317625;
object e_7317682 [4];
c_7317625.hdr.mark = gc_color_red;
 c_7317625.hdr.grayed = 0;
c_7317625.tag = closureN_tag;
 c_7317625.fn = (function_type)__lambda_362;
c_7317625.num_args = 1;
c_7317625.num_elements = 4;
c_7317625.elements = (object *)e_7317682;
c_7317625.elements[0] = ((closureN)self_7313351)->elements[0];
c_7317625.elements[1] = res_73488_733123;
c_7317625.elements[2] = ((closureN)self_7313351)->elements[1];
c_7317625.elements[3] = ((closureN)self_7313351)->elements[2];



return_direct_with_clo1(data,(closure)&c_7317625,__lambda_362,  Cyc_bytevector_length(data, res_73488_733123));}
;; 
}

static void __lambda_362(void *data, object self_7313352, int argc, object *args) /* object self_7313352, object len_73493_733124 */
 {
 object len_73493_733124 = args[0];
  
closureN_type c_7317627;
object e_7317681 [5];
c_7317627.hdr.mark = gc_color_red;
 c_7317627.hdr.grayed = 0;
c_7317627.tag = closureN_tag;
 c_7317627.fn = (function_type)__lambda_363;
c_7317627.num_args = 1;
c_7317627.num_elements = 5;
c_7317627.elements = (object *)e_7317681;
c_7317627.elements[0] = ((closureN)self_7313352)->elements[0];
c_7317627.elements[1] = len_73493_733124;
c_7317627.elements[2] = ((closureN)self_7313352)->elements[1];
c_7317627.elements[3] = ((closureN)self_7313352)->elements[2];
c_7317627.elements[4] = ((closureN)self_7313352)->elements[3];

return_direct_with_clo1(data,(closure)&c_7317627,__lambda_363,  boolean_f);; 
}

static void __lambda_363(void *data, object self_7313353, int argc, object *args) /* object self_7313353, object lp_73494_73498_733126 */
 {
 object lp_73494_73498_733126 = args[0];
  
closureN_type c_7317629;
object e_7317677 [5];
c_7317629.hdr.mark = gc_color_red;
 c_7317629.hdr.grayed = 0;
c_7317629.tag = closureN_tag;
 c_7317629.fn = (function_type)__lambda_1362;
c_7317629.num_args = 1;
c_7317629.num_elements = 5;
c_7317629.elements = (object *)e_7317677;
c_7317629.elements[0] = ((closureN)self_7313353)->elements[0];
c_7317629.elements[1] = ((closureN)self_7313353)->elements[1];
c_7317629.elements[2] = ((closureN)self_7313353)->elements[2];
c_7317629.elements[3] = ((closureN)self_7313353)->elements[3];
c_7317629.elements[4] = ((closureN)self_7313353)->elements[4];


pair_type local_7317680; 
return_direct_with_clo1(data,(closure)&c_7317629,__lambda_1362,  set_cell_as_expr(&local_7317680, lp_73494_73498_733126));; 
}

static void __lambda_1362(void *data, object self_7313354, int argc, object *args) /* object self_7313354, object lp_73494_73498_733126 */
 {
 object lp_73494_73498_733126 = args[0];
  
closureN_type c_7317631;
object e_7317643 [2];
c_7317631.hdr.mark = gc_color_red;
 c_7317631.hdr.grayed = 0;
c_7317631.tag = closureN_tag;
 c_7317631.fn = (function_type)__lambda_364;
c_7317631.num_args = 1;
c_7317631.num_elements = 2;
c_7317631.elements = (object *)e_7317643;
c_7317631.elements[0] = ((closureN)self_7313354)->elements[0];
c_7317631.elements[1] = lp_73494_73498_733126;


closureN_type c_7317644;
object e_7317676 [5];
c_7317644.hdr.mark = gc_color_red;
 c_7317644.hdr.grayed = 0;
c_7317644.tag = closureN_tag;
 c_7317644.fn = (function_type)__lambda_366;
c_7317644.num_args = 1;
c_7317644.num_elements = 5;
c_7317644.elements = (object *)e_7317676;
c_7317644.elements[0] = ((closureN)self_7313354)->elements[1];
c_7317644.elements[1] = lp_73494_73498_733126;
c_7317644.elements[2] = ((closureN)self_7313354)->elements[2];
c_7317644.elements[3] = ((closureN)self_7313354)->elements[3];
c_7317644.elements[4] = ((closureN)self_7313354)->elements[4];

return_direct_with_clo1(data,(closure)&c_7317631,__lambda_364,  &c_7317644);; 
}

static void __lambda_366(void *data, object self_7313355, int argc, object *args) /* object self_7313355, object k_735139, object i_73499_733127 */
 {
 object k_735139 = args[0]; object i_73499_733127 = args[1];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_73499_733127, ((closureN)self_7313355)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_735139, (((closure)  k_735139)->fn),  ((closureN)self_7313355)->elements[0]);
} else { 
  
closureN_type c_7317651;
object e_7317672 [5];
c_7317651.hdr.mark = gc_color_red;
 c_7317651.hdr.grayed = 0;
c_7317651.tag = closureN_tag;
 c_7317651.fn = (function_type)__lambda_367;
c_7317651.num_args = 1;
c_7317651.num_elements = 5;
c_7317651.elements = (object *)e_7317672;
c_7317651.elements[0] = i_73499_733127;
c_7317651.elements[1] = k_735139;
c_7317651.elements[2] = ((closureN)self_7313355)->elements[1];
c_7317651.elements[3] = ((closureN)self_7313355)->elements[3];
c_7317651.elements[4] = ((closureN)self_7313355)->elements[4];



return_closcall1(data,(closure)&c_7317651,  Cyc_bytevector_u8_ref(data, ((closureN)self_7313355)->elements[2], i_73499_733127));}
;; 
}

static void __lambda_367(void *data, object self_7313356, int argc, object *args) /* object self_7313356, object r_735144 */
 {
 object r_735144 = args[0];
  
closureN_type c_7317653;
object e_7317663 [3];
c_7317653.hdr.mark = gc_color_red;
 c_7317653.hdr.grayed = 0;
c_7317653.tag = closureN_tag;
 c_7317653.fn = (function_type)__lambda_368;
c_7317653.num_args = 1;
c_7317653.num_elements = 3;
c_7317653.elements = (object *)e_7317663;
c_7317653.elements[0] = ((closureN)self_7313356)->elements[0];
c_7317653.elements[1] = ((closureN)self_7313356)->elements[1];
c_7317653.elements[2] = ((closureN)self_7313356)->elements[2];




complex_num_type local_7317669; 
return_closcall1(data,(closure)&c_7317653,  Cyc_bytevector_u8_set(data, ((closureN)self_7313356)->elements[4], Cyc_fast_sum(data,&local_7317669, ((closureN)self_7313356)->elements[0], ((closureN)self_7313356)->elements[3]), r_735144));; 
}

static void __lambda_368(void *data, object self_7313357, int argc, object *args) /* object self_7313357, object r_735141 */
 {

  


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

static void __lambda_364(void *data, object self_7313358, int argc, object *args) /* object self_7313358, object r_735138 */
 {
 object r_735138 = args[0];
  
closureN_type c_7317633;
object e_7317639 [2];
c_7317633.hdr.mark = gc_color_red;
 c_7317633.hdr.grayed = 0;
c_7317633.tag = closureN_tag;
 c_7317633.fn = (function_type)__lambda_365;
c_7317633.num_args = 1;
c_7317633.num_elements = 2;
c_7317633.elements = (object *)e_7317639;
c_7317633.elements[0] = ((closureN)self_7313358)->elements[0];
c_7317633.elements[1] = ((closureN)self_7313358)->elements[1];



return_direct_with_clo1(data,(closure)&c_7317633,__lambda_365,  Cyc_set_cell(data, ((closureN)self_7313358)->elements[1], r_735138));; 
}

static void __lambda_365(void *data, object self_7313359, int argc, object *args) /* object self_7313359, object r_735137 */
 {

  

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

static void __lambda_357(void *data, object self_7313360, int argc, object *args) /* object self_7313360, object k_735146 */
 {
 object k_735146 = args[0];
  
closureN_type c_7317587;
object e_7317598 [1];
c_7317587.hdr.mark = gc_color_red;
 c_7317587.hdr.grayed = 0;
c_7317587.tag = closureN_tag;
 c_7317587.fn = (function_type)__lambda_358;
c_7317587.num_args = 0;
c_7317587.num_elements = 1;
c_7317587.elements = (object *)e_7317598;
c_7317587.elements[0] = ((closureN)self_7313360)->elements[0];


closureN_type c_7317599;
object e_7317610 [3];
c_7317599.hdr.mark = gc_color_red;
 c_7317599.hdr.grayed = 0;
c_7317599.tag = closureN_tag;
 c_7317599.fn = (function_type)__lambda_359;
c_7317599.num_args = 1;
c_7317599.num_elements = 3;
c_7317599.elements = (object *)e_7317610;
c_7317599.elements[0] = k_735146;
c_7317599.elements[1] = ((closureN)self_7313360)->elements[0];
c_7317599.elements[2] = ((closureN)self_7313360)->elements[1];

return_direct_with_clo1(data,(closure)&c_7317587,__lambda_358,  &c_7317599);; 
}

static void __lambda_359(void *data, object self_7313361, int argc, object *args) /* object self_7313361, object r_735147 */
 {
 object r_735147 = args[0];
  if( (boolean_f != r_735147) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_7313361)->elements[0], (((closure)  ((closureN)self_7313361)->elements[0])->fn),  Cyc_cadr(data, ((closureN)self_7313361)->elements[1]));
} else { 
  

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

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



return_direct_with_clo1(data,  k_735148,__lambda_359,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313362)->elements[0])));
} else { 
  return_direct_with_clo1(data,  k_735148,__lambda_359,  boolean_f);}
;; 
}

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

return_direct_with_clo1(data,  k_735151,__lambda_356,  Cyc_car(data, ((closureN)self_7313363)->elements[0]));
} else { 
  return_direct_with_clo1(data,  k_735151,__lambda_356,  obj_int2obj(0));}
;; 
}

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

return_direct_with_clo1(data,  k_735155, (((closure)  k_735155)->fn),  Cyc_car(data, ((closureN)self_7313364)->elements[0]));
} else { 
  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_735155);}
;; 
}

static void __lambda_340(void *data, object _, int argc, object *args) /* closure _,object k_735110, object k_73462_733110, object _191port_73463_733111_raw, ... */
 {
object k_735110 = args[0]; object k_73462_733110 = args[1];
load_varargs(_191port_73463_733111, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:read-bytevector");

closureN_type c_7317433;
object e_7317548 [3];
c_7317433.hdr.mark = gc_color_red;
 c_7317433.hdr.grayed = 0;
c_7317433.tag = closureN_tag;
 c_7317433.fn = (function_type)__lambda_341;
c_7317433.num_args = 3;
c_7317433.num_elements = 3;
c_7317433.elements = (object *)e_7317548;
c_7317433.elements[0] = _191port_73463_733111;
c_7317433.elements[1] = k_73462_733110;
c_7317433.elements[2] = k_735110;

return_direct_with_clo3(data,(closure)&c_7317433,__lambda_341,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_341(void *data, object self_7313334, int argc, object *args) /* object self_7313334, object port_73464_733112, object bv_73465_733113, object loop_73466_733114 */
 {
 object port_73464_733112 = args[0]; object bv_73465_733113 = args[1]; object loop_73466_733114 = args[2];
  
closureN_type c_7317435;
object e_7317544 [5];
c_7317435.hdr.mark = gc_color_red;
 c_7317435.hdr.grayed = 0;
c_7317435.tag = closureN_tag;
 c_7317435.fn = (function_type)__lambda_1361;
c_7317435.num_args = 1;
c_7317435.num_elements = 5;
c_7317435.elements = (object *)e_7317544;
c_7317435.elements[0] = ((closureN)self_7313334)->elements[0];
c_7317435.elements[1] = bv_73465_733113;
c_7317435.elements[2] = ((closureN)self_7313334)->elements[1];
c_7317435.elements[3] = ((closureN)self_7313334)->elements[2];
c_7317435.elements[4] = loop_73466_733114;


pair_type local_7317547; 
return_direct_with_clo1(data,(closure)&c_7317435,__lambda_1361,  set_cell_as_expr(&local_7317547, port_73464_733112));; 
}

static void __lambda_1361(void *data, object self_7313335, int argc, object *args) /* object self_7313335, object port_73464_733112 */
 {
 object port_73464_733112 = args[0];
  
closureN_type c_7317437;
object e_7317539 [5];
c_7317437.hdr.mark = gc_color_red;
 c_7317437.hdr.grayed = 0;
c_7317437.tag = closureN_tag;
 c_7317437.fn = (function_type)__lambda_1360;
c_7317437.num_args = 1;
c_7317437.num_elements = 5;
c_7317437.elements = (object *)e_7317539;
c_7317437.elements[0] = ((closureN)self_7313335)->elements[0];
c_7317437.elements[1] = ((closureN)self_7313335)->elements[2];
c_7317437.elements[2] = ((closureN)self_7313335)->elements[3];
c_7317437.elements[3] = ((closureN)self_7313335)->elements[4];
c_7317437.elements[4] = port_73464_733112;


pair_type local_7317542; 
return_direct_with_clo1(data,(closure)&c_7317437,__lambda_1360,  set_cell_as_expr(&local_7317542, ((closureN)self_7313335)->elements[1]));; 
}

static void __lambda_1360(void *data, object self_7313336, int argc, object *args) /* object self_7313336, object bv_73465_733113 */
 {
 object bv_73465_733113 = args[0];
  
closureN_type c_7317439;
object e_7317534 [5];
c_7317439.hdr.mark = gc_color_red;
 c_7317439.hdr.grayed = 0;
c_7317439.tag = closureN_tag;
 c_7317439.fn = (function_type)__lambda_1359;
c_7317439.num_args = 1;
c_7317439.num_elements = 5;
c_7317439.elements = (object *)e_7317534;
c_7317439.elements[0] = ((closureN)self_7313336)->elements[0];
c_7317439.elements[1] = bv_73465_733113;
c_7317439.elements[2] = ((closureN)self_7313336)->elements[1];
c_7317439.elements[3] = ((closureN)self_7313336)->elements[2];
c_7317439.elements[4] = ((closureN)self_7313336)->elements[4];


pair_type local_7317537; 
return_direct_with_clo1(data,(closure)&c_7317439,__lambda_1359,  set_cell_as_expr(&local_7317537, ((closureN)self_7313336)->elements[3]));; 
}

static void __lambda_1359(void *data, object self_7313337, int argc, object *args) /* object self_7313337, object loop_73466_733114 */
 {
 object loop_73466_733114 = args[0];
  
closureN_type c_7317441;
object e_7317452 [2];
c_7317441.hdr.mark = gc_color_red;
 c_7317441.hdr.grayed = 0;
c_7317441.tag = closureN_tag;
 c_7317441.fn = (function_type)__lambda_342;
c_7317441.num_args = 0;
c_7317441.num_elements = 2;
c_7317441.elements = (object *)e_7317452;
c_7317441.elements[0] = ((closureN)self_7313337)->elements[0];
c_7317441.elements[1] = ((closureN)self_7313337)->elements[4];


closureN_type c_7317453;
object e_7317533 [5];
c_7317453.hdr.mark = gc_color_red;
 c_7317453.hdr.grayed = 0;
c_7317453.tag = closureN_tag;
 c_7317453.fn = (function_type)__lambda_343;
c_7317453.num_args = 1;
c_7317453.num_elements = 5;
c_7317453.elements = (object *)e_7317533;
c_7317453.elements[0] = ((closureN)self_7313337)->elements[1];
c_7317453.elements[1] = ((closureN)self_7313337)->elements[2];
c_7317453.elements[2] = ((closureN)self_7313337)->elements[3];
c_7317453.elements[3] = loop_73466_733114;
c_7317453.elements[4] = ((closureN)self_7313337)->elements[4];

return_direct_with_clo1(data,(closure)&c_7317441,__lambda_342,  &c_7317453);; 
}

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



return_direct_with_clo1(data,(closure)&c_7317455,__lambda_344,  Cyc_set_cell(data, ((closureN)self_7313338)->elements[4], r_735123));; 
}

static void __lambda_344(void *data, object self_7313339, int argc, object *args) /* object self_7313339, object r_735111 */
 {

  
closureN_type c_7317457;
object e_7317524 [5];
c_7317457.hdr.mark = gc_color_red;
 c_7317457.hdr.grayed = 0;
c_7317457.tag = closureN_tag;
 c_7317457.fn = (function_type)__lambda_345;
c_7317457.num_args = 1;
c_7317457.num_elements = 5;
c_7317457.elements = (object *)e_7317524;
c_7317457.elements[0] = ((closureN)self_7313339)->elements[0];
c_7317457.elements[1] = ((closureN)self_7313339)->elements[1];
c_7317457.elements[2] = ((closureN)self_7313339)->elements[2];
c_7317457.elements[3] = ((closureN)self_7313339)->elements[3];
c_7317457.elements[4] = ((closureN)self_7313339)->elements[4];


object c_7317527 = Cyc_make_bytevector(data,(closure)&c_7317457,1,((closureN)self_7313339)->elements[1]);
return_closcall1(data,(closure)&c_7317457,  c_7317527);; 
}

static void __lambda_345(void *data, object self_7313340, int argc, object *args) /* object self_7313340, object r_735122 */
 {
 object r_735122 = args[0];
  
closureN_type c_7317459;
object e_7317520 [5];
c_7317459.hdr.mark = gc_color_red;
 c_7317459.hdr.grayed = 0;
c_7317459.tag = closureN_tag;
 c_7317459.fn = (function_type)__lambda_346;
c_7317459.num_args = 1;
c_7317459.num_elements = 5;
c_7317459.elements = (object *)e_7317520;
c_7317459.elements[0] = ((closureN)self_7313340)->elements[0];
c_7317459.elements[1] = ((closureN)self_7313340)->elements[1];
c_7317459.elements[2] = ((closureN)self_7313340)->elements[2];
c_7317459.elements[3] = ((closureN)self_7313340)->elements[3];
c_7317459.elements[4] = ((closureN)self_7313340)->elements[4];



return_direct_with_clo1(data,(closure)&c_7317459,__lambda_346,  Cyc_set_cell(data, ((closureN)self_7313340)->elements[0], r_735122));; 
}

static void __lambda_346(void *data, object self_7313341, int argc, object *args) /* object self_7313341, object r_735112 */
 {

  
closureN_type c_7317461;
object e_7317473 [2];
c_7317461.hdr.mark = gc_color_red;
 c_7317461.hdr.grayed = 0;
c_7317461.tag = closureN_tag;
 c_7317461.fn = (function_type)__lambda_347;
c_7317461.num_args = 1;
c_7317461.num_elements = 2;
c_7317461.elements = (object *)e_7317473;
c_7317461.elements[0] = ((closureN)self_7313341)->elements[2];
c_7317461.elements[1] = ((closureN)self_7313341)->elements[3];


closureN_type c_7317474;
object e_7317519 [4];
c_7317474.hdr.mark = gc_color_red;
 c_7317474.hdr.grayed = 0;
c_7317474.tag = closureN_tag;
 c_7317474.fn = (function_type)__lambda_349;
c_7317474.num_args = 1;
c_7317474.num_elements = 4;
c_7317474.elements = (object *)e_7317519;
c_7317474.elements[0] = ((closureN)self_7313341)->elements[0];
c_7317474.elements[1] = ((closureN)self_7313341)->elements[1];
c_7317474.elements[2] = ((closureN)self_7313341)->elements[3];
c_7317474.elements[3] = ((closureN)self_7313341)->elements[4];

return_direct_with_clo1(data,(closure)&c_7317461,__lambda_347,  &c_7317474);; 
}

static void __lambda_349(void *data, object self_7313342, int argc, object *args) /* object self_7313342, object k_735115, object n_73467_733115 */
 {
 object k_735115 = args[0]; object n_73467_733115 = args[1];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, n_73467_733115, ((closureN)self_7313342)->elements[1])) ){ 
  

return_direct_with_clo1(data,  k_735115, (((closure)  k_735115)->fn),  car(((closureN)self_7313342)->elements[0]));
} else { 
  
closureN_type c_7317483;
object e_7317515 [4];
c_7317483.hdr.mark = gc_color_red;
 c_7317483.hdr.grayed = 0;
c_7317483.tag = closureN_tag;
 c_7317483.fn = (function_type)__lambda_350;
c_7317483.num_args = 1;
c_7317483.num_elements = 4;
c_7317483.elements = (object *)e_7317515;
c_7317483.elements[0] = ((closureN)self_7313342)->elements[0];
c_7317483.elements[1] = k_735115;
c_7317483.elements[2] = ((closureN)self_7313342)->elements[2];
c_7317483.elements[3] = n_73467_733115;



return_direct_with_clo2(data,  __glo_read_91u8_scheme_base, (((closure)  __glo_read_91u8_scheme_base)->fn),  &c_7317483, car(((closureN)self_7313342)->elements[3]));}
;; 
}

static void __lambda_350(void *data, object self_7313343, int argc, object *args) /* object self_7313343, object b_73468_733116 */
 {
 object b_73468_733116 = args[0];
    
if( (boolean_f != Cyc_is_eof_object(b_73468_733116)) ){ 
    
if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_7313343)->elements[3], obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313343)->elements[1], (((closure)  ((closureN)self_7313343)->elements[1])->fn),  b_73468_733116);
} else { 
  

return_direct_with_clo4(data,  __glo_bytevector_91copy_scheme_base, (((closure)  __glo_bytevector_91copy_scheme_base)->fn),  ((closureN)self_7313343)->elements[1], car(((closureN)self_7313343)->elements[0]), obj_int2obj(0), ((closureN)self_7313343)->elements[3]);}
;
} else { 
  
closureN_type c_7317498;
object e_7317508 [3];
c_7317498.hdr.mark = gc_color_red;
 c_7317498.hdr.grayed = 0;
c_7317498.tag = closureN_tag;
 c_7317498.fn = (function_type)__lambda_351;
c_7317498.num_args = 1;
c_7317498.num_elements = 3;
c_7317498.elements = (object *)e_7317508;
c_7317498.elements[0] = ((closureN)self_7313343)->elements[1];
c_7317498.elements[1] = ((closureN)self_7313343)->elements[2];
c_7317498.elements[2] = ((closureN)self_7313343)->elements[3];





return_closcall1(data,(closure)&c_7317498,  Cyc_bytevector_u8_set(data, car(((closureN)self_7313343)->elements[0]), ((closureN)self_7313343)->elements[3], b_73468_733116));}
;; 
}

static void __lambda_351(void *data, object self_7313344, int argc, object *args) /* object self_7313344, object r_735120 */
 {

  


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

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



return_direct_with_clo1(data,(closure)&c_7317463,__lambda_348,  Cyc_set_cell(data, ((closureN)self_7313345)->elements[1], r_735114));; 
}

static void __lambda_348(void *data, object self_7313346, int argc, object *args) /* object self_7313346, object r_735113 */
 {

  

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

static void __lambda_342(void *data, object self_7313347, int argc, object *args) /* object self_7313347, object k_735124 */
 {
 object k_735124 = args[0];
    
  
if( (boolean_f != Cyc_is_null(car(((closureN)self_7313347)->elements[1]))) ){ 
  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_735124);
} else { 
  

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

static void __lambda_336(void *data, object _, int argc, object *args) /* closure _,object k_735095, object str_73451_733106, object opts_73452_733107_raw, ... */
 {
object k_735095 = args[0]; object str_73451_733106 = args[1];
load_varargs(opts_73452_733107, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:write-string");
  
if( (boolean_f != Cyc_is_null(opts_73452_733107)) ){ 
  
closureN_type c_7317385;
object e_7317391 [2];
c_7317385.hdr.mark = gc_color_red;
 c_7317385.hdr.grayed = 0;
c_7317385.tag = closureN_tag;
 c_7317385.fn = (function_type)__lambda_337;
c_7317385.num_args = 1;
c_7317385.num_elements = 2;
c_7317385.elements = (object *)e_7317391;
c_7317385.elements[0] = k_735095;
c_7317385.elements[1] = str_73451_733106;

return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317385);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, opts_73452_733107))) ){ 
  



return_direct_with_clo1(data,  k_735095, (((closure)  k_735095)->fn),  Cyc_display_va(data, 2,str_73451_733106, Cyc_car(data, opts_73452_733107)));
} else { 
  object r_735101;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, opts_73452_733107), obj_int2obj(2))) ){ 
  
  r_735101 = Cyc_caddr(data, opts_73452_733107);
} else { 
  
  r_735101 = Cyc_string_length(data, str_73451_733106);}
;
closureN_type c_7317413;
object e_7317428 [3];
c_7317413.hdr.mark = gc_color_red;
 c_7317413.hdr.grayed = 0;
c_7317413.tag = closureN_tag;
 c_7317413.fn = (function_type)__lambda_338;
c_7317413.num_args = 2;
c_7317413.num_elements = 3;
c_7317413.elements = (object *)e_7317428;
c_7317413.elements[0] = k_735095;
c_7317413.elements[1] = opts_73452_733107;
c_7317413.elements[2] = str_73451_733106;



return_direct_with_clo2(data,(closure)&c_7317413,__lambda_338,  Cyc_cadr(data, opts_73452_733107), r_735101);}
;}
;; 
}

static void __lambda_338(void *data, object self_7313332, int argc, object *args) /* object self_7313332, object start_73460_733108, object end_73461_733109 */
 {
 object start_73460_733108 = args[0]; object end_73461_733109 = args[1];
  
closureN_type c_7317415;
object e_7317423 [2];
c_7317415.hdr.mark = gc_color_red;
 c_7317415.hdr.grayed = 0;
c_7317415.tag = closureN_tag;
 c_7317415.fn = (function_type)__lambda_339;
c_7317415.num_args = 1;
c_7317415.num_elements = 2;
c_7317415.elements = (object *)e_7317423;
c_7317415.elements[0] = ((closureN)self_7313332)->elements[0];
c_7317415.elements[1] = ((closureN)self_7313332)->elements[1];


object c_7317426 = Cyc_substring(data,(closure)&c_7317415,((closureN)self_7313332)->elements[2], start_73460_733108, end_73461_733109);
return_closcall1(data,(closure)&c_7317415,  c_7317426);; 
}

static void __lambda_339(void *data, object self_7313333, int argc, object *args) /* object self_7313333, object r_735102 */
 {
 object r_735102 = args[0];
  



return_direct_with_clo1(data,  ((closureN)self_7313333)->elements[0], (((closure)  ((closureN)self_7313333)->elements[0])->fn),  Cyc_display_va(data, 2,r_735102, Cyc_car(data, ((closureN)self_7313333)->elements[1])));; 
}

static void __lambda_337(void *data, object self_7313331, int argc, object *args) /* object self_7313331, object r_735097 */
 {
 object r_735097 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_7313331)->elements[0], (((closure)  ((closureN)self_7313331)->elements[0])->fn),  Cyc_display_va(data, 2,((closureN)self_7313331)->elements[1], r_735097));; 
}

static void __lambda_335(void *data, object _, int argc, object *args) /* closure _,object k_735092, object str_73449_733104, object port_73450_733105 */
 {
object k_735092 = args[0]; object str_73449_733104 = args[1]; object port_73450_733105 = args[2];
  Cyc_st_add(data, "scheme/base.sld:write-string-2");


return_direct_with_clo1(data,  k_735092, (((closure)  k_735092)->fn),  Cyc_display_va(data, 2,str_73449_733104, port_73450_733105));; 
}

static void __lambda_333(void *data, object _, int argc, object *args) /* closure _,object k_735088, object str_73448_733103 */
 {
object k_735088 = args[0]; object str_73448_733103 = args[1];
  Cyc_st_add(data, "scheme/base.sld:write-string-1");

closureN_type c_7317370;
object e_7317376 [2];
c_7317370.hdr.mark = gc_color_red;
 c_7317370.hdr.grayed = 0;
c_7317370.tag = closureN_tag;
 c_7317370.fn = (function_type)__lambda_334;
c_7317370.num_args = 1;
c_7317370.num_elements = 2;
c_7317370.elements = (object *)e_7317376;
c_7317370.elements[0] = k_735088;
c_7317370.elements[1] = str_73448_733103;

return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317370);; 
}

static void __lambda_334(void *data, object self_7313330, int argc, object *args) /* object self_7313330, object r_735089 */
 {
 object r_735089 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_7313330)->elements[0], (((closure)  ((closureN)self_7313330)->elements[0])->fn),  Cyc_display_va(data, 2,((closureN)self_7313330)->elements[1], r_735089));; 
}

static void __lambda_331(void *data, object _, int argc, object *args) /* closure _,object k_735082, object port_73447_733102_raw, ... */
 {
object k_735082 = args[0];
load_varargs(port_73447_733102, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:flush-output-port");
  
if( (boolean_f != Cyc_is_null(port_73447_733102)) ){ 
  
closureN_type c_7317357;
object e_7317362 [1];
c_7317357.hdr.mark = gc_color_red;
 c_7317357.hdr.grayed = 0;
c_7317357.tag = closureN_tag;
 c_7317357.fn = (function_type)__lambda_332;
c_7317357.num_args = 1;
c_7317357.num_elements = 1;
c_7317357.elements = (object *)e_7317362;
c_7317357.elements[0] = k_735082;

return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317357);
} else { 
  



return_direct_with_clo1(data,  k_735082, (((closure)  k_735082)->fn),  Cyc_io_flush_output_port(data, Cyc_car(data, port_73447_733102)));}
;; 
}

static void __lambda_332(void *data, object self_7313329, int argc, object *args) /* object self_7313329, object r_735084 */
 {
 object r_735084 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_7313329)->elements[0], (((closure)  ((closureN)self_7313329)->elements[0])->fn),  Cyc_io_flush_output_port(data, r_735084));; 
}

static void __lambda_329(void *data, object _, int argc, object *args) /* closure _,object k_735077, object obj_73445_733101 */
 {
object k_735077 = args[0]; object obj_73445_733101 = args[1];
  Cyc_st_add(data, "scheme/base.sld:textual-port?");
  
if( (boolean_f != Cyc_is_port(obj_73445_733101)) ){ 
    
if( (boolean_f != Cyc_is_port(obj_73445_733101)) ){ 
  
closureN_type c_7317345;
object e_7317350 [1];
c_7317345.hdr.mark = gc_color_red;
 c_7317345.hdr.grayed = 0;
c_7317345.tag = closureN_tag;
 c_7317345.fn = (function_type)__lambda_330;
c_7317345.num_args = 1;
c_7317345.num_elements = 1;
c_7317345.elements = (object *)e_7317350;
c_7317345.elements[0] = k_735077;

return_direct_with_clo2(data,  __glo__191binary_91port_127_scheme_base, (((closure)  __glo__191binary_91port_127_scheme_base)->fn),  &c_7317345, obj_73445_733101);
} else { 
  return_direct_with_clo1(data,  k_735077, (((closure)  k_735077)->fn),  boolean_t);}
;
} else { 
  return_direct_with_clo1(data,  k_735077, (((closure)  k_735077)->fn),  boolean_f);}
;; 
}

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

static void __lambda_328(void *data, object _, int argc, object *args) /* closure _,object k_735073, object obj_73443_733100 */
 {
object k_735073 = args[0]; object obj_73443_733100 = args[1];
  Cyc_st_add(data, "scheme/base.sld:binary-port?");
  
if( (boolean_f != Cyc_is_port(obj_73443_733100)) ){ 
  return_direct_with_clo2(data,  __glo__191binary_91port_127_scheme_base, (((closure)  __glo__191binary_91port_127_scheme_base)->fn),  k_735073, obj_73443_733100);
} else { 
  return_direct_with_clo1(data,  k_735073, (((closure)  k_735073)->fn),  boolean_f);}
;; 
}

static void __lambda_1454(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; object rv = boolean_f;
        port_type *p = (port_type *)obj;
        if (p->flags & CYC_BINARY_PORT_FLAG) {
          rv = boolean_t;
        }
        return_closcall1(data, k, rv);  }
static void __lambda_316(void *data, object _, int argc, object *args) /* closure _,object k_735051, object k_73425_733090, object opts_73426_733091_raw, ... */
 {
object k_735051 = args[0]; object k_73425_733090 = args[1];
load_varargs(opts_73426_733091, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:read-string");

closureN_type c_7317228;
object e_7317237 [1];
c_7317228.hdr.mark = gc_color_red;
 c_7317228.hdr.grayed = 0;
c_7317228.tag = closureN_tag;
 c_7317228.fn = (function_type)__lambda_317;
c_7317228.num_args = 0;
c_7317228.num_elements = 1;
c_7317228.elements = (object *)e_7317237;
c_7317228.elements[0] = opts_73426_733091;


closureN_type c_7317238;
object e_7317332 [2];
c_7317238.hdr.mark = gc_color_red;
 c_7317238.hdr.grayed = 0;
c_7317238.tag = closureN_tag;
 c_7317238.fn = (function_type)__lambda_318;
c_7317238.num_args = 1;
c_7317238.num_elements = 2;
c_7317238.elements = (object *)e_7317332;
c_7317238.elements[0] = k_73425_733090;
c_7317238.elements[1] = k_735051;

return_direct_with_clo1(data,(closure)&c_7317228,__lambda_317,  &c_7317238);; 
}

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


object c_7317331 = Cyc_io_peek_char(data,(closure)&c_7317240,port_73427_733092);
return_closcall1(data,(closure)&c_7317240,  c_7317331);; 
}

static void __lambda_319(void *data, object self_7313317, int argc, object *args) /* object self_7313317, object r_735068 */
 {
 object r_735068 = args[0];
    
if( (boolean_f != Cyc_is_eof_object(r_735068)) ){ 
  
complex_num_type local_7317247; 
return_direct_with_clo1(data,  ((closureN)self_7313317)->elements[1], (((closure)  ((closureN)self_7313317)->elements[1])->fn),  ((inline_function_type)
                   ((closure)__glo_eof_91object_191_191inline_191_191_scheme_base)->fn)(data,&local_7317247));
} else { 
  
closureN_type c_7317249;
object e_7317326 [2];
c_7317249.hdr.mark = gc_color_red;
 c_7317249.hdr.grayed = 0;
c_7317249.tag = closureN_tag;
 c_7317249.fn = (function_type)__lambda_320;
c_7317249.num_args = 2;
c_7317249.num_elements = 2;
c_7317249.elements = (object *)e_7317326;
c_7317249.elements[0] = ((closureN)self_7313317)->elements[1];
c_7317249.elements[1] = ((closureN)self_7313317)->elements[2];

return_direct_with_clo2(data,(closure)&c_7317249,__lambda_320,  NULL, ((closureN)self_7313317)->elements[0]);}
;; 
}

static void __lambda_320(void *data, object self_7313318, int argc, object *args) /* object self_7313318, object acc_73429_733093, object i_73430_733094 */
 {
 object acc_73429_733093 = args[0]; object i_73430_733094 = args[1];
  
closureN_type c_7317251;
object e_7317325 [4];
c_7317251.hdr.mark = gc_color_red;
 c_7317251.hdr.grayed = 0;
c_7317251.tag = closureN_tag;
 c_7317251.fn = (function_type)__lambda_321;
c_7317251.num_args = 1;
c_7317251.num_elements = 4;
c_7317251.elements = (object *)e_7317325;
c_7317251.elements[0] = acc_73429_733093;
c_7317251.elements[1] = i_73430_733094;
c_7317251.elements[2] = ((closureN)self_7313318)->elements[0];
c_7317251.elements[3] = ((closureN)self_7313318)->elements[1];

return_direct_with_clo1(data,(closure)&c_7317251,__lambda_321,  boolean_f);; 
}

static void __lambda_321(void *data, object self_7313319, int argc, object *args) /* object self_7313319, object loop_73432_733096 */
 {
 object loop_73432_733096 = args[0];
  
closureN_type c_7317253;
object e_7317321 [4];
c_7317253.hdr.mark = gc_color_red;
 c_7317253.hdr.grayed = 0;
c_7317253.tag = closureN_tag;
 c_7317253.fn = (function_type)__lambda_1358;
c_7317253.num_args = 1;
c_7317253.num_elements = 4;
c_7317253.elements = (object *)e_7317321;
c_7317253.elements[0] = ((closureN)self_7313319)->elements[0];
c_7317253.elements[1] = ((closureN)self_7313319)->elements[1];
c_7317253.elements[2] = ((closureN)self_7313319)->elements[2];
c_7317253.elements[3] = ((closureN)self_7313319)->elements[3];


pair_type local_7317324; 
return_direct_with_clo1(data,(closure)&c_7317253,__lambda_1358,  set_cell_as_expr(&local_7317324, loop_73432_733096));; 
}

static void __lambda_1358(void *data, object self_7313320, int argc, object *args) /* object self_7313320, object loop_73432_733096 */
 {
 object loop_73432_733096 = args[0];
  
closureN_type c_7317255;
object e_7317269 [4];
c_7317255.hdr.mark = gc_color_red;
 c_7317255.hdr.grayed = 0;
c_7317255.tag = closureN_tag;
 c_7317255.fn = (function_type)__lambda_322;
c_7317255.num_args = 1;
c_7317255.num_elements = 4;
c_7317255.elements = (object *)e_7317269;
c_7317255.elements[0] = ((closureN)self_7313320)->elements[0];
c_7317255.elements[1] = ((closureN)self_7313320)->elements[1];
c_7317255.elements[2] = ((closureN)self_7313320)->elements[2];
c_7317255.elements[3] = loop_73432_733096;


closureN_type c_7317270;
object e_7317320 [2];
c_7317270.hdr.mark = gc_color_red;
 c_7317270.hdr.grayed = 0;
c_7317270.tag = closureN_tag;
 c_7317270.fn = (function_type)__lambda_324;
c_7317270.num_args = 3;
c_7317270.num_elements = 2;
c_7317270.elements = (object *)e_7317320;
c_7317270.elements[0] = loop_73432_733096;
c_7317270.elements[1] = ((closureN)self_7313320)->elements[3];

return_direct_with_clo1(data,(closure)&c_7317255,__lambda_322,  &c_7317270);; 
}

static void __lambda_324(void *data, object self_7313321, int argc, object *args) /* object self_7313321, object k_735057, object acc_73433_733097, object i_73434_733098, object chr_73435_733099 */
 {
 object k_735057 = args[0]; object acc_73433_733097 = args[1]; object i_73434_733098 = args[2]; object chr_73435_733099 = args[3];
    
if( (boolean_f != Cyc_is_eof_object(chr_73435_733099)) ){ 
  
closureN_type c_7317274;
object e_7317280 [1];
c_7317274.hdr.mark = gc_color_red;
 c_7317274.hdr.grayed = 0;
c_7317274.tag = closureN_tag;
 c_7317274.fn = (function_type)__lambda_325;
c_7317274.num_args = 1;
c_7317274.num_elements = 1;
c_7317274.elements = (object *)e_7317280;
c_7317274.elements[0] = k_735057;

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7317274, primitive_cons, NULL, acc_73433_733097);
} else { 
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73434_733098, obj_int2obj(0))) ){ 
  object r_735062_738417;
  if( (boolean_f != chr_73435_733099) ){ 
  object local_7317287 = alloca(sizeof(pair_type)); 
  r_735062_738417 = set_pair_as_expr(local_7317287, chr_73435_733099, acc_73433_733097);
} else { 
  r_735062_738417 = acc_73433_733097;}
;
closureN_type c_7317290;
object e_7317296 [1];
c_7317290.hdr.mark = gc_color_red;
 c_7317290.hdr.grayed = 0;
c_7317290.tag = closureN_tag;
 c_7317290.fn = (function_type)__lambda_326;
c_7317290.num_args = 1;
c_7317290.num_elements = 1;
c_7317290.elements = (object *)e_7317296;
c_7317290.elements[0] = k_735057;

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7317290, primitive_cons, NULL, r_735062_738417);
} else { 
  object r_735064_738420;
  if( (boolean_f != chr_73435_733099) ){ 
  object local_7317301 = alloca(sizeof(pair_type)); 
  r_735064_738420 = set_pair_as_expr(local_7317301, chr_73435_733099, acc_73433_733097);
} else { 
  r_735064_738420 = acc_73433_733097;}
;
closureN_type c_7317304;
object e_7317315 [4];
c_7317304.hdr.mark = gc_color_red;
 c_7317304.hdr.grayed = 0;
c_7317304.tag = closureN_tag;
 c_7317304.fn = (function_type)__lambda_327;
c_7317304.num_args = 1;
c_7317304.num_elements = 4;
c_7317304.elements = (object *)e_7317315;
c_7317304.elements[0] = i_73434_733098;
c_7317304.elements[1] = k_735057;
c_7317304.elements[2] = ((closureN)self_7313321)->elements[0];
c_7317304.elements[3] = r_735064_738420;


object c_7317318 = Cyc_io_read_char(data,(closure)&c_7317304,((closureN)self_7313321)->elements[1]);
return_closcall1(data,(closure)&c_7317304,  c_7317318);}
;}
;; 
}

static void __lambda_327(void *data, object self_7313324, int argc, object *args) /* object self_7313324, object r_735066_738421 */
 {
 object r_735066_738421 = args[0];
  


complex_num_type local_7317313; 
return_closcall4(data,  car(((closureN)self_7313324)->elements[2]),  ((closureN)self_7313324)->elements[1], ((closureN)self_7313324)->elements[3], Cyc_fast_sub(data,&local_7317313, ((closureN)self_7313324)->elements[0], obj_int2obj(1)), r_735066_738421);; 
}

static void __lambda_326(void *data, object self_7313323, int argc, object *args) /* object self_7313323, object r_735061_738418_7312724 */
 {
 object r_735061_738418_7312724 = args[0];
  
object c_7317295 = Cyc_list2string(data,  ((closureN)self_7313323)->elements[0],r_735061_738418_7312724);
return_direct_with_clo1(data,  ((closureN)self_7313323)->elements[0], (((closure)  ((closureN)self_7313323)->elements[0])->fn),  c_7317295);; 
}

static void __lambda_325(void *data, object self_7313322, int argc, object *args) /* object self_7313322, object r_735059_7312723 */
 {
 object r_735059_7312723 = args[0];
  
object c_7317279 = Cyc_list2string(data,  ((closureN)self_7313322)->elements[0],r_735059_7312723);
return_direct_with_clo1(data,  ((closureN)self_7313322)->elements[0], (((closure)  ((closureN)self_7313322)->elements[0])->fn),  c_7317279);; 
}

static void __lambda_322(void *data, object self_7313325, int argc, object *args) /* object self_7313325, object r_735056 */
 {
 object r_735056 = args[0];
  
closureN_type c_7317257;
object e_7317265 [4];
c_7317257.hdr.mark = gc_color_red;
 c_7317257.hdr.grayed = 0;
c_7317257.tag = closureN_tag;
 c_7317257.fn = (function_type)__lambda_323;
c_7317257.num_args = 1;
c_7317257.num_elements = 4;
c_7317257.elements = (object *)e_7317265;
c_7317257.elements[0] = ((closureN)self_7313325)->elements[0];
c_7317257.elements[1] = ((closureN)self_7313325)->elements[1];
c_7317257.elements[2] = ((closureN)self_7313325)->elements[2];
c_7317257.elements[3] = ((closureN)self_7313325)->elements[3];



return_direct_with_clo1(data,(closure)&c_7317257,__lambda_323,  Cyc_set_cell(data, ((closureN)self_7313325)->elements[3], r_735056));; 
}

static void __lambda_323(void *data, object self_7313326, int argc, object *args) /* object self_7313326, object r_735055 */
 {

  

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

static void __lambda_317(void *data, object self_7313327, int argc, object *args) /* object self_7313327, object k_735069 */
 {
 object k_735069 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_7313327)->elements[0])) ){ 
  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_735069);
} else { 
  

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

static void __lambda_306(void *data, object _, int argc, object *args) /* closure _,object k_735035, object str_73410_733083, object port_73411_733084 */
 {
object k_735035 = args[0]; object str_73410_733083 = args[1]; object port_73411_733084 = args[2];
  Cyc_st_add(data, "scheme/base.sld:_read-line");

closureN_type c_7317145;
object e_7317222 [3];
c_7317145.hdr.mark = gc_color_red;
 c_7317145.hdr.grayed = 0;
c_7317145.tag = closureN_tag;
 c_7317145.fn = (function_type)__lambda_307;
c_7317145.num_args = 1;
c_7317145.num_elements = 3;
c_7317145.elements = (object *)e_7317222;
c_7317145.elements[0] = k_735035;
c_7317145.elements[1] = port_73411_733084;
c_7317145.elements[2] = str_73410_733083;


object c_7317225 = Cyc_io_read_line(data,(closure)&c_7317145,port_73411_733084);
return_closcall1(data,(closure)&c_7317145,  c_7317225);; 
}

static void __lambda_307(void *data, object self_7313306, int argc, object *args) /* object self_7313306, object r_735037 */
 {
 object r_735037 = args[0];
  
closureN_type c_7317147;
object e_7317217 [2];
c_7317147.hdr.mark = gc_color_red;
 c_7317147.hdr.grayed = 0;
c_7317147.tag = closureN_tag;
 c_7317147.fn = (function_type)__lambda_308;
c_7317147.num_args = 2;
c_7317147.num_elements = 2;
c_7317147.elements = (object *)e_7317217;
c_7317147.elements[0] = ((closureN)self_7313306)->elements[0];
c_7317147.elements[1] = ((closureN)self_7313306)->elements[1];


pair_type local_7317220; 
return_direct_with_clo2(data,(closure)&c_7317147,__lambda_308,  set_cell_as_expr(&local_7317220, ((closureN)self_7313306)->elements[2]), r_735037);; 
}

static void __lambda_308(void *data, object self_7313307, int argc, object *args) /* object self_7313307, object lis_73413_733085, object str_73414_733086 */
 {
 object lis_73413_733085 = args[0]; object str_73414_733086 = args[1];
  
closureN_type c_7317149;
object e_7317216 [4];
c_7317149.hdr.mark = gc_color_red;
 c_7317149.hdr.grayed = 0;
c_7317149.tag = closureN_tag;
 c_7317149.fn = (function_type)__lambda_309;
c_7317149.num_args = 1;
c_7317149.num_elements = 4;
c_7317149.elements = (object *)e_7317216;
c_7317149.elements[0] = ((closureN)self_7313307)->elements[0];
c_7317149.elements[1] = lis_73413_733085;
c_7317149.elements[2] = ((closureN)self_7313307)->elements[1];
c_7317149.elements[3] = str_73414_733086;

return_direct_with_clo1(data,(closure)&c_7317149,__lambda_309,  boolean_f);; 
}

static void __lambda_309(void *data, object self_7313308, int argc, object *args) /* object self_7313308, object loop_73415_733087 */
 {
 object loop_73415_733087 = args[0];
  
closureN_type c_7317151;
object e_7317212 [4];
c_7317151.hdr.mark = gc_color_red;
 c_7317151.hdr.grayed = 0;
c_7317151.tag = closureN_tag;
 c_7317151.fn = (function_type)__lambda_1357;
c_7317151.num_args = 1;
c_7317151.num_elements = 4;
c_7317151.elements = (object *)e_7317212;
c_7317151.elements[0] = ((closureN)self_7313308)->elements[0];
c_7317151.elements[1] = ((closureN)self_7313308)->elements[1];
c_7317151.elements[2] = ((closureN)self_7313308)->elements[2];
c_7317151.elements[3] = ((closureN)self_7313308)->elements[3];


pair_type local_7317215; 
return_direct_with_clo1(data,(closure)&c_7317151,__lambda_1357,  set_cell_as_expr(&local_7317215, loop_73415_733087));; 
}

static void __lambda_1357(void *data, object self_7313309, int argc, object *args) /* object self_7313309, object loop_73415_733087 */
 {
 object loop_73415_733087 = args[0];
  
closureN_type c_7317153;
object e_7317167 [4];
c_7317153.hdr.mark = gc_color_red;
 c_7317153.hdr.grayed = 0;
c_7317153.tag = closureN_tag;
 c_7317153.fn = (function_type)__lambda_310;
c_7317153.num_args = 1;
c_7317153.num_elements = 4;
c_7317153.elements = (object *)e_7317167;
c_7317153.elements[0] = ((closureN)self_7313309)->elements[0];
c_7317153.elements[1] = ((closureN)self_7313309)->elements[1];
c_7317153.elements[2] = loop_73415_733087;
c_7317153.elements[3] = ((closureN)self_7313309)->elements[3];


closureN_type c_7317168;
object e_7317211 [2];
c_7317168.hdr.mark = gc_color_red;
 c_7317168.hdr.grayed = 0;
c_7317168.tag = closureN_tag;
 c_7317168.fn = (function_type)__lambda_312;
c_7317168.num_args = 2;
c_7317168.num_elements = 2;
c_7317168.elements = (object *)e_7317211;
c_7317168.elements[0] = loop_73415_733087;
c_7317168.elements[1] = ((closureN)self_7313309)->elements[2];

return_direct_with_clo1(data,(closure)&c_7317153,__lambda_310,  &c_7317168);; 
}

static void __lambda_312(void *data, object self_7313310, int argc, object *args) /* object self_7313310, object k_735040, object lis_73416_733088, object str_73417_733089 */
 {
 object k_735040 = args[0]; object lis_73416_733088 = args[1]; object str_73417_733089 = args[2];
    
if( (boolean_f != Cyc_is_eof_object(str_73417_733089)) ){ 
  
closureN_type c_7317172;
object e_7317178 [1];
c_7317172.hdr.mark = gc_color_red;
 c_7317172.hdr.grayed = 0;
c_7317172.tag = closureN_tag;
 c_7317172.fn = (function_type)__lambda_313;
c_7317172.num_args = 1;
c_7317172.num_elements = 1;
c_7317172.elements = (object *)e_7317178;
c_7317172.elements[0] = k_735040;

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7317172, primitive_cons, NULL, lis_73416_733088);
} else { 
    
  
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_string_length(data, str_73417_733089), obj_int2obj(1022))) ){ 
  
closureN_type c_7317184;
object e_7317190 [1];
c_7317184.hdr.mark = gc_color_red;
 c_7317184.hdr.grayed = 0;
c_7317184.tag = closureN_tag;
 c_7317184.fn = (function_type)__lambda_314;
c_7317184.num_args = 1;
c_7317184.num_elements = 1;
c_7317184.elements = (object *)e_7317190;
c_7317184.elements[0] = k_735040;


pair_type local_7317193; 
return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7317184, primitive_cons, NULL, set_pair_as_expr(&local_7317193, str_73417_733089, lis_73416_733088));
} else { 
  
closureN_type c_7317195;
object e_7317206 [4];
c_7317195.hdr.mark = gc_color_red;
 c_7317195.hdr.grayed = 0;
c_7317195.tag = closureN_tag;
 c_7317195.fn = (function_type)__lambda_315;
c_7317195.num_args = 1;
c_7317195.num_elements = 4;
c_7317195.elements = (object *)e_7317206;
c_7317195.elements[0] = k_735040;
c_7317195.elements[1] = lis_73416_733088;
c_7317195.elements[2] = ((closureN)self_7313310)->elements[0];
c_7317195.elements[3] = str_73417_733089;


object c_7317209 = Cyc_io_read_line(data,(closure)&c_7317195,((closureN)self_7313310)->elements[1]);
return_closcall1(data,(closure)&c_7317195,  c_7317209);}
;}
;; 
}

static void __lambda_315(void *data, object self_7313313, int argc, object *args) /* object self_7313313, object r_735047 */
 {
 object r_735047 = args[0];
  


pair_type local_7317203; 
return_closcall3(data,  car(((closureN)self_7313313)->elements[2]),  ((closureN)self_7313313)->elements[0], set_pair_as_expr(&local_7317203, ((closureN)self_7313313)->elements[3], ((closureN)self_7313313)->elements[1]), r_735047);; 
}

static void __lambda_314(void *data, object self_7313312, int argc, object *args) /* object self_7313312, object r_735044_7312722 */
 {
 object r_735044_7312722 = args[0];
  
object c_7317189 = apply(data,  ((closureN)self_7313312)->elements[0],primitive_string_91append, r_735044_7312722);
return_direct_with_clo1(data,  ((closureN)self_7313312)->elements[0], (((closure)  ((closureN)self_7313312)->elements[0])->fn),  c_7317189);; 
}

static void __lambda_313(void *data, object self_7313311, int argc, object *args) /* object self_7313311, object r_735042_7312721 */
 {
 object r_735042_7312721 = args[0];
  
object c_7317177 = apply(data,  ((closureN)self_7313311)->elements[0],primitive_string_91append, r_735042_7312721);
return_direct_with_clo1(data,  ((closureN)self_7313311)->elements[0], (((closure)  ((closureN)self_7313311)->elements[0])->fn),  c_7317177);; 
}

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



return_direct_with_clo1(data,(closure)&c_7317155,__lambda_311,  Cyc_set_cell(data, ((closureN)self_7313314)->elements[2], r_735039));; 
}

static void __lambda_311(void *data, object self_7313315, int argc, object *args) /* object self_7313315, object r_735038 */
 {

  

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

static void __lambda_301(void *data, object _, int argc, object *args) /* closure _,object k_735025, object o_73395_733080_raw, ... */
 {
object k_735025 = args[0];
load_varargs(o_73395_733080, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:read-line");

closureN_type c_7317107;
object e_7317116 [1];
c_7317107.hdr.mark = gc_color_red;
 c_7317107.hdr.grayed = 0;
c_7317107.tag = closureN_tag;
 c_7317107.fn = (function_type)__lambda_302;
c_7317107.num_args = 0;
c_7317107.num_elements = 1;
c_7317107.elements = (object *)e_7317116;
c_7317107.elements[0] = o_73395_733080;


closureN_type c_7317117;
object e_7317142 [1];
c_7317117.hdr.mark = gc_color_red;
 c_7317117.hdr.grayed = 0;
c_7317117.tag = closureN_tag;
 c_7317117.fn = (function_type)__lambda_303;
c_7317117.num_args = 1;
c_7317117.num_elements = 1;
c_7317117.elements = (object *)e_7317142;
c_7317117.elements[0] = k_735025;

return_direct_with_clo1(data,(closure)&c_7317107,__lambda_302,  &c_7317117);; 
}

static void __lambda_303(void *data, object self_7313302, int argc, object *args) /* object self_7313302, object port_73398_733081 */
 {
 object port_73398_733081 = args[0];
  
closureN_type c_7317119;
object e_7317138 [2];
c_7317119.hdr.mark = gc_color_red;
 c_7317119.hdr.grayed = 0;
c_7317119.tag = closureN_tag;
 c_7317119.fn = (function_type)__lambda_304;
c_7317119.num_args = 1;
c_7317119.num_elements = 2;
c_7317119.elements = (object *)e_7317138;
c_7317119.elements[0] = ((closureN)self_7313302)->elements[0];
c_7317119.elements[1] = port_73398_733081;


object c_7317141 = Cyc_io_read_line(data,(closure)&c_7317119,port_73398_733081);
return_closcall1(data,(closure)&c_7317119,  c_7317141);; 
}

static void __lambda_304(void *data, object self_7313303, int argc, object *args) /* object self_7313303, object str_73401_733082 */
 {
 object str_73401_733082 = args[0];
    
if( (boolean_f != Cyc_is_eof_object(str_73401_733082)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313303)->elements[0], (((closure)  ((closureN)self_7313303)->elements[0])->fn),  str_73401_733082);
} else { 
  
closureN_type c_7317125;
object e_7317135 [3];
c_7317125.hdr.mark = gc_color_red;
 c_7317125.hdr.grayed = 0;
c_7317125.tag = closureN_tag;
 c_7317125.fn = (function_type)__lambda_305;
c_7317125.num_args = 1;
c_7317125.num_elements = 3;
c_7317125.elements = (object *)e_7317135;
c_7317125.elements[0] = ((closureN)self_7313303)->elements[0];
c_7317125.elements[1] = ((closureN)self_7313303)->elements[1];
c_7317125.elements[2] = str_73401_733082;



return_direct_with_clo1(data,(closure)&c_7317125,__lambda_305,  Cyc_string_length(data, str_73401_733082));}
;; 
}

static void __lambda_305(void *data, object self_7313304, int argc, object *args) /* object self_7313304, object r_735030 */
 {
 object r_735030 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, r_735030, obj_int2obj(1022))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313304)->elements[0], (((closure)  ((closureN)self_7313304)->elements[0])->fn),  ((closureN)self_7313304)->elements[2]);
} else { 
  return_direct_with_clo3(data,  __glo__191read_91line_scheme_base, (((closure)  __glo__191read_91line_scheme_base)->fn),  ((closureN)self_7313304)->elements[0], ((closureN)self_7313304)->elements[2], ((closureN)self_7313304)->elements[1]);}
;; 
}

static void __lambda_302(void *data, object self_7313305, int argc, object *args) /* object self_7313305, object k_735031 */
 {
 object k_735031 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_7313305)->elements[0])) ){ 
  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_735031);
} else { 
  

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

static void __lambda_299(void *data, object _, int argc, object *args) /* closure _,object k_735019, object port_73394_733079_raw, ... */
 {
object k_735019 = args[0];
load_varargs(port_73394_733079, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:read-char");
  
if( (boolean_f != Cyc_is_null(port_73394_733079)) ){ 
  
closureN_type c_7317092;
object e_7317098 [1];
c_7317092.hdr.mark = gc_color_red;
 c_7317092.hdr.grayed = 0;
c_7317092.tag = closureN_tag;
 c_7317092.fn = (function_type)__lambda_300;
c_7317092.num_args = 1;
c_7317092.num_elements = 1;
c_7317092.elements = (object *)e_7317098;
c_7317092.elements[0] = k_735019;

return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7317092);
} else { 
  


object c_7317102 = Cyc_io_read_char(data,  k_735019,Cyc_car(data, port_73394_733079));
return_direct_with_clo1(data,  k_735019, (((closure)  k_735019)->fn),  c_7317102);}
;; 
}

static void __lambda_300(void *data, object self_7313301, int argc, object *args) /* object self_7313301, object r_735021 */
 {
 object r_735021 = args[0];
  
object c_7317097 = Cyc_io_read_char(data,  ((closureN)self_7313301)->elements[0],r_735021);
return_direct_with_clo1(data,  ((closureN)self_7313301)->elements[0], (((closure)  ((closureN)self_7313301)->elements[0])->fn),  c_7317097);; 
}

static void __lambda_297(void *data, object _, int argc, object *args) /* closure _,object k_735013, object port_73393_733078_raw, ... */
 {
object k_735013 = args[0];
load_varargs(port_73393_733078, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:peek-char");
  
if( (boolean_f != Cyc_is_null(port_73393_733078)) ){ 
  
closureN_type c_7317075;
object e_7317081 [1];
c_7317075.hdr.mark = gc_color_red;
 c_7317075.hdr.grayed = 0;
c_7317075.tag = closureN_tag;
 c_7317075.fn = (function_type)__lambda_298;
c_7317075.num_args = 1;
c_7317075.num_elements = 1;
c_7317075.elements = (object *)e_7317081;
c_7317075.elements[0] = k_735013;

return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7317075);
} else { 
  


object c_7317085 = Cyc_io_peek_char(data,  k_735013,Cyc_car(data, port_73393_733078));
return_direct_with_clo1(data,  k_735013, (((closure)  k_735013)->fn),  c_7317085);}
;; 
}

static void __lambda_298(void *data, object self_7313300, int argc, object *args) /* object self_7313300, object r_735015 */
 {
 object r_735015 = args[0];
  
object c_7317080 = Cyc_io_peek_char(data,  ((closureN)self_7313300)->elements[0],r_735015);
return_direct_with_clo1(data,  ((closureN)self_7313300)->elements[0], (((closure)  ((closureN)self_7313300)->elements[0])->fn),  c_7317080);; 
}

static void __lambda_295(void *data, object _, int argc, object *args) /* closure _,object k_735007, object port_73392_733077_raw, ... */
 {
object k_735007 = args[0];
load_varargs(port_73392_733077, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:char-ready?");
  
if( (boolean_f != Cyc_is_null(port_73392_733077)) ){ 
  
closureN_type c_7317064;
object e_7317067 [1];
c_7317064.hdr.mark = gc_color_red;
 c_7317064.hdr.grayed = 0;
c_7317064.tag = closureN_tag;
 c_7317064.fn = (function_type)__lambda_296;
c_7317064.num_args = 1;
c_7317064.num_elements = 1;
c_7317064.elements = (object *)e_7317067;
c_7317064.elements[0] = k_735007;

return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7317064);
} else { 
  

return_direct_with_clo2(data,  __glo_Cyc_91char_91ready_127_scheme_base, (((closure)  __glo_Cyc_91char_91ready_127_scheme_base)->fn),  k_735007, Cyc_car(data, port_73392_733077));}
;; 
}

static void __lambda_296(void *data, object self_7313299, int argc, object *args) /* object self_7313299, object r_735009 */
 {
 object r_735009 = args[0];
  return_direct_with_clo2(data,  __glo_Cyc_91char_91ready_127_scheme_base, (((closure)  __glo_Cyc_91char_91ready_127_scheme_base)->fn),  ((closureN)self_7313299)->elements[0], r_735009);; 
}

static void __lambda_1453(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; object rv = Cyc_io_char_ready(data, port);
        return_closcall1(data, k, rv);  }
static void __lambda_293(void *data, object _, int argc, object *args) /* closure _,object k_735001, object chr_73390_733075, object port_73391_733076_raw, ... */
 {
object k_735001 = args[0]; object chr_73390_733075 = args[1];
load_varargs(port_73391_733076, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/base.sld:write-u8");
  
if( (boolean_f != Cyc_is_null(port_73391_733076)) ){ 
  
closureN_type c_7317051;
object e_7317055 [2];
c_7317051.hdr.mark = gc_color_red;
 c_7317051.hdr.grayed = 0;
c_7317051.tag = closureN_tag;
 c_7317051.fn = (function_type)__lambda_294;
c_7317051.num_args = 1;
c_7317051.num_elements = 2;
c_7317051.elements = (object *)e_7317055;
c_7317051.elements[0] = chr_73390_733075;
c_7317051.elements[1] = k_735001;

return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317051);
} else { 
  

return_direct_with_clo3(data,  __glo__191write_91u8_scheme_base, (((closure)  __glo__191write_91u8_scheme_base)->fn),  k_735001, chr_73390_733075, Cyc_car(data, port_73391_733076));}
;; 
}

static void __lambda_294(void *data, object self_7313298, int argc, object *args) /* object self_7313298, object r_735003 */
 {
 object r_735003 = args[0];
  return_direct_with_clo3(data,  __glo__191write_91u8_scheme_base, (((closure)  __glo__191write_91u8_scheme_base)->fn),  ((closureN)self_7313298)->elements[1], ((closureN)self_7313298)->elements[0], r_735003);; 
}

static void __lambda_291(void *data, object _, int argc, object *args) /* closure _,object k_734995, object port_73389_733074_raw, ... */
 {
object k_734995 = args[0];
load_varargs(port_73389_733074, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:peek-u8");
  
if( (boolean_f != Cyc_is_null(port_73389_733074)) ){ 
  
closureN_type c_7317040;
object e_7317043 [1];
c_7317040.hdr.mark = gc_color_red;
 c_7317040.hdr.grayed = 0;
c_7317040.tag = closureN_tag;
 c_7317040.fn = (function_type)__lambda_292;
c_7317040.num_args = 1;
c_7317040.num_elements = 1;
c_7317040.elements = (object *)e_7317043;
c_7317040.elements[0] = k_734995;

return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7317040);
} else { 
  

return_direct_with_clo2(data,  __glo__191peek_91u8_scheme_base, (((closure)  __glo__191peek_91u8_scheme_base)->fn),  k_734995, Cyc_car(data, port_73389_733074));}
;; 
}

static void __lambda_292(void *data, object self_7313297, int argc, object *args) /* object self_7313297, object r_734997 */
 {
 object r_734997 = args[0];
  return_direct_with_clo2(data,  __glo__191peek_91u8_scheme_base, (((closure)  __glo__191peek_91u8_scheme_base)->fn),  ((closureN)self_7313297)->elements[0], r_734997);; 
}

static void __lambda_289(void *data, object _, int argc, object *args) /* closure _,object k_734989, object port_73388_733073_raw, ... */
 {
object k_734989 = args[0];
load_varargs(port_73388_733073, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/base.sld:read-u8");
  
if( (boolean_f != Cyc_is_null(port_73388_733073)) ){ 
  
closureN_type c_7317029;
object e_7317032 [1];
c_7317029.hdr.mark = gc_color_red;
 c_7317029.hdr.grayed = 0;
c_7317029.tag = closureN_tag;
 c_7317029.fn = (function_type)__lambda_290;
c_7317029.num_args = 1;
c_7317029.num_elements = 1;
c_7317029.elements = (object *)e_7317032;
c_7317029.elements[0] = k_734989;

return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7317029);
} else { 
  

return_direct_with_clo2(data,  __glo__191read_91u8_scheme_base, (((closure)  __glo__191read_91u8_scheme_base)->fn),  k_734989, Cyc_car(data, port_73388_733073));}
;; 
}

static void __lambda_290(void *data, object self_7313296, int argc, object *args) /* object self_7313296, object r_734991 */
 {
 object r_734991 = args[0];
  return_direct_with_clo2(data,  __glo__191read_91u8_scheme_base, (((closure)  __glo__191read_91u8_scheme_base)->fn),  ((closureN)self_7313296)->elements[0], r_734991);; 
}

static void __lambda_1452(void *data, object _, int argc, object *args) {object k = args[0];object chr = args[1];object port = args[2]; return_closcall1(data, k, Cyc_write_u8(data, chr, port)); }
static void __lambda_1451(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_peek_u8(data, k, port); }
static void __lambda_1450(void *data, object _, int argc, object *args) {object k = args[0];object port = args[1]; Cyc_io_read_u8(data, k, port); }
static void __lambda_287(void *data, object _, int argc, object *args) /* closure _,object k_734982, object func_73385_733070, object end_73386_733071, object lst_73387_733072 */
 {
object k_734982 = args[0]; object func_73385_733070 = args[1]; object end_73386_733071 = args[2]; object lst_73387_733072 = args[3];
  Cyc_st_add(data, "scheme/base.sld:foldr");
  
if( (boolean_f != Cyc_is_null(lst_73387_733072)) ){ 
  return_direct_with_clo1(data,  k_734982, (((closure)  k_734982)->fn),  end_73386_733071);
} else { 
  
closureN_type c_7317012;
object e_7317019 [3];
c_7317012.hdr.mark = gc_color_red;
 c_7317012.hdr.grayed = 0;
c_7317012.tag = closureN_tag;
 c_7317012.fn = (function_type)__lambda_288;
c_7317012.num_args = 1;
c_7317012.num_elements = 3;
c_7317012.elements = (object *)e_7317019;
c_7317012.elements[0] = func_73385_733070;
c_7317012.elements[1] = k_734982;
c_7317012.elements[2] = lst_73387_733072;



return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  &c_7317012, func_73385_733070, end_73386_733071, Cyc_cdr(data, lst_73387_733072));}
;; 
}

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

return_closcall3(data,  ((closureN)self_7313295)->elements[0],  ((closureN)self_7313295)->elements[1], Cyc_car(data, ((closureN)self_7313295)->elements[2]), r_734985);; 
}

static void __lambda_285(void *data, object _, int argc, object *args) /* closure _,object k_734975, object func_73382_733067, object accum_73383_733068, object lst_73384_733069 */
 {
object k_734975 = args[0]; object func_73382_733067 = args[1]; object accum_73383_733068 = args[2]; object lst_73384_733069 = args[3];
  Cyc_st_add(data, "scheme/base.sld:foldl");
  
if( (boolean_f != Cyc_is_null(lst_73384_733069)) ){ 
  return_direct_with_clo1(data,  k_734975, (((closure)  k_734975)->fn),  accum_73383_733068);
} else { 
  
closureN_type c_7316997;
object e_7317004 [3];
c_7316997.hdr.mark = gc_color_red;
 c_7316997.hdr.grayed = 0;
c_7316997.tag = closureN_tag;
 c_7316997.fn = (function_type)__lambda_286;
c_7316997.num_args = 1;
c_7316997.num_elements = 3;
c_7316997.elements = (object *)e_7317004;
c_7316997.elements[0] = func_73382_733067;
c_7316997.elements[1] = k_734975;
c_7316997.elements[2] = lst_73384_733069;



return_closcall3(data,  func_73382_733067,  &c_7316997, Cyc_car(data, lst_73384_733069), accum_73383_733068);}
;; 
}

static void __lambda_286(void *data, object self_7313294, int argc, object *args) /* object self_7313294, object r_734977 */
 {
 object r_734977 = args[0];
  

return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7313294)->elements[1], ((closureN)self_7313294)->elements[0], r_734977, Cyc_cdr(data, ((closureN)self_7313294)->elements[2]));; 
}

static void __lambda_284(void *data, object _, int argc, object *args) /* closure _,object k_734970, object obj_73379_733064, object alist_73380_733065, object compare_73381_733066_raw, ... */
 {
object k_734970 = args[0]; object obj_73379_733064 = args[1]; object alist_73380_733065 = args[2];
load_varargs(compare_73381_733066, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:assoc");
  
if( (boolean_f != Cyc_is_pair(compare_73381_733066)) ){ 
  

return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  k_734970, obj_73379_733064, alist_73380_733065, Cyc_car(data, compare_73381_733066));
} else { 
  return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  k_734970, obj_73379_733064, alist_73380_733065, primitive_equal_127);}
;; 
}

static void __lambda_281(void *data, object _, int argc, object *args) /* closure _,object k_734959, object obj_73368_733061, object lst_73369_733062, object cmp_127_73370_733063 */
 {
object k_734959 = args[0]; object obj_73368_733061 = args[1]; object lst_73369_733062 = args[2]; object cmp_127_73370_733063 = args[3];
  Cyc_st_add(data, "scheme/base.sld:assoc-helper");
  
if( (boolean_f != Cyc_is_null(lst_73369_733062)) ){ 
  return_direct_with_clo1(data,  k_734959, (((closure)  k_734959)->fn),  boolean_f);
} else { 
  
closureN_type c_7316955;
object e_7316970 [3];
c_7316955.hdr.mark = gc_color_red;
 c_7316955.hdr.grayed = 0;
c_7316955.tag = closureN_tag;
 c_7316955.fn = (function_type)__lambda_282;
c_7316955.num_args = 0;
c_7316955.num_elements = 3;
c_7316955.elements = (object *)e_7316970;
c_7316955.elements[0] = cmp_127_73370_733063;
c_7316955.elements[1] = lst_73369_733062;
c_7316955.elements[2] = obj_73368_733061;


closureN_type c_7316971;
object e_7316984 [4];
c_7316971.hdr.mark = gc_color_red;
 c_7316971.hdr.grayed = 0;
c_7316971.tag = closureN_tag;
 c_7316971.fn = (function_type)__lambda_283;
c_7316971.num_args = 1;
c_7316971.num_elements = 4;
c_7316971.elements = (object *)e_7316984;
c_7316971.elements[0] = cmp_127_73370_733063;
c_7316971.elements[1] = k_734959;
c_7316971.elements[2] = lst_73369_733062;
c_7316971.elements[3] = obj_73368_733061;

return_direct_with_clo1(data,(closure)&c_7316955,__lambda_282,  &c_7316971);}
;; 
}

static void __lambda_283(void *data, object self_7313292, int argc, object *args) /* object self_7313292, object r_734961 */
 {
 object r_734961 = args[0];
  if( (boolean_f != r_734961) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_7313292)->elements[1], (((closure)  ((closureN)self_7313292)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7313292)->elements[2]));
} else { 
  

return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  ((closureN)self_7313292)->elements[1], ((closureN)self_7313292)->elements[3], Cyc_cdr(data, ((closureN)self_7313292)->elements[2]), ((closureN)self_7313292)->elements[0]);}
;; 
}

static void __lambda_282(void *data, object self_7313293, int argc, object *args) /* object self_7313293, object k_734963 */
 {
 object k_734963 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313293)->elements[1]))) ){ 
  



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

static void __lambda_280(void *data, object _, int argc, object *args) /* closure _,object k_734954, object obj_73365_733058, object lst_73366_733059, object compare_73367_733060_raw, ... */
 {
object k_734954 = args[0]; object obj_73365_733058 = args[1]; object lst_73366_733059 = args[2];
load_varargs(compare_73367_733060, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:member");
  
if( (boolean_f != Cyc_is_pair(compare_73367_733060)) ){ 
  

return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  k_734954, obj_73365_733058, lst_73366_733059, Cyc_car(data, compare_73367_733060));
} else { 
  return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  k_734954, obj_73365_733058, lst_73366_733059, primitive_equal_127);}
;; 
}

static void __lambda_278(void *data, object _, int argc, object *args) /* closure _,object k_734947, object obj_73355_733055, object lst_73356_733056, object cmp_91proc_73357_733057 */
 {
object k_734947 = args[0]; object obj_73355_733055 = args[1]; object lst_73356_733056 = args[2]; object cmp_91proc_73357_733057 = args[3];
  Cyc_st_add(data, "scheme/base.sld:member-helper");
  
if( (boolean_f != Cyc_is_null(lst_73356_733056)) ){ 
  return_direct_with_clo1(data,  k_734947, (((closure)  k_734947)->fn),  boolean_f);
} else { 
  
closureN_type c_7316929;
object e_7316940 [4];
c_7316929.hdr.mark = gc_color_red;
 c_7316929.hdr.grayed = 0;
c_7316929.tag = closureN_tag;
 c_7316929.fn = (function_type)__lambda_279;
c_7316929.num_args = 1;
c_7316929.num_elements = 4;
c_7316929.elements = (object *)e_7316940;
c_7316929.elements[0] = cmp_91proc_73357_733057;
c_7316929.elements[1] = k_734947;
c_7316929.elements[2] = lst_73356_733056;
c_7316929.elements[3] = obj_73355_733055;



return_closcall3(data,  cmp_91proc_73357_733057,  &c_7316929, obj_73355_733055, Cyc_car(data, lst_73356_733056));}
;; 
}

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

return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  ((closureN)self_7313291)->elements[1], ((closureN)self_7313291)->elements[3], Cyc_cdr(data, ((closureN)self_7313291)->elements[2]), ((closureN)self_7313291)->elements[0]);}
;; 
}

static object __lambda_1449(void *data, object ptr,object str1_73353_733053, object str2_73354_733054) {

  Cyc_st_add(data, "scheme/base.sld:fast-string>=?");




return_copy(ptr,  Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_733053, str2_73354_733054), obj_int2obj(0)));; 
}

static void __lambda_277(void *data, object _, int argc, object *args) /* closure _,object k_734943, object str1_73353_733053, object str2_73354_733054 */
 {
object k_734943 = args[0]; object str1_73353_733053 = args[1]; object str2_73354_733054 = args[2];
  Cyc_st_add(data, "scheme/base.sld:fast-string>=?");




return_direct_with_clo1(data,  k_734943, (((closure)  k_734943)->fn),  Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_733053, str2_73354_733054), obj_int2obj(0)));; 
}

static object __lambda_1448(void *data, object ptr,object str1_73351_733051, object str2_73352_733052) {

  Cyc_st_add(data, "scheme/base.sld:fast-string>?");




return_copy(ptr,  Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_733051, str2_73352_733052), obj_int2obj(0)));; 
}

static void __lambda_276(void *data, object _, int argc, object *args) /* closure _,object k_734939, object str1_73351_733051, object str2_73352_733052 */
 {
object k_734939 = args[0]; object str1_73351_733051 = args[1]; object str2_73352_733052 = args[2];
  Cyc_st_add(data, "scheme/base.sld:fast-string>?");




return_direct_with_clo1(data,  k_734939, (((closure)  k_734939)->fn),  Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_733051, str2_73352_733052), obj_int2obj(0)));; 
}

static object __lambda_1447(void *data, object ptr,object str1_73349_733049, object str2_73350_733050) {

  Cyc_st_add(data, "scheme/base.sld:fast-string<=?");




return_copy(ptr,  Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_733049, str2_73350_733050), obj_int2obj(0)));; 
}

static void __lambda_275(void *data, object _, int argc, object *args) /* closure _,object k_734935, object str1_73349_733049, object str2_73350_733050 */
 {
object k_734935 = args[0]; object str1_73349_733049 = args[1]; object str2_73350_733050 = args[2];
  Cyc_st_add(data, "scheme/base.sld:fast-string<=?");




return_direct_with_clo1(data,  k_734935, (((closure)  k_734935)->fn),  Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_733049, str2_73350_733050), obj_int2obj(0)));; 
}

static object __lambda_1446(void *data, object ptr,object str1_73347_733047, object str2_73348_733048) {

  Cyc_st_add(data, "scheme/base.sld:fast-string<?");




return_copy(ptr,  Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_733047, str2_73348_733048), obj_int2obj(0)));; 
}

static void __lambda_274(void *data, object _, int argc, object *args) /* closure _,object k_734931, object str1_73347_733047, object str2_73348_733048 */
 {
object k_734931 = args[0]; object str1_73347_733047 = args[1]; object str2_73348_733048 = args[2];
  Cyc_st_add(data, "scheme/base.sld:fast-string<?");




return_direct_with_clo1(data,  k_734931, (((closure)  k_734931)->fn),  Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_733047, str2_73348_733048), obj_int2obj(0)));; 
}

static object __lambda_1445(void *data, object ptr,object str1_73345_733045, object str2_73346_733046) {

  Cyc_st_add(data, "scheme/base.sld:fast-string=?");




return_copy(ptr,  equalp(Cyc_string_cmp(data, str1_73345_733045, str2_73346_733046), obj_int2obj(0)));; 
}

static void __lambda_273(void *data, object _, int argc, object *args) /* closure _,object k_734927, object str1_73345_733045, object str2_73346_733046 */
 {
object k_734927 = args[0]; object str1_73345_733045 = args[1]; object str2_73346_733046 = args[2];
  Cyc_st_add(data, "scheme/base.sld:fast-string=?");




return_direct_with_clo1(data,  k_734927, (((closure)  k_734927)->fn),  equalp(Cyc_string_cmp(data, str1_73345_733045, str2_73346_733046), obj_int2obj(0)));; 
}

static void __lambda_272(void *data, object _, int argc, object *args) /* closure _,object k_734923, object str1_73342_733042, object str2_73343_733043, object strs_73344_733044_raw, ... */
 {
object k_734923 = args[0]; object str1_73342_733042 = args[1]; object str2_73343_733043 = args[2];
load_varargs(strs_73344_733044, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:string>=?");

pair_type local_7316863; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734923, __glo_fast_91string_125_123_127_scheme_base, str1_73342_733042, set_pair_as_expr(&local_7316863, str2_73343_733043, strs_73344_733044));; 
}

static void __lambda_271(void *data, object _, int argc, object *args) /* closure _,object k_734919, object str1_73339_733039, object str2_73340_733040, object strs_73341_733041_raw, ... */
 {
object k_734919 = args[0]; object str1_73339_733039 = args[1]; object str2_73340_733040 = args[2];
load_varargs(strs_73341_733041, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:string>?");

pair_type local_7316858; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734919, __glo_fast_91string_125_127_scheme_base, str1_73339_733039, set_pair_as_expr(&local_7316858, str2_73340_733040, strs_73341_733041));; 
}

static void __lambda_270(void *data, object _, int argc, object *args) /* closure _,object k_734915, object str1_73336_733036, object str2_73337_733037, object strs_73338_733038_raw, ... */
 {
object k_734915 = args[0]; object str1_73336_733036 = args[1]; object str2_73337_733037 = args[2];
load_varargs(strs_73338_733038, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:string<=?");

pair_type local_7316853; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734915, __glo_fast_91string_121_123_127_scheme_base, str1_73336_733036, set_pair_as_expr(&local_7316853, str2_73337_733037, strs_73338_733038));; 
}

static void __lambda_269(void *data, object _, int argc, object *args) /* closure _,object k_734911, object str1_73333_733033, object str2_73334_733034, object strs_73335_733035_raw, ... */
 {
object k_734911 = args[0]; object str1_73333_733033 = args[1]; object str2_73334_733034 = args[2];
load_varargs(strs_73335_733035, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:string<?");

pair_type local_7316848; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734911, __glo_fast_91string_121_127_scheme_base, str1_73333_733033, set_pair_as_expr(&local_7316848, str2_73334_733034, strs_73335_733035));; 
}

static void __lambda_268(void *data, object _, int argc, object *args) /* closure _,object k_734907, object str1_73330_733030, object str2_73331_733031, object strs_73332_733032_raw, ... */
 {
object k_734907 = args[0]; object str1_73330_733030 = args[1]; object str2_73331_733031 = args[2];
load_varargs(strs_73332_733032, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:string=?");

pair_type local_7316843; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734907, __glo_fast_91string_123_127_scheme_base, str1_73330_733030, set_pair_as_expr(&local_7316843, str2_73331_733031, strs_73332_733032));; 
}

static void __lambda_267(void *data, object _, int argc, object *args) /* closure _,object k_734903, object c1_73327_733027, object c2_73328_733028, object cs_73329_733029_raw, ... */
 {
object k_734903 = args[0]; object c1_73327_733027 = args[1]; object c2_73328_733028 = args[2];
load_varargs(cs_73329_733029, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:char>=?");

pair_type local_7316838; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734903, primitive__125_123, c1_73327_733027, set_pair_as_expr(&local_7316838, c2_73328_733028, cs_73329_733029));; 
}

static void __lambda_266(void *data, object _, int argc, object *args) /* closure _,object k_734899, object c1_73324_733024, object c2_73325_733025, object cs_73326_733026_raw, ... */
 {
object k_734899 = args[0]; object c1_73324_733024 = args[1]; object c2_73325_733025 = args[2];
load_varargs(cs_73326_733026, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:char<=?");

pair_type local_7316833; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734899, primitive__121_123, c1_73324_733024, set_pair_as_expr(&local_7316833, c2_73325_733025, cs_73326_733026));; 
}

static void __lambda_265(void *data, object _, int argc, object *args) /* closure _,object k_734895, object c1_73321_733021, object c2_73322_733022, object cs_73323_733023_raw, ... */
 {
object k_734895 = args[0]; object c1_73321_733021 = args[1]; object c2_73322_733022 = args[2];
load_varargs(cs_73323_733023, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:char>?");

pair_type local_7316828; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734895, primitive__125, c1_73321_733021, set_pair_as_expr(&local_7316828, c2_73322_733022, cs_73323_733023));; 
}

static void __lambda_264(void *data, object _, int argc, object *args) /* closure _,object k_734891, object c1_73318_733018, object c2_73319_733019, object cs_73320_733020_raw, ... */
 {
object k_734891 = args[0]; object c1_73318_733018 = args[1]; object c2_73319_733019 = args[2];
load_varargs(cs_73320_733020, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:char<?");

pair_type local_7316823; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734891, primitive__121, c1_73318_733018, set_pair_as_expr(&local_7316823, c2_73319_733019, cs_73320_733020));; 
}

static void __lambda_263(void *data, object _, int argc, object *args) /* closure _,object k_734887, object c1_73315_733015, object c2_73316_733016, object cs_73317_733017_raw, ... */
 {
object k_734887 = args[0]; object c1_73315_733015 = args[1]; object c2_73316_733016 = args[2];
load_varargs(cs_73317_733017, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/base.sld:char=?");

pair_type local_7316818; 
return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734887, primitive__123, c1_73315_733015, set_pair_as_expr(&local_7316818, c2_73316_733016, cs_73317_733017));; 
}

static void __lambda_260(void *data, object _, int argc, object *args) /* closure _,object k_734880, object cmp_73310_733010, object c_73311_733011, object cs_73312_733012 */
 {
object k_734880 = args[0]; object cmp_73310_733010 = args[1]; object c_73311_733011 = args[2]; object cs_73312_733012 = args[3];
  Cyc_st_add(data, "scheme/base.sld:Cyc-bin-op-char");

closureN_type c_7316800;
object e_7316805 [3];
c_7316800.hdr.mark = gc_color_red;
 c_7316800.hdr.grayed = 0;
c_7316800.tag = closureN_tag;
 c_7316800.fn = (function_type)__lambda_261;
c_7316800.num_args = 1;
c_7316800.num_elements = 3;
c_7316800.elements = (object *)e_7316805;
c_7316800.elements[0] = c_73311_733011;
c_7316800.elements[1] = cs_73312_733012;
c_7316800.elements[2] = k_734880;


closureN_type c_7316806;
object e_7316813 [1];
c_7316806.hdr.mark = gc_color_red;
 c_7316806.hdr.grayed = 0;
c_7316806.tag = closureN_tag;
 c_7316806.fn = (function_type)__lambda_262;
c_7316806.num_args = 2;
c_7316806.num_elements = 1;
c_7316806.elements = (object *)e_7316813;
c_7316806.elements[0] = cmp_73310_733010;

return_direct_with_clo1(data,(closure)&c_7316800,__lambda_261,  &c_7316806);; 
}

static void __lambda_262(void *data, object self_7313289, int argc, object *args) /* object self_7313289, object k_734882, object x_73313_733013, object y_73314_733014 */
 {
 object k_734882 = args[0]; object x_73313_733013 = args[1]; object y_73314_733014 = args[2];
  



return_closcall3(data,  ((closureN)self_7313289)->elements[0],  k_734882, Cyc_char2integer(x_73313_733013), Cyc_char2integer(y_73314_733014));; 
}

static void __lambda_261(void *data, object self_7313290, int argc, object *args) /* object self_7313290, object r_734881 */
 {
 object r_734881 = args[0];
  return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  ((closureN)self_7313290)->elements[2], r_734881, ((closureN)self_7313290)->elements[0], ((closureN)self_7313290)->elements[1]);; 
}

static void __lambda_258(void *data, object _, int argc, object *args) /* closure _,object k_734872, object cmp_73300_733007, object x_73301_733008, object lst_73302_733009 */
 {
object k_734872 = args[0]; object cmp_73300_733007 = args[1]; object x_73301_733008 = args[2]; object lst_73302_733009 = args[3];
  Cyc_st_add(data, "scheme/base.sld:Cyc-bin-op");
  
if( (boolean_f != Cyc_is_null(lst_73302_733009)) ){ 
  return_direct_with_clo1(data,  k_734872, (((closure)  k_734872)->fn),  boolean_t);
} else { 
  
closureN_type c_7316783;
object e_7316795 [3];
c_7316783.hdr.mark = gc_color_red;
 c_7316783.hdr.grayed = 0;
c_7316783.tag = closureN_tag;
 c_7316783.fn = (function_type)__lambda_259;
c_7316783.num_args = 1;
c_7316783.num_elements = 3;
c_7316783.elements = (object *)e_7316795;
c_7316783.elements[0] = cmp_73300_733007;
c_7316783.elements[1] = k_734872;
c_7316783.elements[2] = lst_73302_733009;



return_closcall3(data,  cmp_73300_733007,  &c_7316783, x_73301_733008, Cyc_car(data, lst_73302_733009));}
;; 
}

static void __lambda_259(void *data, object self_7313288, int argc, object *args) /* object self_7313288, object r_734874 */
 {
 object r_734874 = args[0];
  if( (boolean_f != r_734874) ){ 
  



return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  ((closureN)self_7313288)->elements[1], ((closureN)self_7313288)->elements[0], Cyc_car(data, ((closureN)self_7313288)->elements[2]), Cyc_cdr(data, ((closureN)self_7313288)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313288)->elements[1], (((closure)  ((closureN)self_7313288)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_256(void *data, object _, int argc, object *args) /* closure _,object k_734867, object port_73297_733004, object proc_73298_733005 */
 {
object k_734867 = args[0]; object port_73297_733004 = args[1]; object proc_73298_733005 = args[2];
  Cyc_st_add(data, "scheme/base.sld:call-with-port");

closureN_type c_7316770;
object e_7316777 [2];
c_7316770.hdr.mark = gc_color_red;
 c_7316770.hdr.grayed = 0;
c_7316770.tag = closureN_tag;
 c_7316770.fn = (function_type)__lambda_257;
c_7316770.num_args = 1;
c_7316770.num_elements = 2;
c_7316770.elements = (object *)e_7316777;
c_7316770.elements[0] = k_734867;
c_7316770.elements[1] = port_73297_733004;

return_closcall2(data,  proc_73298_733005,  &c_7316770, port_73297_733004);; 
}

static void __lambda_257(void *data, object self_7313287, int argc, object *args) /* object self_7313287, object result_73299_733006 */
 {
 object result_73299_733006 = args[0];
  
  Cyc_io_close_port(data, ((closureN)self_7313287)->elements[1]);return_direct_with_clo1(data,  ((closureN)self_7313287)->elements[0], (((closure)  ((closureN)self_7313287)->elements[0])->fn),  result_73299_733006);;; 
}

static void __lambda_252(void *data, object _, int argc, object *args) /* closure _,object k_734861, object before_73293_733000, object thunk_73294_733001, object after_73295_733002 */
 {
object k_734861 = args[0]; object before_73293_733000 = args[1]; object thunk_73294_733001 = args[2]; object after_73295_733002 = args[3];
  Cyc_st_add(data, "scheme/base.sld:dynamic-wind");

closureN_type c_7316755;
object e_7316767 [3];
c_7316755.hdr.mark = gc_color_red;
 c_7316755.hdr.grayed = 0;
c_7316755.tag = closureN_tag;
 c_7316755.fn = (function_type)__lambda_253;
c_7316755.num_args = 1;
c_7316755.num_elements = 3;
c_7316755.elements = (object *)e_7316767;
c_7316755.elements[0] = after_73295_733002;
c_7316755.elements[1] = k_734861;
c_7316755.elements[2] = thunk_73294_733001;

return_closcall1(data,  before_73293_733000,  &c_7316755);; 
}

static void __lambda_253(void *data, object self_7313284, int argc, object *args) /* object self_7313284, object r_734862 */
 {

  
closureN_type c_7316758;
object e_7316766 [2];
c_7316758.hdr.mark = gc_color_red;
 c_7316758.hdr.grayed = 0;
c_7316758.tag = closureN_tag;
 c_7316758.fn = (function_type)__lambda_254;
c_7316758.num_args = 1;
c_7316758.num_elements = 2;
c_7316758.elements = (object *)e_7316766;
c_7316758.elements[0] = ((closureN)self_7313284)->elements[0];
c_7316758.elements[1] = ((closureN)self_7313284)->elements[1];

return_closcall1(data,  ((closureN)self_7313284)->elements[2],  &c_7316758);; 
}

static void __lambda_254(void *data, object self_7313285, int argc, object *args) /* object self_7313285, object result_73296_733003 */
 {
 object result_73296_733003 = args[0];
  
closureN_type c_7316761;
object e_7316765 [2];
c_7316761.hdr.mark = gc_color_red;
 c_7316761.hdr.grayed = 0;
c_7316761.tag = closureN_tag;
 c_7316761.fn = (function_type)__lambda_255;
c_7316761.num_args = 1;
c_7316761.num_elements = 2;
c_7316761.elements = (object *)e_7316765;
c_7316761.elements[0] = ((closureN)self_7313285)->elements[1];
c_7316761.elements[1] = result_73296_733003;

return_closcall1(data,  ((closureN)self_7313285)->elements[0],  &c_7316761);; 
}

static void __lambda_255(void *data, object self_7313286, int argc, object *args) /* object self_7313286, object r_734864 */
 {

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

static void __lambda_250(void *data, object _, int argc, object *args) /* closure _,object k_734849, object producer_73289_732997, object consumer_73290_732998 */
 {
object k_734849 = args[0]; object producer_73289_732997 = args[1]; object consumer_73290_732998 = args[2];
  Cyc_st_add(data, "scheme/base.sld:call-with-values");

closureN_type c_7316728;
object e_7316752 [2];
c_7316728.hdr.mark = gc_color_red;
 c_7316728.hdr.grayed = 0;
c_7316728.tag = closureN_tag;
 c_7316728.fn = (function_type)__lambda_251;
c_7316728.num_args = 1;
c_7316728.num_elements = 2;
c_7316728.elements = (object *)e_7316752;
c_7316728.elements[0] = consumer_73290_732998;
c_7316728.elements[1] = k_734849;

return_closcall1(data,  producer_73289_732997,  &c_7316728);; 
}

static void __lambda_251(void *data, object self_7313283, int argc, object *args) /* object self_7313283, object x_73291_732999 */
 {
 object x_73291_732999 = args[0];
  object r_734851;
    
if( (boolean_f != Cyc_is_pair(x_73291_732999)) ){ 
  
  
  object local_7316739 = alloca(sizeof(pair_type)); 
  r_734851 = equalp(Cyc_car(data, x_73291_732999), set_pair_as_expr(local_7316739, quote_multiple, quote_values));
} else { 
  r_734851 = boolean_f;}
;if( (boolean_f != r_734851) ){ 
  


object c_7316745 = apply(data,  ((closureN)self_7313283)->elements[1],((closureN)self_7313283)->elements[0], Cyc_cdr(data, x_73291_732999));
return_direct_with_clo1(data,  ((closureN)self_7313283)->elements[1], (((closure)  ((closureN)self_7313283)->elements[1])->fn),  c_7316745);
} else { 
  return_closcall2(data,  ((closureN)self_7313283)->elements[0],  ((closureN)self_7313283)->elements[1], x_73291_732999);}
;; 
}

static void __lambda_249(void *data, object _, int argc, object *args) /* closure _,object k_734839, object args_73287_732996_raw, ... */
 {
object k_734839 = args[0];
load_varargs(args_73287_732996, args, 1, argc - 1);
  object r_734840;
  Cyc_st_add(data, "scheme/base.sld:values");
  
if( (boolean_f != Cyc_is_null(args_73287_732996)) ){ 
  r_734840 = boolean_f;
} else { 
  
  
  r_734840 = Cyc_is_null(Cyc_cdr(data, args_73287_732996));}
;if( (boolean_f != r_734840) ){ 
  

return_direct_with_clo1(data,  k_734839, (((closure)  k_734839)->fn),  Cyc_car(data, args_73287_732996));
} else { 
  
pair_type local_7316722; 

pair_type local_7316725; 
return_direct_with_clo1(data,  k_734839, (((closure)  k_734839)->fn),  set_pair_as_expr(&local_7316722, set_pair_as_expr(&local_7316725, quote_multiple, quote_values), args_73287_732996));}
;; 
}

static void __lambda_248(void *data, object _, int argc, object *args) /* closure _,object k_734833, object expr_73284_732993, object rename_73285_732994, object compare_73286_732995 */
 {
object k_734833 = args[0]; object expr_73284_732993 = args[1];
  Cyc_st_add(data, "scheme/base.sld:syntax-error");



object c_7316703 = apply(data,  k_734833,__glo_error_scheme_base, Cyc_cdr(data, expr_73284_732993));
return_direct_with_clo1(data,  k_734833, (((closure)  k_734833)->fn),  c_7316703);; 
}

static void __lambda_213(void *data, object _, int argc, object *args) /* closure _,object k_734745, object expr_73254_732985, object rename_73255_732986, object compare_73256_732987 */
 {
object k_734745 = args[0]; object expr_73254_732985 = args[1]; object rename_73255_732986 = args[2]; object compare_73256_732987 = args[3];
  Cyc_st_add(data, "scheme/base.sld:quasiquote");

closureN_type c_7316368;
object e_7316698 [4];
c_7316368.hdr.mark = gc_color_red;
 c_7316368.hdr.grayed = 0;
c_7316368.tag = closureN_tag;
 c_7316368.fn = (function_type)__lambda_214;
c_7316368.num_args = 1;
c_7316368.num_elements = 4;
c_7316368.elements = (object *)e_7316698;
c_7316368.elements[0] = compare_73256_732987;
c_7316368.elements[1] = expr_73254_732985;
c_7316368.elements[2] = k_734745;
c_7316368.elements[3] = rename_73255_732986;

return_direct_with_clo1(data,(closure)&c_7316368,__lambda_214,  boolean_f);; 
}

static void __lambda_214(void *data, object self_7313248, int argc, object *args) /* object self_7313248, object qq_732989 */
 {
 object qq_732989 = args[0];
  
closureN_type c_7316370;
object e_7316694 [4];
c_7316370.hdr.mark = gc_color_red;
 c_7316370.hdr.grayed = 0;
c_7316370.tag = closureN_tag;
 c_7316370.fn = (function_type)__lambda_1356;
c_7316370.num_args = 1;
c_7316370.num_elements = 4;
c_7316370.elements = (object *)e_7316694;
c_7316370.elements[0] = ((closureN)self_7313248)->elements[0];
c_7316370.elements[1] = ((closureN)self_7313248)->elements[1];
c_7316370.elements[2] = ((closureN)self_7313248)->elements[2];
c_7316370.elements[3] = ((closureN)self_7313248)->elements[3];


pair_type local_7316697; 
return_direct_with_clo1(data,(closure)&c_7316370,__lambda_1356,  set_cell_as_expr(&local_7316697, qq_732989));; 
}

static void __lambda_1356(void *data, object self_7313249, int argc, object *args) /* object self_7313249, object qq_732989 */
 {
 object qq_732989 = args[0];
  
closureN_type c_7316372;
object e_7316387 [3];
c_7316372.hdr.mark = gc_color_red;
 c_7316372.hdr.grayed = 0;
c_7316372.tag = closureN_tag;
 c_7316372.fn = (function_type)__lambda_215;
c_7316372.num_args = 1;
c_7316372.num_elements = 3;
c_7316372.elements = (object *)e_7316387;
c_7316372.elements[0] = ((closureN)self_7313249)->elements[1];
c_7316372.elements[1] = ((closureN)self_7313249)->elements[2];
c_7316372.elements[2] = qq_732989;


closureN_type c_7316388;
object e_7316693 [3];
c_7316388.hdr.mark = gc_color_red;
 c_7316388.hdr.grayed = 0;
c_7316388.tag = closureN_tag;
 c_7316388.fn = (function_type)__lambda_217;
c_7316388.num_args = 2;
c_7316388.num_elements = 3;
c_7316388.elements = (object *)e_7316693;
c_7316388.elements[0] = ((closureN)self_7313249)->elements[0];
c_7316388.elements[1] = qq_732989;
c_7316388.elements[2] = ((closureN)self_7313249)->elements[3];

return_direct_with_clo1(data,(closure)&c_7316372,__lambda_215,  &c_7316388);; 
}

static void __lambda_217(void *data, object self_7313250, int argc, object *args) /* object self_7313250, object k_734749, object x_73257_732991, object d_73258_732992 */
 {
 object k_734749 = args[0]; object x_73257_732991 = args[1]; object d_73258_732992 = args[2];
    
if( (boolean_f != Cyc_is_pair(x_73257_732991)) ){ 
  
closureN_type c_7316393;
object e_7316651 [6];
c_7316393.hdr.mark = gc_color_red;
 c_7316393.hdr.grayed = 0;
c_7316393.tag = closureN_tag;
 c_7316393.fn = (function_type)__lambda_218;
c_7316393.num_args = 1;
c_7316393.num_elements = 6;
c_7316393.elements = (object *)e_7316651;
c_7316393.elements[0] = ((closureN)self_7313250)->elements[0];
c_7316393.elements[1] = d_73258_732992;
c_7316393.elements[2] = k_734749;
c_7316393.elements[3] = ((closureN)self_7313250)->elements[1];
c_7316393.elements[4] = ((closureN)self_7313250)->elements[2];
c_7316393.elements[5] = x_73257_732991;

return_closcall2(data,  ((closureN)self_7313250)->elements[2],  &c_7316393, quote_unquote);
} else { 
    
if( (boolean_f != Cyc_is_vector_not_record_type(x_73257_732991)) ){ 
  
closureN_type c_7316656;
object e_7316674 [4];
c_7316656.hdr.mark = gc_color_red;
 c_7316656.hdr.grayed = 0;
c_7316656.tag = closureN_tag;
 c_7316656.fn = (function_type)__lambda_244;
c_7316656.num_args = 1;
c_7316656.num_elements = 4;
c_7316656.elements = (object *)e_7316674;
c_7316656.elements[0] = d_73258_732992;
c_7316656.elements[1] = k_734749;
c_7316656.elements[2] = ((closureN)self_7313250)->elements[1];
c_7316656.elements[3] = x_73257_732991;

return_closcall2(data,  ((closureN)self_7313250)->elements[2],  &c_7316656, quote_list_91_125vector);
} else { 
  object r_734826;
    
if( (boolean_f != Cyc_is_symbol(x_73257_732991)) ){ 
  r_734826 = boolean_t;
} else { 
  
  r_734826 = Cyc_is_null(x_73257_732991);}
;if( (boolean_f != r_734826) ){ 
  
closureN_type c_7316684;
object e_7316691 [2];
c_7316684.hdr.mark = gc_color_red;
 c_7316684.hdr.grayed = 0;
c_7316684.tag = closureN_tag;
 c_7316684.fn = (function_type)__lambda_247;
c_7316684.num_args = 1;
c_7316684.num_elements = 2;
c_7316684.elements = (object *)e_7316691;
c_7316684.elements[0] = k_734749;
c_7316684.elements[1] = x_73257_732991;

return_closcall2(data,  ((closureN)self_7313250)->elements[2],  &c_7316684, quote_quote);
} else { 
  return_direct_with_clo1(data,  k_734749, (((closure)  k_734749)->fn),  x_73257_732991);}
;}
;}
;; 
}

static void __lambda_247(void *data, object self_7313280, int argc, object *args) /* object self_7313280, object r_734827 */
 {
 object r_734827 = args[0];
  
list_2_type local_7316689; 
return_direct_with_clo1(data,  ((closureN)self_7313280)->elements[0], (((closure)  ((closureN)self_7313280)->elements[0])->fn),  Cyc_fast_list_2(&local_7316689, r_734827, ((closureN)self_7313280)->elements[1]));; 
}

static void __lambda_244(void *data, object self_7313277, int argc, object *args) /* object self_7313277, object r_734822 */
 {
 object r_734822 = args[0];
  
closureN_type c_7316658;
object e_7316672 [4];
c_7316658.hdr.mark = gc_color_red;
 c_7316658.hdr.grayed = 0;
c_7316658.tag = closureN_tag;
 c_7316658.fn = (function_type)__lambda_245;
c_7316658.num_args = 1;
c_7316658.num_elements = 4;
c_7316658.elements = (object *)e_7316672;
c_7316658.elements[0] = ((closureN)self_7313277)->elements[0];
c_7316658.elements[1] = ((closureN)self_7313277)->elements[1];
c_7316658.elements[2] = ((closureN)self_7313277)->elements[2];
c_7316658.elements[3] = r_734822;

return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7316658, ((closureN)self_7313277)->elements[3]);; 
}

static void __lambda_245(void *data, object self_7313278, int argc, object *args) /* object self_7313278, object r_734824 */
 {
 object r_734824 = args[0];
  


closureN_type c_7316663;
object e_7316670 [2];
c_7316663.hdr.mark = gc_color_red;
 c_7316663.hdr.grayed = 0;
c_7316663.tag = closureN_tag;
 c_7316663.fn = (function_type)__lambda_246;
c_7316663.num_args = 1;
c_7316663.num_elements = 2;
c_7316663.elements = (object *)e_7316670;
c_7316663.elements[0] = ((closureN)self_7313278)->elements[1];
c_7316663.elements[1] = ((closureN)self_7313278)->elements[3];

return_closcall3(data,  car(((closureN)self_7313278)->elements[2]),  &c_7316663, r_734824, ((closureN)self_7313278)->elements[0]);; 
}

static void __lambda_246(void *data, object self_7313279, int argc, object *args) /* object self_7313279, object r_734823 */
 {
 object r_734823 = args[0];
  
list_2_type local_7316668; 
return_direct_with_clo1(data,  ((closureN)self_7313279)->elements[0], (((closure)  ((closureN)self_7313279)->elements[0])->fn),  Cyc_fast_list_2(&local_7316668, ((closureN)self_7313279)->elements[1], r_734823));; 
}

static void __lambda_218(void *data, object self_7313251, int argc, object *args) /* object self_7313251, object r_734818 */
 {
 object r_734818 = args[0];
  
closureN_type c_7316396;
object e_7316647 [6];
c_7316396.hdr.mark = gc_color_red;
 c_7316396.hdr.grayed = 0;
c_7316396.tag = closureN_tag;
 c_7316396.fn = (function_type)__lambda_219;
c_7316396.num_args = 1;
c_7316396.num_elements = 6;
c_7316396.elements = (object *)e_7316647;
c_7316396.elements[0] = ((closureN)self_7313251)->elements[0];
c_7316396.elements[1] = ((closureN)self_7313251)->elements[1];
c_7316396.elements[2] = ((closureN)self_7313251)->elements[2];
c_7316396.elements[3] = ((closureN)self_7313251)->elements[3];
c_7316396.elements[4] = ((closureN)self_7313251)->elements[4];
c_7316396.elements[5] = ((closureN)self_7313251)->elements[5];



return_closcall3(data,  ((closureN)self_7313251)->elements[0],  &c_7316396, r_734818, Cyc_car(data, ((closureN)self_7313251)->elements[5]));; 
}

static void __lambda_219(void *data, object self_7313252, int argc, object *args) /* object self_7313252, object r_734751 */
 {
 object r_734751 = args[0];
  if( (boolean_f != r_734751) ){ 
    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313252)->elements[1], obj_int2obj(0))) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_7313252)->elements[2], (((closure)  ((closureN)self_7313252)->elements[2])->fn),  Cyc_cadr(data, ((closureN)self_7313252)->elements[5]));
} else { 
  
closureN_type c_7316407;
object e_7316435 [5];
c_7316407.hdr.mark = gc_color_red;
 c_7316407.hdr.grayed = 0;
c_7316407.tag = closureN_tag;
 c_7316407.fn = (function_type)__lambda_220;
c_7316407.num_args = 1;
c_7316407.num_elements = 5;
c_7316407.elements = (object *)e_7316435;
c_7316407.elements[0] = ((closureN)self_7313252)->elements[1];
c_7316407.elements[1] = ((closureN)self_7313252)->elements[2];
c_7316407.elements[2] = ((closureN)self_7313252)->elements[3];
c_7316407.elements[3] = ((closureN)self_7313252)->elements[4];
c_7316407.elements[4] = ((closureN)self_7313252)->elements[5];

return_closcall2(data,  ((closureN)self_7313252)->elements[4],  &c_7316407, quote__list);}
;
} else { 
  
closureN_type c_7316438;
object e_7316646 [6];
c_7316438.hdr.mark = gc_color_red;
 c_7316438.hdr.grayed = 0;
c_7316438.tag = closureN_tag;
 c_7316438.fn = (function_type)__lambda_223;
c_7316438.num_args = 1;
c_7316438.num_elements = 6;
c_7316438.elements = (object *)e_7316646;
c_7316438.elements[0] = ((closureN)self_7313252)->elements[0];
c_7316438.elements[1] = ((closureN)self_7313252)->elements[1];
c_7316438.elements[2] = ((closureN)self_7313252)->elements[2];
c_7316438.elements[3] = ((closureN)self_7313252)->elements[3];
c_7316438.elements[4] = ((closureN)self_7313252)->elements[4];
c_7316438.elements[5] = ((closureN)self_7313252)->elements[5];

return_closcall2(data,  ((closureN)self_7313252)->elements[4],  &c_7316438, quote_unquote_91splicing);}
;; 
}

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



return_closcall3(data,  ((closureN)self_7313256)->elements[0],  &c_7316441, r_734815, Cyc_car(data, ((closureN)self_7313256)->elements[5]));; 
}

static void __lambda_224(void *data, object self_7313257, int argc, object *args) /* object self_7313257, object r_734762 */
 {
 object r_734762 = args[0];
  if( (boolean_f != r_734762) ){ 
    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313257)->elements[1], obj_int2obj(0))) ){ 
  
closureN_type c_7316447;
object e_7316475 [4];
c_7316447.hdr.mark = gc_color_red;
 c_7316447.hdr.grayed = 0;
c_7316447.tag = closureN_tag;
 c_7316447.fn = (function_type)__lambda_225;
c_7316447.num_args = 1;
c_7316447.num_elements = 4;
c_7316447.elements = (object *)e_7316475;
c_7316447.elements[0] = ((closureN)self_7313257)->elements[1];
c_7316447.elements[1] = ((closureN)self_7313257)->elements[2];
c_7316447.elements[2] = ((closureN)self_7313257)->elements[3];
c_7316447.elements[3] = ((closureN)self_7313257)->elements[5];

return_closcall2(data,  ((closureN)self_7313257)->elements[4],  &c_7316447, quote_cons);
} else { 
  
closureN_type c_7316478;
object e_7316506 [5];
c_7316478.hdr.mark = gc_color_red;
 c_7316478.hdr.grayed = 0;
c_7316478.tag = closureN_tag;
 c_7316478.fn = (function_type)__lambda_228;
c_7316478.num_args = 1;
c_7316478.num_elements = 5;
c_7316478.elements = (object *)e_7316506;
c_7316478.elements[0] = ((closureN)self_7313257)->elements[1];
c_7316478.elements[1] = ((closureN)self_7313257)->elements[2];
c_7316478.elements[2] = ((closureN)self_7313257)->elements[3];
c_7316478.elements[3] = ((closureN)self_7313257)->elements[4];
c_7316478.elements[4] = ((closureN)self_7313257)->elements[5];

return_closcall2(data,  ((closureN)self_7313257)->elements[4],  &c_7316478, quote__list);}
;
} else { 
  
closureN_type c_7316509;
object e_7316641 [6];
c_7316509.hdr.mark = gc_color_red;
 c_7316509.hdr.grayed = 0;
c_7316509.tag = closureN_tag;
 c_7316509.fn = (function_type)__lambda_231;
c_7316509.num_args = 1;
c_7316509.num_elements = 6;
c_7316509.elements = (object *)e_7316641;
c_7316509.elements[0] = ((closureN)self_7313257)->elements[0];
c_7316509.elements[1] = ((closureN)self_7313257)->elements[1];
c_7316509.elements[2] = ((closureN)self_7313257)->elements[2];
c_7316509.elements[3] = ((closureN)self_7313257)->elements[3];
c_7316509.elements[4] = ((closureN)self_7313257)->elements[4];
c_7316509.elements[5] = ((closureN)self_7313257)->elements[5];

return_closcall2(data,  ((closureN)self_7313257)->elements[4],  &c_7316509, quote_quasiquote);}
;; 
}

static void __lambda_231(void *data, object self_7313264, int argc, object *args) /* object self_7313264, object r_734812 */
 {
 object r_734812 = args[0];
  
closureN_type c_7316512;
object e_7316637 [6];
c_7316512.hdr.mark = gc_color_red;
 c_7316512.hdr.grayed = 0;
c_7316512.tag = closureN_tag;
 c_7316512.fn = (function_type)__lambda_232;
c_7316512.num_args = 1;
c_7316512.num_elements = 6;
c_7316512.elements = (object *)e_7316637;
c_7316512.elements[0] = ((closureN)self_7313264)->elements[0];
c_7316512.elements[1] = ((closureN)self_7313264)->elements[1];
c_7316512.elements[2] = ((closureN)self_7313264)->elements[2];
c_7316512.elements[3] = ((closureN)self_7313264)->elements[3];
c_7316512.elements[4] = ((closureN)self_7313264)->elements[4];
c_7316512.elements[5] = ((closureN)self_7313264)->elements[5];



return_closcall3(data,  ((closureN)self_7313264)->elements[0],  &c_7316512, r_734812, Cyc_car(data, ((closureN)self_7313264)->elements[5]));; 
}

static void __lambda_232(void *data, object self_7313265, int argc, object *args) /* object self_7313265, object r_734779 */
 {
 object r_734779 = args[0];
  if( (boolean_f != r_734779) ){ 
  
closureN_type c_7316515;
object e_7316543 [5];
c_7316515.hdr.mark = gc_color_red;
 c_7316515.hdr.grayed = 0;
c_7316515.tag = closureN_tag;
 c_7316515.fn = (function_type)__lambda_233;
c_7316515.num_args = 1;
c_7316515.num_elements = 5;
c_7316515.elements = (object *)e_7316543;
c_7316515.elements[0] = ((closureN)self_7313265)->elements[1];
c_7316515.elements[1] = ((closureN)self_7313265)->elements[2];
c_7316515.elements[2] = ((closureN)self_7313265)->elements[3];
c_7316515.elements[3] = ((closureN)self_7313265)->elements[4];
c_7316515.elements[4] = ((closureN)self_7313265)->elements[5];

return_closcall2(data,  ((closureN)self_7313265)->elements[4],  &c_7316515, quote__list);
} else { 
  
closureN_type c_7316545;
object e_7316566 [4];
c_7316545.hdr.mark = gc_color_red;
 c_7316545.hdr.grayed = 0;
c_7316545.tag = closureN_tag;
 c_7316545.fn = (function_type)__lambda_236;
c_7316545.num_args = 0;
c_7316545.num_elements = 4;
c_7316545.elements = (object *)e_7316566;
c_7316545.elements[0] = ((closureN)self_7313265)->elements[0];
c_7316545.elements[1] = ((closureN)self_7313265)->elements[1];
c_7316545.elements[2] = ((closureN)self_7313265)->elements[4];
c_7316545.elements[3] = ((closureN)self_7313265)->elements[5];


closureN_type c_7316567;
object e_7316636 [5];
c_7316567.hdr.mark = gc_color_red;
 c_7316567.hdr.grayed = 0;
c_7316567.tag = closureN_tag;
 c_7316567.fn = (function_type)__lambda_238;
c_7316567.num_args = 1;
c_7316567.num_elements = 5;
c_7316567.elements = (object *)e_7316636;
c_7316567.elements[0] = ((closureN)self_7313265)->elements[1];
c_7316567.elements[1] = ((closureN)self_7313265)->elements[2];
c_7316567.elements[2] = ((closureN)self_7313265)->elements[3];
c_7316567.elements[3] = ((closureN)self_7313265)->elements[4];
c_7316567.elements[4] = ((closureN)self_7313265)->elements[5];

return_direct_with_clo1(data,(closure)&c_7316545,__lambda_236,  &c_7316567);}
;; 
}

static void __lambda_238(void *data, object self_7313269, int argc, object *args) /* object self_7313269, object r_734789 */
 {
 object r_734789 = args[0];
  if( (boolean_f != r_734789) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313269)->elements[4]))) ){ 
  



return_direct_with_clo1(data,  ((closureN)self_7313269)->elements[1], (((closure)  ((closureN)self_7313269)->elements[1])->fn),  Cyc_cadr(data, Cyc_car(data, ((closureN)self_7313269)->elements[4])));
} else { 
  
closureN_type c_7316582;
object e_7316604 [4];
c_7316582.hdr.mark = gc_color_red;
 c_7316582.hdr.grayed = 0;
c_7316582.tag = closureN_tag;
 c_7316582.fn = (function_type)__lambda_239;
c_7316582.num_args = 1;
c_7316582.num_elements = 4;
c_7316582.elements = (object *)e_7316604;
c_7316582.elements[0] = ((closureN)self_7313269)->elements[0];
c_7316582.elements[1] = ((closureN)self_7313269)->elements[1];
c_7316582.elements[2] = ((closureN)self_7313269)->elements[2];
c_7316582.elements[3] = ((closureN)self_7313269)->elements[4];

return_closcall2(data,  ((closureN)self_7313269)->elements[3],  &c_7316582, quote_append);}
;
} else { 
  
closureN_type c_7316607;
object e_7316635 [4];
c_7316607.hdr.mark = gc_color_red;
 c_7316607.hdr.grayed = 0;
c_7316607.tag = closureN_tag;
 c_7316607.fn = (function_type)__lambda_241;
c_7316607.num_args = 1;
c_7316607.num_elements = 4;
c_7316607.elements = (object *)e_7316635;
c_7316607.elements[0] = ((closureN)self_7313269)->elements[0];
c_7316607.elements[1] = ((closureN)self_7313269)->elements[1];
c_7316607.elements[2] = ((closureN)self_7313269)->elements[2];
c_7316607.elements[3] = ((closureN)self_7313269)->elements[4];

return_closcall2(data,  ((closureN)self_7313269)->elements[3],  &c_7316607, quote_cons);}
;; 
}

static void __lambda_241(void *data, object self_7313272, int argc, object *args) /* object self_7313272, object r_734799 */
 {
 object r_734799 = args[0];
  


closureN_type c_7316612;
object e_7316630 [5];
c_7316612.hdr.mark = gc_color_red;
 c_7316612.hdr.grayed = 0;
c_7316612.tag = closureN_tag;
 c_7316612.fn = (function_type)__lambda_242;
c_7316612.num_args = 1;
c_7316612.num_elements = 5;
c_7316612.elements = (object *)e_7316630;
c_7316612.elements[0] = ((closureN)self_7313272)->elements[0];
c_7316612.elements[1] = ((closureN)self_7313272)->elements[1];
c_7316612.elements[2] = ((closureN)self_7313272)->elements[2];
c_7316612.elements[3] = r_734799;
c_7316612.elements[4] = ((closureN)self_7313272)->elements[3];



return_closcall3(data,  car(((closureN)self_7313272)->elements[2]),  &c_7316612, Cyc_car(data, ((closureN)self_7313272)->elements[3]), ((closureN)self_7313272)->elements[0]);; 
}

static void __lambda_242(void *data, object self_7313273, int argc, object *args) /* object self_7313273, object r_734800 */
 {
 object r_734800 = args[0];
  


closureN_type c_7316617;
object e_7316625 [3];
c_7316617.hdr.mark = gc_color_red;
 c_7316617.hdr.grayed = 0;
c_7316617.tag = closureN_tag;
 c_7316617.fn = (function_type)__lambda_243;
c_7316617.num_args = 1;
c_7316617.num_elements = 3;
c_7316617.elements = (object *)e_7316625;
c_7316617.elements[0] = ((closureN)self_7313273)->elements[1];
c_7316617.elements[1] = ((closureN)self_7313273)->elements[3];
c_7316617.elements[2] = r_734800;



return_closcall3(data,  car(((closureN)self_7313273)->elements[2]),  &c_7316617, Cyc_cdr(data, ((closureN)self_7313273)->elements[4]), ((closureN)self_7313273)->elements[0]);; 
}

static void __lambda_243(void *data, object self_7313274, int argc, object *args) /* object self_7313274, object r_734801 */
 {
 object r_734801 = args[0];
  
list_3_type local_7316622; 
return_direct_with_clo1(data,  ((closureN)self_7313274)->elements[0], (((closure)  ((closureN)self_7313274)->elements[0])->fn),  Cyc_fast_list_3(&local_7316622, ((closureN)self_7313274)->elements[1], ((closureN)self_7313274)->elements[2], r_734801));; 
}

static void __lambda_239(void *data, object self_7313270, int argc, object *args) /* object self_7313270, object r_734792 */
 {
 object r_734792 = args[0];
  


closureN_type c_7316587;
object e_7316599 [3];
c_7316587.hdr.mark = gc_color_red;
 c_7316587.hdr.grayed = 0;
c_7316587.tag = closureN_tag;
 c_7316587.fn = (function_type)__lambda_240;
c_7316587.num_args = 1;
c_7316587.num_elements = 3;
c_7316587.elements = (object *)e_7316599;
c_7316587.elements[0] = ((closureN)self_7313270)->elements[1];
c_7316587.elements[1] = r_734792;
c_7316587.elements[2] = ((closureN)self_7313270)->elements[3];



return_closcall3(data,  car(((closureN)self_7313270)->elements[2]),  &c_7316587, Cyc_cdr(data, ((closureN)self_7313270)->elements[3]), ((closureN)self_7313270)->elements[0]);; 
}

static void __lambda_240(void *data, object self_7313271, int argc, object *args) /* object self_7313271, object r_734794 */
 {
 object r_734794 = args[0];
  
list_3_type local_7316592; 




return_direct_with_clo1(data,  ((closureN)self_7313271)->elements[0], (((closure)  ((closureN)self_7313271)->elements[0])->fn),  Cyc_fast_list_3(&local_7316592, ((closureN)self_7313271)->elements[1], Cyc_cadr(data, Cyc_car(data, ((closureN)self_7313271)->elements[2])), r_734794));; 
}

static void __lambda_236(void *data, object self_7313275, int argc, object *args) /* object self_7313275, object k_734805 */
 {
 object k_734805 = args[0];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313275)->elements[1], obj_int2obj(0))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313275)->elements[3]))) ){ 
  
closureN_type c_7316556;
object e_7316563 [3];
c_7316556.hdr.mark = gc_color_red;
 c_7316556.hdr.grayed = 0;
c_7316556.tag = closureN_tag;
 c_7316556.fn = (function_type)__lambda_237;
c_7316556.num_args = 1;
c_7316556.num_elements = 3;
c_7316556.elements = (object *)e_7316563;
c_7316556.elements[0] = ((closureN)self_7313275)->elements[0];
c_7316556.elements[1] = k_734805;
c_7316556.elements[2] = ((closureN)self_7313275)->elements[3];

return_closcall2(data,  ((closureN)self_7313275)->elements[2],  &c_7316556, quote_unquote_91splicing);
} else { 
  return_direct_with_clo1(data,  k_734805, (((closure)  k_734805)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_734805, (((closure)  k_734805)->fn),  boolean_f);}
;; 
}

static void __lambda_237(void *data, object self_7313276, int argc, object *args) /* object self_7313276, object r_734808 */
 {
 object r_734808 = args[0];
  

return_closcall3(data,  ((closureN)self_7313276)->elements[0],  ((closureN)self_7313276)->elements[1], r_734808, Cyc_caar(data, ((closureN)self_7313276)->elements[2]));; 
}

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

return_closcall2(data,  ((closureN)self_7313266)->elements[3],  &c_7316518, quote_quote);; 
}

static void __lambda_234(void *data, object self_7313267, int argc, object *args) /* object self_7313267, object r_734785 */
 {
 object r_734785 = args[0];
  


closureN_type c_7316523;
object e_7316534 [3];
c_7316523.hdr.mark = gc_color_red;
 c_7316523.hdr.grayed = 0;
c_7316523.tag = closureN_tag;
 c_7316523.fn = (function_type)__lambda_235;
c_7316523.num_args = 1;
c_7316523.num_elements = 3;
c_7316523.elements = (object *)e_7316534;
c_7316523.elements[0] = ((closureN)self_7313267)->elements[1];
c_7316523.elements[1] = ((closureN)self_7313267)->elements[3];
c_7316523.elements[2] = r_734785;




complex_num_type local_7316540; 
return_closcall3(data,  car(((closureN)self_7313267)->elements[2]),  &c_7316523, Cyc_cadr(data, ((closureN)self_7313267)->elements[4]), Cyc_fast_sum(data,&local_7316540, ((closureN)self_7313267)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_235(void *data, object self_7313268, int argc, object *args) /* object self_7313268, object r_734782 */
 {
 object r_734782 = args[0];
  
list_3_type local_7316528; 

list_2_type local_7316532; 
return_direct_with_clo1(data,  ((closureN)self_7313268)->elements[0], (((closure)  ((closureN)self_7313268)->elements[0])->fn),  Cyc_fast_list_3(&local_7316528, ((closureN)self_7313268)->elements[1], Cyc_fast_list_2(&local_7316532, ((closureN)self_7313268)->elements[2], quote_quasiquote), r_734782));; 
}

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

return_closcall2(data,  ((closureN)self_7313261)->elements[3],  &c_7316481, quote_quote);; 
}

static void __lambda_229(void *data, object self_7313262, int argc, object *args) /* object self_7313262, object r_734775 */
 {
 object r_734775 = args[0];
  


closureN_type c_7316486;
object e_7316497 [3];
c_7316486.hdr.mark = gc_color_red;
 c_7316486.hdr.grayed = 0;
c_7316486.tag = closureN_tag;
 c_7316486.fn = (function_type)__lambda_230;
c_7316486.num_args = 1;
c_7316486.num_elements = 3;
c_7316486.elements = (object *)e_7316497;
c_7316486.elements[0] = ((closureN)self_7313262)->elements[1];
c_7316486.elements[1] = ((closureN)self_7313262)->elements[3];
c_7316486.elements[2] = r_734775;




complex_num_type local_7316503; 
return_closcall3(data,  car(((closureN)self_7313262)->elements[2]),  &c_7316486, Cyc_cadr(data, ((closureN)self_7313262)->elements[4]), Cyc_fast_sub(data,&local_7316503, ((closureN)self_7313262)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_230(void *data, object self_7313263, int argc, object *args) /* object self_7313263, object r_734772 */
 {
 object r_734772 = args[0];
  
list_3_type local_7316491; 

list_2_type local_7316495; 
return_direct_with_clo1(data,  ((closureN)self_7313263)->elements[0], (((closure)  ((closureN)self_7313263)->elements[0])->fn),  Cyc_fast_list_3(&local_7316491, ((closureN)self_7313263)->elements[1], Cyc_fast_list_2(&local_7316495, ((closureN)self_7313263)->elements[2], quote_unquote_91splicing), r_734772));; 
}

static void __lambda_225(void *data, object self_7313258, int argc, object *args) /* object self_7313258, object r_734764 */
 {
 object r_734764 = args[0];
  


closureN_type c_7316452;
object e_7316470 [5];
c_7316452.hdr.mark = gc_color_red;
 c_7316452.hdr.grayed = 0;
c_7316452.tag = closureN_tag;
 c_7316452.fn = (function_type)__lambda_226;
c_7316452.num_args = 1;
c_7316452.num_elements = 5;
c_7316452.elements = (object *)e_7316470;
c_7316452.elements[0] = ((closureN)self_7313258)->elements[0];
c_7316452.elements[1] = ((closureN)self_7313258)->elements[1];
c_7316452.elements[2] = ((closureN)self_7313258)->elements[2];
c_7316452.elements[3] = r_734764;
c_7316452.elements[4] = ((closureN)self_7313258)->elements[3];



return_closcall3(data,  car(((closureN)self_7313258)->elements[2]),  &c_7316452, Cyc_car(data, ((closureN)self_7313258)->elements[3]), ((closureN)self_7313258)->elements[0]);; 
}

static void __lambda_226(void *data, object self_7313259, int argc, object *args) /* object self_7313259, object r_734765 */
 {
 object r_734765 = args[0];
  


closureN_type c_7316457;
object e_7316465 [3];
c_7316457.hdr.mark = gc_color_red;
 c_7316457.hdr.grayed = 0;
c_7316457.tag = closureN_tag;
 c_7316457.fn = (function_type)__lambda_227;
c_7316457.num_args = 1;
c_7316457.num_elements = 3;
c_7316457.elements = (object *)e_7316465;
c_7316457.elements[0] = ((closureN)self_7313259)->elements[1];
c_7316457.elements[1] = ((closureN)self_7313259)->elements[3];
c_7316457.elements[2] = r_734765;



return_closcall3(data,  car(((closureN)self_7313259)->elements[2]),  &c_7316457, Cyc_cdr(data, ((closureN)self_7313259)->elements[4]), ((closureN)self_7313259)->elements[0]);; 
}

static void __lambda_227(void *data, object self_7313260, int argc, object *args) /* object self_7313260, object r_734766 */
 {
 object r_734766 = args[0];
  
list_3_type local_7316462; 
return_direct_with_clo1(data,  ((closureN)self_7313260)->elements[0], (((closure)  ((closureN)self_7313260)->elements[0])->fn),  Cyc_fast_list_3(&local_7316462, ((closureN)self_7313260)->elements[1], ((closureN)self_7313260)->elements[2], r_734766));; 
}

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

return_closcall2(data,  ((closureN)self_7313253)->elements[3],  &c_7316410, quote_quote);; 
}

static void __lambda_221(void *data, object self_7313254, int argc, object *args) /* object self_7313254, object r_734758 */
 {
 object r_734758 = args[0];
  


closureN_type c_7316415;
object e_7316426 [3];
c_7316415.hdr.mark = gc_color_red;
 c_7316415.hdr.grayed = 0;
c_7316415.tag = closureN_tag;
 c_7316415.fn = (function_type)__lambda_222;
c_7316415.num_args = 1;
c_7316415.num_elements = 3;
c_7316415.elements = (object *)e_7316426;
c_7316415.elements[0] = ((closureN)self_7313254)->elements[1];
c_7316415.elements[1] = ((closureN)self_7313254)->elements[3];
c_7316415.elements[2] = r_734758;




complex_num_type local_7316432; 
return_closcall3(data,  car(((closureN)self_7313254)->elements[2]),  &c_7316415, Cyc_cadr(data, ((closureN)self_7313254)->elements[4]), Cyc_fast_sub(data,&local_7316432, ((closureN)self_7313254)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_222(void *data, object self_7313255, int argc, object *args) /* object self_7313255, object r_734755 */
 {
 object r_734755 = args[0];
  
list_3_type local_7316420; 

list_2_type local_7316424; 
return_direct_with_clo1(data,  ((closureN)self_7313255)->elements[0], (((closure)  ((closureN)self_7313255)->elements[0])->fn),  Cyc_fast_list_3(&local_7316420, ((closureN)self_7313255)->elements[1], Cyc_fast_list_2(&local_7316424, ((closureN)self_7313255)->elements[2], quote_unquote), r_734755));; 
}

static void __lambda_215(void *data, object self_7313281, int argc, object *args) /* object self_7313281, object r_734748 */
 {
 object r_734748 = args[0];
  
closureN_type c_7316374;
object e_7316383 [3];
c_7316374.hdr.mark = gc_color_red;
 c_7316374.hdr.grayed = 0;
c_7316374.tag = closureN_tag;
 c_7316374.fn = (function_type)__lambda_216;
c_7316374.num_args = 1;
c_7316374.num_elements = 3;
c_7316374.elements = (object *)e_7316383;
c_7316374.elements[0] = ((closureN)self_7313281)->elements[0];
c_7316374.elements[1] = ((closureN)self_7313281)->elements[1];
c_7316374.elements[2] = ((closureN)self_7313281)->elements[2];



return_direct_with_clo1(data,(closure)&c_7316374,__lambda_216,  Cyc_set_cell(data, ((closureN)self_7313281)->elements[2], r_734748));; 
}

static void __lambda_216(void *data, object self_7313282, int argc, object *args) /* object self_7313282, object r_734746 */
 {

  



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

static void __lambda_189(void *data, object _, int argc, object *args) /* closure _,object k_734666, object expr_73227_732977, object rename_73228_732978, object compare_73229_732979 */
 {
object k_734666 = args[0]; object expr_73227_732977 = args[1]; object rename_73228_732978 = args[2];
  Cyc_st_add(data, "scheme/base.sld:do");

closureN_type c_7316133;
object e_7316365 [3];
c_7316133.hdr.mark = gc_color_red;
 c_7316133.hdr.grayed = 0;
c_7316133.tag = closureN_tag;
 c_7316133.fn = (function_type)__lambda_190;
c_7316133.num_args = 1;
c_7316133.num_elements = 3;
c_7316133.elements = (object *)e_7316365;
c_7316133.elements[0] = expr_73227_732977;
c_7316133.elements[1] = k_734666;
c_7316133.elements[2] = rename_73228_732978;

return_closcall2(data,  rename_73228_732978,  &c_7316133, quote_begin);; 
}

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

return_closcall2(data,  ((closureN)self_7313225)->elements[2],  &c_7316136, quote_lp);; 
}

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


mmacro(c_7316330, (function_type)__lambda_210);c_7316330.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7316138,__lambda_192,  &c_7316330);; 
}

static void __lambda_210(void *data, object self_7313227, int argc, object *args) /* object self_7313227, object k_734733, object x_73253_732984 */
 {
 object k_734733 = args[0]; object x_73253_732984 = args[1];
  
closureN_type c_7316332;
object e_7316361 [2];
c_7316332.hdr.mark = gc_color_red;
 c_7316332.hdr.grayed = 0;
c_7316332.tag = closureN_tag;
 c_7316332.fn = (function_type)__lambda_211;
c_7316332.num_args = 1;
c_7316332.num_elements = 2;
c_7316332.elements = (object *)e_7316361;
c_7316332.elements[0] = k_734733;
c_7316332.elements[1] = x_73253_732984;



return_direct_with_clo1(data,(closure)&c_7316332,__lambda_211,  Cyc_cddr(data, x_73253_732984));; 
}

static void __lambda_211(void *data, object self_7313228, int argc, object *args) /* object self_7313228, object r_734739 */
 {
 object r_734739 = args[0];
    
if( (boolean_f != Cyc_is_pair(r_734739)) ){ 
  
closureN_type c_7316336;
object e_7316352 [2];
c_7316336.hdr.mark = gc_color_red;
 c_7316336.hdr.grayed = 0;
c_7316336.tag = closureN_tag;
 c_7316336.fn = (function_type)__lambda_212;
c_7316336.num_args = 1;
c_7316336.num_elements = 2;
c_7316336.elements = (object *)e_7316352;
c_7316336.elements[0] = ((closureN)self_7313228)->elements[0];
c_7316336.elements[1] = ((closureN)self_7313228)->elements[1];



return_direct_with_clo1(data,(closure)&c_7316336,__lambda_212,  Cyc_cddr(data, ((closureN)self_7313228)->elements[1]));
} else { 
  

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

static void __lambda_212(void *data, object self_7313229, int argc, object *args) /* object self_7313229, object r_734738 */
 {
 object r_734738 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, r_734738))) ){ 
  
make_utf8_string_with_len(c_7316343, "too many forms in do iterator", 29, 29);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313229)->elements[0], &c_7316343, ((closureN)self_7313229)->elements[1]);
} else { 
  



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

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



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7316140, r_734731, Cyc_cadr(data, ((closureN)self_7313230)->elements[0]));; 
}

static void __lambda_193(void *data, object self_7313231, int argc, object *args) /* object self_7313231, object r_734730 */
 {
 object r_734730 = args[0];
  
closureN_type c_7316142;
object e_7316312 [4];
c_7316142.hdr.mark = gc_color_red;
 c_7316142.hdr.grayed = 0;
c_7316142.tag = closureN_tag;
 c_7316142.fn = (function_type)__lambda_194;
c_7316142.num_args = 1;
c_7316142.num_elements = 4;
c_7316142.elements = (object *)e_7316312;
c_7316142.elements[0] = ((closureN)self_7313231)->elements[0];
c_7316142.elements[1] = ((closureN)self_7313231)->elements[1];
c_7316142.elements[2] = ((closureN)self_7313231)->elements[2];
c_7316142.elements[3] = ((closureN)self_7313231)->elements[4];






pair_type local_7316320; 

pair_type local_7316323; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7316142, Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7313231)->elements[0])), set_pair_as_expr(&local_7316320, set_pair_as_expr(&local_7316323, ((closureN)self_7313231)->elements[3], r_734730), NULL));; 
}

static void __lambda_194(void *data, object self_7313232, int argc, object *args) /* object self_7313232, object r_734724 */
 {
 object r_734724 = args[0];
  
closureN_type c_7316144;
object e_7316307 [3];
c_7316144.hdr.mark = gc_color_red;
 c_7316144.hdr.grayed = 0;
c_7316144.tag = closureN_tag;
 c_7316144.fn = (function_type)__lambda_195;
c_7316144.num_args = 1;
c_7316144.num_elements = 3;
c_7316144.elements = (object *)e_7316307;
c_7316144.elements[0] = ((closureN)self_7313232)->elements[0];
c_7316144.elements[1] = ((closureN)self_7313232)->elements[1];
c_7316144.elements[2] = ((closureN)self_7313232)->elements[3];


pair_type local_7316310; 
return_direct_with_clo1(data,(closure)&c_7316144,__lambda_195,  set_pair_as_expr(&local_7316310, ((closureN)self_7313232)->elements[2], r_734724));; 
}

static void __lambda_195(void *data, object self_7313233, int argc, object *args) /* object self_7313233, object body_73232_732980 */
 {
 object body_73232_732980 = args[0];
  
closureN_type c_7316146;
object e_7316261 [3];
c_7316146.hdr.mark = gc_color_red;
 c_7316146.hdr.grayed = 0;
c_7316146.tag = closureN_tag;
 c_7316146.fn = (function_type)__lambda_196;
c_7316146.num_args = 0;
c_7316146.num_elements = 3;
c_7316146.elements = (object *)e_7316261;
c_7316146.elements[0] = body_73232_732980;
c_7316146.elements[1] = ((closureN)self_7313233)->elements[0];
c_7316146.elements[2] = ((closureN)self_7313233)->elements[2];


closureN_type c_7316262;
object e_7316306 [3];
c_7316262.hdr.mark = gc_color_red;
 c_7316262.hdr.grayed = 0;
c_7316262.tag = closureN_tag;
 c_7316262.fn = (function_type)__lambda_204;
c_7316262.num_args = 1;
c_7316262.num_elements = 3;
c_7316262.elements = (object *)e_7316306;
c_7316262.elements[0] = ((closureN)self_7313233)->elements[0];
c_7316262.elements[1] = ((closureN)self_7313233)->elements[1];
c_7316262.elements[2] = ((closureN)self_7313233)->elements[2];

return_direct_with_clo1(data,(closure)&c_7316146,__lambda_196,  &c_7316262);; 
}

static void __lambda_204(void *data, object self_7313234, int argc, object *args) /* object self_7313234, object wrap_73238_732982 */
 {
 object wrap_73238_732982 = args[0];
  
closureN_type c_7316265;
object e_7316305 [4];
c_7316265.hdr.mark = gc_color_red;
 c_7316265.hdr.grayed = 0;
c_7316265.tag = closureN_tag;
 c_7316265.fn = (function_type)__lambda_205;
c_7316265.num_args = 1;
c_7316265.num_elements = 4;
c_7316265.elements = (object *)e_7316305;
c_7316265.elements[0] = ((closureN)self_7313234)->elements[0];
c_7316265.elements[1] = ((closureN)self_7313234)->elements[1];
c_7316265.elements[2] = ((closureN)self_7313234)->elements[2];
c_7316265.elements[3] = wrap_73238_732982;

return_closcall2(data,  ((closureN)self_7313234)->elements[2],  &c_7316265, quote_let);; 
}

static void __lambda_205(void *data, object self_7313235, int argc, object *args) /* object self_7313235, object r_734670 */
 {
 object r_734670 = args[0];
  
closureN_type c_7316268;
object e_7316304 [4];
c_7316268.hdr.mark = gc_color_red;
 c_7316268.hdr.grayed = 0;
c_7316268.tag = closureN_tag;
 c_7316268.fn = (function_type)__lambda_206;
c_7316268.num_args = 1;
c_7316268.num_elements = 4;
c_7316268.elements = (object *)e_7316304;
c_7316268.elements[0] = ((closureN)self_7313235)->elements[0];
c_7316268.elements[1] = ((closureN)self_7313235)->elements[1];
c_7316268.elements[2] = r_734670;
c_7316268.elements[3] = ((closureN)self_7313235)->elements[3];

return_closcall2(data,  ((closureN)self_7313235)->elements[2],  &c_7316268, quote_lp);; 
}

static void __lambda_206(void *data, object self_7313236, int argc, object *args) /* object self_7313236, object r_734672 */
 {
 object r_734672 = args[0];
  
closureN_type c_7316270;
object e_7316294 [5];
c_7316270.hdr.mark = gc_color_red;
 c_7316270.hdr.grayed = 0;
c_7316270.tag = closureN_tag;
 c_7316270.fn = (function_type)__lambda_207;
c_7316270.num_args = 1;
c_7316270.num_elements = 5;
c_7316270.elements = (object *)e_7316294;
c_7316270.elements[0] = ((closureN)self_7313236)->elements[0];
c_7316270.elements[1] = ((closureN)self_7313236)->elements[1];
c_7316270.elements[2] = ((closureN)self_7313236)->elements[2];
c_7316270.elements[3] = r_734672;
c_7316270.elements[4] = ((closureN)self_7313236)->elements[3];


mmacro(c_7316295, (function_type)__lambda_209);c_7316295.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7316270,__lambda_207,  &c_7316295);; 
}

static void __lambda_209(void *data, object self_7313237, int argc, object *args) /* object self_7313237, object k_734679, object x_73243_732983 */
 {
 object k_734679 = args[0]; object x_73243_732983 = args[1];
  
list_2_type local_7316299; 




return_direct_with_clo1(data,  k_734679, (((closure)  k_734679)->fn),  Cyc_fast_list_2(&local_7316299, Cyc_car(data, x_73243_732983), Cyc_cadr(data, x_73243_732983)));; 
}

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



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7316272, r_734677, Cyc_cadr(data, ((closureN)self_7313238)->elements[0]));; 
}

static void __lambda_208(void *data, object self_7313239, int argc, object *args) /* object self_7313239, object r_734674 */
 {
 object r_734674 = args[0];
  
pair_type local_7316277; 

pair_type local_7316281; 

pair_type local_7316285; 

pair_type local_7316288; 
return_direct_with_clo1(data,  ((closureN)self_7313239)->elements[0], (((closure)  ((closureN)self_7313239)->elements[0])->fn),  set_pair_as_expr(&local_7316277, ((closureN)self_7313239)->elements[1], set_pair_as_expr(&local_7316281, ((closureN)self_7313239)->elements[2], set_pair_as_expr(&local_7316285, r_734674, set_pair_as_expr(&local_7316288, ((closureN)self_7313239)->elements[3], NULL)))));; 
}

static void __lambda_196(void *data, object self_7313240, int argc, object *args) /* object self_7313240, object k_734684 */
 {
 object k_734684 = args[0];
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313240)->elements[1]))))) ){ 
  
closureN_type c_7316158;
object e_7316219 [4];
c_7316158.hdr.mark = gc_color_red;
 c_7316158.hdr.grayed = 0;
c_7316158.tag = closureN_tag;
 c_7316158.fn = (function_type)__lambda_197;
c_7316158.num_args = 1;
c_7316158.num_elements = 4;
c_7316158.elements = (object *)e_7316219;
c_7316158.elements[0] = ((closureN)self_7313240)->elements[0];
c_7316158.elements[1] = ((closureN)self_7313240)->elements[1];
c_7316158.elements[2] = k_734684;
c_7316158.elements[3] = ((closureN)self_7313240)->elements[2];

return_closcall2(data,  ((closureN)self_7313240)->elements[2],  &c_7316158, quote_let);
} else { 
  
closureN_type c_7316222;
object e_7316260 [4];
c_7316222.hdr.mark = gc_color_red;
 c_7316222.hdr.grayed = 0;
c_7316222.tag = closureN_tag;
 c_7316222.fn = (function_type)__lambda_202;
c_7316222.num_args = 1;
c_7316222.num_elements = 4;
c_7316222.elements = (object *)e_7316260;
c_7316222.elements[0] = ((closureN)self_7313240)->elements[0];
c_7316222.elements[1] = ((closureN)self_7313240)->elements[1];
c_7316222.elements[2] = k_734684;
c_7316222.elements[3] = ((closureN)self_7313240)->elements[2];

return_closcall2(data,  ((closureN)self_7313240)->elements[2],  &c_7316222, quote__if);}
;; 
}

static void __lambda_202(void *data, object self_7313246, int argc, object *args) /* object self_7313246, object r_734710 */
 {
 object r_734710 = args[0];
  
closureN_type c_7316225;
object e_7316259 [4];
c_7316225.hdr.mark = gc_color_red;
 c_7316225.hdr.grayed = 0;
c_7316225.tag = closureN_tag;
 c_7316225.fn = (function_type)__lambda_203;
c_7316225.num_args = 1;
c_7316225.num_elements = 4;
c_7316225.elements = (object *)e_7316259;
c_7316225.elements[0] = ((closureN)self_7313246)->elements[0];
c_7316225.elements[1] = ((closureN)self_7313246)->elements[1];
c_7316225.elements[2] = ((closureN)self_7313246)->elements[2];
c_7316225.elements[3] = r_734710;

return_closcall2(data,  ((closureN)self_7313246)->elements[3],  &c_7316225, quote_begin);; 
}

static void __lambda_203(void *data, object self_7313247, int argc, object *args) /* object self_7313247, object r_734717 */
 {
 object r_734717 = args[0];
  
pair_type local_7316230; 

pair_type local_7316234; 







pair_type local_7316244; 

pair_type local_7316247; 







pair_type local_7316257; 
return_direct_with_clo1(data,  ((closureN)self_7313247)->elements[2], (((closure)  ((closureN)self_7313247)->elements[2])->fn),  set_pair_as_expr(&local_7316230, ((closureN)self_7313247)->elements[3], set_pair_as_expr(&local_7316234, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313247)->elements[1]))), set_pair_as_expr(&local_7316244, set_pair_as_expr(&local_7316247, r_734717, Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313247)->elements[1])))), set_pair_as_expr(&local_7316257, ((closureN)self_7313247)->elements[0], NULL)))));; 
}

static void __lambda_197(void *data, object self_7313241, int argc, object *args) /* object self_7313241, object r_734686 */
 {
 object r_734686 = args[0];
  
closureN_type c_7316161;
object e_7316218 [5];
c_7316161.hdr.mark = gc_color_red;
 c_7316161.hdr.grayed = 0;
c_7316161.tag = closureN_tag;
 c_7316161.fn = (function_type)__lambda_198;
c_7316161.num_args = 1;
c_7316161.num_elements = 5;
c_7316161.elements = (object *)e_7316218;
c_7316161.elements[0] = ((closureN)self_7313241)->elements[0];
c_7316161.elements[1] = ((closureN)self_7313241)->elements[1];
c_7316161.elements[2] = ((closureN)self_7313241)->elements[2];
c_7316161.elements[3] = r_734686;
c_7316161.elements[4] = ((closureN)self_7313241)->elements[3];

return_closcall2(data,  ((closureN)self_7313241)->elements[3],  &c_7316161, quote_tmp);; 
}

static void __lambda_198(void *data, object self_7313242, int argc, object *args) /* object self_7313242, object r_734704 */
 {
 object r_734704 = args[0];
  
closureN_type c_7316164;
object e_7316217 [6];
c_7316164.hdr.mark = gc_color_red;
 c_7316164.hdr.grayed = 0;
c_7316164.tag = closureN_tag;
 c_7316164.fn = (function_type)__lambda_199;
c_7316164.num_args = 1;
c_7316164.num_elements = 6;
c_7316164.elements = (object *)e_7316217;
c_7316164.elements[0] = ((closureN)self_7313242)->elements[0];
c_7316164.elements[1] = ((closureN)self_7313242)->elements[1];
c_7316164.elements[2] = ((closureN)self_7313242)->elements[2];
c_7316164.elements[3] = ((closureN)self_7313242)->elements[3];
c_7316164.elements[4] = r_734704;
c_7316164.elements[5] = ((closureN)self_7313242)->elements[4];

return_closcall2(data,  ((closureN)self_7313242)->elements[4],  &c_7316164, quote__if);; 
}

static void __lambda_199(void *data, object self_7313243, int argc, object *args) /* object self_7313243, object r_734692 */
 {
 object r_734692 = args[0];
  
closureN_type c_7316167;
object e_7316216 [7];
c_7316167.hdr.mark = gc_color_red;
 c_7316167.hdr.grayed = 0;
c_7316167.tag = closureN_tag;
 c_7316167.fn = (function_type)__lambda_200;
c_7316167.num_args = 1;
c_7316167.num_elements = 7;
c_7316167.elements = (object *)e_7316216;
c_7316167.elements[0] = ((closureN)self_7313243)->elements[0];
c_7316167.elements[1] = ((closureN)self_7313243)->elements[1];
c_7316167.elements[2] = ((closureN)self_7313243)->elements[2];
c_7316167.elements[3] = ((closureN)self_7313243)->elements[3];
c_7316167.elements[4] = r_734692;
c_7316167.elements[5] = ((closureN)self_7313243)->elements[4];
c_7316167.elements[6] = ((closureN)self_7313243)->elements[5];

return_closcall2(data,  ((closureN)self_7313243)->elements[5],  &c_7316167, quote_tmp);; 
}

static void __lambda_200(void *data, object self_7313244, int argc, object *args) /* object self_7313244, object r_734694 */
 {
 object r_734694 = args[0];
  
closureN_type c_7316170;
object e_7316215 [7];
c_7316170.hdr.mark = gc_color_red;
 c_7316170.hdr.grayed = 0;
c_7316170.tag = closureN_tag;
 c_7316170.fn = (function_type)__lambda_201;
c_7316170.num_args = 1;
c_7316170.num_elements = 7;
c_7316170.elements = (object *)e_7316215;
c_7316170.elements[0] = ((closureN)self_7313244)->elements[0];
c_7316170.elements[1] = ((closureN)self_7313244)->elements[1];
c_7316170.elements[2] = ((closureN)self_7313244)->elements[2];
c_7316170.elements[3] = ((closureN)self_7313244)->elements[3];
c_7316170.elements[4] = ((closureN)self_7313244)->elements[4];
c_7316170.elements[5] = r_734694;
c_7316170.elements[6] = ((closureN)self_7313244)->elements[5];

return_closcall2(data,  ((closureN)self_7313244)->elements[6],  &c_7316170, quote_tmp);; 
}

static void __lambda_201(void *data, object self_7313245, int argc, object *args) /* object self_7313245, object r_734696 */
 {
 object r_734696 = args[0];
  
pair_type local_7316175; 

pair_type local_7316179; 

pair_type local_7316182; 

pair_type local_7316185; 

pair_type local_7316189; 







pair_type local_7316199; 

pair_type local_7316202; 

pair_type local_7316206; 

pair_type local_7316210; 

pair_type local_7316213; 
return_direct_with_clo1(data,  ((closureN)self_7313245)->elements[2], (((closure)  ((closureN)self_7313245)->elements[2])->fn),  set_pair_as_expr(&local_7316175, ((closureN)self_7313245)->elements[3], set_pair_as_expr(&local_7316179, set_pair_as_expr(&local_7316182, set_pair_as_expr(&local_7316185, ((closureN)self_7313245)->elements[6], set_pair_as_expr(&local_7316189, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313245)->elements[1]))), NULL)), NULL), set_pair_as_expr(&local_7316199, set_pair_as_expr(&local_7316202, ((closureN)self_7313245)->elements[4], set_pair_as_expr(&local_7316206, ((closureN)self_7313245)->elements[5], set_pair_as_expr(&local_7316210, r_734696, set_pair_as_expr(&local_7316213, ((closureN)self_7313245)->elements[0], NULL)))), NULL))));; 
}

static void __lambda_182(void *data, object _, int argc, object *args) /* closure _,object k_734639, object exp_73221_732974, object rename_73222_732975, object compare_73223_732976 */
 {
object k_734639 = args[0]; object exp_73221_732974 = args[1];
  Cyc_st_add(data, "scheme/base.sld:unless");

closureN_type c_7316062;
object e_7316077 [1];
c_7316062.hdr.mark = gc_color_red;
 c_7316062.hdr.grayed = 0;
c_7316062.tag = closureN_tag;
 c_7316062.fn = (function_type)__lambda_183;
c_7316062.num_args = 0;
c_7316062.num_elements = 1;
c_7316062.elements = (object *)e_7316077;
c_7316062.elements[0] = exp_73221_732974;


closureN_type c_7316078;
object e_7316130 [2];
c_7316078.hdr.mark = gc_color_red;
 c_7316078.hdr.grayed = 0;
c_7316078.tag = closureN_tag;
 c_7316078.fn = (function_type)__lambda_185;
c_7316078.num_args = 1;
c_7316078.num_elements = 2;
c_7316078.elements = (object *)e_7316130;
c_7316078.elements[0] = exp_73221_732974;
c_7316078.elements[1] = k_734639;

return_direct_with_clo1(data,(closure)&c_7316062,__lambda_183,  &c_7316078);; 
}

static void __lambda_185(void *data, object self_7313219, int argc, object *args) /* object self_7313219, object r_734640 */
 {

  
closureN_type c_7316080;
object e_7316095 [1];
c_7316080.hdr.mark = gc_color_red;
 c_7316080.hdr.grayed = 0;
c_7316080.tag = closureN_tag;
 c_7316080.fn = (function_type)__lambda_186;
c_7316080.num_args = 0;
c_7316080.num_elements = 1;
c_7316080.elements = (object *)e_7316095;
c_7316080.elements[0] = ((closureN)self_7313219)->elements[0];


closureN_type c_7316096;
object e_7316129 [2];
c_7316096.hdr.mark = gc_color_red;
 c_7316096.hdr.grayed = 0;
c_7316096.tag = closureN_tag;
 c_7316096.fn = (function_type)__lambda_188;
c_7316096.num_args = 1;
c_7316096.num_elements = 2;
c_7316096.elements = (object *)e_7316129;
c_7316096.elements[0] = ((closureN)self_7313219)->elements[0];
c_7316096.elements[1] = ((closureN)self_7313219)->elements[1];

return_direct_with_clo1(data,(closure)&c_7316080,__lambda_186,  &c_7316096);; 
}

static void __lambda_188(void *data, object self_7313220, int argc, object *args) /* object self_7313220, object r_734641 */
 {

  
pair_type local_7316101; 

pair_type local_7316104; 

pair_type local_7316107; 

pair_type local_7316110; 



pair_type local_7316116; 

pair_type local_7316119; 

pair_type local_7316122; 

pair_type local_7316125; 


return_direct_with_clo1(data,  ((closureN)self_7313220)->elements[1], (((closure)  ((closureN)self_7313220)->elements[1])->fn),  set_pair_as_expr(&local_7316101, quote__if, set_pair_as_expr(&local_7316104, set_pair_as_expr(&local_7316107, quote_not, set_pair_as_expr(&local_7316110, Cyc_cadr(data, ((closureN)self_7313220)->elements[0]), NULL)), set_pair_as_expr(&local_7316116, set_pair_as_expr(&local_7316119, set_pair_as_expr(&local_7316122, quote_lambda, set_pair_as_expr(&local_7316125, NULL, Cyc_cddr(data, ((closureN)self_7313220)->elements[0]))), NULL), NULL))));; 
}

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



return_direct_with_clo1(data,(closure)&c_7316082,__lambda_187,  Cyc_cddr(data, ((closureN)self_7313221)->elements[0]));; 
}

static void __lambda_187(void *data, object self_7313222, int argc, object *args) /* object self_7313222, object r_734660 */
 {
 object r_734660 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734660)) ){ 
  
make_utf8_string_with_len(c_7316087, "no unless body", 14, 14);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313222)->elements[1], &c_7316087, ((closureN)self_7313222)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313222)->elements[1], (((closure)  ((closureN)self_7313222)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_183(void *data, object self_7313223, int argc, object *args) /* object self_7313223, object k_734661 */
 {
 object k_734661 = args[0];
  
closureN_type c_7316064;
object e_7316073 [2];
c_7316064.hdr.mark = gc_color_red;
 c_7316064.hdr.grayed = 0;
c_7316064.tag = closureN_tag;
 c_7316064.fn = (function_type)__lambda_184;
c_7316064.num_args = 1;
c_7316064.num_elements = 2;
c_7316064.elements = (object *)e_7316073;
c_7316064.elements[0] = ((closureN)self_7313223)->elements[0];
c_7316064.elements[1] = k_734661;



return_direct_with_clo1(data,(closure)&c_7316064,__lambda_184,  Cyc_cdr(data, ((closureN)self_7313223)->elements[0]));; 
}

static void __lambda_184(void *data, object self_7313224, int argc, object *args) /* object self_7313224, object r_734663 */
 {
 object r_734663 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734663)) ){ 
  
make_utf8_string_with_len(c_7316069, "empty unless", 12, 12);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313224)->elements[1], &c_7316069, ((closureN)self_7313224)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313224)->elements[1], (((closure)  ((closureN)self_7313224)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_175(void *data, object _, int argc, object *args) /* closure _,object k_734616, object exp_73215_732971, object rename_73216_732972, object compare_73217_732973 */
 {
object k_734616 = args[0]; object exp_73215_732971 = args[1];
  Cyc_st_add(data, "scheme/base.sld:when");

closureN_type c_7315997;
object e_7316012 [1];
c_7315997.hdr.mark = gc_color_red;
 c_7315997.hdr.grayed = 0;
c_7315997.tag = closureN_tag;
 c_7315997.fn = (function_type)__lambda_176;
c_7315997.num_args = 0;
c_7315997.num_elements = 1;
c_7315997.elements = (object *)e_7316012;
c_7315997.elements[0] = exp_73215_732971;


closureN_type c_7316013;
object e_7316059 [2];
c_7316013.hdr.mark = gc_color_red;
 c_7316013.hdr.grayed = 0;
c_7316013.tag = closureN_tag;
 c_7316013.fn = (function_type)__lambda_178;
c_7316013.num_args = 1;
c_7316013.num_elements = 2;
c_7316013.elements = (object *)e_7316059;
c_7316013.elements[0] = exp_73215_732971;
c_7316013.elements[1] = k_734616;

return_direct_with_clo1(data,(closure)&c_7315997,__lambda_176,  &c_7316013);; 
}

static void __lambda_178(void *data, object self_7313213, int argc, object *args) /* object self_7313213, object r_734617 */
 {

  
closureN_type c_7316015;
object e_7316030 [1];
c_7316015.hdr.mark = gc_color_red;
 c_7316015.hdr.grayed = 0;
c_7316015.tag = closureN_tag;
 c_7316015.fn = (function_type)__lambda_179;
c_7316015.num_args = 0;
c_7316015.num_elements = 1;
c_7316015.elements = (object *)e_7316030;
c_7316015.elements[0] = ((closureN)self_7313213)->elements[0];


closureN_type c_7316031;
object e_7316058 [2];
c_7316031.hdr.mark = gc_color_red;
 c_7316031.hdr.grayed = 0;
c_7316031.tag = closureN_tag;
 c_7316031.fn = (function_type)__lambda_181;
c_7316031.num_args = 1;
c_7316031.num_elements = 2;
c_7316031.elements = (object *)e_7316058;
c_7316031.elements[0] = ((closureN)self_7313213)->elements[0];
c_7316031.elements[1] = ((closureN)self_7313213)->elements[1];

return_direct_with_clo1(data,(closure)&c_7316015,__lambda_179,  &c_7316031);; 
}

static void __lambda_181(void *data, object self_7313214, int argc, object *args) /* object self_7313214, object r_734618 */
 {

  
pair_type local_7316036; 

pair_type local_7316039; 



pair_type local_7316045; 

pair_type local_7316048; 

pair_type local_7316051; 

pair_type local_7316054; 


return_direct_with_clo1(data,  ((closureN)self_7313214)->elements[1], (((closure)  ((closureN)self_7313214)->elements[1])->fn),  set_pair_as_expr(&local_7316036, quote__if, set_pair_as_expr(&local_7316039, Cyc_cadr(data, ((closureN)self_7313214)->elements[0]), set_pair_as_expr(&local_7316045, set_pair_as_expr(&local_7316048, set_pair_as_expr(&local_7316051, quote_lambda, set_pair_as_expr(&local_7316054, NULL, Cyc_cddr(data, ((closureN)self_7313214)->elements[0]))), NULL), NULL))));; 
}

static void __lambda_179(void *data, object self_7313215, int argc, object *args) /* object self_7313215, object k_734631 */
 {
 object k_734631 = args[0];
  
closureN_type c_7316017;
object e_7316026 [2];
c_7316017.hdr.mark = gc_color_red;
 c_7316017.hdr.grayed = 0;
c_7316017.tag = closureN_tag;
 c_7316017.fn = (function_type)__lambda_180;
c_7316017.num_args = 1;
c_7316017.num_elements = 2;
c_7316017.elements = (object *)e_7316026;
c_7316017.elements[0] = ((closureN)self_7313215)->elements[0];
c_7316017.elements[1] = k_734631;



return_direct_with_clo1(data,(closure)&c_7316017,__lambda_180,  Cyc_cddr(data, ((closureN)self_7313215)->elements[0]));; 
}

static void __lambda_180(void *data, object self_7313216, int argc, object *args) /* object self_7313216, object r_734633 */
 {
 object r_734633 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734633)) ){ 
  
make_utf8_string_with_len(c_7316022, "no when body", 12, 12);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313216)->elements[1], &c_7316022, ((closureN)self_7313216)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313216)->elements[1], (((closure)  ((closureN)self_7313216)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_176(void *data, object self_7313217, int argc, object *args) /* object self_7313217, object k_734634 */
 {
 object k_734634 = args[0];
  
closureN_type c_7315999;
object e_7316008 [2];
c_7315999.hdr.mark = gc_color_red;
 c_7315999.hdr.grayed = 0;
c_7315999.tag = closureN_tag;
 c_7315999.fn = (function_type)__lambda_177;
c_7315999.num_args = 1;
c_7315999.num_elements = 2;
c_7315999.elements = (object *)e_7316008;
c_7315999.elements[0] = ((closureN)self_7313217)->elements[0];
c_7315999.elements[1] = k_734634;



return_direct_with_clo1(data,(closure)&c_7315999,__lambda_177,  Cyc_cdr(data, ((closureN)self_7313217)->elements[0]));; 
}

static void __lambda_177(void *data, object self_7313218, int argc, object *args) /* object self_7313218, object r_734636 */
 {
 object r_734636 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734636)) ){ 
  
make_utf8_string_with_len(c_7316004, "empty when", 10, 10);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313218)->elements[1], &c_7316004, ((closureN)self_7313218)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313218)->elements[1], (((closure)  ((closureN)self_7313218)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_142(void *data, object _, int argc, object *args) /* closure _,object k_734505, object expr_73172_732955, object rename_73173_732956, object compare_73174_732957 */
 {
object k_734505 = args[0]; object expr_73172_732955 = args[1]; object rename_73173_732956 = args[2]; object compare_73174_732957 = args[3];
  Cyc_st_add(data, "scheme/base.sld:case");

closureN_type c_7315643;
object e_7315994 [4];
c_7315643.hdr.mark = gc_color_red;
 c_7315643.hdr.grayed = 0;
c_7315643.tag = closureN_tag;
 c_7315643.fn = (function_type)__lambda_143;
c_7315643.num_args = 3;
c_7315643.num_elements = 4;
c_7315643.elements = (object *)e_7315994;
c_7315643.elements[0] = compare_73174_732957;
c_7315643.elements[1] = expr_73172_732955;
c_7315643.elements[2] = k_734505;
c_7315643.elements[3] = rename_73173_732956;

return_direct_with_clo3(data,(closure)&c_7315643,__lambda_143,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_143(void *data, object self_7313178, int argc, object *args) /* object self_7313178, object agg_91cond_732961, object body_732962, object clause_732963 */
 {
 object agg_91cond_732961 = args[0]; object body_732962 = args[1]; object clause_732963 = args[2];
  
closureN_type c_7315645;
object e_7315990 [6];
c_7315645.hdr.mark = gc_color_red;
 c_7315645.hdr.grayed = 0;
c_7315645.tag = closureN_tag;
 c_7315645.fn = (function_type)__lambda_1355;
c_7315645.num_args = 1;
c_7315645.num_elements = 6;
c_7315645.elements = (object *)e_7315990;
c_7315645.elements[0] = body_732962;
c_7315645.elements[1] = clause_732963;
c_7315645.elements[2] = ((closureN)self_7313178)->elements[0];
c_7315645.elements[3] = ((closureN)self_7313178)->elements[1];
c_7315645.elements[4] = ((closureN)self_7313178)->elements[2];
c_7315645.elements[5] = ((closureN)self_7313178)->elements[3];


pair_type local_7315993; 
return_direct_with_clo1(data,(closure)&c_7315645,__lambda_1355,  set_cell_as_expr(&local_7315993, agg_91cond_732961));; 
}

static void __lambda_1355(void *data, object self_7313179, int argc, object *args) /* object self_7313179, object agg_91cond_732961 */
 {
 object agg_91cond_732961 = args[0];
  
closureN_type c_7315647;
object e_7315985 [6];
c_7315647.hdr.mark = gc_color_red;
 c_7315647.hdr.grayed = 0;
c_7315647.tag = closureN_tag;
 c_7315647.fn = (function_type)__lambda_1354;
c_7315647.num_args = 1;
c_7315647.num_elements = 6;
c_7315647.elements = (object *)e_7315985;
c_7315647.elements[0] = agg_91cond_732961;
c_7315647.elements[1] = ((closureN)self_7313179)->elements[1];
c_7315647.elements[2] = ((closureN)self_7313179)->elements[2];
c_7315647.elements[3] = ((closureN)self_7313179)->elements[3];
c_7315647.elements[4] = ((closureN)self_7313179)->elements[4];
c_7315647.elements[5] = ((closureN)self_7313179)->elements[5];


pair_type local_7315988; 
return_direct_with_clo1(data,(closure)&c_7315647,__lambda_1354,  set_cell_as_expr(&local_7315988, ((closureN)self_7313179)->elements[0]));; 
}

static void __lambda_1354(void *data, object self_7313180, int argc, object *args) /* object self_7313180, object body_732962 */
 {
 object body_732962 = args[0];
  
closureN_type c_7315649;
object e_7315980 [6];
c_7315649.hdr.mark = gc_color_red;
 c_7315649.hdr.grayed = 0;
c_7315649.tag = closureN_tag;
 c_7315649.fn = (function_type)__lambda_1353;
c_7315649.num_args = 1;
c_7315649.num_elements = 6;
c_7315649.elements = (object *)e_7315980;
c_7315649.elements[0] = ((closureN)self_7313180)->elements[0];
c_7315649.elements[1] = body_732962;
c_7315649.elements[2] = ((closureN)self_7313180)->elements[2];
c_7315649.elements[3] = ((closureN)self_7313180)->elements[3];
c_7315649.elements[4] = ((closureN)self_7313180)->elements[4];
c_7315649.elements[5] = ((closureN)self_7313180)->elements[5];


pair_type local_7315983; 
return_direct_with_clo1(data,(closure)&c_7315649,__lambda_1353,  set_cell_as_expr(&local_7315983, ((closureN)self_7313180)->elements[1]));; 
}

static void __lambda_1353(void *data, object self_7313181, int argc, object *args) /* object self_7313181, object clause_732963 */
 {
 object clause_732963 = args[0];
  
closureN_type c_7315651;
object e_7315937 [7];
c_7315651.hdr.mark = gc_color_red;
 c_7315651.hdr.grayed = 0;
c_7315651.tag = closureN_tag;
 c_7315651.fn = (function_type)__lambda_144;
c_7315651.num_args = 1;
c_7315651.num_elements = 7;
c_7315651.elements = (object *)e_7315937;
c_7315651.elements[0] = ((closureN)self_7313181)->elements[0];
c_7315651.elements[1] = ((closureN)self_7313181)->elements[1];
c_7315651.elements[2] = clause_732963;
c_7315651.elements[3] = ((closureN)self_7313181)->elements[2];
c_7315651.elements[4] = ((closureN)self_7313181)->elements[3];
c_7315651.elements[5] = ((closureN)self_7313181)->elements[4];
c_7315651.elements[6] = ((closureN)self_7313181)->elements[5];


closureN_type c_7315938;
object e_7315979 [2];
c_7315938.hdr.mark = gc_color_red;
 c_7315938.hdr.grayed = 0;
c_7315938.tag = closureN_tag;
 c_7315938.fn = (function_type)__lambda_170;
c_7315938.num_args = 1;
c_7315938.num_elements = 2;
c_7315938.elements = (object *)e_7315979;
c_7315938.elements[0] = ((closureN)self_7313181)->elements[2];
c_7315938.elements[1] = ((closureN)self_7313181)->elements[5];

return_direct_with_clo1(data,(closure)&c_7315651,__lambda_144,  &c_7315938);; 
}

static void __lambda_170(void *data, object self_7313182, int argc, object *args) /* object self_7313182, object k_734600, object exprs_73175_732967 */
 {
 object k_734600 = args[0]; object exprs_73175_732967 = args[1];
    
if( (boolean_f != Cyc_is_null(exprs_73175_732967)) ){ 
  return_closcall2(data,  ((closureN)self_7313182)->elements[1],  k_734600, quote_tmp);
} else { 
  
closureN_type c_7315945;
object e_7315978 [4];
c_7315945.hdr.mark = gc_color_red;
 c_7315945.hdr.grayed = 0;
c_7315945.tag = closureN_tag;
 c_7315945.fn = (function_type)__lambda_171;
c_7315945.num_args = 1;
c_7315945.num_elements = 4;
c_7315945.elements = (object *)e_7315978;
c_7315945.elements[0] = ((closureN)self_7313182)->elements[0];
c_7315945.elements[1] = exprs_73175_732967;
c_7315945.elements[2] = k_734600;
c_7315945.elements[3] = ((closureN)self_7313182)->elements[1];

return_closcall2(data,  ((closureN)self_7313182)->elements[1],  &c_7315945, quote__123_125);}
;; 
}

static void __lambda_171(void *data, object self_7313183, int argc, object *args) /* object self_7313183, object r_734611 */
 {
 object r_734611 = args[0];
  
closureN_type c_7315948;
object e_7315974 [3];
c_7315948.hdr.mark = gc_color_red;
 c_7315948.hdr.grayed = 0;
c_7315948.tag = closureN_tag;
 c_7315948.fn = (function_type)__lambda_172;
c_7315948.num_args = 1;
c_7315948.num_elements = 3;
c_7315948.elements = (object *)e_7315974;
c_7315948.elements[0] = ((closureN)self_7313183)->elements[1];
c_7315948.elements[1] = ((closureN)self_7313183)->elements[2];
c_7315948.elements[2] = ((closureN)self_7313183)->elements[3];



return_closcall3(data,  ((closureN)self_7313183)->elements[0],  &c_7315948, r_734611, Cyc_car(data, ((closureN)self_7313183)->elements[1]));; 
}

static void __lambda_172(void *data, object self_7313184, int argc, object *args) /* object self_7313184, object r_734603 */
 {
 object r_734603 = args[0];
  if( (boolean_f != r_734603) ){ 
  
closureN_type c_7315951;
object e_7315963 [2];
c_7315951.hdr.mark = gc_color_red;
 c_7315951.hdr.grayed = 0;
c_7315951.tag = closureN_tag;
 c_7315951.fn = (function_type)__lambda_173;
c_7315951.num_args = 1;
c_7315951.num_elements = 2;
c_7315951.elements = (object *)e_7315963;
c_7315951.elements[0] = ((closureN)self_7313184)->elements[0];
c_7315951.elements[1] = ((closureN)self_7313184)->elements[1];

return_closcall2(data,  ((closureN)self_7313184)->elements[2],  &c_7315951, quote_tmp);
} else { 
  
closureN_type c_7315966;
object e_7315973 [2];
c_7315966.hdr.mark = gc_color_red;
 c_7315966.hdr.grayed = 0;
c_7315966.tag = closureN_tag;
 c_7315966.fn = (function_type)__lambda_174;
c_7315966.num_args = 1;
c_7315966.num_elements = 2;
c_7315966.elements = (object *)e_7315973;
c_7315966.elements[0] = ((closureN)self_7313184)->elements[0];
c_7315966.elements[1] = ((closureN)self_7313184)->elements[1];

return_closcall2(data,  ((closureN)self_7313184)->elements[2],  &c_7315966, quote_begin);}
;; 
}

static void __lambda_174(void *data, object self_7313186, int argc, object *args) /* object self_7313186, object r_734609 */
 {
 object r_734609 = args[0];
  
pair_type local_7315971; 
return_direct_with_clo1(data,  ((closureN)self_7313186)->elements[1], (((closure)  ((closureN)self_7313186)->elements[1])->fn),  set_pair_as_expr(&local_7315971, r_734609, ((closureN)self_7313186)->elements[0]));; 
}

static void __lambda_173(void *data, object self_7313185, int argc, object *args) /* object self_7313185, object r_734606 */
 {
 object r_734606 = args[0];
  
pair_type local_7315956; 



pair_type local_7315962; 
return_direct_with_clo1(data,  ((closureN)self_7313185)->elements[1], (((closure)  ((closureN)self_7313185)->elements[1])->fn),  set_pair_as_expr(&local_7315956, Cyc_cadr(data, ((closureN)self_7313185)->elements[0]), set_pair_as_expr(&local_7315962, r_734606, NULL)));; 
}

static void __lambda_144(void *data, object self_7313187, int argc, object *args) /* object self_7313187, object r_734599 */
 {
 object r_734599 = args[0];
  
closureN_type c_7315653;
object e_7315933 [7];
c_7315653.hdr.mark = gc_color_red;
 c_7315653.hdr.grayed = 0;
c_7315653.tag = closureN_tag;
 c_7315653.fn = (function_type)__lambda_145;
c_7315653.num_args = 1;
c_7315653.num_elements = 7;
c_7315653.elements = (object *)e_7315933;
c_7315653.elements[0] = ((closureN)self_7313187)->elements[0];
c_7315653.elements[1] = ((closureN)self_7313187)->elements[1];
c_7315653.elements[2] = ((closureN)self_7313187)->elements[2];
c_7315653.elements[3] = ((closureN)self_7313187)->elements[3];
c_7315653.elements[4] = ((closureN)self_7313187)->elements[4];
c_7315653.elements[5] = ((closureN)self_7313187)->elements[5];
c_7315653.elements[6] = ((closureN)self_7313187)->elements[6];



return_direct_with_clo1(data,(closure)&c_7315653,__lambda_145,  Cyc_set_cell(data, ((closureN)self_7313187)->elements[1], r_734599));; 
}

static void __lambda_145(void *data, object self_7313188, int argc, object *args) /* object self_7313188, object r_734506 */
 {

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


closureN_type c_7315877;
object e_7315932 [2];
c_7315877.hdr.mark = gc_color_red;
 c_7315877.hdr.grayed = 0;
c_7315877.tag = closureN_tag;
 c_7315877.fn = (function_type)__lambda_166;
c_7315877.num_args = 2;
c_7315877.num_elements = 2;
c_7315877.elements = (object *)e_7315932;
c_7315877.elements[0] = ((closureN)self_7313188)->elements[0];
c_7315877.elements[1] = ((closureN)self_7313188)->elements[6];

return_direct_with_clo1(data,(closure)&c_7315655,__lambda_146,  &c_7315877);; 
}

static void __lambda_166(void *data, object self_7313189, int argc, object *args) /* object self_7313189, object k_734579, object tmp_91sym_73189_732968, object lis_73190_732969 */
 {
 object k_734579 = args[0]; object tmp_91sym_73189_732968 = args[1]; object lis_73190_732969 = args[2];
    
if( (boolean_f != Cyc_is_null(lis_73190_732969)) ){ 
  return_direct_with_clo1(data,  k_734579, (((closure)  k_734579)->fn),  boolean_f);
} else { 
  
closureN_type c_7315883;
object e_7315931 [4];
c_7315883.hdr.mark = gc_color_red;
 c_7315883.hdr.grayed = 0;
c_7315883.tag = closureN_tag;
 c_7315883.fn = (function_type)__lambda_167;
c_7315883.num_args = 1;
c_7315883.num_elements = 4;
c_7315883.elements = (object *)e_7315931;
c_7315883.elements[0] = ((closureN)self_7313189)->elements[0];
c_7315883.elements[1] = k_734579;
c_7315883.elements[2] = lis_73190_732969;
c_7315883.elements[3] = tmp_91sym_73189_732968;

return_closcall2(data,  ((closureN)self_7313189)->elements[1],  &c_7315883, quote_quote);}
;; 
}

static void __lambda_167(void *data, object self_7313190, int argc, object *args) /* object self_7313190, object r_734594 */
 {
 object r_734594 = args[0];
  
closureN_type c_7315885;
object e_7315914 [4];
c_7315885.hdr.mark = gc_color_red;
 c_7315885.hdr.grayed = 0;
c_7315885.tag = closureN_tag;
 c_7315885.fn = (function_type)__lambda_168;
c_7315885.num_args = 1;
c_7315885.num_elements = 4;
c_7315885.elements = (object *)e_7315914;
c_7315885.elements[0] = ((closureN)self_7313190)->elements[0];
c_7315885.elements[1] = ((closureN)self_7313190)->elements[1];
c_7315885.elements[2] = ((closureN)self_7313190)->elements[2];
c_7315885.elements[3] = ((closureN)self_7313190)->elements[3];


pair_type local_7315917; 

pair_type local_7315921; 

pair_type local_7315924; 

pair_type local_7315927; 


return_direct_with_clo1(data,(closure)&c_7315885,__lambda_168,  set_pair_as_expr(&local_7315917, ((closureN)self_7313190)->elements[3], set_pair_as_expr(&local_7315921, set_pair_as_expr(&local_7315924, r_734594, set_pair_as_expr(&local_7315927, Cyc_car(data, ((closureN)self_7313190)->elements[2]), NULL)), NULL)));; 
}

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


closureN_type c_7315890;
object e_7315909 [2];
c_7315890.hdr.mark = gc_color_red;
 c_7315890.hdr.grayed = 0;
c_7315890.tag = closureN_tag;
 c_7315890.fn = (function_type)__lambda_169;
c_7315890.num_args = 1;
c_7315890.num_elements = 2;
c_7315890.elements = (object *)e_7315909;
c_7315890.elements[0] = ((closureN)self_7313191)->elements[1];
c_7315890.elements[1] = r_734590;



return_closcall3(data,  car(((closureN)self_7313191)->elements[0]),  &c_7315890, ((closureN)self_7313191)->elements[3], Cyc_cdr(data, ((closureN)self_7313191)->elements[2]));; 
}

static void __lambda_169(void *data, object self_7313192, int argc, object *args) /* object self_7313192, object r_734586 */
 {
 object r_734586 = args[0];
  
pair_type local_7315895; 

pair_type local_7315898; 

pair_type local_7315901; 

pair_type local_7315905; 

pair_type local_7315908; 
return_direct_with_clo1(data,  ((closureN)self_7313192)->elements[0], (((closure)  ((closureN)self_7313192)->elements[0])->fn),  set_pair_as_expr(&local_7315895, quote__if, set_pair_as_expr(&local_7315898, set_pair_as_expr(&local_7315901, quote_eq_127, ((closureN)self_7313192)->elements[1]), set_pair_as_expr(&local_7315905, boolean_t, set_pair_as_expr(&local_7315908, r_734586, NULL)))));; 
}

static void __lambda_146(void *data, object self_7313193, int argc, object *args) /* object self_7313193, object r_734578 */
 {
 object r_734578 = args[0];
  
closureN_type c_7315657;
object e_7315872 [7];
c_7315657.hdr.mark = gc_color_red;
 c_7315657.hdr.grayed = 0;
c_7315657.tag = closureN_tag;
 c_7315657.fn = (function_type)__lambda_147;
c_7315657.num_args = 1;
c_7315657.num_elements = 7;
c_7315657.elements = (object *)e_7315872;
c_7315657.elements[0] = ((closureN)self_7313193)->elements[0];
c_7315657.elements[1] = ((closureN)self_7313193)->elements[1];
c_7315657.elements[2] = ((closureN)self_7313193)->elements[2];
c_7315657.elements[3] = ((closureN)self_7313193)->elements[3];
c_7315657.elements[4] = ((closureN)self_7313193)->elements[4];
c_7315657.elements[5] = ((closureN)self_7313193)->elements[5];
c_7315657.elements[6] = ((closureN)self_7313193)->elements[6];



return_direct_with_clo1(data,(closure)&c_7315657,__lambda_147,  Cyc_set_cell(data, ((closureN)self_7313193)->elements[0], r_734578));; 
}

static void __lambda_147(void *data, object self_7313194, int argc, object *args) /* object self_7313194, object r_734507 */
 {

  
closureN_type c_7315659;
object e_7315703 [4];
c_7315659.hdr.mark = gc_color_red;
 c_7315659.hdr.grayed = 0;
c_7315659.tag = closureN_tag;
 c_7315659.fn = (function_type)__lambda_148;
c_7315659.num_args = 1;
c_7315659.num_elements = 4;
c_7315659.elements = (object *)e_7315703;
c_7315659.elements[0] = ((closureN)self_7313194)->elements[2];
c_7315659.elements[1] = ((closureN)self_7313194)->elements[4];
c_7315659.elements[2] = ((closureN)self_7313194)->elements[5];
c_7315659.elements[3] = ((closureN)self_7313194)->elements[6];


closureN_type c_7315704;
object e_7315871 [5];
c_7315704.hdr.mark = gc_color_red;
 c_7315704.hdr.grayed = 0;
c_7315704.tag = closureN_tag;
 c_7315704.fn = (function_type)__lambda_152;
c_7315704.num_args = 1;
c_7315704.num_elements = 5;
c_7315704.elements = (object *)e_7315871;
c_7315704.elements[0] = ((closureN)self_7313194)->elements[0];
c_7315704.elements[1] = ((closureN)self_7313194)->elements[1];
c_7315704.elements[2] = ((closureN)self_7313194)->elements[2];
c_7315704.elements[3] = ((closureN)self_7313194)->elements[3];
c_7315704.elements[4] = ((closureN)self_7313194)->elements[6];

return_direct_with_clo1(data,(closure)&c_7315659,__lambda_148,  &c_7315704);; 
}

static void __lambda_152(void *data, object self_7313195, int argc, object *args) /* object self_7313195, object k_734524, object ls_73194_732970 */
 {
 object k_734524 = args[0]; object ls_73194_732970 = args[1];
    
if( (boolean_f != Cyc_is_null(ls_73194_732970)) ){ 
  return_direct_with_clo1(data,  k_734524, (((closure)  k_734524)->fn),  boolean_f);
} else { 
  
closureN_type c_7315710;
object e_7315870 [7];
c_7315710.hdr.mark = gc_color_red;
 c_7315710.hdr.grayed = 0;
c_7315710.tag = closureN_tag;
 c_7315710.fn = (function_type)__lambda_153;
c_7315710.num_args = 1;
c_7315710.num_elements = 7;
c_7315710.elements = (object *)e_7315870;
c_7315710.elements[0] = ((closureN)self_7313195)->elements[0];
c_7315710.elements[1] = ((closureN)self_7313195)->elements[1];
c_7315710.elements[2] = ((closureN)self_7313195)->elements[2];
c_7315710.elements[3] = ((closureN)self_7313195)->elements[3];
c_7315710.elements[4] = k_734524;
c_7315710.elements[5] = ls_73194_732970;
c_7315710.elements[6] = ((closureN)self_7313195)->elements[4];

return_closcall2(data,  ((closureN)self_7313195)->elements[4],  &c_7315710, quote__else);}
;; 
}

static void __lambda_153(void *data, object self_7313196, int argc, object *args) /* object self_7313196, object r_734575 */
 {
 object r_734575 = args[0];
  
closureN_type c_7315713;
object e_7315866 [6];
c_7315713.hdr.mark = gc_color_red;
 c_7315713.hdr.grayed = 0;
c_7315713.tag = closureN_tag;
 c_7315713.fn = (function_type)__lambda_154;
c_7315713.num_args = 1;
c_7315713.num_elements = 6;
c_7315713.elements = (object *)e_7315866;
c_7315713.elements[0] = ((closureN)self_7313196)->elements[0];
c_7315713.elements[1] = ((closureN)self_7313196)->elements[1];
c_7315713.elements[2] = ((closureN)self_7313196)->elements[2];
c_7315713.elements[3] = ((closureN)self_7313196)->elements[4];
c_7315713.elements[4] = ((closureN)self_7313196)->elements[5];
c_7315713.elements[5] = ((closureN)self_7313196)->elements[6];



return_closcall3(data,  ((closureN)self_7313196)->elements[3],  &c_7315713, r_734575, Cyc_caar(data, ((closureN)self_7313196)->elements[5]));; 
}

static void __lambda_154(void *data, object self_7313197, int argc, object *args) /* object self_7313197, object r_734526 */
 {
 object r_734526 = args[0];
  if( (boolean_f != r_734526) ){ 
  



return_closcall2(data,  car(((closureN)self_7313197)->elements[1]),  ((closureN)self_7313197)->elements[3], Cyc_cdar(data, ((closureN)self_7313197)->elements[4]));
} else { 
  object r_734528;
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7313197)->elements[4])))) ){ 
  
  
  
  
  r_734528 = Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313197)->elements[4]))));
} else { 
  r_734528 = boolean_f;}
;if( (boolean_f != r_734528) ){ 
  
closureN_type c_7315743;
object e_7315813 [5];
c_7315743.hdr.mark = gc_color_red;
 c_7315743.hdr.grayed = 0;
c_7315743.tag = closureN_tag;
 c_7315743.fn = (function_type)__lambda_155;
c_7315743.num_args = 1;
c_7315743.num_elements = 5;
c_7315743.elements = (object *)e_7315813;
c_7315743.elements[0] = ((closureN)self_7313197)->elements[1];
c_7315743.elements[1] = ((closureN)self_7313197)->elements[2];
c_7315743.elements[2] = ((closureN)self_7313197)->elements[3];
c_7315743.elements[3] = ((closureN)self_7313197)->elements[4];
c_7315743.elements[4] = ((closureN)self_7313197)->elements[5];

return_closcall2(data,  ((closureN)self_7313197)->elements[5],  &c_7315743, quote__if);
} else { 
  
closureN_type c_7315816;
object e_7315865 [6];
c_7315816.hdr.mark = gc_color_red;
 c_7315816.hdr.grayed = 0;
c_7315816.tag = closureN_tag;
 c_7315816.fn = (function_type)__lambda_161;
c_7315816.num_args = 1;
c_7315816.num_elements = 6;
c_7315816.elements = (object *)e_7315865;
c_7315816.elements[0] = ((closureN)self_7313197)->elements[0];
c_7315816.elements[1] = ((closureN)self_7313197)->elements[1];
c_7315816.elements[2] = ((closureN)self_7313197)->elements[2];
c_7315816.elements[3] = ((closureN)self_7313197)->elements[3];
c_7315816.elements[4] = ((closureN)self_7313197)->elements[4];
c_7315816.elements[5] = ((closureN)self_7313197)->elements[5];

return_closcall2(data,  ((closureN)self_7313197)->elements[5],  &c_7315816, quote__if);}
;}
;; 
}

static void __lambda_161(void *data, object self_7313204, int argc, object *args) /* object self_7313204, object r_734554 */
 {
 object r_734554 = args[0];
  
closureN_type c_7315819;
object e_7315864 [6];
c_7315819.hdr.mark = gc_color_red;
 c_7315819.hdr.grayed = 0;
c_7315819.tag = closureN_tag;
 c_7315819.fn = (function_type)__lambda_162;
c_7315819.num_args = 1;
c_7315819.num_elements = 6;
c_7315819.elements = (object *)e_7315864;
c_7315819.elements[0] = ((closureN)self_7313204)->elements[0];
c_7315819.elements[1] = ((closureN)self_7313204)->elements[1];
c_7315819.elements[2] = ((closureN)self_7313204)->elements[2];
c_7315819.elements[3] = ((closureN)self_7313204)->elements[3];
c_7315819.elements[4] = ((closureN)self_7313204)->elements[4];
c_7315819.elements[5] = r_734554;

return_closcall2(data,  ((closureN)self_7313204)->elements[5],  &c_7315819, quote_tmp);; 
}

static void __lambda_162(void *data, object self_7313205, int argc, object *args) /* object self_7313205, object r_734564 */
 {
 object r_734564 = args[0];
  


closureN_type c_7315824;
object e_7315860 [5];
c_7315824.hdr.mark = gc_color_red;
 c_7315824.hdr.grayed = 0;
c_7315824.tag = closureN_tag;
 c_7315824.fn = (function_type)__lambda_163;
c_7315824.num_args = 1;
c_7315824.num_elements = 5;
c_7315824.elements = (object *)e_7315860;
c_7315824.elements[0] = ((closureN)self_7313205)->elements[1];
c_7315824.elements[1] = ((closureN)self_7313205)->elements[2];
c_7315824.elements[2] = ((closureN)self_7313205)->elements[3];
c_7315824.elements[3] = ((closureN)self_7313205)->elements[4];
c_7315824.elements[4] = ((closureN)self_7313205)->elements[5];



return_closcall3(data,  car(((closureN)self_7313205)->elements[0]),  &c_7315824, r_734564, Cyc_caar(data, ((closureN)self_7313205)->elements[4]));; 
}

static void __lambda_163(void *data, object self_7313206, int argc, object *args) /* object self_7313206, object r_734556 */
 {
 object r_734556 = args[0];
  


closureN_type c_7315829;
object e_7315856 [5];
c_7315829.hdr.mark = gc_color_red;
 c_7315829.hdr.grayed = 0;
c_7315829.tag = closureN_tag;
 c_7315829.fn = (function_type)__lambda_164;
c_7315829.num_args = 1;
c_7315829.num_elements = 5;
c_7315829.elements = (object *)e_7315856;
c_7315829.elements[0] = ((closureN)self_7313206)->elements[1];
c_7315829.elements[1] = ((closureN)self_7313206)->elements[2];
c_7315829.elements[2] = ((closureN)self_7313206)->elements[3];
c_7315829.elements[3] = ((closureN)self_7313206)->elements[4];
c_7315829.elements[4] = r_734556;



return_closcall2(data,  car(((closureN)self_7313206)->elements[0]),  &c_7315829, Cyc_cdar(data, ((closureN)self_7313206)->elements[3]));; 
}

static void __lambda_164(void *data, object self_7313207, int argc, object *args) /* object self_7313207, object r_734558 */
 {
 object r_734558 = args[0];
  


closureN_type c_7315834;
object e_7315852 [4];
c_7315834.hdr.mark = gc_color_red;
 c_7315834.hdr.grayed = 0;
c_7315834.tag = closureN_tag;
 c_7315834.fn = (function_type)__lambda_165;
c_7315834.num_args = 1;
c_7315834.num_elements = 4;
c_7315834.elements = (object *)e_7315852;
c_7315834.elements[0] = ((closureN)self_7313207)->elements[1];
c_7315834.elements[1] = ((closureN)self_7313207)->elements[3];
c_7315834.elements[2] = ((closureN)self_7313207)->elements[4];
c_7315834.elements[3] = r_734558;



return_closcall2(data,  car(((closureN)self_7313207)->elements[0]),  &c_7315834, Cyc_cdr(data, ((closureN)self_7313207)->elements[2]));; 
}

static void __lambda_165(void *data, object self_7313208, int argc, object *args) /* object self_7313208, object r_734560 */
 {
 object r_734560 = args[0];
  
pair_type local_7315839; 

pair_type local_7315843; 

pair_type local_7315847; 

pair_type local_7315851; 
return_direct_with_clo1(data,  ((closureN)self_7313208)->elements[0], (((closure)  ((closureN)self_7313208)->elements[0])->fn),  set_pair_as_expr(&local_7315839, ((closureN)self_7313208)->elements[1], set_pair_as_expr(&local_7315843, ((closureN)self_7313208)->elements[2], set_pair_as_expr(&local_7315847, ((closureN)self_7313208)->elements[3], set_pair_as_expr(&local_7315851, r_734560, NULL)))));; 
}

static void __lambda_155(void *data, object self_7313198, int argc, object *args) /* object self_7313198, object r_734529 */
 {
 object r_734529 = args[0];
  
closureN_type c_7315746;
object e_7315812 [6];
c_7315746.hdr.mark = gc_color_red;
 c_7315746.hdr.grayed = 0;
c_7315746.tag = closureN_tag;
 c_7315746.fn = (function_type)__lambda_156;
c_7315746.num_args = 1;
c_7315746.num_elements = 6;
c_7315746.elements = (object *)e_7315812;
c_7315746.elements[0] = ((closureN)self_7313198)->elements[0];
c_7315746.elements[1] = ((closureN)self_7313198)->elements[1];
c_7315746.elements[2] = ((closureN)self_7313198)->elements[2];
c_7315746.elements[3] = ((closureN)self_7313198)->elements[3];
c_7315746.elements[4] = r_734529;
c_7315746.elements[5] = ((closureN)self_7313198)->elements[4];

return_closcall2(data,  ((closureN)self_7313198)->elements[4],  &c_7315746, quote_eqv_127);; 
}

static void __lambda_156(void *data, object self_7313199, int argc, object *args) /* object self_7313199, object r_734539 */
 {
 object r_734539 = args[0];
  
closureN_type c_7315749;
object e_7315811 [7];
c_7315749.hdr.mark = gc_color_red;
 c_7315749.hdr.grayed = 0;
c_7315749.tag = closureN_tag;
 c_7315749.fn = (function_type)__lambda_157;
c_7315749.num_args = 1;
c_7315749.num_elements = 7;
c_7315749.elements = (object *)e_7315811;
c_7315749.elements[0] = ((closureN)self_7313199)->elements[0];
c_7315749.elements[1] = ((closureN)self_7313199)->elements[1];
c_7315749.elements[2] = ((closureN)self_7313199)->elements[2];
c_7315749.elements[3] = ((closureN)self_7313199)->elements[3];
c_7315749.elements[4] = ((closureN)self_7313199)->elements[4];
c_7315749.elements[5] = r_734539;
c_7315749.elements[6] = ((closureN)self_7313199)->elements[5];

return_closcall2(data,  ((closureN)self_7313199)->elements[5],  &c_7315749, quote_tmp);; 
}

static void __lambda_157(void *data, object self_7313200, int argc, object *args) /* object self_7313200, object r_734541 */
 {
 object r_734541 = args[0];
  
closureN_type c_7315752;
object e_7315810 [7];
c_7315752.hdr.mark = gc_color_red;
 c_7315752.hdr.grayed = 0;
c_7315752.tag = closureN_tag;
 c_7315752.fn = (function_type)__lambda_158;
c_7315752.num_args = 1;
c_7315752.num_elements = 7;
c_7315752.elements = (object *)e_7315810;
c_7315752.elements[0] = ((closureN)self_7313200)->elements[0];
c_7315752.elements[1] = ((closureN)self_7313200)->elements[1];
c_7315752.elements[2] = ((closureN)self_7313200)->elements[2];
c_7315752.elements[3] = ((closureN)self_7313200)->elements[3];
c_7315752.elements[4] = ((closureN)self_7313200)->elements[4];
c_7315752.elements[5] = ((closureN)self_7313200)->elements[5];
c_7315752.elements[6] = r_734541;

return_closcall2(data,  ((closureN)self_7313200)->elements[6],  &c_7315752, quote_quote);; 
}

static void __lambda_158(void *data, object self_7313201, int argc, object *args) /* object self_7313201, object r_734545 */
 {
 object r_734545 = args[0];
  


closureN_type c_7315757;
object e_7315806 [7];
c_7315757.hdr.mark = gc_color_red;
 c_7315757.hdr.grayed = 0;
c_7315757.tag = closureN_tag;
 c_7315757.fn = (function_type)__lambda_159;
c_7315757.num_args = 1;
c_7315757.num_elements = 7;
c_7315757.elements = (object *)e_7315806;
c_7315757.elements[0] = ((closureN)self_7313201)->elements[1];
c_7315757.elements[1] = ((closureN)self_7313201)->elements[2];
c_7315757.elements[2] = ((closureN)self_7313201)->elements[3];
c_7315757.elements[3] = ((closureN)self_7313201)->elements[4];
c_7315757.elements[4] = ((closureN)self_7313201)->elements[5];
c_7315757.elements[5] = ((closureN)self_7313201)->elements[6];
c_7315757.elements[6] = r_734545;



return_closcall2(data,  car(((closureN)self_7313201)->elements[0]),  &c_7315757, Cyc_cdar(data, ((closureN)self_7313201)->elements[3]));; 
}

static void __lambda_159(void *data, object self_7313202, int argc, object *args) /* object self_7313202, object r_734533 */
 {
 object r_734533 = args[0];
  


closureN_type c_7315762;
object e_7315802 [7];
c_7315762.hdr.mark = gc_color_red;
 c_7315762.hdr.grayed = 0;
c_7315762.tag = closureN_tag;
 c_7315762.fn = (function_type)__lambda_160;
c_7315762.num_args = 1;
c_7315762.num_elements = 7;
c_7315762.elements = (object *)e_7315802;
c_7315762.elements[0] = ((closureN)self_7313202)->elements[1];
c_7315762.elements[1] = ((closureN)self_7313202)->elements[2];
c_7315762.elements[2] = ((closureN)self_7313202)->elements[3];
c_7315762.elements[3] = r_734533;
c_7315762.elements[4] = ((closureN)self_7313202)->elements[4];
c_7315762.elements[5] = ((closureN)self_7313202)->elements[5];
c_7315762.elements[6] = ((closureN)self_7313202)->elements[6];



return_closcall2(data,  car(((closureN)self_7313202)->elements[0]),  &c_7315762, Cyc_cdr(data, ((closureN)self_7313202)->elements[2]));; 
}

static void __lambda_160(void *data, object self_7313203, int argc, object *args) /* object self_7313203, object r_734535 */
 {
 object r_734535 = args[0];
  
pair_type local_7315767; 

pair_type local_7315771; 

pair_type local_7315774; 

pair_type local_7315778; 

pair_type local_7315782; 

pair_type local_7315785; 

pair_type local_7315789; 





pair_type local_7315797; 

pair_type local_7315801; 
return_direct_with_clo1(data,  ((closureN)self_7313203)->elements[0], (((closure)  ((closureN)self_7313203)->elements[0])->fn),  set_pair_as_expr(&local_7315767, ((closureN)self_7313203)->elements[2], set_pair_as_expr(&local_7315771, set_pair_as_expr(&local_7315774, ((closureN)self_7313203)->elements[4], set_pair_as_expr(&local_7315778, ((closureN)self_7313203)->elements[5], set_pair_as_expr(&local_7315782, set_pair_as_expr(&local_7315785, ((closureN)self_7313203)->elements[6], set_pair_as_expr(&local_7315789, Cyc_car(data, Cyc_caar(data, ((closureN)self_7313203)->elements[1])), NULL)), NULL))), set_pair_as_expr(&local_7315797, ((closureN)self_7313203)->elements[3], set_pair_as_expr(&local_7315801, r_734535, NULL)))));; 
}

static void __lambda_148(void *data, object self_7313209, int argc, object *args) /* object self_7313209, object r_734523 */
 {
 object r_734523 = args[0];
  
closureN_type c_7315661;
object e_7315699 [4];
c_7315661.hdr.mark = gc_color_red;
 c_7315661.hdr.grayed = 0;
c_7315661.tag = closureN_tag;
 c_7315661.fn = (function_type)__lambda_149;
c_7315661.num_args = 1;
c_7315661.num_elements = 4;
c_7315661.elements = (object *)e_7315699;
c_7315661.elements[0] = ((closureN)self_7313209)->elements[0];
c_7315661.elements[1] = ((closureN)self_7313209)->elements[1];
c_7315661.elements[2] = ((closureN)self_7313209)->elements[2];
c_7315661.elements[3] = ((closureN)self_7313209)->elements[3];



return_direct_with_clo1(data,(closure)&c_7315661,__lambda_149,  Cyc_set_cell(data, ((closureN)self_7313209)->elements[0], r_734523));; 
}

static void __lambda_149(void *data, object self_7313210, int argc, object *args) /* object self_7313210, object r_734508 */
 {

  
closureN_type c_7315664;
object e_7315698 [3];
c_7315664.hdr.mark = gc_color_red;
 c_7315664.hdr.grayed = 0;
c_7315664.tag = closureN_tag;
 c_7315664.fn = (function_type)__lambda_150;
c_7315664.num_args = 1;
c_7315664.num_elements = 3;
c_7315664.elements = (object *)e_7315698;
c_7315664.elements[0] = ((closureN)self_7313210)->elements[0];
c_7315664.elements[1] = ((closureN)self_7313210)->elements[1];
c_7315664.elements[2] = ((closureN)self_7313210)->elements[2];

return_closcall2(data,  ((closureN)self_7313210)->elements[3],  &c_7315664, quote_tmp);; 
}

static void __lambda_150(void *data, object self_7313211, int argc, object *args) /* object self_7313211, object r_734518 */
 {
 object r_734518 = args[0];
  


closureN_type c_7315669;
object e_7315694 [3];
c_7315669.hdr.mark = gc_color_red;
 c_7315669.hdr.grayed = 0;
c_7315669.tag = closureN_tag;
 c_7315669.fn = (function_type)__lambda_151;
c_7315669.num_args = 1;
c_7315669.num_elements = 3;
c_7315669.elements = (object *)e_7315694;
c_7315669.elements[0] = ((closureN)self_7313211)->elements[1];
c_7315669.elements[1] = ((closureN)self_7313211)->elements[2];
c_7315669.elements[2] = r_734518;



return_closcall2(data,  car(((closureN)self_7313211)->elements[0]),  &c_7315669, Cyc_cddr(data, ((closureN)self_7313211)->elements[1]));; 
}

static void __lambda_151(void *data, object self_7313212, int argc, object *args) /* object self_7313212, object r_734513 */
 {
 object r_734513 = args[0];
  
pair_type local_7315674; 

pair_type local_7315677; 

pair_type local_7315680; 

pair_type local_7315683; 

pair_type local_7315687; 



pair_type local_7315693; 
return_direct_with_clo1(data,  ((closureN)self_7313212)->elements[1], (((closure)  ((closureN)self_7313212)->elements[1])->fn),  set_pair_as_expr(&local_7315674, quote_let, set_pair_as_expr(&local_7315677, set_pair_as_expr(&local_7315680, set_pair_as_expr(&local_7315683, ((closureN)self_7313212)->elements[2], set_pair_as_expr(&local_7315687, Cyc_cadr(data, ((closureN)self_7313212)->elements[0]), NULL)), NULL), set_pair_as_expr(&local_7315693, r_734513, NULL))));; 
}

static void __lambda_121(void *data, object _, int argc, object *args) /* closure _,object k_734441, object expr_73168_732951, object rename_73169_732952, object compare_73170_732953 */
 {
object k_734441 = args[0]; object expr_73168_732951 = args[1]; object rename_73169_732952 = args[2]; object compare_73170_732953 = args[3];
  Cyc_st_add(data, "scheme/base.sld:cond");

closureN_type c_7315451;
object e_7315638 [4];
c_7315451.hdr.mark = gc_color_red;
 c_7315451.hdr.grayed = 0;
c_7315451.tag = closureN_tag;
 c_7315451.fn = (function_type)__lambda_122;
c_7315451.num_args = 1;
c_7315451.num_elements = 4;
c_7315451.elements = (object *)e_7315638;
c_7315451.elements[0] = compare_73170_732953;
c_7315451.elements[1] = expr_73168_732951;
c_7315451.elements[2] = k_734441;
c_7315451.elements[3] = rename_73169_732952;



return_direct_with_clo1(data,(closure)&c_7315451,__lambda_122,  Cyc_cdr(data, expr_73168_732951));; 
}

static void __lambda_122(void *data, object self_7313158, int argc, object *args) /* object self_7313158, object r_734502 */
 {
 object r_734502 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734502)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_7313158)->elements[2], (((closure)  ((closureN)self_7313158)->elements[2])->fn),  boolean_f);
} else { 
  
closureN_type c_7315457;
object e_7315634 [4];
c_7315457.hdr.mark = gc_color_red;
 c_7315457.hdr.grayed = 0;
c_7315457.tag = closureN_tag;
 c_7315457.fn = (function_type)__lambda_123;
c_7315457.num_args = 1;
c_7315457.num_elements = 4;
c_7315457.elements = (object *)e_7315634;
c_7315457.elements[0] = ((closureN)self_7313158)->elements[0];
c_7315457.elements[1] = ((closureN)self_7313158)->elements[1];
c_7315457.elements[2] = ((closureN)self_7313158)->elements[2];
c_7315457.elements[3] = ((closureN)self_7313158)->elements[3];



return_direct_with_clo1(data,(closure)&c_7315457,__lambda_123,  Cyc_cadr(data, ((closureN)self_7313158)->elements[1]));}
;; 
}

static void __lambda_123(void *data, object self_7313159, int argc, object *args) /* object self_7313159, object cl_73171_732954 */
 {
 object cl_73171_732954 = args[0];
  
closureN_type c_7315460;
object e_7315633 [5];
c_7315460.hdr.mark = gc_color_red;
 c_7315460.hdr.grayed = 0;
c_7315460.tag = closureN_tag;
 c_7315460.fn = (function_type)__lambda_124;
c_7315460.num_args = 1;
c_7315460.num_elements = 5;
c_7315460.elements = (object *)e_7315633;
c_7315460.elements[0] = cl_73171_732954;
c_7315460.elements[1] = ((closureN)self_7313159)->elements[0];
c_7315460.elements[2] = ((closureN)self_7313159)->elements[1];
c_7315460.elements[3] = ((closureN)self_7313159)->elements[2];
c_7315460.elements[4] = ((closureN)self_7313159)->elements[3];

return_closcall2(data,  ((closureN)self_7313159)->elements[3],  &c_7315460, quote__else);; 
}

static void __lambda_124(void *data, object self_7313160, int argc, object *args) /* object self_7313160, object r_734499 */
 {
 object r_734499 = args[0];
  
closureN_type c_7315463;
object e_7315629 [5];
c_7315463.hdr.mark = gc_color_red;
 c_7315463.hdr.grayed = 0;
c_7315463.tag = closureN_tag;
 c_7315463.fn = (function_type)__lambda_125;
c_7315463.num_args = 1;
c_7315463.num_elements = 5;
c_7315463.elements = (object *)e_7315629;
c_7315463.elements[0] = ((closureN)self_7313160)->elements[0];
c_7315463.elements[1] = ((closureN)self_7313160)->elements[1];
c_7315463.elements[2] = ((closureN)self_7313160)->elements[2];
c_7315463.elements[3] = ((closureN)self_7313160)->elements[3];
c_7315463.elements[4] = ((closureN)self_7313160)->elements[4];



return_closcall3(data,  ((closureN)self_7313160)->elements[1],  &c_7315463, r_734499, Cyc_car(data, ((closureN)self_7313160)->elements[0]));; 
}

static void __lambda_125(void *data, object self_7313161, int argc, object *args) /* object self_7313161, object r_734444 */
 {
 object r_734444 = args[0];
  if( (boolean_f != r_734444) ){ 
  
closureN_type c_7315465;
object e_7315490 [4];
c_7315465.hdr.mark = gc_color_red;
 c_7315465.hdr.grayed = 0;
c_7315465.tag = closureN_tag;
 c_7315465.fn = (function_type)__lambda_126;
c_7315465.num_args = 1;
c_7315465.num_elements = 4;
c_7315465.elements = (object *)e_7315490;
c_7315465.elements[0] = ((closureN)self_7313161)->elements[0];
c_7315465.elements[1] = ((closureN)self_7313161)->elements[2];
c_7315465.elements[2] = ((closureN)self_7313161)->elements[3];
c_7315465.elements[3] = ((closureN)self_7313161)->elements[4];



return_direct_with_clo1(data,(closure)&c_7315465,__lambda_126,  Cyc_cddr(data, ((closureN)self_7313161)->elements[2]));
} else { 
  
closureN_type c_7315495;
object e_7315512 [3];
c_7315495.hdr.mark = gc_color_red;
 c_7315495.hdr.grayed = 0;
c_7315495.tag = closureN_tag;
 c_7315495.fn = (function_type)__lambda_128;
c_7315495.num_args = 0;
c_7315495.num_elements = 3;
c_7315495.elements = (object *)e_7315512;
c_7315495.elements[0] = ((closureN)self_7313161)->elements[0];
c_7315495.elements[1] = ((closureN)self_7313161)->elements[1];
c_7315495.elements[2] = ((closureN)self_7313161)->elements[4];


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

return_direct_with_clo1(data,(closure)&c_7315495,__lambda_128,  &c_7315513);}
;; 
}

static void __lambda_130(void *data, object self_7313164, int argc, object *args) /* object self_7313164, object r_734453 */
 {
 object r_734453 = args[0];
  if( (boolean_f != r_734453) ){ 
  
closureN_type c_7315516;
object e_7315587 [4];
c_7315516.hdr.mark = gc_color_red;
 c_7315516.hdr.grayed = 0;
c_7315516.tag = closureN_tag;
 c_7315516.fn = (function_type)__lambda_131;
c_7315516.num_args = 1;
c_7315516.num_elements = 4;
c_7315516.elements = (object *)e_7315587;
c_7315516.elements[0] = ((closureN)self_7313164)->elements[0];
c_7315516.elements[1] = ((closureN)self_7313164)->elements[1];
c_7315516.elements[2] = ((closureN)self_7313164)->elements[2];
c_7315516.elements[3] = ((closureN)self_7313164)->elements[3];

return_closcall2(data,  ((closureN)self_7313164)->elements[3],  &c_7315516, quote_lambda);
} else { 
  
closureN_type c_7315590;
object e_7315627 [4];
c_7315590.hdr.mark = gc_color_red;
 c_7315590.hdr.grayed = 0;
c_7315590.tag = closureN_tag;
 c_7315590.fn = (function_type)__lambda_139;
c_7315590.num_args = 1;
c_7315590.num_elements = 4;
c_7315590.elements = (object *)e_7315627;
c_7315590.elements[0] = ((closureN)self_7313164)->elements[0];
c_7315590.elements[1] = ((closureN)self_7313164)->elements[1];
c_7315590.elements[2] = ((closureN)self_7313164)->elements[2];
c_7315590.elements[3] = ((closureN)self_7313164)->elements[3];

return_closcall2(data,  ((closureN)self_7313164)->elements[3],  &c_7315590, quote__if);}
;; 
}

static void __lambda_139(void *data, object self_7313173, int argc, object *args) /* object self_7313173, object r_734479 */
 {
 object r_734479 = args[0];
  
closureN_type c_7315593;
object e_7315626 [5];
c_7315593.hdr.mark = gc_color_red;
 c_7315593.hdr.grayed = 0;
c_7315593.tag = closureN_tag;
 c_7315593.fn = (function_type)__lambda_140;
c_7315593.num_args = 1;
c_7315593.num_elements = 5;
c_7315593.elements = (object *)e_7315626;
c_7315593.elements[0] = ((closureN)self_7313173)->elements[0];
c_7315593.elements[1] = ((closureN)self_7313173)->elements[1];
c_7315593.elements[2] = ((closureN)self_7313173)->elements[2];
c_7315593.elements[3] = r_734479;
c_7315593.elements[4] = ((closureN)self_7313173)->elements[3];

return_closcall2(data,  ((closureN)self_7313173)->elements[3],  &c_7315593, quote_lambda);; 
}

static void __lambda_140(void *data, object self_7313174, int argc, object *args) /* object self_7313174, object r_734487 */
 {
 object r_734487 = args[0];
  
closureN_type c_7315596;
object e_7315625 [5];
c_7315596.hdr.mark = gc_color_red;
 c_7315596.hdr.grayed = 0;
c_7315596.tag = closureN_tag;
 c_7315596.fn = (function_type)__lambda_141;
c_7315596.num_args = 1;
c_7315596.num_elements = 5;
c_7315596.elements = (object *)e_7315625;
c_7315596.elements[0] = ((closureN)self_7313174)->elements[0];
c_7315596.elements[1] = ((closureN)self_7313174)->elements[1];
c_7315596.elements[2] = ((closureN)self_7313174)->elements[2];
c_7315596.elements[3] = ((closureN)self_7313174)->elements[3];
c_7315596.elements[4] = r_734487;

return_closcall2(data,  ((closureN)self_7313174)->elements[4],  &c_7315596, quote_cond);; 
}

static void __lambda_141(void *data, object self_7313175, int argc, object *args) /* object self_7313175, object r_734483 */
 {
 object r_734483 = args[0];
  
list_4_type local_7315601; 



pair_type local_7315608; 

pair_type local_7315611; 

pair_type local_7315615; 



pair_type local_7315621; 


return_direct_with_clo1(data,  ((closureN)self_7313175)->elements[2], (((closure)  ((closureN)self_7313175)->elements[2])->fn),  Cyc_fast_list_4(&local_7315601, ((closureN)self_7313175)->elements[3], Cyc_car(data, ((closureN)self_7313175)->elements[0]), set_cell_as_expr(&local_7315608, set_pair_as_expr(&local_7315611, ((closureN)self_7313175)->elements[4], set_pair_as_expr(&local_7315615, NULL, Cyc_cdr(data, ((closureN)self_7313175)->elements[0])))), set_pair_as_expr(&local_7315621, r_734483, Cyc_cddr(data, ((closureN)self_7313175)->elements[1]))));; 
}

static void __lambda_131(void *data, object self_7313165, int argc, object *args) /* object self_7313165, object r_734456 */
 {
 object r_734456 = args[0];
  
closureN_type c_7315519;
object e_7315586 [5];
c_7315519.hdr.mark = gc_color_red;
 c_7315519.hdr.grayed = 0;
c_7315519.tag = closureN_tag;
 c_7315519.fn = (function_type)__lambda_132;
c_7315519.num_args = 1;
c_7315519.num_elements = 5;
c_7315519.elements = (object *)e_7315586;
c_7315519.elements[0] = ((closureN)self_7313165)->elements[0];
c_7315519.elements[1] = ((closureN)self_7313165)->elements[1];
c_7315519.elements[2] = ((closureN)self_7313165)->elements[2];
c_7315519.elements[3] = r_734456;
c_7315519.elements[4] = ((closureN)self_7313165)->elements[3];

return_closcall2(data,  ((closureN)self_7313165)->elements[3],  &c_7315519, quote_tmp);; 
}

static void __lambda_132(void *data, object self_7313166, int argc, object *args) /* object self_7313166, object r_734476 */
 {
 object r_734476 = args[0];
  
closureN_type c_7315522;
object e_7315585 [6];
c_7315522.hdr.mark = gc_color_red;
 c_7315522.hdr.grayed = 0;
c_7315522.tag = closureN_tag;
 c_7315522.fn = (function_type)__lambda_133;
c_7315522.num_args = 1;
c_7315522.num_elements = 6;
c_7315522.elements = (object *)e_7315585;
c_7315522.elements[0] = ((closureN)self_7313166)->elements[0];
c_7315522.elements[1] = ((closureN)self_7313166)->elements[1];
c_7315522.elements[2] = ((closureN)self_7313166)->elements[2];
c_7315522.elements[3] = ((closureN)self_7313166)->elements[3];
c_7315522.elements[4] = r_734476;
c_7315522.elements[5] = ((closureN)self_7313166)->elements[4];

return_closcall2(data,  ((closureN)self_7313166)->elements[4],  &c_7315522, quote__if);; 
}

static void __lambda_133(void *data, object self_7313167, int argc, object *args) /* object self_7313167, object r_734459 */
 {
 object r_734459 = args[0];
  
closureN_type c_7315525;
object e_7315584 [7];
c_7315525.hdr.mark = gc_color_red;
 c_7315525.hdr.grayed = 0;
c_7315525.tag = closureN_tag;
 c_7315525.fn = (function_type)__lambda_134;
c_7315525.num_args = 1;
c_7315525.num_elements = 7;
c_7315525.elements = (object *)e_7315584;
c_7315525.elements[0] = ((closureN)self_7313167)->elements[0];
c_7315525.elements[1] = ((closureN)self_7313167)->elements[1];
c_7315525.elements[2] = ((closureN)self_7313167)->elements[2];
c_7315525.elements[3] = ((closureN)self_7313167)->elements[3];
c_7315525.elements[4] = r_734459;
c_7315525.elements[5] = ((closureN)self_7313167)->elements[4];
c_7315525.elements[6] = ((closureN)self_7313167)->elements[5];

return_closcall2(data,  ((closureN)self_7313167)->elements[5],  &c_7315525, quote_tmp);; 
}

static void __lambda_134(void *data, object self_7313168, int argc, object *args) /* object self_7313168, object r_734460 */
 {
 object r_734460 = args[0];
  
closureN_type c_7315527;
object e_7315549 [2];
c_7315527.hdr.mark = gc_color_red;
 c_7315527.hdr.grayed = 0;
c_7315527.tag = closureN_tag;
 c_7315527.fn = (function_type)__lambda_135;
c_7315527.num_args = 0;
c_7315527.num_elements = 2;
c_7315527.elements = (object *)e_7315549;
c_7315527.elements[0] = ((closureN)self_7313168)->elements[0];
c_7315527.elements[1] = ((closureN)self_7313168)->elements[6];


closureN_type c_7315550;
object e_7315583 [8];
c_7315550.hdr.mark = gc_color_red;
 c_7315550.hdr.grayed = 0;
c_7315550.tag = closureN_tag;
 c_7315550.fn = (function_type)__lambda_137;
c_7315550.num_args = 1;
c_7315550.num_elements = 8;
c_7315550.elements = (object *)e_7315583;
c_7315550.elements[0] = ((closureN)self_7313168)->elements[0];
c_7315550.elements[1] = ((closureN)self_7313168)->elements[1];
c_7315550.elements[2] = ((closureN)self_7313168)->elements[2];
c_7315550.elements[3] = ((closureN)self_7313168)->elements[3];
c_7315550.elements[4] = ((closureN)self_7313168)->elements[4];
c_7315550.elements[5] = r_734460;
c_7315550.elements[6] = ((closureN)self_7313168)->elements[5];
c_7315550.elements[7] = ((closureN)self_7313168)->elements[6];

return_direct_with_clo1(data,(closure)&c_7315527,__lambda_135,  &c_7315550);; 
}

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

return_closcall2(data,  ((closureN)self_7313169)->elements[7],  &c_7315553, quote_cond);; 
}

static void __lambda_138(void *data, object self_7313170, int argc, object *args) /* object self_7313170, object r_734463 */
 {
 object r_734463 = args[0];
  
list_2_type local_7315558; 

list_3_type local_7315561; 

pair_type local_7315565; 

list_4_type local_7315569; 

pair_type local_7315575; 




return_direct_with_clo1(data,  ((closureN)self_7313170)->elements[2], (((closure)  ((closureN)self_7313170)->elements[2])->fn),  Cyc_fast_list_2(&local_7315558, Cyc_fast_list_3(&local_7315561, ((closureN)self_7313170)->elements[3], set_cell_as_expr(&local_7315565, ((closureN)self_7313170)->elements[7]), Cyc_fast_list_4(&local_7315569, ((closureN)self_7313170)->elements[4], ((closureN)self_7313170)->elements[5], ((closureN)self_7313170)->elements[6], set_pair_as_expr(&local_7315575, r_734463, Cyc_cddr(data, ((closureN)self_7313170)->elements[1])))), Cyc_car(data, ((closureN)self_7313170)->elements[0])));; 
}

static void __lambda_135(void *data, object self_7313171, int argc, object *args) /* object self_7313171, object k_734466 */
 {
 object k_734466 = args[0];
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313171)->elements[0]))) ){ 
  return_closcall2(data,  ((closureN)self_7313171)->elements[1],  k_734466, quote_tmp);
} else { 
  
closureN_type c_7315537;
object e_7315548 [2];
c_7315537.hdr.mark = gc_color_red;
 c_7315537.hdr.grayed = 0;
c_7315537.tag = closureN_tag;
 c_7315537.fn = (function_type)__lambda_136;
c_7315537.num_args = 1;
c_7315537.num_elements = 2;
c_7315537.elements = (object *)e_7315548;
c_7315537.elements[0] = ((closureN)self_7313171)->elements[0];
c_7315537.elements[1] = k_734466;

return_closcall2(data,  ((closureN)self_7313171)->elements[1],  &c_7315537, quote_tmp);}
;; 
}

static void __lambda_136(void *data, object self_7313172, int argc, object *args) /* object self_7313172, object r_734470 */
 {
 object r_734470 = args[0];
  
list_2_type local_7315542; 




return_direct_with_clo1(data,  ((closureN)self_7313172)->elements[1], (((closure)  ((closureN)self_7313172)->elements[1])->fn),  Cyc_fast_list_2(&local_7315542, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313172)->elements[0])), r_734470));; 
}

static void __lambda_128(void *data, object self_7313176, int argc, object *args) /* object self_7313176, object k_734493 */
 {
 object k_734493 = args[0];
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313176)->elements[0]))) ){ 
  return_direct_with_clo1(data,  k_734493, (((closure)  k_734493)->fn),  boolean_t);
} else { 
  
closureN_type c_7315504;
object e_7315511 [3];
c_7315504.hdr.mark = gc_color_red;
 c_7315504.hdr.grayed = 0;
c_7315504.tag = closureN_tag;
 c_7315504.fn = (function_type)__lambda_129;
c_7315504.num_args = 1;
c_7315504.num_elements = 3;
c_7315504.elements = (object *)e_7315511;
c_7315504.elements[0] = ((closureN)self_7313176)->elements[0];
c_7315504.elements[1] = ((closureN)self_7313176)->elements[1];
c_7315504.elements[2] = k_734493;

return_closcall2(data,  ((closureN)self_7313176)->elements[2],  &c_7315504, quote__123_125);}
;; 
}

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

return_closcall3(data,  ((closureN)self_7313177)->elements[1],  ((closureN)self_7313177)->elements[2], r_734495, Cyc_cadr(data, ((closureN)self_7313177)->elements[0]));; 
}

static void __lambda_126(void *data, object self_7313162, int argc, object *args) /* object self_7313162, object r_734452 */
 {
 object r_734452 = args[0];
    
if( (boolean_f != Cyc_is_pair(r_734452)) ){ 
  
make_utf8_string_with_len(c_7315470, "non-final else in cond", 22, 22);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313162)->elements[2], &c_7315470, ((closureN)self_7313162)->elements[1]);
} else { 
  
closureN_type c_7315474;
object e_7315489 [2];
c_7315474.hdr.mark = gc_color_red;
 c_7315474.hdr.grayed = 0;
c_7315474.tag = closureN_tag;
 c_7315474.fn = (function_type)__lambda_127;
c_7315474.num_args = 1;
c_7315474.num_elements = 2;
c_7315474.elements = (object *)e_7315489;
c_7315474.elements[0] = ((closureN)self_7313162)->elements[0];
c_7315474.elements[1] = ((closureN)self_7313162)->elements[2];

return_closcall2(data,  ((closureN)self_7313162)->elements[3],  &c_7315474, quote_lambda);}
;; 
}

static void __lambda_127(void *data, object self_7313163, int argc, object *args) /* object self_7313163, object r_734447 */
 {
 object r_734447 = args[0];
  
pair_type local_7315479; 

pair_type local_7315482; 

pair_type local_7315485; 


return_direct_with_clo1(data,  ((closureN)self_7313163)->elements[1], (((closure)  ((closureN)self_7313163)->elements[1])->fn),  set_cell_as_expr(&local_7315479, set_pair_as_expr(&local_7315482, r_734447, set_pair_as_expr(&local_7315485, NULL, Cyc_cdr(data, ((closureN)self_7313163)->elements[0])))));; 
}

static void __lambda_84(void *data, object _, int argc, object *args) /* closure _,object k_734342, object expr_7388_732916, object rename_7389_732917, object compare_7390_732918 */
 {
object k_734342 = args[0]; object expr_7388_732916 = args[1]; object rename_7389_732917 = args[2];
  Cyc_st_add(data, "scheme/base.sld:cond-expand");

closureN_type c_7315035;
object e_7315448 [3];
c_7315035.hdr.mark = gc_color_red;
 c_7315035.hdr.grayed = 0;
c_7315035.tag = closureN_tag;
 c_7315035.fn = (function_type)__lambda_85;
c_7315035.num_args = 4;
c_7315035.num_elements = 3;
c_7315035.elements = (object *)e_7315448;
c_7315035.elements[0] = expr_7388_732916;
c_7315035.elements[1] = k_734342;
c_7315035.elements[2] = rename_7389_732917;

return_direct_with_clo4(data,(closure)&c_7315035,__lambda_85,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_85(void *data, object self_7313117, int argc, object *args) /* object self_7313117, object _191lib_117import_91_125filename_732923, object _191lib_117import_91_125library_91name_732924, object _191library_91exists_127_732925, object check_732926 */
 {
 object _191lib_117import_91_125filename_732923 = args[0]; object _191lib_117import_91_125library_91name_732924 = args[1]; object _191library_91exists_127_732925 = args[2]; object check_732926 = args[3];
  
closureN_type c_7315037;
object e_7315444 [6];
c_7315037.hdr.mark = gc_color_red;
 c_7315037.hdr.grayed = 0;
c_7315037.tag = closureN_tag;
 c_7315037.fn = (function_type)__lambda_1352;
c_7315037.num_args = 1;
c_7315037.num_elements = 6;
c_7315037.elements = (object *)e_7315444;
c_7315037.elements[0] = _191lib_117import_91_125library_91name_732924;
c_7315037.elements[1] = _191library_91exists_127_732925;
c_7315037.elements[2] = check_732926;
c_7315037.elements[3] = ((closureN)self_7313117)->elements[0];
c_7315037.elements[4] = ((closureN)self_7313117)->elements[1];
c_7315037.elements[5] = ((closureN)self_7313117)->elements[2];


pair_type local_7315447; 
return_direct_with_clo1(data,(closure)&c_7315037,__lambda_1352,  set_cell_as_expr(&local_7315447, _191lib_117import_91_125filename_732923));; 
}

static void __lambda_1352(void *data, object self_7313118, int argc, object *args) /* object self_7313118, object _191lib_117import_91_125filename_732923 */
 {
 object _191lib_117import_91_125filename_732923 = args[0];
  
closureN_type c_7315039;
object e_7315439 [6];
c_7315039.hdr.mark = gc_color_red;
 c_7315039.hdr.grayed = 0;
c_7315039.tag = closureN_tag;
 c_7315039.fn = (function_type)__lambda_1351;
c_7315039.num_args = 1;
c_7315039.num_elements = 6;
c_7315039.elements = (object *)e_7315439;
c_7315039.elements[0] = _191lib_117import_91_125filename_732923;
c_7315039.elements[1] = ((closureN)self_7313118)->elements[1];
c_7315039.elements[2] = ((closureN)self_7313118)->elements[2];
c_7315039.elements[3] = ((closureN)self_7313118)->elements[3];
c_7315039.elements[4] = ((closureN)self_7313118)->elements[4];
c_7315039.elements[5] = ((closureN)self_7313118)->elements[5];


pair_type local_7315442; 
return_direct_with_clo1(data,(closure)&c_7315039,__lambda_1351,  set_cell_as_expr(&local_7315442, ((closureN)self_7313118)->elements[0]));; 
}

static void __lambda_1351(void *data, object self_7313119, int argc, object *args) /* object self_7313119, object _191lib_117import_91_125library_91name_732924 */
 {
 object _191lib_117import_91_125library_91name_732924 = args[0];
  
closureN_type c_7315041;
object e_7315434 [6];
c_7315041.hdr.mark = gc_color_red;
 c_7315041.hdr.grayed = 0;
c_7315041.tag = closureN_tag;
 c_7315041.fn = (function_type)__lambda_1350;
c_7315041.num_args = 1;
c_7315041.num_elements = 6;
c_7315041.elements = (object *)e_7315434;
c_7315041.elements[0] = ((closureN)self_7313119)->elements[0];
c_7315041.elements[1] = _191lib_117import_91_125library_91name_732924;
c_7315041.elements[2] = ((closureN)self_7313119)->elements[2];
c_7315041.elements[3] = ((closureN)self_7313119)->elements[3];
c_7315041.elements[4] = ((closureN)self_7313119)->elements[4];
c_7315041.elements[5] = ((closureN)self_7313119)->elements[5];


pair_type local_7315437; 
return_direct_with_clo1(data,(closure)&c_7315041,__lambda_1350,  set_cell_as_expr(&local_7315437, ((closureN)self_7313119)->elements[1]));; 
}

static void __lambda_1350(void *data, object self_7313120, int argc, object *args) /* object self_7313120, object _191library_91exists_127_732925 */
 {
 object _191library_91exists_127_732925 = args[0];
  
closureN_type c_7315043;
object e_7315429 [6];
c_7315043.hdr.mark = gc_color_red;
 c_7315043.hdr.grayed = 0;
c_7315043.tag = closureN_tag;
 c_7315043.fn = (function_type)__lambda_1349;
c_7315043.num_args = 1;
c_7315043.num_elements = 6;
c_7315043.elements = (object *)e_7315429;
c_7315043.elements[0] = ((closureN)self_7313120)->elements[0];
c_7315043.elements[1] = ((closureN)self_7313120)->elements[1];
c_7315043.elements[2] = _191library_91exists_127_732925;
c_7315043.elements[3] = ((closureN)self_7313120)->elements[3];
c_7315043.elements[4] = ((closureN)self_7313120)->elements[4];
c_7315043.elements[5] = ((closureN)self_7313120)->elements[5];


pair_type local_7315432; 
return_direct_with_clo1(data,(closure)&c_7315043,__lambda_1349,  set_cell_as_expr(&local_7315432, ((closureN)self_7313120)->elements[2]));; 
}

static void __lambda_1349(void *data, object self_7313121, int argc, object *args) /* object self_7313121, object check_732926 */
 {
 object check_732926 = args[0];
  
closureN_type c_7315045;
object e_7315399 [7];
c_7315045.hdr.mark = gc_color_red;
 c_7315045.hdr.grayed = 0;
c_7315045.tag = closureN_tag;
 c_7315045.fn = (function_type)__lambda_86;
c_7315045.num_args = 1;
c_7315045.num_elements = 7;
c_7315045.elements = (object *)e_7315399;
c_7315045.elements[0] = ((closureN)self_7313121)->elements[0];
c_7315045.elements[1] = ((closureN)self_7313121)->elements[1];
c_7315045.elements[2] = ((closureN)self_7313121)->elements[2];
c_7315045.elements[3] = check_732926;
c_7315045.elements[4] = ((closureN)self_7313121)->elements[3];
c_7315045.elements[5] = ((closureN)self_7313121)->elements[4];
c_7315045.elements[6] = ((closureN)self_7313121)->elements[5];


closureN_type c_7315400;
object e_7315428 [2];
c_7315400.hdr.mark = gc_color_red;
 c_7315400.hdr.grayed = 0;
c_7315400.tag = closureN_tag;
 c_7315400.fn = (function_type)__lambda_118;
c_7315400.num_args = 1;
c_7315400.num_elements = 2;
c_7315400.elements = (object *)e_7315428;
c_7315400.elements[0] = ((closureN)self_7313121)->elements[0];
c_7315400.elements[1] = ((closureN)self_7313121)->elements[1];

return_direct_with_clo1(data,(closure)&c_7315045,__lambda_86,  &c_7315400);; 
}

static void __lambda_118(void *data, object self_7313122, int argc, object *args) /* object self_7313122, object k_734433, object import_7391_732931, object ext_7392_732932_raw, ... */
 {
 object k_734433 = args[0]; object import_7391_732931 = args[1];
load_varargs(ext_7392_732932, args, 2, argc - 2);
  


closureN_type c_7315405;
object e_7315427 [3];
c_7315405.hdr.mark = gc_color_red;
 c_7315405.hdr.grayed = 0;
c_7315405.tag = closureN_tag;
 c_7315405.fn = (function_type)__lambda_119;
c_7315405.num_args = 1;
c_7315405.num_elements = 3;
c_7315405.elements = (object *)e_7315427;
c_7315405.elements[0] = ((closureN)self_7313122)->elements[0];
c_7315405.elements[1] = ext_7392_732932;
c_7315405.elements[2] = k_734433;

return_closcall2(data,  car(((closureN)self_7313122)->elements[1]),  &c_7315405, import_7391_732931);; 
}

static void __lambda_119(void *data, object self_7313123, int argc, object *args) /* object self_7313123, object r_734435 */
 {
 object r_734435 = args[0];
  object r_734436;
    
if( (boolean_f != Cyc_is_null(((closureN)self_7313123)->elements[1])) ){ 
  object c_7315411;
 alloc_string(data,c_7315411, 4, 4);
char tmp_7315412[] = ".sld";
memcpy(((string_type *)c_7315411)->str, tmp_7315412,4);
((string_type *)c_7315411)->str[4] = '\0';
  r_734436 = c_7315411;
} else { 
  
  r_734436 = Cyc_car(data, ((closureN)self_7313123)->elements[1]);}
;


closureN_type c_7315421;
object e_7315426 [1];
c_7315421.hdr.mark = gc_color_red;
 c_7315421.hdr.grayed = 0;
c_7315421.tag = closureN_tag;
 c_7315421.fn = (function_type)__lambda_120;
c_7315421.num_args = 1;
c_7315421.num_elements = 1;
c_7315421.elements = (object *)e_7315426;
c_7315421.elements[0] = ((closureN)self_7313123)->elements[2];

return_closcall3(data,  car(((closureN)self_7313123)->elements[0]),  &c_7315421, r_734435, r_734436);; 
}

static void __lambda_120(void *data, object self_7313124, int argc, object *args) /* object self_7313124, object r_734434 */
 {
 object r_734434 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_7313124)->elements[0], (((closure)  ((closureN)self_7313124)->elements[0])->fn),  Cyc_io_file_exists(data, r_734434));; 
}

static void __lambda_86(void *data, object self_7313125, int argc, object *args) /* object self_7313125, object r_734432 */
 {
 object r_734432 = args[0];
  
closureN_type c_7315047;
object e_7315395 [7];
c_7315047.hdr.mark = gc_color_red;
 c_7315047.hdr.grayed = 0;
c_7315047.tag = closureN_tag;
 c_7315047.fn = (function_type)__lambda_87;
c_7315047.num_args = 1;
c_7315047.num_elements = 7;
c_7315047.elements = (object *)e_7315395;
c_7315047.elements[0] = ((closureN)self_7313125)->elements[0];
c_7315047.elements[1] = ((closureN)self_7313125)->elements[1];
c_7315047.elements[2] = ((closureN)self_7313125)->elements[2];
c_7315047.elements[3] = ((closureN)self_7313125)->elements[3];
c_7315047.elements[4] = ((closureN)self_7313125)->elements[4];
c_7315047.elements[5] = ((closureN)self_7313125)->elements[5];
c_7315047.elements[6] = ((closureN)self_7313125)->elements[6];



return_direct_with_clo1(data,(closure)&c_7315047,__lambda_87,  Cyc_set_cell(data, ((closureN)self_7313125)->elements[2], r_734432));; 
}

static void __lambda_87(void *data, object self_7313126, int argc, object *args) /* object self_7313126, object r_734343 */
 {

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


closureN_type c_7315275;
object e_7315394 [1];
c_7315275.hdr.mark = gc_color_red;
 c_7315275.hdr.grayed = 0;
c_7315275.tag = closureN_tag;
 c_7315275.fn = (function_type)__lambda_106;
c_7315275.num_args = 1;
c_7315275.num_elements = 1;
c_7315275.elements = (object *)e_7315394;
c_7315275.elements[0] = ((closureN)self_7313126)->elements[4];

return_direct_with_clo1(data,(closure)&c_7315049,__lambda_88,  &c_7315275);; 
}

static void __lambda_106(void *data, object self_7313127, int argc, object *args) /* object self_7313127, object k_734405, object import_7393_732933, object ext_7394_732934_raw, ... */
 {
 object k_734405 = args[0]; object import_7393_732933 = args[1];
load_varargs(ext_7394_732934, args, 2, argc - 2);
  object file_91ext_7397_732935;
    
if( (boolean_f != Cyc_is_null(ext_7394_732934)) ){ 
  object c_7315280;
 alloc_string(data,c_7315280, 4, 4);
char tmp_7315281[] = ".sld";
memcpy(((string_type *)c_7315280)->str, tmp_7315281,4);
((string_type *)c_7315280)->str[4] = '\0';
  file_91ext_7397_732935 = c_7315280;
} else { 
  
  file_91ext_7397_732935 = Cyc_car(data, ext_7394_732934);}
;
closureN_type c_7315286;
object e_7315361 [3];
c_7315286.hdr.mark = gc_color_red;
 c_7315286.hdr.grayed = 0;
c_7315286.tag = closureN_tag;
 c_7315286.fn = (function_type)__lambda_107;
c_7315286.num_args = 1;
c_7315286.num_elements = 3;
c_7315286.elements = (object *)e_7315361;
c_7315286.elements[0] = file_91ext_7397_732935;
c_7315286.elements[1] = import_7393_732933;
c_7315286.elements[2] = k_734405;


closureN_type c_7315362;
object e_7315393 [1];
c_7315362.hdr.mark = gc_color_red;
 c_7315362.hdr.grayed = 0;
c_7315362.tag = closureN_tag;
 c_7315362.fn = (function_type)__lambda_115;
c_7315362.num_args = 1;
c_7315362.num_elements = 1;
c_7315362.elements = (object *)e_7315393;
c_7315362.elements[0] = ((closureN)self_7313127)->elements[0];

return_direct_with_clo1(data,(closure)&c_7315286,__lambda_107,  &c_7315362);; 
}

static void __lambda_115(void *data, object self_7313128, int argc, object *args) /* object self_7313128, object k_734425, object i_73113_732940 */
 {
 object k_734425 = args[0]; object i_73113_732940 = args[1];
  
closureN_type c_7315364;
object e_7315384 [2];
c_7315364.hdr.mark = gc_color_red;
 c_7315364.hdr.grayed = 0;
c_7315364.tag = closureN_tag;
 c_7315364.fn = (function_type)__lambda_116;
c_7315364.num_args = 0;
c_7315364.num_elements = 2;
c_7315364.elements = (object *)e_7315384;
c_7315364.elements[0] = ((closureN)self_7313128)->elements[0];
c_7315364.elements[1] = i_73113_732940;


closureN_type c_7315385;
object e_7315392 [1];
c_7315385.hdr.mark = gc_color_red;
 c_7315385.hdr.grayed = 0;
c_7315385.tag = closureN_tag;
 c_7315385.fn = (function_type)__lambda_117;
c_7315385.num_args = 1;
c_7315385.num_elements = 1;
c_7315385.elements = (object *)e_7315392;
c_7315385.elements[0] = k_734425;

return_direct_with_clo1(data,(closure)&c_7315364,__lambda_116,  &c_7315385);; 
}

static void __lambda_117(void *data, object self_7313129, int argc, object *args) /* object self_7313129, object r_734426 */
 {
 object r_734426 = args[0];
  
make_utf8_string_with_len(c_7315391, "/", 1, 1);

object c_7315390 = Cyc_string_append(data,  ((closureN)self_7313129)->elements[0],2,&c_7315391, r_734426);
return_direct_with_clo1(data,  ((closureN)self_7313129)->elements[0], (((closure)  ((closureN)self_7313129)->elements[0])->fn),  c_7315390);; 
}

static void __lambda_116(void *data, object self_7313130, int argc, object *args) /* object self_7313130, object k_734427 */
 {
 object k_734427 = args[0];
    
if( (boolean_f != Cyc_is_symbol(((closureN)self_7313130)->elements[1])) ){ 
  
object c_7315371 = Cyc_symbol2string(data,  k_734427,((closureN)self_7313130)->elements[1]);
return_direct_with_clo1(data,  k_734427, (((closure)  k_734427)->fn),  c_7315371);
} else { 
    
if( (boolean_f != Cyc_is_number(((closureN)self_7313130)->elements[1])) ){ 
  
object c_7315379 = Cyc_number2string2(data,  k_734427,1,((closureN)self_7313130)->elements[1]);
return_direct_with_clo1(data,  k_734427, (((closure)  k_734427)->fn),  c_7315379);
} else { 
  
make_utf8_string_with_len(c_7315382, "Unexpected type in import set", 29, 29);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  k_734427, &c_7315382, ((closureN)self_7313130)->elements[0]);}
;}
;; 
}

static void __lambda_107(void *data, object self_7313131, int argc, object *args) /* object self_7313131, object r_734424 */
 {
 object r_734424 = args[0];
  
closureN_type c_7315288;
object e_7315359 [3];
c_7315288.hdr.mark = gc_color_red;
 c_7315288.hdr.grayed = 0;
c_7315288.tag = closureN_tag;
 c_7315288.fn = (function_type)__lambda_108;
c_7315288.num_args = 1;
c_7315288.num_elements = 3;
c_7315288.elements = (object *)e_7315359;
c_7315288.elements[0] = ((closureN)self_7313131)->elements[0];
c_7315288.elements[1] = ((closureN)self_7313131)->elements[1];
c_7315288.elements[2] = ((closureN)self_7313131)->elements[2];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7315288, r_734424, ((closureN)self_7313131)->elements[1]);; 
}

static void __lambda_108(void *data, object self_7313132, int argc, object *args) /* object self_7313132, object r_734423 */
 {
 object r_734423 = args[0];
  
closureN_type c_7315290;
object e_7315355 [3];
c_7315290.hdr.mark = gc_color_red;
 c_7315290.hdr.grayed = 0;
c_7315290.tag = closureN_tag;
 c_7315290.fn = (function_type)__lambda_109;
c_7315290.num_args = 1;
c_7315290.num_elements = 3;
c_7315290.elements = (object *)e_7315355;
c_7315290.elements[0] = ((closureN)self_7313132)->elements[0];
c_7315290.elements[1] = ((closureN)self_7313132)->elements[1];
c_7315290.elements[2] = ((closureN)self_7313132)->elements[2];


object c_7315358 = apply(data,(closure)&c_7315290,primitive_string_91append, r_734423);
return_closcall1(data,(closure)&c_7315290,  c_7315358);; 
}

static void __lambda_109(void *data, object self_7313133, int argc, object *args) /* object self_7313133, object r_734422 */
 {
 object r_734422 = args[0];
  
closureN_type c_7315292;
object e_7315350 [2];
c_7315292.hdr.mark = gc_color_red;
 c_7315292.hdr.grayed = 0;
c_7315292.tag = closureN_tag;
 c_7315292.fn = (function_type)__lambda_110;
c_7315292.num_args = 1;
c_7315292.num_elements = 2;
c_7315292.elements = (object *)e_7315350;
c_7315292.elements[0] = ((closureN)self_7313133)->elements[1];
c_7315292.elements[1] = ((closureN)self_7313133)->elements[2];


object c_7315353 = Cyc_string_append(data,(closure)&c_7315292,2,r_734422, ((closureN)self_7313133)->elements[0]);
return_closcall1(data,(closure)&c_7315292,  c_7315353);; 
}

static void __lambda_110(void *data, object self_7313134, int argc, object *args) /* object self_7313134, object filename_85_73100_732936 */
 {
 object filename_85_73100_732936 = args[0];
  
closureN_type c_7315294;
object e_7315344 [2];
c_7315294.hdr.mark = gc_color_red;
 c_7315294.hdr.grayed = 0;
c_7315294.tag = closureN_tag;
 c_7315294.fn = (function_type)__lambda_111;
c_7315294.num_args = 1;
c_7315294.num_elements = 2;
c_7315294.elements = (object *)e_7315344;
c_7315294.elements[0] = ((closureN)self_7313134)->elements[0];
c_7315294.elements[1] = ((closureN)self_7313134)->elements[1];




object c_7315347 = Cyc_substring(data,(closure)&c_7315294,filename_85_73100_732936, obj_int2obj(1), Cyc_string_length(data, filename_85_73100_732936));
return_closcall1(data,(closure)&c_7315294,  c_7315347);; 
}

static void __lambda_111(void *data, object self_7313135, int argc, object *args) /* object self_7313135, object filename_73103_732937 */
 {
 object filename_73103_732937 = args[0];
  
closureN_type c_7315296;
object e_7315325 [1];
c_7315296.hdr.mark = gc_color_red;
 c_7315296.hdr.grayed = 0;
c_7315296.tag = closureN_tag;
 c_7315296.fn = (function_type)__lambda_112;
c_7315296.num_args = 0;
c_7315296.num_elements = 1;
c_7315296.elements = (object *)e_7315325;
c_7315296.elements[0] = ((closureN)self_7313135)->elements[0];


closureN_type c_7315326;
object e_7315343 [2];
c_7315326.hdr.mark = gc_color_red;
 c_7315326.hdr.grayed = 0;
c_7315326.tag = closureN_tag;
 c_7315326.fn = (function_type)__lambda_113;
c_7315326.num_args = 1;
c_7315326.num_elements = 2;
c_7315326.elements = (object *)e_7315343;
c_7315326.elements[0] = filename_73103_732937;
c_7315326.elements[1] = ((closureN)self_7313135)->elements[1];

return_direct_with_clo1(data,(closure)&c_7315296,__lambda_112,  &c_7315326);; 
}

static void __lambda_113(void *data, object self_7313136, int argc, object *args) /* object self_7313136, object r_734409 */
 {
 object r_734409 = args[0];
  if( (boolean_f != r_734409) ){ 
  
closureN_type c_7315328;
object e_7315336 [2];
c_7315328.hdr.mark = gc_color_red;
 c_7315328.hdr.grayed = 0;
c_7315328.tag = closureN_tag;
 c_7315328.fn = (function_type)__lambda_114;
c_7315328.num_args = 1;
c_7315328.num_elements = 2;
c_7315328.elements = (object *)e_7315336;
c_7315328.elements[0] = ((closureN)self_7313136)->elements[0];
c_7315328.elements[1] = ((closureN)self_7313136)->elements[1];


object c_7315339 = Cyc_installation_dir(data,(closure)&c_7315328,quote_sld);
return_closcall1(data,(closure)&c_7315328,  c_7315339);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313136)->elements[1], (((closure)  ((closureN)self_7313136)->elements[1])->fn),  ((closureN)self_7313136)->elements[0]);}
;; 
}

static void __lambda_114(void *data, object self_7313137, int argc, object *args) /* object self_7313137, object r_734410 */
 {
 object r_734410 = args[0];
  
make_utf8_string_with_len(c_7315334, "/", 1, 1);

object c_7315333 = Cyc_string_append(data,  ((closureN)self_7313137)->elements[1],3,r_734410, &c_7315334, ((closureN)self_7313137)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_7313137)->elements[1], (((closure)  ((closureN)self_7313137)->elements[1])->fn),  c_7315333);; 
}

static void __lambda_112(void *data, object self_7313138, int argc, object *args) /* object self_7313138, object k_734413 */
 {
 object k_734413 = args[0];
    
  
if( (boolean_f != equalp(quote_scheme, Cyc_car(data, ((closureN)self_7313138)->elements[0]))) ){ 
  



return_direct_with_clo1(data,  k_734413,__lambda_113,  equalp(quote_scheme, Cyc_car(data, ((closureN)self_7313138)->elements[0])));
} else { 
    
  
if( (boolean_f != equalp(quote_srfi, Cyc_car(data, ((closureN)self_7313138)->elements[0]))) ){ 
  



return_direct_with_clo1(data,  k_734413,__lambda_113,  equalp(quote_srfi, Cyc_car(data, ((closureN)self_7313138)->elements[0])));
} else { 
  



return_direct_with_clo1(data,  k_734413,__lambda_113,  equalp(quote_cyclone, Cyc_car(data, ((closureN)self_7313138)->elements[0])));}
;}
;; 
}

static void __lambda_88(void *data, object self_7313139, int argc, object *args) /* object self_7313139, object r_734404 */
 {
 object r_734404 = args[0];
  
closureN_type c_7315051;
object e_7315270 [6];
c_7315051.hdr.mark = gc_color_red;
 c_7315051.hdr.grayed = 0;
c_7315051.tag = closureN_tag;
 c_7315051.fn = (function_type)__lambda_89;
c_7315051.num_args = 1;
c_7315051.num_elements = 6;
c_7315051.elements = (object *)e_7315270;
c_7315051.elements[0] = ((closureN)self_7313139)->elements[1];
c_7315051.elements[1] = ((closureN)self_7313139)->elements[2];
c_7315051.elements[2] = ((closureN)self_7313139)->elements[3];
c_7315051.elements[3] = ((closureN)self_7313139)->elements[4];
c_7315051.elements[4] = ((closureN)self_7313139)->elements[5];
c_7315051.elements[5] = ((closureN)self_7313139)->elements[6];



return_direct_with_clo1(data,(closure)&c_7315051,__lambda_89,  Cyc_set_cell(data, ((closureN)self_7313139)->elements[0], r_734404));; 
}

static void __lambda_89(void *data, object self_7313140, int argc, object *args) /* object self_7313140, object r_734344 */
 {

  
closureN_type c_7315053;
object e_7315224 [6];
c_7315053.hdr.mark = gc_color_red;
 c_7315053.hdr.grayed = 0;
c_7315053.tag = closureN_tag;
 c_7315053.fn = (function_type)__lambda_90;
c_7315053.num_args = 1;
c_7315053.num_elements = 6;
c_7315053.elements = (object *)e_7315224;
c_7315053.elements[0] = ((closureN)self_7313140)->elements[0];
c_7315053.elements[1] = ((closureN)self_7313140)->elements[1];
c_7315053.elements[2] = ((closureN)self_7313140)->elements[2];
c_7315053.elements[3] = ((closureN)self_7313140)->elements[3];
c_7315053.elements[4] = ((closureN)self_7313140)->elements[4];
c_7315053.elements[5] = ((closureN)self_7313140)->elements[5];


closureN_type c_7315225;
object e_7315269 [1];
c_7315225.hdr.mark = gc_color_red;
 c_7315225.hdr.grayed = 0;
c_7315225.tag = closureN_tag;
 c_7315225.fn = (function_type)__lambda_105;
c_7315225.num_args = 1;
c_7315225.num_elements = 1;
c_7315225.elements = (object *)e_7315269;
c_7315225.elements[0] = ((closureN)self_7313140)->elements[0];

return_direct_with_clo1(data,(closure)&c_7315053,__lambda_90,  &c_7315225);; 
}

static void __lambda_105(void *data, object self_7313141, int argc, object *args) /* object self_7313141, object k_734388, object import_73121_732941 */
 {
 object k_734388 = args[0]; object import_73121_732941 = args[1];
  object r_734389;
    
if( (boolean_f != Cyc_is_pair(import_73121_732941)) ){ 
    
  
if( (boolean_f != equalp(quote_only, Cyc_car(data, import_73121_732941))) ){ 
  
  
  r_734389 = equalp(quote_only, Cyc_car(data, import_73121_732941));
} else { 
    
  
if( (boolean_f != equalp(quote_except, Cyc_car(data, import_73121_732941))) ){ 
  
  
  r_734389 = equalp(quote_except, Cyc_car(data, import_73121_732941));
} else { 
    
  
if( (boolean_f != equalp(quote_prefix, Cyc_car(data, import_73121_732941))) ){ 
  
  
  r_734389 = equalp(quote_prefix, Cyc_car(data, import_73121_732941));
} else { 
  
  
  r_734389 = equalp(quote_rename, Cyc_car(data, import_73121_732941));}
;}
;}
;
} else { 
  r_734389 = boolean_f;}
;if( (boolean_f != r_734389) ){ 
  



return_closcall2(data,  car(((closureN)self_7313141)->elements[0]),  k_734388, Cyc_cadr(data, import_73121_732941));
} else { 
  return_direct_with_clo1(data,  k_734388, (((closure)  k_734388)->fn),  import_73121_732941);}
;; 
}

static void __lambda_90(void *data, object self_7313142, int argc, object *args) /* object self_7313142, object r_734387 */
 {
 object r_734387 = args[0];
  
closureN_type c_7315055;
object e_7315220 [5];
c_7315055.hdr.mark = gc_color_red;
 c_7315055.hdr.grayed = 0;
c_7315055.tag = closureN_tag;
 c_7315055.fn = (function_type)__lambda_91;
c_7315055.num_args = 1;
c_7315055.num_elements = 5;
c_7315055.elements = (object *)e_7315220;
c_7315055.elements[0] = ((closureN)self_7313142)->elements[1];
c_7315055.elements[1] = ((closureN)self_7313142)->elements[2];
c_7315055.elements[2] = ((closureN)self_7313142)->elements[3];
c_7315055.elements[3] = ((closureN)self_7313142)->elements[4];
c_7315055.elements[4] = ((closureN)self_7313142)->elements[5];



return_direct_with_clo1(data,(closure)&c_7315055,__lambda_91,  Cyc_set_cell(data, ((closureN)self_7313142)->elements[0], r_734387));; 
}

static void __lambda_91(void *data, object self_7313143, int argc, object *args) /* object self_7313143, object r_734345 */
 {

  
closureN_type c_7315057;
object e_7315159 [4];
c_7315057.hdr.mark = gc_color_red;
 c_7315057.hdr.grayed = 0;
c_7315057.tag = closureN_tag;
 c_7315057.fn = (function_type)__lambda_92;
c_7315057.num_args = 1;
c_7315057.num_elements = 4;
c_7315057.elements = (object *)e_7315159;
c_7315057.elements[0] = ((closureN)self_7313143)->elements[1];
c_7315057.elements[1] = ((closureN)self_7313143)->elements[2];
c_7315057.elements[2] = ((closureN)self_7313143)->elements[3];
c_7315057.elements[3] = ((closureN)self_7313143)->elements[4];


closureN_type c_7315160;
object e_7315219 [2];
c_7315160.hdr.mark = gc_color_red;
 c_7315160.hdr.grayed = 0;
c_7315160.tag = closureN_tag;
 c_7315160.fn = (function_type)__lambda_102;
c_7315160.num_args = 1;
c_7315160.num_elements = 2;
c_7315160.elements = (object *)e_7315219;
c_7315160.elements[0] = ((closureN)self_7313143)->elements[0];
c_7315160.elements[1] = ((closureN)self_7313143)->elements[1];

return_direct_with_clo1(data,(closure)&c_7315057,__lambda_92,  &c_7315160);; 
}

static void __lambda_102(void *data, object self_7313144, int argc, object *args) /* object self_7313144, object k_734370, object x_73139_732945 */
 {
 object k_734370 = args[0]; object x_73139_732945 = args[1];
    
if( (boolean_f != Cyc_is_pair(x_73139_732945)) ){ 
    
  
if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732945), quote_and)) ){ 
  



return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  k_734370, car(((closureN)self_7313144)->elements[1]), Cyc_cdr(data, x_73139_732945));
} else { 
    
  
if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732945), quote_or)) ){ 
  



return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  k_734370, car(((closureN)self_7313144)->elements[1]), Cyc_cdr(data, x_73139_732945));
} else { 
    
  
if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732945), quote_not)) ){ 
  


closureN_type c_7315191;
object e_7315196 [1];
c_7315191.hdr.mark = gc_color_red;
 c_7315191.hdr.grayed = 0;
c_7315191.tag = closureN_tag;
 c_7315191.fn = (function_type)__lambda_103;
c_7315191.num_args = 1;
c_7315191.num_elements = 1;
c_7315191.elements = (object *)e_7315196;
c_7315191.elements[0] = k_734370;



return_closcall2(data,  car(((closureN)self_7313144)->elements[1]),  &c_7315191, Cyc_cadr(data, x_73139_732945));
} else { 
    
  
if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732945), quote_library)) ){ 
  



return_closcall2(data,  car(((closureN)self_7313144)->elements[0]),  k_734370, Cyc_cadr(data, x_73139_732945));
} else { 
  
make_utf8_string_with_len(c_7315210, "cond-expand: bad feature", 24, 24);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734370, &c_7315210, x_73139_732945);}
;}
;}
;}
;
} else { 
  
closureN_type c_7315212;
object e_7315218 [2];
c_7315212.hdr.mark = gc_color_red;
 c_7315212.hdr.grayed = 0;
c_7315212.tag = closureN_tag;
 c_7315212.fn = (function_type)__lambda_104;
c_7315212.num_args = 1;
c_7315212.num_elements = 2;
c_7315212.elements = (object *)e_7315218;
c_7315212.elements[0] = k_734370;
c_7315212.elements[1] = x_73139_732945;

return_direct_with_clo1(data,  __glo_features_scheme_base, (((closure)  __glo_features_scheme_base)->fn),  &c_7315212);}
;; 
}

static void __lambda_104(void *data, object self_7313146, int argc, object *args) /* object self_7313146, object r_734386 */
 {
 object r_734386 = args[0];
  

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

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

static void __lambda_92(void *data, object self_7313147, int argc, object *args) /* object self_7313147, object r_734369 */
 {
 object r_734369 = args[0];
  
closureN_type c_7315059;
object e_7315155 [4];
c_7315059.hdr.mark = gc_color_red;
 c_7315059.hdr.grayed = 0;
c_7315059.tag = closureN_tag;
 c_7315059.fn = (function_type)__lambda_93;
c_7315059.num_args = 1;
c_7315059.num_elements = 4;
c_7315059.elements = (object *)e_7315155;
c_7315059.elements[0] = ((closureN)self_7313147)->elements[0];
c_7315059.elements[1] = ((closureN)self_7313147)->elements[1];
c_7315059.elements[2] = ((closureN)self_7313147)->elements[2];
c_7315059.elements[3] = ((closureN)self_7313147)->elements[3];



return_direct_with_clo1(data,(closure)&c_7315059,__lambda_93,  Cyc_set_cell(data, ((closureN)self_7313147)->elements[0], r_734369));; 
}

static void __lambda_93(void *data, object self_7313148, int argc, object *args) /* object self_7313148, object r_734346 */
 {

  
closureN_type c_7315061;
object e_7315151 [3];
c_7315061.hdr.mark = gc_color_red;
 c_7315061.hdr.grayed = 0;
c_7315061.tag = closureN_tag;
 c_7315061.fn = (function_type)__lambda_94;
c_7315061.num_args = 1;
c_7315061.num_elements = 3;
c_7315061.elements = (object *)e_7315151;
c_7315061.elements[0] = ((closureN)self_7313148)->elements[0];
c_7315061.elements[1] = ((closureN)self_7313148)->elements[2];
c_7315061.elements[2] = ((closureN)self_7313148)->elements[3];



return_direct_with_clo1(data,(closure)&c_7315061,__lambda_94,  Cyc_cdr(data, ((closureN)self_7313148)->elements[1]));; 
}

static void __lambda_94(void *data, object self_7313149, int argc, object *args) /* object self_7313149, object ls_73145_732947 */
 {
 object ls_73145_732947 = args[0];
  
closureN_type c_7315063;
object e_7315150 [4];
c_7315063.hdr.mark = gc_color_red;
 c_7315063.hdr.grayed = 0;
c_7315063.tag = closureN_tag;
 c_7315063.fn = (function_type)__lambda_95;
c_7315063.num_args = 1;
c_7315063.num_elements = 4;
c_7315063.elements = (object *)e_7315150;
c_7315063.elements[0] = ((closureN)self_7313149)->elements[0];
c_7315063.elements[1] = ((closureN)self_7313149)->elements[1];
c_7315063.elements[2] = ls_73145_732947;
c_7315063.elements[3] = ((closureN)self_7313149)->elements[2];

return_direct_with_clo1(data,(closure)&c_7315063,__lambda_95,  boolean_f);; 
}

static void __lambda_95(void *data, object self_7313150, int argc, object *args) /* object self_7313150, object expand_73146_732948 */
 {
 object expand_73146_732948 = args[0];
  
closureN_type c_7315065;
object e_7315146 [4];
c_7315065.hdr.mark = gc_color_red;
 c_7315065.hdr.grayed = 0;
c_7315065.tag = closureN_tag;
 c_7315065.fn = (function_type)__lambda_1348;
c_7315065.num_args = 1;
c_7315065.num_elements = 4;
c_7315065.elements = (object *)e_7315146;
c_7315065.elements[0] = ((closureN)self_7313150)->elements[0];
c_7315065.elements[1] = ((closureN)self_7313150)->elements[1];
c_7315065.elements[2] = ((closureN)self_7313150)->elements[2];
c_7315065.elements[3] = ((closureN)self_7313150)->elements[3];


pair_type local_7315149; 
return_direct_with_clo1(data,(closure)&c_7315065,__lambda_1348,  set_cell_as_expr(&local_7315149, expand_73146_732948));; 
}

static void __lambda_1348(void *data, object self_7313151, int argc, object *args) /* object self_7313151, object expand_73146_732948 */
 {
 object expand_73146_732948 = args[0];
  
closureN_type c_7315067;
object e_7315080 [3];
c_7315067.hdr.mark = gc_color_red;
 c_7315067.hdr.grayed = 0;
c_7315067.tag = closureN_tag;
 c_7315067.fn = (function_type)__lambda_96;
c_7315067.num_args = 1;
c_7315067.num_elements = 3;
c_7315067.elements = (object *)e_7315080;
c_7315067.elements[0] = expand_73146_732948;
c_7315067.elements[1] = ((closureN)self_7313151)->elements[1];
c_7315067.elements[2] = ((closureN)self_7313151)->elements[2];


closureN_type c_7315081;
object e_7315145 [3];
c_7315081.hdr.mark = gc_color_red;
 c_7315081.hdr.grayed = 0;
c_7315081.tag = closureN_tag;
 c_7315081.fn = (function_type)__lambda_98;
c_7315081.num_args = 1;
c_7315081.num_elements = 3;
c_7315081.elements = (object *)e_7315145;
c_7315081.elements[0] = ((closureN)self_7313151)->elements[0];
c_7315081.elements[1] = expand_73146_732948;
c_7315081.elements[2] = ((closureN)self_7313151)->elements[3];

return_direct_with_clo1(data,(closure)&c_7315067,__lambda_96,  &c_7315081);; 
}

static void __lambda_98(void *data, object self_7313152, int argc, object *args) /* object self_7313152, object k_734350, object ls_73147_732949 */
 {
 object k_734350 = args[0]; object ls_73147_732949 = args[1];
    
if( (boolean_f != Cyc_is_null(ls_73147_732949)) ){ 
  

return_direct_with_clo1(data,  k_734350, (((closure)  k_734350)->fn),  Cyc_is_null(ls_73147_732949));
} else { 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ls_73147_732949))) ){ 
    
  
if( (boolean_f != Cyc_eq(quote__else, Cyc_caar(data, ls_73147_732949))) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ls_73147_732949))) ){ 
  
make_utf8_string_with_len(c_7315100, "cond-expand: else in non-final position", 39, 39);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734350, &c_7315100);
} else { 
  
closureN_type c_7315103;
object e_7315112 [2];
c_7315103.hdr.mark = gc_color_red;
 c_7315103.hdr.grayed = 0;
c_7315103.tag = closureN_tag;
 c_7315103.fn = (function_type)__lambda_99;
c_7315103.num_args = 1;
c_7315103.num_elements = 2;
c_7315103.elements = (object *)e_7315112;
c_7315103.elements[0] = k_734350;
c_7315103.elements[1] = ls_73147_732949;

return_closcall2(data,  ((closureN)self_7313152)->elements[2],  &c_7315103, quote_begin);}
;
} else { 
  


closureN_type c_7315117;
object e_7315138 [4];
c_7315117.hdr.mark = gc_color_red;
 c_7315117.hdr.grayed = 0;
c_7315117.tag = closureN_tag;
 c_7315117.fn = (function_type)__lambda_100;
c_7315117.num_args = 1;
c_7315117.num_elements = 4;
c_7315117.elements = (object *)e_7315138;
c_7315117.elements[0] = ((closureN)self_7313152)->elements[1];
c_7315117.elements[1] = k_734350;
c_7315117.elements[2] = ls_73147_732949;
c_7315117.elements[3] = ((closureN)self_7313152)->elements[2];



return_closcall2(data,  car(((closureN)self_7313152)->elements[0]),  &c_7315117, Cyc_caar(data, ls_73147_732949));}
;
} else { 
  
make_utf8_string_with_len(c_7315142, "cond-expand: bad clause", 23, 23);


return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734350, &c_7315142, Cyc_car(data, ls_73147_732949));}
;}
;; 
}

static void __lambda_100(void *data, object self_7313154, int argc, object *args) /* object self_7313154, object r_734359 */
 {
 object r_734359 = args[0];
  if( (boolean_f != r_734359) ){ 
  
closureN_type c_7315120;
object e_7315129 [2];
c_7315120.hdr.mark = gc_color_red;
 c_7315120.hdr.grayed = 0;
c_7315120.tag = closureN_tag;
 c_7315120.fn = (function_type)__lambda_101;
c_7315120.num_args = 1;
c_7315120.num_elements = 2;
c_7315120.elements = (object *)e_7315129;
c_7315120.elements[0] = ((closureN)self_7313154)->elements[1];
c_7315120.elements[1] = ((closureN)self_7313154)->elements[2];

return_closcall2(data,  ((closureN)self_7313154)->elements[3],  &c_7315120, quote_begin);
} else { 
  



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

static void __lambda_101(void *data, object self_7313155, int argc, object *args) /* object self_7313155, object r_734360 */
 {
 object r_734360 = args[0];
  
pair_type local_7315125; 


return_direct_with_clo1(data,  ((closureN)self_7313155)->elements[0], (((closure)  ((closureN)self_7313155)->elements[0])->fn),  set_pair_as_expr(&local_7315125, r_734360, Cyc_cdar(data, ((closureN)self_7313155)->elements[1])));; 
}

static void __lambda_99(void *data, object self_7313153, int argc, object *args) /* object self_7313153, object r_734355 */
 {
 object r_734355 = args[0];
  
pair_type local_7315108; 


return_direct_with_clo1(data,  ((closureN)self_7313153)->elements[0], (((closure)  ((closureN)self_7313153)->elements[0])->fn),  set_pair_as_expr(&local_7315108, r_734355, Cyc_cdar(data, ((closureN)self_7313153)->elements[1])));; 
}

static void __lambda_96(void *data, object self_7313156, int argc, object *args) /* object self_7313156, object r_734349 */
 {
 object r_734349 = args[0];
  
closureN_type c_7315069;
object e_7315076 [3];
c_7315069.hdr.mark = gc_color_red;
 c_7315069.hdr.grayed = 0;
c_7315069.tag = closureN_tag;
 c_7315069.fn = (function_type)__lambda_97;
c_7315069.num_args = 1;
c_7315069.num_elements = 3;
c_7315069.elements = (object *)e_7315076;
c_7315069.elements[0] = ((closureN)self_7313156)->elements[0];
c_7315069.elements[1] = ((closureN)self_7313156)->elements[1];
c_7315069.elements[2] = ((closureN)self_7313156)->elements[2];



return_direct_with_clo1(data,(closure)&c_7315069,__lambda_97,  Cyc_set_cell(data, ((closureN)self_7313156)->elements[0], r_734349));; 
}

static void __lambda_97(void *data, object self_7313157, int argc, object *args) /* object self_7313157, object r_734348 */
 {

  

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

static void __lambda_75(void *data, object _, int argc, object *args) /* closure _,object k_734323, object exp_7373_732905, object rename_7374_732906, object compare_7375_732907 */
 {
object k_734323 = args[0]; object exp_7373_732905 = args[1];
  Cyc_st_add(data, "scheme/base.sld:begin");

closureN_type c_7314952;
object e_7315032 [2];
c_7314952.hdr.mark = gc_color_red;
 c_7314952.hdr.grayed = 0;
c_7314952.tag = closureN_tag;
 c_7314952.fn = (function_type)__lambda_76;
c_7314952.num_args = 2;
c_7314952.num_elements = 2;
c_7314952.elements = (object *)e_7315032;
c_7314952.elements[0] = exp_7373_732905;
c_7314952.elements[1] = k_734323;

return_direct_with_clo2(data,(closure)&c_7314952,__lambda_76,  boolean_f, boolean_f);; 
}

static void __lambda_76(void *data, object self_7313107, int argc, object *args) /* object self_7313107, object dummy_91bind_732910, object singlet_127_732911 */
 {
 object dummy_91bind_732910 = args[0]; object singlet_127_732911 = args[1];
  
closureN_type c_7314954;
object e_7315028 [3];
c_7314954.hdr.mark = gc_color_red;
 c_7314954.hdr.grayed = 0;
c_7314954.tag = closureN_tag;
 c_7314954.fn = (function_type)__lambda_1347;
c_7314954.num_args = 1;
c_7314954.num_elements = 3;
c_7314954.elements = (object *)e_7315028;
c_7314954.elements[0] = ((closureN)self_7313107)->elements[0];
c_7314954.elements[1] = ((closureN)self_7313107)->elements[1];
c_7314954.elements[2] = singlet_127_732911;


pair_type local_7315031; 
return_direct_with_clo1(data,(closure)&c_7314954,__lambda_1347,  set_cell_as_expr(&local_7315031, dummy_91bind_732910));; 
}

static void __lambda_1347(void *data, object self_7313108, int argc, object *args) /* object self_7313108, object dummy_91bind_732910 */
 {
 object dummy_91bind_732910 = args[0];
  
closureN_type c_7314956;
object e_7315023 [3];
c_7314956.hdr.mark = gc_color_red;
 c_7314956.hdr.grayed = 0;
c_7314956.tag = closureN_tag;
 c_7314956.fn = (function_type)__lambda_1346;
c_7314956.num_args = 1;
c_7314956.num_elements = 3;
c_7314956.elements = (object *)e_7315023;
c_7314956.elements[0] = dummy_91bind_732910;
c_7314956.elements[1] = ((closureN)self_7313108)->elements[0];
c_7314956.elements[2] = ((closureN)self_7313108)->elements[1];


pair_type local_7315026; 
return_direct_with_clo1(data,(closure)&c_7314956,__lambda_1346,  set_cell_as_expr(&local_7315026, ((closureN)self_7313108)->elements[2]));; 
}

static void __lambda_1346(void *data, object self_7313109, int argc, object *args) /* object self_7313109, object singlet_127_732911 */
 {
 object singlet_127_732911 = args[0];
  
closureN_type c_7314958;
object e_7315012 [4];
c_7314958.hdr.mark = gc_color_red;
 c_7314958.hdr.grayed = 0;
c_7314958.tag = closureN_tag;
 c_7314958.fn = (function_type)__lambda_77;
c_7314958.num_args = 1;
c_7314958.num_elements = 4;
c_7314958.elements = (object *)e_7315012;
c_7314958.elements[0] = ((closureN)self_7313109)->elements[0];
c_7314958.elements[1] = ((closureN)self_7313109)->elements[1];
c_7314958.elements[2] = ((closureN)self_7313109)->elements[2];
c_7314958.elements[3] = singlet_127_732911;


mmacro(c_7315013, (function_type)__lambda_83);c_7315013.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314958,__lambda_77,  &c_7315013);; 
}

static void __lambda_83(void *data, object self_7313110, int argc, object *args) /* object self_7313110, object k_734337, object l_7376_732914 */
 {
 object k_734337 = args[0]; object l_7376_732914 = args[1];
    complex_num_type local_7315016; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7315016, l_7376_732914)) ){ 
  



return_direct_with_clo1(data,  k_734337, (((closure)  k_734337)->fn),  Cyc_num_fast_eq_op(data, Cyc_length(data, l_7376_732914), obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  k_734337, (((closure)  k_734337)->fn),  boolean_f);}
;; 
}

static void __lambda_77(void *data, object self_7313111, int argc, object *args) /* object self_7313111, object r_734336 */
 {
 object r_734336 = args[0];
  
closureN_type c_7314960;
object e_7315008 [4];
c_7314960.hdr.mark = gc_color_red;
 c_7314960.hdr.grayed = 0;
c_7314960.tag = closureN_tag;
 c_7314960.fn = (function_type)__lambda_78;
c_7314960.num_args = 1;
c_7314960.num_elements = 4;
c_7314960.elements = (object *)e_7315008;
c_7314960.elements[0] = ((closureN)self_7313111)->elements[0];
c_7314960.elements[1] = ((closureN)self_7313111)->elements[1];
c_7314960.elements[2] = ((closureN)self_7313111)->elements[2];
c_7314960.elements[3] = ((closureN)self_7313111)->elements[3];



return_direct_with_clo1(data,(closure)&c_7314960,__lambda_78,  Cyc_set_cell(data, ((closureN)self_7313111)->elements[3], r_734336));; 
}

static void __lambda_78(void *data, object self_7313112, int argc, object *args) /* object self_7313112, object r_734324 */
 {

  
closureN_type c_7314962;
object e_7314977 [3];
c_7314962.hdr.mark = gc_color_red;
 c_7314962.hdr.grayed = 0;
c_7314962.tag = closureN_tag;
 c_7314962.fn = (function_type)__lambda_79;
c_7314962.num_args = 1;
c_7314962.num_elements = 3;
c_7314962.elements = (object *)e_7314977;
c_7314962.elements[0] = ((closureN)self_7313112)->elements[0];
c_7314962.elements[1] = ((closureN)self_7313112)->elements[1];
c_7314962.elements[2] = ((closureN)self_7313112)->elements[2];


closureN_type c_7314978;
object e_7315007 [1];
c_7314978.hdr.mark = gc_color_red;
 c_7314978.hdr.grayed = 0;
c_7314978.tag = closureN_tag;
 c_7314978.fn = (function_type)__lambda_81;
c_7314978.num_args = 1;
c_7314978.num_elements = 1;
c_7314978.elements = (object *)e_7315007;
c_7314978.elements[0] = ((closureN)self_7313112)->elements[3];

return_direct_with_clo1(data,(closure)&c_7314962,__lambda_79,  &c_7314978);; 
}

static void __lambda_81(void *data, object self_7313113, int argc, object *args) /* object self_7313113, object k_734328, object exps_7378_732915 */
 {
 object k_734328 = args[0]; object exps_7378_732915 = args[1];
  


closureN_type c_7314983;
object e_7315006 [2];
c_7314983.hdr.mark = gc_color_red;
 c_7314983.hdr.grayed = 0;
c_7314983.tag = closureN_tag;
 c_7314983.fn = (function_type)__lambda_82;
c_7314983.num_args = 1;
c_7314983.num_elements = 2;
c_7314983.elements = (object *)e_7315006;
c_7314983.elements[0] = exps_7378_732915;
c_7314983.elements[1] = k_734328;

return_closcall2(data,  car(((closureN)self_7313113)->elements[0]),  &c_7314983, exps_7378_732915);; 
}

static void __lambda_82(void *data, object self_7313114, int argc, object *args) /* object self_7313114, object r_734329 */
 {
 object r_734329 = args[0];
  if( (boolean_f != r_734329) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_7313114)->elements[1], (((closure)  ((closureN)self_7313114)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7313114)->elements[0]));
} else { 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_7313114)->elements[0])) ){ 
  
pair_type local_7314996; 

pair_type local_7314999; 

pair_type local_7315002; 
return_direct_with_clo1(data,  ((closureN)self_7313114)->elements[1], (((closure)  ((closureN)self_7313114)->elements[1])->fn),  set_pair_as_expr(&local_7314996, set_pair_as_expr(&local_7314999, quote_lambda, set_pair_as_expr(&local_7315002, NULL, ((closureN)self_7313114)->elements[0])), NULL));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313114)->elements[1], (((closure)  ((closureN)self_7313114)->elements[1])->fn),  boolean_f);}
;}
;; 
}

static void __lambda_79(void *data, object self_7313115, int argc, object *args) /* object self_7313115, object r_734327 */
 {
 object r_734327 = args[0];
  
closureN_type c_7314964;
object e_7314973 [3];
c_7314964.hdr.mark = gc_color_red;
 c_7314964.hdr.grayed = 0;
c_7314964.tag = closureN_tag;
 c_7314964.fn = (function_type)__lambda_80;
c_7314964.num_args = 1;
c_7314964.num_elements = 3;
c_7314964.elements = (object *)e_7314973;
c_7314964.elements[0] = ((closureN)self_7313115)->elements[0];
c_7314964.elements[1] = ((closureN)self_7313115)->elements[1];
c_7314964.elements[2] = ((closureN)self_7313115)->elements[2];



return_direct_with_clo1(data,(closure)&c_7314964,__lambda_80,  Cyc_set_cell(data, ((closureN)self_7313115)->elements[0], r_734327));; 
}

static void __lambda_80(void *data, object self_7313116, int argc, object *args) /* object self_7313116, object r_734325 */
 {

  



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

static void __lambda_58(void *data, object _, int argc, object *args) /* closure _,object k_734292, object exp_7346_732892, object rename_7347_732893, object compare_7348_732894 */
 {
object k_734292 = args[0]; object exp_7346_732892 = args[1];
  Cyc_st_add(data, "scheme/base.sld:letrec");

closureN_type c_7314858;
object e_7314861 [1];
c_7314858.hdr.mark = gc_color_red;
 c_7314858.hdr.grayed = 0;
c_7314858.tag = closureN_tag;
 c_7314858.fn = (function_type)__lambda_59;
c_7314858.num_args = 1;
c_7314858.num_elements = 1;
c_7314858.elements = (object *)e_7314861;
c_7314858.elements[0] = k_734292;


closureN_type c_7314862;
object e_7314949 [1];
c_7314862.hdr.mark = gc_color_red;
 c_7314862.hdr.grayed = 0;
c_7314862.tag = closureN_tag;
 c_7314862.fn = (function_type)__lambda_60;
c_7314862.num_args = 1;
c_7314862.num_elements = 1;
c_7314862.elements = (object *)e_7314949;
c_7314862.elements[0] = exp_7346_732892;

return_direct_with_clo1(data,(closure)&c_7314858,__lambda_59,  &c_7314862);; 
}

static void __lambda_60(void *data, object self_7313091, int argc, object *args) /* object self_7313091, object k_734294, object k_7349_732895 */
 {
 object k_734294 = args[0]; object k_7349_732895 = args[1];
  
closureN_type c_7314864;
object e_7314937 [2];
c_7314864.hdr.mark = gc_color_red;
 c_7314864.hdr.grayed = 0;
c_7314864.tag = closureN_tag;
 c_7314864.fn = (function_type)__lambda_61;
c_7314864.num_args = 1;
c_7314864.num_elements = 2;
c_7314864.elements = (object *)e_7314937;
c_7314864.elements[0] = ((closureN)self_7313091)->elements[0];
c_7314864.elements[1] = k_734294;


closureN_type c_7314938;
object e_7314948 [2];
c_7314938.hdr.mark = gc_color_red;
 c_7314938.hdr.grayed = 0;
c_7314938.tag = closureN_tag;
 c_7314938.fn = (function_type)__lambda_73;
c_7314938.num_args = 1;
c_7314938.num_elements = 2;
c_7314938.elements = (object *)e_7314948;
c_7314938.elements[0] = ((closureN)self_7313091)->elements[0];
c_7314938.elements[1] = k_7349_732895;

return_direct_with_clo1(data,(closure)&c_7314864,__lambda_61,  &c_7314938);; 
}

static void __lambda_73(void *data, object self_7313092, int argc, object *args) /* object self_7313092, object k_734319, object obj_7350_732896 */
 {
 object k_734319 = args[0];
  
closureN_type c_7314941;
object e_7314945 [2];
c_7314941.hdr.mark = gc_color_red;
 c_7314941.hdr.grayed = 0;
c_7314941.tag = closureN_tag;
 c_7314941.fn = (function_type)__lambda_74;
c_7314941.num_args = 1;
c_7314941.num_elements = 2;
c_7314941.elements = (object *)e_7314945;
c_7314941.elements[0] = k_734319;
c_7314941.elements[1] = ((closureN)self_7313092)->elements[1];


make_utf8_string_with_len(c_7314946, "unable to expand letrec", 23, 23);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7314941, &c_7314946, ((closureN)self_7313092)->elements[0]);;; 
}

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

static void __lambda_61(void *data, object self_7313094, int argc, object *args) /* object self_7313094, object r_734295 */
 {
 object r_734295 = args[0];
  
closureN_type c_7314866;
object e_7314870 [2];
c_7314866.hdr.mark = gc_color_red;
 c_7314866.hdr.grayed = 0;
c_7314866.tag = closureN_tag;
 c_7314866.fn = (function_type)__lambda_62;
c_7314866.num_args = 1;
c_7314866.num_elements = 2;
c_7314866.elements = (object *)e_7314870;
c_7314866.elements[0] = ((closureN)self_7313094)->elements[1];
c_7314866.elements[1] = r_734295;


closureN_type c_7314871;
object e_7314936 [1];
c_7314871.hdr.mark = gc_color_red;
 c_7314871.hdr.grayed = 0;
c_7314871.tag = closureN_tag;
 c_7314871.fn = (function_type)__lambda_63;
c_7314871.num_args = 0;
c_7314871.num_elements = 1;
c_7314871.elements = (object *)e_7314936;
c_7314871.elements[0] = ((closureN)self_7313094)->elements[0];

return_direct_with_clo1(data,(closure)&c_7314866,__lambda_62,  &c_7314871);; 
}

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


mmacro(c_7314929, (function_type)__lambda_72);c_7314929.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314873,__lambda_64,  &c_7314929);; 
}

static void __lambda_72(void *data, object self_7313096, int argc, object *args) /* object self_7313096, object k_734317, object b_7372_732904 */
 {
 object k_734317 = args[0]; object b_7372_732904 = args[1];
  
list_2_type local_7314933; 


return_direct_with_clo1(data,  k_734317, (((closure)  k_734317)->fn),  Cyc_fast_list_2(&local_7314933, Cyc_car(data, b_7372_732904), boolean_f));; 
}

static void __lambda_64(void *data, object self_7313097, int argc, object *args) /* object self_7313097, object r_734316 */
 {
 object r_734316 = args[0];
  
closureN_type c_7314875;
object e_7314924 [2];
c_7314875.hdr.mark = gc_color_red;
 c_7314875.hdr.grayed = 0;
c_7314875.tag = closureN_tag;
 c_7314875.fn = (function_type)__lambda_65;
c_7314875.num_args = 1;
c_7314875.num_elements = 2;
c_7314875.elements = (object *)e_7314924;
c_7314875.elements[0] = ((closureN)self_7313097)->elements[0];
c_7314875.elements[1] = ((closureN)self_7313097)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314875, r_734316, Cyc_cadr(data, ((closureN)self_7313097)->elements[0]));; 
}

static void __lambda_65(void *data, object self_7313098, int argc, object *args) /* object self_7313098, object namings_7357_732899 */
 {
 object namings_7357_732899 = args[0];
  
closureN_type c_7314877;
object e_7314920 [3];
c_7314877.hdr.mark = gc_color_red;
 c_7314877.hdr.grayed = 0;
c_7314877.tag = closureN_tag;
 c_7314877.fn = (function_type)__lambda_66;
c_7314877.num_args = 1;
c_7314877.num_elements = 3;
c_7314877.elements = (object *)e_7314920;
c_7314877.elements[0] = ((closureN)self_7313098)->elements[0];
c_7314877.elements[1] = ((closureN)self_7313098)->elements[1];
c_7314877.elements[2] = namings_7357_732899;



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314877, primitive_car, Cyc_cadr(data, ((closureN)self_7313098)->elements[0]));; 
}

static void __lambda_66(void *data, object self_7313099, int argc, object *args) /* object self_7313099, object names_7360_732900 */
 {

  
closureN_type c_7314879;
object e_7314914 [3];
c_7314879.hdr.mark = gc_color_red;
 c_7314879.hdr.grayed = 0;
c_7314879.tag = closureN_tag;
 c_7314879.fn = (function_type)__lambda_67;
c_7314879.num_args = 1;
c_7314879.num_elements = 3;
c_7314879.elements = (object *)e_7314914;
c_7314879.elements[0] = ((closureN)self_7313099)->elements[0];
c_7314879.elements[1] = ((closureN)self_7313099)->elements[1];
c_7314879.elements[2] = ((closureN)self_7313099)->elements[2];


mmacro(c_7314915, (function_type)__lambda_71);c_7314915.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314879,__lambda_67,  &c_7314915);; 
}

static void __lambda_71(void *data, object self_7313100, int argc, object *args) /* object self_7313100, object k_734313, object binding_7371_732903 */
 {
 object k_734313 = args[0]; object binding_7371_732903 = args[1];
  
pair_type local_7314919; 
return_direct_with_clo1(data,  k_734313, (((closure)  k_734313)->fn),  set_pair_as_expr(&local_7314919, quote_set_67, binding_7371_732903));; 
}

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



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314881, r_734312, Cyc_cadr(data, ((closureN)self_7313101)->elements[0]));; 
}

static void __lambda_68(void *data, object self_7313102, int argc, object *args) /* object self_7313102, object sets_7363_732901 */
 {
 object sets_7363_732901 = args[0];
  
closureN_type c_7314883;
object e_7314906 [4];
c_7314883.hdr.mark = gc_color_red;
 c_7314883.hdr.grayed = 0;
c_7314883.tag = closureN_tag;
 c_7314883.fn = (function_type)__lambda_69;
c_7314883.num_args = 1;
c_7314883.num_elements = 4;
c_7314883.elements = (object *)e_7314906;
c_7314883.elements[0] = ((closureN)self_7313102)->elements[0];
c_7314883.elements[1] = ((closureN)self_7313102)->elements[1];
c_7314883.elements[2] = ((closureN)self_7313102)->elements[2];
c_7314883.elements[3] = sets_7363_732901;



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314883, primitive_cadr, Cyc_cadr(data, ((closureN)self_7313102)->elements[0]));; 
}

static void __lambda_69(void *data, object self_7313103, int argc, object *args) /* object self_7313103, object args_7366_732902 */
 {

  
closureN_type c_7314885;
object e_7314901 [2];
c_7314885.hdr.mark = gc_color_red;
 c_7314885.hdr.grayed = 0;
c_7314885.tag = closureN_tag;
 c_7314885.fn = (function_type)__lambda_70;
c_7314885.num_args = 1;
c_7314885.num_elements = 2;
c_7314885.elements = (object *)e_7314901;
c_7314885.elements[0] = ((closureN)self_7313103)->elements[1];
c_7314885.elements[1] = ((closureN)self_7313103)->elements[2];



return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7314885, ((closureN)self_7313103)->elements[3], Cyc_cddr(data, ((closureN)self_7313103)->elements[0]));; 
}

static void __lambda_70(void *data, object self_7313104, int argc, object *args) /* object self_7313104, object r_734309 */
 {
 object r_734309 = args[0];
  
pair_type local_7314890; 

pair_type local_7314893; 

pair_type local_7314897; 

pair_type local_7314900; 
return_direct_with_clo1(data,  ((closureN)self_7313104)->elements[0], (((closure)  ((closureN)self_7313104)->elements[0])->fn),  set_pair_as_expr(&local_7314890, quote_let, set_pair_as_expr(&local_7314893, ((closureN)self_7313104)->elements[1], set_pair_as_expr(&local_7314897, set_pair_as_expr(&local_7314900, quote_begin, r_734309), NULL))));; 
}

static void __lambda_62(void *data, object self_7313105, int argc, object *args) /* object self_7313105, object r_734296 */
 {
 object r_734296 = args[0];
  return_direct_with_clo3(data,  __glo_with_91exception_91handler_scheme_base, (((closure)  __glo_with_91exception_91handler_scheme_base)->fn),  ((closureN)self_7313105)->elements[0], ((closureN)self_7313105)->elements[1], r_734296);; 
}

static void __lambda_59(void *data, object self_7313106, int argc, object *args) /* object self_7313106, object r_734293 */
 {
 object r_734293 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_7313106)->elements[0], r_734293);; 
}

static void __lambda_43(void *data, object _, int argc, object *args) /* closure _,object k_734247, object expr_7336_732888, object rename_7337_732889, object compare_7338_732890 */
 {
object k_734247 = args[0]; object expr_7336_732888 = args[1]; object rename_7337_732889 = args[2];
  Cyc_st_add(data, "scheme/base.sld:let*");

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


closureN_type c_7314732;
object e_7314855 [3];
c_7314732.hdr.mark = gc_color_red;
 c_7314732.hdr.grayed = 0;
c_7314732.tag = closureN_tag;
 c_7314732.fn = (function_type)__lambda_46;
c_7314732.num_args = 1;
c_7314732.num_elements = 3;
c_7314732.elements = (object *)e_7314855;
c_7314732.elements[0] = expr_7336_732888;
c_7314732.elements[1] = k_734247;
c_7314732.elements[2] = rename_7337_732889;

return_direct_with_clo1(data,(closure)&c_7314716,__lambda_44,  &c_7314732);; 
}

static void __lambda_46(void *data, object self_7313077, int argc, object *args) /* object self_7313077, object r_734248 */
 {

  
closureN_type c_7314734;
object e_7314749 [1];
c_7314734.hdr.mark = gc_color_red;
 c_7314734.hdr.grayed = 0;
c_7314734.tag = closureN_tag;
 c_7314734.fn = (function_type)__lambda_47;
c_7314734.num_args = 0;
c_7314734.num_elements = 1;
c_7314734.elements = (object *)e_7314749;
c_7314734.elements[0] = ((closureN)self_7313077)->elements[0];


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

return_direct_with_clo1(data,(closure)&c_7314734,__lambda_47,  &c_7314750);; 
}

static void __lambda_49(void *data, object self_7313078, int argc, object *args) /* object self_7313078, object r_734249 */
 {

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



return_direct_with_clo1(data,(closure)&c_7314752,__lambda_50,  Cyc_cadr(data, ((closureN)self_7313078)->elements[0]));; 
}

static void __lambda_50(void *data, object self_7313079, int argc, object *args) /* object self_7313079, object r_734283 */
 {
 object r_734283 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734283)) ){ 
  
closureN_type c_7314757;
object e_7314769 [2];
c_7314757.hdr.mark = gc_color_red;
 c_7314757.hdr.grayed = 0;
c_7314757.tag = closureN_tag;
 c_7314757.fn = (function_type)__lambda_51;
c_7314757.num_args = 1;
c_7314757.num_elements = 2;
c_7314757.elements = (object *)e_7314769;
c_7314757.elements[0] = ((closureN)self_7313079)->elements[0];
c_7314757.elements[1] = ((closureN)self_7313079)->elements[1];

return_closcall2(data,  ((closureN)self_7313079)->elements[2],  &c_7314757, quote_let);
} else { 
  
closureN_type c_7314771;
object e_7314801 [1];
c_7314771.hdr.mark = gc_color_red;
 c_7314771.hdr.grayed = 0;
c_7314771.tag = closureN_tag;
 c_7314771.fn = (function_type)__lambda_52;
c_7314771.num_args = 0;
c_7314771.num_elements = 1;
c_7314771.elements = (object *)e_7314801;
c_7314771.elements[0] = ((closureN)self_7313079)->elements[0];


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

return_direct_with_clo1(data,(closure)&c_7314771,__lambda_52,  &c_7314802);}
;; 
}

static void __lambda_55(void *data, object self_7313081, int argc, object *args) /* object self_7313081, object r_734256 */
 {
 object r_734256 = args[0];
  if( (boolean_f != r_734256) ){ 
  
closureN_type c_7314805;
object e_7314844 [3];
c_7314805.hdr.mark = gc_color_red;
 c_7314805.hdr.grayed = 0;
c_7314805.tag = closureN_tag;
 c_7314805.fn = (function_type)__lambda_56;
c_7314805.num_args = 1;
c_7314805.num_elements = 3;
c_7314805.elements = (object *)e_7314844;
c_7314805.elements[0] = ((closureN)self_7313081)->elements[0];
c_7314805.elements[1] = ((closureN)self_7313081)->elements[1];
c_7314805.elements[2] = ((closureN)self_7313081)->elements[2];

return_closcall2(data,  ((closureN)self_7313081)->elements[2],  &c_7314805, quote_let);
} else { 
  
make_utf8_string_with_len(c_7314847, "bad let* syntax", 15, 15);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313081)->elements[1], &c_7314847, ((closureN)self_7313081)->elements[0]);}
;; 
}

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

return_closcall2(data,  ((closureN)self_7313082)->elements[2],  &c_7314808, quote_let_85);; 
}

static void __lambda_57(void *data, object self_7313083, int argc, object *args) /* object self_7313083, object r_734263 */
 {
 object r_734263 = args[0];
  
pair_type local_7314813; 

pair_type local_7314817; 

pair_type local_7314820; 





pair_type local_7314828; 

pair_type local_7314831; 

pair_type local_7314834; 






return_direct_with_clo1(data,  ((closureN)self_7313083)->elements[1], (((closure)  ((closureN)self_7313083)->elements[1])->fn),  set_pair_as_expr(&local_7314813, ((closureN)self_7313083)->elements[2], set_pair_as_expr(&local_7314817, set_pair_as_expr(&local_7314820, Cyc_caar(data, Cyc_cdr(data, ((closureN)self_7313083)->elements[0])), NULL), set_pair_as_expr(&local_7314828, set_pair_as_expr(&local_7314831, r_734263, set_pair_as_expr(&local_7314834, Cyc_cdar(data, Cyc_cdr(data, ((closureN)self_7313083)->elements[0])), Cyc_cddr(data, ((closureN)self_7313083)->elements[0]))), NULL))));; 
}

static void __lambda_52(void *data, object self_7313084, int argc, object *args) /* object self_7313084, object k_734273 */
 {
 object k_734273 = args[0];
    complex_num_type local_7314774; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7314774, Cyc_cadr(data, ((closureN)self_7313084)->elements[0]))) ){ 
  
closureN_type c_7314779;
object e_7314785 [2];
c_7314779.hdr.mark = gc_color_red;
 c_7314779.hdr.grayed = 0;
c_7314779.tag = closureN_tag;
 c_7314779.fn = (function_type)__lambda_53;
c_7314779.num_args = 1;
c_7314779.num_elements = 2;
c_7314779.elements = (object *)e_7314785;
c_7314779.elements[0] = ((closureN)self_7313084)->elements[0];
c_7314779.elements[1] = k_734273;


mmacro(c_7314786, (function_type)__lambda_54);c_7314786.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314779,__lambda_53,  &c_7314786);
} else { 
  return_direct_with_clo1(data,  k_734273, (((closure)  k_734273)->fn),  boolean_f);}
;; 
}

static void __lambda_54(void *data, object self_7313085, int argc, object *args) /* object self_7313085, object k_734277, object x_7342_732891 */
 {
 object k_734277 = args[0]; object x_7342_732891 = args[1];
    
if( (boolean_f != Cyc_is_pair(x_7342_732891)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7342_732891))) ){ 
  



return_direct_with_clo1(data,  k_734277, (((closure)  k_734277)->fn),  Cyc_is_null(Cyc_cddr(data, x_7342_732891)));
} else { 
  return_direct_with_clo1(data,  k_734277, (((closure)  k_734277)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_734277, (((closure)  k_734277)->fn),  boolean_f);}
;; 
}

static void __lambda_53(void *data, object self_7313086, int argc, object *args) /* object self_7313086, object r_734275 */
 {
 object r_734275 = args[0];
  

return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  ((closureN)self_7313086)->elements[1], r_734275, Cyc_cadr(data, ((closureN)self_7313086)->elements[0]));; 
}

static void __lambda_51(void *data, object self_7313080, int argc, object *args) /* object self_7313080, object r_734251 */
 {
 object r_734251 = args[0];
  
pair_type local_7314762; 

pair_type local_7314765; 


return_direct_with_clo1(data,  ((closureN)self_7313080)->elements[1], (((closure)  ((closureN)self_7313080)->elements[1])->fn),  set_pair_as_expr(&local_7314762, r_734251, set_pair_as_expr(&local_7314765, NULL, Cyc_cddr(data, ((closureN)self_7313080)->elements[0]))));; 
}

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



return_direct_with_clo1(data,(closure)&c_7314736,__lambda_48,  Cyc_cddr(data, ((closureN)self_7313087)->elements[0]));; 
}

static void __lambda_48(void *data, object self_7313088, int argc, object *args) /* object self_7313088, object r_734286 */
 {
 object r_734286 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734286)) ){ 
  
make_utf8_string_with_len(c_7314741, "no let* body", 12, 12);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313088)->elements[1], &c_7314741, ((closureN)self_7313088)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313088)->elements[1], (((closure)  ((closureN)self_7313088)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_44(void *data, object self_7313089, int argc, object *args) /* object self_7313089, object k_734287 */
 {
 object k_734287 = args[0];
  
closureN_type c_7314718;
object e_7314727 [2];
c_7314718.hdr.mark = gc_color_red;
 c_7314718.hdr.grayed = 0;
c_7314718.tag = closureN_tag;
 c_7314718.fn = (function_type)__lambda_45;
c_7314718.num_args = 1;
c_7314718.num_elements = 2;
c_7314718.elements = (object *)e_7314727;
c_7314718.elements[0] = ((closureN)self_7313089)->elements[0];
c_7314718.elements[1] = k_734287;



return_direct_with_clo1(data,(closure)&c_7314718,__lambda_45,  Cyc_cdr(data, ((closureN)self_7313089)->elements[0]));; 
}

static void __lambda_45(void *data, object self_7313090, int argc, object *args) /* object self_7313090, object r_734289 */
 {
 object r_734289 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734289)) ){ 
  
make_utf8_string_with_len(c_7314723, "empty let*", 10, 10);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313090)->elements[1], &c_7314723, ((closureN)self_7313090)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313090)->elements[1], (((closure)  ((closureN)self_7313090)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_24(void *data, object _, int argc, object *args) /* closure _,object k_734186, object expr_7323_732881, object rename_7324_732882, object compare_7325_732883 */
 {
object k_734186 = args[0]; object expr_7323_732881 = args[1]; object rename_7324_732882 = args[2];
  Cyc_st_add(data, "scheme/base.sld:let");

closureN_type c_7314516;
object e_7314531 [1];
c_7314516.hdr.mark = gc_color_red;
 c_7314516.hdr.grayed = 0;
c_7314516.tag = closureN_tag;
 c_7314516.fn = (function_type)__lambda_25;
c_7314516.num_args = 0;
c_7314516.num_elements = 1;
c_7314516.elements = (object *)e_7314531;
c_7314516.elements[0] = expr_7323_732881;


closureN_type c_7314532;
object e_7314713 [3];
c_7314532.hdr.mark = gc_color_red;
 c_7314532.hdr.grayed = 0;
c_7314532.tag = closureN_tag;
 c_7314532.fn = (function_type)__lambda_27;
c_7314532.num_args = 1;
c_7314532.num_elements = 3;
c_7314532.elements = (object *)e_7314713;
c_7314532.elements[0] = expr_7323_732881;
c_7314532.elements[1] = k_734186;
c_7314532.elements[2] = rename_7324_732882;

return_direct_with_clo1(data,(closure)&c_7314516,__lambda_25,  &c_7314532);; 
}

static void __lambda_27(void *data, object self_7313059, int argc, object *args) /* object self_7313059, object r_734187 */
 {

  
closureN_type c_7314534;
object e_7314549 [1];
c_7314534.hdr.mark = gc_color_red;
 c_7314534.hdr.grayed = 0;
c_7314534.tag = closureN_tag;
 c_7314534.fn = (function_type)__lambda_28;
c_7314534.num_args = 0;
c_7314534.num_elements = 1;
c_7314534.elements = (object *)e_7314549;
c_7314534.elements[0] = ((closureN)self_7313059)->elements[0];


closureN_type c_7314550;
object e_7314712 [3];
c_7314550.hdr.mark = gc_color_red;
 c_7314550.hdr.grayed = 0;
c_7314550.tag = closureN_tag;
 c_7314550.fn = (function_type)__lambda_30;
c_7314550.num_args = 1;
c_7314550.num_elements = 3;
c_7314550.elements = (object *)e_7314712;
c_7314550.elements[0] = ((closureN)self_7313059)->elements[0];
c_7314550.elements[1] = ((closureN)self_7313059)->elements[1];
c_7314550.elements[2] = ((closureN)self_7313059)->elements[2];

return_direct_with_clo1(data,(closure)&c_7314534,__lambda_28,  &c_7314550);; 
}

static void __lambda_30(void *data, object self_7313060, int argc, object *args) /* object self_7313060, object r_734188 */
 {

  object bindings_7326_732884;
    
  
if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7313060)->elements[0]))) ){ 
  
  
  bindings_7326_732884 = Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313060)->elements[0]));
} else { 
  
  bindings_7326_732884 = Cyc_cadr(data, ((closureN)self_7313060)->elements[0]);}
;
closureN_type c_7314568;
object e_7314577 [2];
c_7314568.hdr.mark = gc_color_red;
 c_7314568.hdr.grayed = 0;
c_7314568.tag = closureN_tag;
 c_7314568.fn = (function_type)__lambda_31;
c_7314568.num_args = 0;
c_7314568.num_elements = 2;
c_7314568.elements = (object *)e_7314577;
c_7314568.elements[0] = bindings_7326_732884;
c_7314568.elements[1] = ((closureN)self_7313060)->elements[0];


closureN_type c_7314578;
object e_7314711 [4];
c_7314578.hdr.mark = gc_color_red;
 c_7314578.hdr.grayed = 0;
c_7314578.tag = closureN_tag;
 c_7314578.fn = (function_type)__lambda_32;
c_7314578.num_args = 1;
c_7314578.num_elements = 4;
c_7314578.elements = (object *)e_7314711;
c_7314578.elements[0] = bindings_7326_732884;
c_7314578.elements[1] = ((closureN)self_7313060)->elements[0];
c_7314578.elements[2] = ((closureN)self_7313060)->elements[1];
c_7314578.elements[3] = ((closureN)self_7313060)->elements[2];

return_direct_with_clo1(data,(closure)&c_7314568,__lambda_31,  &c_7314578);; 
}

static void __lambda_32(void *data, object self_7313061, int argc, object *args) /* object self_7313061, object r_734190 */
 {

  
closureN_type c_7314580;
object e_7314696 [4];
c_7314580.hdr.mark = gc_color_red;
 c_7314580.hdr.grayed = 0;
c_7314580.tag = closureN_tag;
 c_7314580.fn = (function_type)__lambda_33;
c_7314580.num_args = 1;
c_7314580.num_elements = 4;
c_7314580.elements = (object *)e_7314696;
c_7314580.elements[0] = ((closureN)self_7313061)->elements[0];
c_7314580.elements[1] = ((closureN)self_7313061)->elements[1];
c_7314580.elements[2] = ((closureN)self_7313061)->elements[2];
c_7314580.elements[3] = ((closureN)self_7313061)->elements[3];


mmacro(c_7314697, (function_type)__lambda_42);c_7314697.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314580,__lambda_33,  &c_7314697);; 
}

static void __lambda_42(void *data, object self_7313062, int argc, object *args) /* object self_7313062, object k_734228, object x_7327_732885 */
 {
 object k_734228 = args[0]; object x_7327_732885 = args[1];
    
if( (boolean_f != Cyc_is_pair(x_7327_732885)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7327_732885))) ){ 
  



return_direct_with_clo1(data,  k_734228, (((closure)  k_734228)->fn),  Cyc_is_null(Cyc_cddr(data, x_7327_732885)));
} else { 
  return_direct_with_clo1(data,  k_734228, (((closure)  k_734228)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_734228, (((closure)  k_734228)->fn),  boolean_f);}
;; 
}

static void __lambda_33(void *data, object self_7313063, int argc, object *args) /* object self_7313063, object r_734227 */
 {
 object r_734227 = args[0];
  
closureN_type c_7314582;
object e_7314694 [4];
c_7314582.hdr.mark = gc_color_red;
 c_7314582.hdr.grayed = 0;
c_7314582.tag = closureN_tag;
 c_7314582.fn = (function_type)__lambda_34;
c_7314582.num_args = 1;
c_7314582.num_elements = 4;
c_7314582.elements = (object *)e_7314694;
c_7314582.elements[0] = ((closureN)self_7313063)->elements[0];
c_7314582.elements[1] = ((closureN)self_7313063)->elements[1];
c_7314582.elements[2] = ((closureN)self_7313063)->elements[2];
c_7314582.elements[3] = ((closureN)self_7313063)->elements[3];

return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  &c_7314582, r_734227, ((closureN)self_7313063)->elements[0]);; 
}

static void __lambda_34(void *data, object self_7313064, int argc, object *args) /* object self_7313064, object r_734191 */
 {
 object r_734191 = args[0];
  if( (boolean_f != r_734191) ){ 
  
closureN_type c_7314584;
object e_7314688 [4];
c_7314584.hdr.mark = gc_color_red;
 c_7314584.hdr.grayed = 0;
c_7314584.tag = closureN_tag;
 c_7314584.fn = (function_type)__lambda_35;
c_7314584.num_args = 1;
c_7314584.num_elements = 4;
c_7314584.elements = (object *)e_7314688;
c_7314584.elements[0] = ((closureN)self_7313064)->elements[0];
c_7314584.elements[1] = ((closureN)self_7313064)->elements[1];
c_7314584.elements[2] = ((closureN)self_7313064)->elements[2];
c_7314584.elements[3] = ((closureN)self_7313064)->elements[3];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314584, primitive_car, ((closureN)self_7313064)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_7314692, "bad let syntax", 14, 14);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313064)->elements[2], &c_7314692, ((closureN)self_7313064)->elements[1]);}
;; 
}

static void __lambda_35(void *data, object self_7313065, int argc, object *args) /* object self_7313065, object r_734192 */
 {
 object r_734192 = args[0];
  
closureN_type c_7314586;
object e_7314686 [4];
c_7314586.hdr.mark = gc_color_red;
 c_7314586.hdr.grayed = 0;
c_7314586.tag = closureN_tag;
 c_7314586.fn = (function_type)__lambda_36;
c_7314586.num_args = 1;
c_7314586.num_elements = 4;
c_7314586.elements = (object *)e_7314686;
c_7314586.elements[0] = ((closureN)self_7313065)->elements[1];
c_7314586.elements[1] = ((closureN)self_7313065)->elements[2];
c_7314586.elements[2] = r_734192;
c_7314586.elements[3] = ((closureN)self_7313065)->elements[3];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314586, primitive_cadr, ((closureN)self_7313065)->elements[0]);; 
}

static void __lambda_36(void *data, object self_7313066, int argc, object *args) /* object self_7313066, object r_734193 */
 {
 object r_734193 = args[0];
  
closureN_type c_7314588;
object e_7314684 [3];
c_7314588.hdr.mark = gc_color_red;
 c_7314588.hdr.grayed = 0;
c_7314588.tag = closureN_tag;
 c_7314588.fn = (function_type)__lambda_37;
c_7314588.num_args = 2;
c_7314588.num_elements = 3;
c_7314588.elements = (object *)e_7314684;
c_7314588.elements[0] = ((closureN)self_7313066)->elements[0];
c_7314588.elements[1] = ((closureN)self_7313066)->elements[1];
c_7314588.elements[2] = ((closureN)self_7313066)->elements[3];

return_direct_with_clo2(data,(closure)&c_7314588,__lambda_37,  ((closureN)self_7313066)->elements[2], r_734193);; 
}

static void __lambda_37(void *data, object self_7313067, int argc, object *args) /* object self_7313067, object vars_7328_732886, object vals_7329_732887 */
 {
 object vars_7328_732886 = args[0]; object vals_7329_732887 = args[1];
    
  
if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7313067)->elements[0]))) ){ 
  
closureN_type c_7314596;
object e_7314663 [5];
c_7314596.hdr.mark = gc_color_red;
 c_7314596.hdr.grayed = 0;
c_7314596.tag = closureN_tag;
 c_7314596.fn = (function_type)__lambda_38;
c_7314596.num_args = 1;
c_7314596.num_elements = 5;
c_7314596.elements = (object *)e_7314663;
c_7314596.elements[0] = ((closureN)self_7313067)->elements[0];
c_7314596.elements[1] = ((closureN)self_7313067)->elements[1];
c_7314596.elements[2] = ((closureN)self_7313067)->elements[2];
c_7314596.elements[3] = vals_7329_732887;
c_7314596.elements[4] = vars_7328_732886;

return_closcall2(data,  ((closureN)self_7313067)->elements[2],  &c_7314596, quote_lambda);
} else { 
  
closureN_type c_7314666;
object e_7314683 [4];
c_7314666.hdr.mark = gc_color_red;
 c_7314666.hdr.grayed = 0;
c_7314666.tag = closureN_tag;
 c_7314666.fn = (function_type)__lambda_41;
c_7314666.num_args = 1;
c_7314666.num_elements = 4;
c_7314666.elements = (object *)e_7314683;
c_7314666.elements[0] = ((closureN)self_7313067)->elements[0];
c_7314666.elements[1] = ((closureN)self_7313067)->elements[1];
c_7314666.elements[2] = vals_7329_732887;
c_7314666.elements[3] = vars_7328_732886;

return_closcall2(data,  ((closureN)self_7313067)->elements[2],  &c_7314666, quote_lambda);}
;; 
}

static void __lambda_41(void *data, object self_7313071, int argc, object *args) /* object self_7313071, object r_734222 */
 {
 object r_734222 = args[0];
  
pair_type local_7314671; 

pair_type local_7314674; 

pair_type local_7314677; 


return_direct_with_clo1(data,  ((closureN)self_7313071)->elements[1], (((closure)  ((closureN)self_7313071)->elements[1])->fn),  set_pair_as_expr(&local_7314671, set_pair_as_expr(&local_7314674, r_734222, set_pair_as_expr(&local_7314677, ((closureN)self_7313071)->elements[3], Cyc_cddr(data, ((closureN)self_7313071)->elements[0]))), ((closureN)self_7313071)->elements[2]));; 
}

static void __lambda_38(void *data, object self_7313068, int argc, object *args) /* object self_7313068, object r_734196 */
 {
 object r_734196 = args[0];
  
closureN_type c_7314599;
object e_7314662 [6];
c_7314599.hdr.mark = gc_color_red;
 c_7314599.hdr.grayed = 0;
c_7314599.tag = closureN_tag;
 c_7314599.fn = (function_type)__lambda_39;
c_7314599.num_args = 1;
c_7314599.num_elements = 6;
c_7314599.elements = (object *)e_7314662;
c_7314599.elements[0] = ((closureN)self_7313068)->elements[0];
c_7314599.elements[1] = ((closureN)self_7313068)->elements[1];
c_7314599.elements[2] = r_734196;
c_7314599.elements[3] = ((closureN)self_7313068)->elements[2];
c_7314599.elements[4] = ((closureN)self_7313068)->elements[3];
c_7314599.elements[5] = ((closureN)self_7313068)->elements[4];

return_closcall2(data,  ((closureN)self_7313068)->elements[2],  &c_7314599, quote_letrec);; 
}

static void __lambda_39(void *data, object self_7313069, int argc, object *args) /* object self_7313069, object r_734201 */
 {
 object r_734201 = args[0];
  
closureN_type c_7314602;
object e_7314661 [6];
c_7314602.hdr.mark = gc_color_red;
 c_7314602.hdr.grayed = 0;
c_7314602.tag = closureN_tag;
 c_7314602.fn = (function_type)__lambda_40;
c_7314602.num_args = 1;
c_7314602.num_elements = 6;
c_7314602.elements = (object *)e_7314661;
c_7314602.elements[0] = ((closureN)self_7313069)->elements[0];
c_7314602.elements[1] = ((closureN)self_7313069)->elements[1];
c_7314602.elements[2] = ((closureN)self_7313069)->elements[2];
c_7314602.elements[3] = r_734201;
c_7314602.elements[4] = ((closureN)self_7313069)->elements[4];
c_7314602.elements[5] = ((closureN)self_7313069)->elements[5];

return_closcall2(data,  ((closureN)self_7313069)->elements[3],  &c_7314602, quote_lambda);; 
}

static void __lambda_40(void *data, object self_7313070, int argc, object *args) /* object self_7313070, object r_734214 */
 {
 object r_734214 = args[0];
  
pair_type local_7314607; 

pair_type local_7314610; 

pair_type local_7314614; 

pair_type local_7314618; 

pair_type local_7314621; 

pair_type local_7314625; 

pair_type local_7314628; 

pair_type local_7314631; 



pair_type local_7314637; 

pair_type local_7314640; 

pair_type local_7314643; 





pair_type local_7314652; 

pair_type local_7314655; 


return_direct_with_clo1(data,  ((closureN)self_7313070)->elements[1], (((closure)  ((closureN)self_7313070)->elements[1])->fn),  set_pair_as_expr(&local_7314607, set_pair_as_expr(&local_7314610, ((closureN)self_7313070)->elements[2], set_pair_as_expr(&local_7314614, ((closureN)self_7313070)->elements[5], set_pair_as_expr(&local_7314618, set_pair_as_expr(&local_7314621, ((closureN)self_7313070)->elements[3], set_pair_as_expr(&local_7314625, set_pair_as_expr(&local_7314628, set_pair_as_expr(&local_7314631, Cyc_cadr(data, ((closureN)self_7313070)->elements[0]), set_pair_as_expr(&local_7314637, set_pair_as_expr(&local_7314640, r_734214, set_pair_as_expr(&local_7314643, ((closureN)self_7313070)->elements[5], Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7313070)->elements[0])))), NULL)), NULL), set_pair_as_expr(&local_7314652, set_pair_as_expr(&local_7314655, Cyc_cadr(data, ((closureN)self_7313070)->elements[0]), ((closureN)self_7313070)->elements[5]), NULL))), NULL))), ((closureN)self_7313070)->elements[4]));; 
}

static void __lambda_31(void *data, object self_7313072, int argc, object *args) /* object self_7313072, object k_734233 */
 {
 object k_734233 = args[0];
    complex_num_type local_7314571; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7314571, ((closureN)self_7313072)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_734233, (((closure)  k_734233)->fn),  boolean_f);
} else { 
  
make_utf8_string_with_len(c_7314575, "bad let bindings", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  k_734233, &c_7314575, ((closureN)self_7313072)->elements[1]);}
;; 
}

static void __lambda_28(void *data, object self_7313073, int argc, object *args) /* object self_7313073, object k_734239 */
 {
 object k_734239 = args[0];
  
closureN_type c_7314536;
object e_7314545 [2];
c_7314536.hdr.mark = gc_color_red;
 c_7314536.hdr.grayed = 0;
c_7314536.tag = closureN_tag;
 c_7314536.fn = (function_type)__lambda_29;
c_7314536.num_args = 1;
c_7314536.num_elements = 2;
c_7314536.elements = (object *)e_7314545;
c_7314536.elements[0] = ((closureN)self_7313073)->elements[0];
c_7314536.elements[1] = k_734239;



return_direct_with_clo1(data,(closure)&c_7314536,__lambda_29,  Cyc_cddr(data, ((closureN)self_7313073)->elements[0]));; 
}

static void __lambda_29(void *data, object self_7313074, int argc, object *args) /* object self_7313074, object r_734241 */
 {
 object r_734241 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734241)) ){ 
  
make_utf8_string_with_len(c_7314541, "no let body", 11, 11);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313074)->elements[1], &c_7314541, ((closureN)self_7313074)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313074)->elements[1], (((closure)  ((closureN)self_7313074)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_25(void *data, object self_7313075, int argc, object *args) /* object self_7313075, object k_734242 */
 {
 object k_734242 = args[0];
  
closureN_type c_7314518;
object e_7314527 [2];
c_7314518.hdr.mark = gc_color_red;
 c_7314518.hdr.grayed = 0;
c_7314518.tag = closureN_tag;
 c_7314518.fn = (function_type)__lambda_26;
c_7314518.num_args = 1;
c_7314518.num_elements = 2;
c_7314518.elements = (object *)e_7314527;
c_7314518.elements[0] = ((closureN)self_7313075)->elements[0];
c_7314518.elements[1] = k_734242;



return_direct_with_clo1(data,(closure)&c_7314518,__lambda_26,  Cyc_cdr(data, ((closureN)self_7313075)->elements[0]));; 
}

static void __lambda_26(void *data, object self_7313076, int argc, object *args) /* object self_7313076, object r_734244 */
 {
 object r_734244 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734244)) ){ 
  
make_utf8_string_with_len(c_7314523, "empty let", 9, 9);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313076)->elements[1], &c_7314523, ((closureN)self_7313076)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313076)->elements[1], (((closure)  ((closureN)self_7313076)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_17(void *data, object _, int argc, object *args) /* closure _,object k_734161, object expr_7313_732878, object rename_7314_732879, object compare_7315_732880 */
 {
object k_734161 = args[0]; object expr_7313_732878 = args[1]; object rename_7314_732879 = args[2];
  Cyc_st_add(data, "scheme/base.sld:or");
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_7313_732878))) ){ 
  return_direct_with_clo1(data,  k_734161, (((closure)  k_734161)->fn),  boolean_f);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_7313_732878))) ){ 
  

return_direct_with_clo1(data,  k_734161, (((closure)  k_734161)->fn),  Cyc_cadr(data, expr_7313_732878));
} else { 
  
closureN_type c_7314464;
object e_7314513 [3];
c_7314464.hdr.mark = gc_color_red;
 c_7314464.hdr.grayed = 0;
c_7314464.tag = closureN_tag;
 c_7314464.fn = (function_type)__lambda_18;
c_7314464.num_args = 1;
c_7314464.num_elements = 3;
c_7314464.elements = (object *)e_7314513;
c_7314464.elements[0] = expr_7313_732878;
c_7314464.elements[1] = k_734161;
c_7314464.elements[2] = rename_7314_732879;

return_closcall2(data,  rename_7314_732879,  &c_7314464, quote_let);}
;}
;; 
}

static void __lambda_18(void *data, object self_7313053, int argc, object *args) /* object self_7313053, object r_734164 */
 {
 object r_734164 = args[0];
  
closureN_type c_7314467;
object e_7314512 [4];
c_7314467.hdr.mark = gc_color_red;
 c_7314467.hdr.grayed = 0;
c_7314467.tag = closureN_tag;
 c_7314467.fn = (function_type)__lambda_19;
c_7314467.num_args = 1;
c_7314467.num_elements = 4;
c_7314467.elements = (object *)e_7314512;
c_7314467.elements[0] = ((closureN)self_7313053)->elements[0];
c_7314467.elements[1] = ((closureN)self_7313053)->elements[1];
c_7314467.elements[2] = r_734164;
c_7314467.elements[3] = ((closureN)self_7313053)->elements[2];

return_closcall2(data,  ((closureN)self_7313053)->elements[2],  &c_7314467, quote_tmp);; 
}

static void __lambda_19(void *data, object self_7313054, int argc, object *args) /* object self_7313054, object r_734178 */
 {
 object r_734178 = args[0];
  
closureN_type c_7314470;
object e_7314511 [5];
c_7314470.hdr.mark = gc_color_red;
 c_7314470.hdr.grayed = 0;
c_7314470.tag = closureN_tag;
 c_7314470.fn = (function_type)__lambda_20;
c_7314470.num_args = 1;
c_7314470.num_elements = 5;
c_7314470.elements = (object *)e_7314511;
c_7314470.elements[0] = ((closureN)self_7313054)->elements[0];
c_7314470.elements[1] = ((closureN)self_7313054)->elements[1];
c_7314470.elements[2] = ((closureN)self_7313054)->elements[2];
c_7314470.elements[3] = r_734178;
c_7314470.elements[4] = ((closureN)self_7313054)->elements[3];

return_closcall2(data,  ((closureN)self_7313054)->elements[3],  &c_7314470, quote__if);; 
}

static void __lambda_20(void *data, object self_7313055, int argc, object *args) /* object self_7313055, object r_734167 */
 {
 object r_734167 = args[0];
  
closureN_type c_7314473;
object e_7314510 [6];
c_7314473.hdr.mark = gc_color_red;
 c_7314473.hdr.grayed = 0;
c_7314473.tag = closureN_tag;
 c_7314473.fn = (function_type)__lambda_21;
c_7314473.num_args = 1;
c_7314473.num_elements = 6;
c_7314473.elements = (object *)e_7314510;
c_7314473.elements[0] = ((closureN)self_7313055)->elements[0];
c_7314473.elements[1] = ((closureN)self_7313055)->elements[1];
c_7314473.elements[2] = ((closureN)self_7313055)->elements[2];
c_7314473.elements[3] = r_734167;
c_7314473.elements[4] = ((closureN)self_7313055)->elements[3];
c_7314473.elements[5] = ((closureN)self_7313055)->elements[4];

return_closcall2(data,  ((closureN)self_7313055)->elements[4],  &c_7314473, quote_tmp);; 
}

static void __lambda_21(void *data, object self_7313056, int argc, object *args) /* object self_7313056, object r_734168 */
 {
 object r_734168 = args[0];
  
closureN_type c_7314476;
object e_7314509 [7];
c_7314476.hdr.mark = gc_color_red;
 c_7314476.hdr.grayed = 0;
c_7314476.tag = closureN_tag;
 c_7314476.fn = (function_type)__lambda_22;
c_7314476.num_args = 1;
c_7314476.num_elements = 7;
c_7314476.elements = (object *)e_7314509;
c_7314476.elements[0] = ((closureN)self_7313056)->elements[0];
c_7314476.elements[1] = ((closureN)self_7313056)->elements[1];
c_7314476.elements[2] = ((closureN)self_7313056)->elements[2];
c_7314476.elements[3] = ((closureN)self_7313056)->elements[3];
c_7314476.elements[4] = r_734168;
c_7314476.elements[5] = ((closureN)self_7313056)->elements[4];
c_7314476.elements[6] = ((closureN)self_7313056)->elements[5];

return_closcall2(data,  ((closureN)self_7313056)->elements[5],  &c_7314476, quote_tmp);; 
}

static void __lambda_22(void *data, object self_7313057, int argc, object *args) /* object self_7313057, object r_734169 */
 {
 object r_734169 = args[0];
  
closureN_type c_7314479;
object e_7314508 [7];
c_7314479.hdr.mark = gc_color_red;
 c_7314479.hdr.grayed = 0;
c_7314479.tag = closureN_tag;
 c_7314479.fn = (function_type)__lambda_23;
c_7314479.num_args = 1;
c_7314479.num_elements = 7;
c_7314479.elements = (object *)e_7314508;
c_7314479.elements[0] = ((closureN)self_7313057)->elements[0];
c_7314479.elements[1] = ((closureN)self_7313057)->elements[1];
c_7314479.elements[2] = ((closureN)self_7313057)->elements[2];
c_7314479.elements[3] = ((closureN)self_7313057)->elements[3];
c_7314479.elements[4] = ((closureN)self_7313057)->elements[4];
c_7314479.elements[5] = r_734169;
c_7314479.elements[6] = ((closureN)self_7313057)->elements[5];

return_closcall2(data,  ((closureN)self_7313057)->elements[6],  &c_7314479, quote_or);; 
}

static void __lambda_23(void *data, object self_7313058, int argc, object *args) /* object self_7313058, object r_734171 */
 {
 object r_734171 = args[0];
  
list_3_type local_7314484; 

pair_type local_7314488; 

list_2_type local_7314491; 



list_4_type local_7314498; 

pair_type local_7314504; 


return_direct_with_clo1(data,  ((closureN)self_7313058)->elements[1], (((closure)  ((closureN)self_7313058)->elements[1])->fn),  Cyc_fast_list_3(&local_7314484, ((closureN)self_7313058)->elements[2], set_cell_as_expr(&local_7314488, Cyc_fast_list_2(&local_7314491, ((closureN)self_7313058)->elements[6], Cyc_cadr(data, ((closureN)self_7313058)->elements[0]))), Cyc_fast_list_4(&local_7314498, ((closureN)self_7313058)->elements[3], ((closureN)self_7313058)->elements[4], ((closureN)self_7313058)->elements[5], set_pair_as_expr(&local_7314504, r_734171, Cyc_cddr(data, ((closureN)self_7313058)->elements[0])))));; 
}

static void __lambda_14(void *data, object _, int argc, object *args) /* closure _,object k_734147, object expr_733_732875, object rename_734_732876, object compare_735_732877 */
 {
object k_734147 = args[0]; object expr_733_732875 = args[1]; object rename_734_732876 = args[2];
  Cyc_st_add(data, "scheme/base.sld:and");
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_733_732875))) ){ 
  return_direct_with_clo1(data,  k_734147, (((closure)  k_734147)->fn),  boolean_t);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_733_732875))) ){ 
  

return_direct_with_clo1(data,  k_734147, (((closure)  k_734147)->fn),  Cyc_cadr(data, expr_733_732875));
} else { 
  
closureN_type c_7314429;
object e_7314449 [3];
c_7314429.hdr.mark = gc_color_red;
 c_7314429.hdr.grayed = 0;
c_7314429.tag = closureN_tag;
 c_7314429.fn = (function_type)__lambda_15;
c_7314429.num_args = 1;
c_7314429.num_elements = 3;
c_7314429.elements = (object *)e_7314449;
c_7314429.elements[0] = expr_733_732875;
c_7314429.elements[1] = k_734147;
c_7314429.elements[2] = rename_734_732876;

return_closcall2(data,  rename_734_732876,  &c_7314429, quote__if);}
;}
;; 
}

static void __lambda_15(void *data, object self_7313051, int argc, object *args) /* object self_7313051, object r_734150 */
 {
 object r_734150 = args[0];
  
closureN_type c_7314432;
object e_7314448 [3];
c_7314432.hdr.mark = gc_color_red;
 c_7314432.hdr.grayed = 0;
c_7314432.tag = closureN_tag;
 c_7314432.fn = (function_type)__lambda_16;
c_7314432.num_args = 1;
c_7314432.num_elements = 3;
c_7314432.elements = (object *)e_7314448;
c_7314432.elements[0] = ((closureN)self_7313051)->elements[0];
c_7314432.elements[1] = ((closureN)self_7313051)->elements[1];
c_7314432.elements[2] = r_734150;

return_closcall2(data,  ((closureN)self_7313051)->elements[2],  &c_7314432, quote_and);; 
}

static void __lambda_16(void *data, object self_7313052, int argc, object *args) /* object self_7313052, object r_734153 */
 {
 object r_734153 = args[0];
  
list_4_type local_7314437; 



pair_type local_7314444; 


return_direct_with_clo1(data,  ((closureN)self_7313052)->elements[1], (((closure)  ((closureN)self_7313052)->elements[1])->fn),  Cyc_fast_list_4(&local_7314437, ((closureN)self_7313052)->elements[2], Cyc_cadr(data, ((closureN)self_7313052)->elements[0]), set_pair_as_expr(&local_7314444, r_734153, Cyc_cddr(data, ((closureN)self_7313052)->elements[0])), boolean_f));; 
}

static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_734144 */
 {
object k_734144 = args[0];
  Cyc_st_add(data, "scheme/base.sld:Cyc-version");
return_direct_with_clo1(data,  k_734144, (((closure)  k_734144)->fn),  __glo__85version_91number_85_scheme_cyclone_common);; 
}

static void __lambda_11(void *data, object _, int argc, object *args) /* closure _,object k_734140, object sym_732_732874 */
 {
object k_734140 = args[0]; object sym_732_732874 = args[1];
  Cyc_st_add(data, "scheme/base.sld:Cyc-add-feature!");

closureN_type c_7314403;
object e_7314409 [1];
c_7314403.hdr.mark = gc_color_red;
 c_7314403.hdr.grayed = 0;
c_7314403.tag = closureN_tag;
 c_7314403.fn = (function_type)__lambda_12;
c_7314403.num_args = 1;
c_7314403.num_elements = 1;
c_7314403.elements = (object *)e_7314409;
c_7314403.elements[0] = k_734140;


pair_type local_7314412; 
return_direct_with_clo1(data,(closure)&c_7314403,__lambda_12,  set_pair_as_expr(&local_7314412, sym_732_732874, __glo__85other_91features_85_scheme_base));; 
}

static void __lambda_12(void *data, object self_7313050, int argc, object *args) /* object self_7313050, object r_734141 */
 {
 object r_734141 = args[0];
  
object c_7314408 = global_set_cps_id(data,  ((closureN)self_7313050)->elements[0],"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, r_734141);
return_direct_with_clo1(data,  ((closureN)self_7313050)->elements[0], (((closure)  ((closureN)self_7313050)->elements[0])->fn),  c_7314408);; 
}

static void __lambda_3(void *data, object _, int argc, object *args) /* closure _,object k_734119 */
 {
object k_734119 = args[0];
  Cyc_st_add(data, "scheme/base.sld:features");

closureN_type c_7314330;
object e_7314400 [1];
c_7314330.hdr.mark = gc_color_red;
 c_7314330.hdr.grayed = 0;
c_7314330.tag = closureN_tag;
 c_7314330.fn = (function_type)__lambda_4;
c_7314330.num_args = 1;
c_7314330.num_elements = 1;
c_7314330.elements = (object *)e_7314400;
c_7314330.elements[0] = k_734119;

return_direct_with_clo1(data,(closure)&c_7314330,__lambda_4,  __glo__85other_91features_85_scheme_base);; 
}

static void __lambda_4(void *data, object self_7313042, int argc, object *args) /* object self_7313042, object feats_731_732873 */
 {
 object feats_731_732873 = args[0];
  
closureN_type c_7314332;
object e_7314396 [1];
c_7314332.hdr.mark = gc_color_red;
 c_7314332.hdr.grayed = 0;
c_7314332.tag = closureN_tag;
 c_7314332.fn = (function_type)__lambda_1345;
c_7314332.num_args = 1;
c_7314332.num_elements = 1;
c_7314332.elements = (object *)e_7314396;
c_7314332.elements[0] = ((closureN)self_7313042)->elements[0];


pair_type local_7314399; 
return_direct_with_clo1(data,(closure)&c_7314332,__lambda_1345,  set_cell_as_expr(&local_7314399, feats_731_732873));; 
}

static void __lambda_1345(void *data, object self_7313043, int argc, object *args) /* object self_7313043, object feats_731_732873 */
 {
 object feats_731_732873 = args[0];
  
closureN_type c_7314334;
object e_7314361 [1];
c_7314334.hdr.mark = gc_color_red;
 c_7314334.hdr.grayed = 0;
c_7314334.tag = closureN_tag;
 c_7314334.fn = (function_type)__lambda_5;
c_7314334.num_args = 0;
c_7314334.num_elements = 1;
c_7314334.elements = (object *)e_7314361;
c_7314334.elements[0] = feats_731_732873;


closureN_type c_7314362;
object e_7314395 [2];
c_7314362.hdr.mark = gc_color_red;
 c_7314362.hdr.grayed = 0;
c_7314362.tag = closureN_tag;
 c_7314362.fn = (function_type)__lambda_8;
c_7314362.num_args = 1;
c_7314362.num_elements = 2;
c_7314362.elements = (object *)e_7314395;
c_7314362.elements[0] = feats_731_732873;
c_7314362.elements[1] = ((closureN)self_7313043)->elements[0];

return_direct_with_clo1(data,(closure)&c_7314334,__lambda_5,  &c_7314362);; 
}

static void __lambda_8(void *data, object self_7313044, int argc, object *args) /* object self_7313044, object r_734120 */
 {

  
closureN_type c_7314364;
object e_7314390 [2];
c_7314364.hdr.mark = gc_color_red;
 c_7314364.hdr.grayed = 0;
c_7314364.tag = closureN_tag;
 c_7314364.fn = (function_type)__lambda_9;
c_7314364.num_args = 1;
c_7314364.num_elements = 2;
c_7314364.elements = (object *)e_7314390;
c_7314364.elements[0] = ((closureN)self_7313044)->elements[0];
c_7314364.elements[1] = ((closureN)self_7313044)->elements[1];


make_utf8_string_with_len(c_7314394, "version-", 8, 8);

object c_7314393 = Cyc_string_append(data,(closure)&c_7314364,2,&c_7314394, __glo__85version_91number_85_scheme_cyclone_common);
return_closcall1(data,(closure)&c_7314364,  c_7314393);; 
}

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


object c_7314389 = Cyc_compilation_environment(data,(closure)&c_7314366,quote_platform);
return_closcall1(data,(closure)&c_7314366,  c_7314389);; 
}

static void __lambda_10(void *data, object self_7313046, int argc, object *args) /* object self_7313046, object r_734126 */
 {
 object r_734126 = args[0];
  
pair_type local_7314371; 

pair_type local_7314374; 



pair_type local_7314380; 




return_direct_with_clo1(data,  ((closureN)self_7313046)->elements[1], (((closure)  ((closureN)self_7313046)->elements[1])->fn),  set_pair_as_expr(&local_7314371, quote_cyclone, set_pair_as_expr(&local_7314374, Cyc_string2symbol(data, ((closureN)self_7313046)->elements[2]), set_pair_as_expr(&local_7314380, Cyc_string2symbol(data, r_734126), car(((closureN)self_7313046)->elements[0])))));; 
}

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


object c_7314360 = Cyc_compilation_environment(data,(closure)&c_7314336,quote_memory_91streams);
return_closcall1(data,(closure)&c_7314336,  c_7314360);; 
}

static void __lambda_6(void *data, object self_7313048, int argc, object *args) /* object self_7313048, object r_734134 */
 {
 object r_734134 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, r_734134), obj_int2obj(0))) ){ 
  
closureN_type c_7314342;
object e_7314348 [2];
c_7314342.hdr.mark = gc_color_red;
 c_7314342.hdr.grayed = 0;
c_7314342.tag = closureN_tag;
 c_7314342.fn = (function_type)__lambda_7;
c_7314342.num_args = 1;
c_7314342.num_elements = 2;
c_7314342.elements = (object *)e_7314348;
c_7314342.elements[0] = ((closureN)self_7313048)->elements[0];
c_7314342.elements[1] = ((closureN)self_7313048)->elements[1];


pair_type local_7314351; 


return_direct_with_clo1(data,(closure)&c_7314342,__lambda_7,  set_pair_as_expr(&local_7314351, quote_memory_91streams, car(((closureN)self_7313048)->elements[0])));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_7313048)->elements[1], (((closure)  ((closureN)self_7313048)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_7(void *data, object self_7313049, int argc, object *args) /* object self_7313049, object r_734131 */
 {
 object r_734131 = args[0];
  

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

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k, object f */
 {
object k = args[0]; object f = args[1];
  Cyc_st_add(data, "scheme/base.sld:call/cc");

closureN_type c_7314324;
object e_7314327 [1];
Cyc_check_proc(data, f);
c_7314324.hdr.mark = gc_color_red;
 c_7314324.hdr.grayed = 0;
c_7314324.tag = closureN_tag;
 c_7314324.fn = (function_type)__lambda_2;
c_7314324.num_args = 1;
c_7314324.num_elements = 1;
c_7314324.elements = (object *)e_7314327;
c_7314324.elements[0] = k;

return_closcall2(data,  f,  k, &c_7314324);; 
}

static void __lambda_2(void *data, object self_7313041, int argc, object *args) /* object self_7313041, object _191, object result */
 {
 object result = args[1];
  return_closcall1(data,  ((closureN)self_7313041)->elements[0],  result);; 
}

void c_schemebase_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
make_pair(pair_7328868, find_or_add_symbol("make-record-marker"), find_or_add_symbol("make-record-marker__inline__"));
make_pair(pair_7328869, find_or_add_symbol("void"), find_or_add_symbol("void__inline__"));
make_pair(pair_7328870, find_or_add_symbol("eof-object"), find_or_add_symbol("eof-object__inline__"));
make_pair(pair_7328871, find_or_add_symbol("square"), find_or_add_symbol("square__inline__"));
make_pair(pair_7328872, find_or_add_symbol("quotient"), find_or_add_symbol("quotient__inline__"));
make_pair(pair_7328873, find_or_add_symbol("fixnum?"), find_or_add_symbol("fixnum?__inline__"));
make_pair(pair_7328874, find_or_add_symbol("complex?"), find_or_add_symbol("complex?__inline__"));
make_pair(pair_7328875, find_or_add_symbol("exact?"), find_or_add_symbol("exact?__inline__"));
make_pair(pair_7328876, find_or_add_symbol("exact-integer?"), find_or_add_symbol("exact-integer?__inline__"));
make_pair(pair_7328877, find_or_add_symbol("sqrt"), find_or_add_symbol("sqrt__inline__"));
make_pair(pair_7328878, find_or_add_symbol("inexact"), find_or_add_symbol("inexact__inline__"));
make_pair(pair_7328879, find_or_add_symbol("exact"), find_or_add_symbol("exact__inline__"));
make_pair(pair_7328880, find_or_add_symbol("round"), find_or_add_symbol("round__inline__"));
make_pair(pair_7328881, find_or_add_symbol("truncate"), find_or_add_symbol("truncate__inline__"));
make_pair(pair_7328882, find_or_add_symbol("ceiling"), find_or_add_symbol("ceiling__inline__"));
make_pair(pair_7328883, find_or_add_symbol("floor"), find_or_add_symbol("floor__inline__"));
make_pair(pair_7328884, find_or_add_symbol("negative?"), find_or_add_symbol("negative?__inline__"));
make_pair(pair_7328885, find_or_add_symbol("positive?"), find_or_add_symbol("positive?__inline__"));
make_pair(pair_7328886, find_or_add_symbol("zero?"), find_or_add_symbol("zero?__inline__"));
make_pair(pair_7328887, find_or_add_symbol("list?"), find_or_add_symbol("list?__inline__"));
make_pair(pair_7328888, find_or_add_symbol("not"), find_or_add_symbol("not__inline__"));
make_pair(pair_7328889, find_or_add_symbol("%write-bytevector"), find_or_add_symbol("%write-bytevector__inline__"));
make_pair(pair_7328890, find_or_add_symbol("fast-string>=?"), find_or_add_symbol("fast-string>=?__inline__"));
make_pair(pair_7328891, find_or_add_symbol("fast-string>?"), find_or_add_symbol("fast-string>?__inline__"));
make_pair(pair_7328892, find_or_add_symbol("fast-string<=?"), find_or_add_symbol("fast-string<=?__inline__"));
make_pair(pair_7328893, find_or_add_symbol("fast-string<?"), find_or_add_symbol("fast-string<?__inline__"));
make_pair(pair_7328894, find_or_add_symbol("fast-string=?"), find_or_add_symbol("fast-string=?__inline__"));
make_pair(c_7328921, &pair_7328868, NULL);
make_pair(c_7328920, &pair_7328869, &c_7328921);
make_pair(c_7328919, &pair_7328870, &c_7328920);
make_pair(c_7328918, &pair_7328871, &c_7328919);
make_pair(c_7328917, &pair_7328872, &c_7328918);
make_pair(c_7328916, &pair_7328873, &c_7328917);
make_pair(c_7328915, &pair_7328874, &c_7328916);
make_pair(c_7328914, &pair_7328875, &c_7328915);
make_pair(c_7328913, &pair_7328876, &c_7328914);
make_pair(c_7328912, &pair_7328877, &c_7328913);
make_pair(c_7328911, &pair_7328878, &c_7328912);
make_pair(c_7328910, &pair_7328879, &c_7328911);
make_pair(c_7328909, &pair_7328880, &c_7328910);
make_pair(c_7328908, &pair_7328881, &c_7328909);
make_pair(c_7328907, &pair_7328882, &c_7328908);
make_pair(c_7328906, &pair_7328883, &c_7328907);
make_pair(c_7328905, &pair_7328884, &c_7328906);
make_pair(c_7328904, &pair_7328885, &c_7328905);
make_pair(c_7328903, &pair_7328886, &c_7328904);
make_pair(c_7328902, &pair_7328887, &c_7328903);
make_pair(c_7328901, &pair_7328888, &c_7328902);
make_pair(c_7328900, &pair_7328889, &c_7328901);
make_pair(c_7328899, &pair_7328890, &c_7328900);
make_pair(c_7328898, &pair_7328891, &c_7328899);
make_pair(c_7328897, &pair_7328892, &c_7328898);
make_pair(c_7328896, &pair_7328893, &c_7328897);
make_pair(c_7328895, &pair_7328894, &c_7328896);
object buf[1]; object cont = args[0];
buf[0] = &c_7328895; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_schemebase_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote_posix = find_or_add_symbol("posix");
  quote_full_91unicode = find_or_add_symbol("full-unicode");
  quote_ieee_91float = find_or_add_symbol("ieee-float");
  quote_r7rs = find_or_add_symbol("r7rs");
  quote_current_91output_91port = find_or_add_symbol("current-output-port");
  quote_current_91input_91port = find_or_add_symbol("current-input-port");
  quote_current_91error_91port = find_or_add_symbol("current-error-port");
  quote_error_91object_91message = find_or_add_symbol("error-object-message");
  quote_error_91object_91irritants = find_or_add_symbol("error-object-irritants");
  quote_rational_127 = find_or_add_symbol("rational?");
  quote_gcd = find_or_add_symbol("gcd");
  quote_lcm = find_or_add_symbol("lcm");
  quote_truncate_91quotient = find_or_add_symbol("truncate-quotient");
  quote_truncate_91remainder = find_or_add_symbol("truncate-remainder");
  quote_open_91output_91bytevector = find_or_add_symbol("open-output-bytevector");
  quote_identifier_127 = find_or_add_symbol("identifier?");
  quote_record_91marker = find_or_add_symbol("record-marker");
  quote_set_91cdr_67 = find_or_add_symbol("set-cdr!");
  quote_cddr = find_or_add_symbol("cddr");
  quote_cadr = find_or_add_symbol("cadr");
  quote_v = find_or_add_symbol("v");
  quote_dummy = find_or_add_symbol("dummy");
  quote_args = find_or_add_symbol("args");
  quote_register_91simple_91type = find_or_add_symbol("register-simple-type");
  quote_slot_91set_67 = find_or_add_symbol("slot-set!");
  quote_type_91slot_91offset = find_or_add_symbol("type-slot-offset");
  quote_make_91type_91predicate = find_or_add_symbol("make-type-predicate");
  quote_make_91getter = find_or_add_symbol("make-getter");
  quote_make_91setter = find_or_add_symbol("make-setter");
  quote_vector = find_or_add_symbol("vector");
  quote_make_91record_91marker = find_or_add_symbol("make-record-marker");
  quote_expected = find_or_add_symbol("expected");
  quote_temp = find_or_add_symbol("temp");
  quote_call_91with_91current_91continuation = find_or_add_symbol("call-with-current-continuation");
  quote_guard_91aux = find_or_add_symbol("guard-aux");
  quote_handler_91k = find_or_add_symbol("handler-k");
  quote_raise_91continuable = find_or_add_symbol("raise-continuable");
  quote_condition = find_or_add_symbol("condition");
  quote_guard_91k = find_or_add_symbol("guard-k");
  quote_x = find_or_add_symbol("x");
  quote_let_91values = find_or_add_symbol("let-values");
  quote_let_85_91values = find_or_add_symbol("let*-values");
  quote_define = find_or_add_symbol("define");
  quote_er_91macro_91transformer = find_or_add_symbol("er-macro-transformer");
  quote_equal_127 = find_or_add_symbol("equal?");
  quote_car = find_or_add_symbol("car");
  quote_cdr = find_or_add_symbol("cdr");
  quote_pair_127 = find_or_add_symbol("pair?");
  quote_null_127 = find_or_add_symbol("null?");
  quote_expr = find_or_add_symbol("expr");
  quote_compare = find_or_add_symbol("compare");
  quote_apply = find_or_add_symbol("apply");
  quote_map = find_or_add_symbol("map");
  quote_vector_127 = find_or_add_symbol("vector?");
  quote_list_127 = find_or_add_symbol("list?");
  quote_len = find_or_add_symbol("len");
  quote_length = find_or_add_symbol("length");
  quote__91 = find_or_add_symbol("-");
  quote__125_123 = find_or_add_symbol(">=");
  quote_error_95loc = find_or_add_symbol("error/loc");
  quote_ls = find_or_add_symbol("ls");
  quote_res = find_or_add_symbol("res");
  quote_i = find_or_add_symbol("i");
  quote_reverse = find_or_add_symbol("reverse");
  quote_vector_91_125list = find_or_add_symbol("vector->list");
  quote_cons_91source = find_or_add_symbol("cons-source");
  quote__93_93_93 = find_or_add_symbol("...");
  quote_obj = find_or_add_symbol("obj");
  quote_with_91exception_91handler = find_or_add_symbol("with-exception-handler");
  quote_k = find_or_add_symbol("k");
  quote_call_95cc = find_or_add_symbol("call/cc");
  quote_continuable = find_or_add_symbol("continuable");
  quote_raised = find_or_add_symbol("raised");
  quote__85parameter_91id_85 = find_or_add_symbol("*parameter-id*");
  quote_parameterize = find_or_add_symbol("parameterize");
  quote_p = find_or_add_symbol("p");
  quote_old = find_or_add_symbol("old");
  quote_new = find_or_add_symbol("new");
  quote__121param_91convert_125 = find_or_add_symbol("<param-convert>");
  quote_dynamic_91wind = find_or_add_symbol("dynamic-wind");
  quote__121param_91set_67_125 = find_or_add_symbol("<param-set!>");
  quote_call_91with_91values = find_or_add_symbol("call-with-values");
  quote_values = find_or_add_symbol("values");
  quote_multiple = find_or_add_symbol("multiple");
  quote_list_91_125vector = find_or_add_symbol("list->vector");
  quote_append = find_or_add_symbol("append");
  quote_quasiquote = find_or_add_symbol("quasiquote");
  quote_unquote_91splicing = find_or_add_symbol("unquote-splicing");
  quote_cons = find_or_add_symbol("cons");
  quote__list = find_or_add_symbol("list");
  quote_unquote = find_or_add_symbol("unquote");
  quote_lp = find_or_add_symbol("lp");
  quote_eq_127 = find_or_add_symbol("eq?");
  quote_eqv_127 = find_or_add_symbol("eqv?");
  quote_quote = find_or_add_symbol("quote");
  quote_cond = find_or_add_symbol("cond");
  quote__123_125 = find_or_add_symbol("=>");
  quote_sld = find_or_add_symbol("sld");
  quote_srfi = find_or_add_symbol("srfi");
  quote_scheme = find_or_add_symbol("scheme");
  quote_rename = find_or_add_symbol("rename");
  quote_prefix = find_or_add_symbol("prefix");
  quote_except = find_or_add_symbol("except");
  quote_only = find_or_add_symbol("only");
  quote_library = find_or_add_symbol("library");
  quote_not = find_or_add_symbol("not");
  quote__else = find_or_add_symbol("else");
  quote_set_67 = find_or_add_symbol("set!");
  quote_begin = find_or_add_symbol("begin");
  quote_let_85 = find_or_add_symbol("let*");
  quote_letrec = find_or_add_symbol("letrec");
  quote_lambda = find_or_add_symbol("lambda");
  quote_let = find_or_add_symbol("let");
  quote_tmp = find_or_add_symbol("tmp");
  quote_or = find_or_add_symbol("or");
  quote__if = find_or_add_symbol("if");
  quote_and = find_or_add_symbol("and");
  quote__85other_91features_85 = find_or_add_symbol("*other-features*");
  quote_platform = find_or_add_symbol("platform");
  quote_cyclone = find_or_add_symbol("cyclone");
  quote_memory_91streams = find_or_add_symbol("memory-streams");

  add_global("__glo_lib_91init_117schemebase_scheme_base", (object *) &__glo_lib_91init_117schemebase_scheme_base);
  add_global("__glo_define_91values_scheme_base", (object *) &__glo_define_91values_scheme_base);
  add_global("__glo_define_91record_91type_scheme_base", (object *) &__glo_define_91record_91type_scheme_base);
  add_global("__glo_is_91a_127_scheme_base", (object *) &__glo_is_91a_127_scheme_base);
  add_global("__glo_record_127_scheme_base", (object *) &__glo_record_127_scheme_base);
  add_global("__glo__191list_91index_scheme_base", (object *) &__glo__191list_91index_scheme_base);
  add_global("__glo_make_91setter_scheme_base", (object *) &__glo_make_91setter_scheme_base);
  add_global("__glo_make_91getter_scheme_base", (object *) &__glo_make_91getter_scheme_base);
  add_global("__glo_slot_91ref_scheme_base", (object *) &__glo_slot_91ref_scheme_base);
  add_global("__glo_slot_91set_67_scheme_base", (object *) &__glo_slot_91set_67_scheme_base);
  add_global("__glo_type_91slot_91offset_scheme_base", (object *) &__glo_type_91slot_91offset_scheme_base);
  add_global("__glo_make_91constructor_95args_scheme_base", (object *) &__glo_make_91constructor_95args_scheme_base);
  add_global("__glo_make_91constructor_scheme_base", (object *) &__glo_make_91constructor_scheme_base);
  add_global("__glo_make_91type_91predicate_scheme_base", (object *) &__glo_make_91type_91predicate_scheme_base);
  add_global("__glo_register_91simple_91type_scheme_base", (object *) &__glo_register_91simple_91type_scheme_base);
  add_global("__glo_record_91marker_scheme_base", (object *) &__glo_record_91marker_scheme_base);
  add_global("__glo_guard_91aux_scheme_base", (object *) &__glo_guard_91aux_scheme_base);
  add_global("__glo_guard_scheme_base", (object *) &__glo_guard_scheme_base);
  add_global("__glo_let_91values_scheme_base", (object *) &__glo_let_91values_scheme_base);
  add_global("__glo_let_85_91values_scheme_base", (object *) &__glo_let_85_91values_scheme_base);
  add_global("__glo_letrec_85_scheme_base", (object *) &__glo_letrec_85_scheme_base);
  add_global("__glo_syntax_91rules_scheme_base", (object *) &__glo_syntax_91rules_scheme_base);
  add_global("__glo_cons_91source_scheme_base", (object *) &__glo_cons_91source_scheme_base);
  add_global("__glo_find_scheme_base", (object *) &__glo_find_scheme_base);
  add_global("__glo_find_91tail_scheme_base", (object *) &__glo_find_91tail_scheme_base);
  add_global("__glo_identifier_127_scheme_base", (object *) &__glo_identifier_127_scheme_base);
  add_global("__glo_open_91output_91bytevector_scheme_base", (object *) &__glo_open_91output_91bytevector_scheme_base);
  add_global("__glo_open_91input_91bytevector_scheme_base", (object *) &__glo_open_91input_91bytevector_scheme_base);
  add_global("__glo_get_91output_91bytevector_scheme_base", (object *) &__glo_get_91output_91bytevector_scheme_base);
  add_global("__glo_get_91output_91string_scheme_base", (object *) &__glo_get_91output_91string_scheme_base);
  add_global("__glo_open_91output_91string_scheme_base", (object *) &__glo_open_91output_91string_scheme_base);
  add_global("__glo_open_91input_91string_scheme_base", (object *) &__glo_open_91input_91string_scheme_base);
  add_global("__glo_output_91port_91open_127_scheme_base", (object *) &__glo_output_91port_91open_127_scheme_base);
  add_global("__glo_input_91port_91open_127_scheme_base", (object *) &__glo_input_91port_91open_127_scheme_base);
  add_global("__glo_output_91port_127_scheme_base", (object *) &__glo_output_91port_127_scheme_base);
  add_global("__glo_input_91port_127_scheme_base", (object *) &__glo_input_91port_127_scheme_base);
  add_global("__glo_make_91record_91marker_scheme_base", (object *) &__glo_make_91record_91marker_scheme_base);
  add_global("__glo_make_91record_91marker_191_191inline_191_191_scheme_base", (object *) &__glo_make_91record_91marker_191_191inline_191_191_scheme_base);
  add_global("__glo__void_scheme_base", (object *) &__glo__void_scheme_base);
  add_global("__glo_void_191_191inline_191_191_scheme_base", (object *) &__glo_void_191_191inline_191_191_scheme_base);
  add_global("__glo_eof_91object_scheme_base", (object *) &__glo_eof_91object_scheme_base);
  add_global("__glo_eof_91object_191_191inline_191_191_scheme_base", (object *) &__glo_eof_91object_191_191inline_191_191_scheme_base);
  add_global("__glo_expt_scheme_base", (object *) &__glo_expt_scheme_base);
  add_global("__glo_square_191_191inline_191_191_scheme_base", (object *) &__glo_square_191_191inline_191_191_scheme_base);
  add_global("__glo_square_scheme_base", (object *) &__glo_square_scheme_base);
  add_global("__glo_floor_95_scheme_base", (object *) &__glo_floor_95_scheme_base);
  add_global("__glo_floor_91remainder_scheme_base", (object *) &__glo_floor_91remainder_scheme_base);
  add_global("__glo_floor_91quotient_scheme_base", (object *) &__glo_floor_91quotient_scheme_base);
  add_global("__glo_truncate_95_scheme_base", (object *) &__glo_truncate_95_scheme_base);
  add_global("__glo_truncate_91remainder_scheme_base", (object *) &__glo_truncate_91remainder_scheme_base);
  add_global("__glo_truncate_91quotient_scheme_base", (object *) &__glo_truncate_91quotient_scheme_base);
  add_global("__glo_quotient_191_191inline_191_191_scheme_base", (object *) &__glo_quotient_191_191inline_191_191_scheme_base);
  add_global("__glo_quotient_scheme_base", (object *) &__glo_quotient_scheme_base);
  add_global("__glo_fixnum_127_scheme_base", (object *) &__glo_fixnum_127_scheme_base);
  add_global("__glo_fixnum_127_191_191inline_191_191_scheme_base", (object *) &__glo_fixnum_127_191_191inline_191_191_scheme_base);
  add_global("__glo_denominator_scheme_base", (object *) &__glo_denominator_scheme_base);
  add_global("__glo_numerator_scheme_base", (object *) &__glo_numerator_scheme_base);
  add_global("__glo_lcm_95entry_scheme_base", (object *) &__glo_lcm_95entry_scheme_base);
  add_global("__glo_lcm_95main_scheme_base", (object *) &__glo_lcm_95main_scheme_base);
  add_global("__glo_gcd_95entry_scheme_base", (object *) &__glo_gcd_95entry_scheme_base);
  add_global("__glo_gcd_95main_scheme_base", (object *) &__glo_gcd_95main_scheme_base);
  add_global("__glo_lcm_scheme_base", (object *) &__glo_lcm_scheme_base);
  add_global("__glo_gcd_scheme_base", (object *) &__glo_gcd_scheme_base);
  add_global("__glo_min_scheme_base", (object *) &__glo_min_scheme_base);
  add_global("__glo_max_scheme_base", (object *) &__glo_max_scheme_base);
  add_global("__glo_rationalize_scheme_base", (object *) &__glo_rationalize_scheme_base);
  add_global("__glo_rational_127_scheme_base", (object *) &__glo_rational_127_scheme_base);
  add_global("__glo_complex_127_scheme_base", (object *) &__glo_complex_127_scheme_base);
  add_global("__glo_complex_127_191_191inline_191_191_scheme_base", (object *) &__glo_complex_127_191_191inline_191_191_scheme_base);
  add_global("__glo_inexact_127_scheme_base", (object *) &__glo_inexact_127_scheme_base);
  add_global("__glo_exact_127_scheme_base", (object *) &__glo_exact_127_scheme_base);
  add_global("__glo_exact_127_191_191inline_191_191_scheme_base", (object *) &__glo_exact_127_191_191inline_191_191_scheme_base);
  add_global("__glo_exact_91integer_127_scheme_base", (object *) &__glo_exact_91integer_127_scheme_base);
  add_global("__glo_exact_91integer_127_191_191inline_191_191_scheme_base", (object *) &__glo_exact_91integer_127_191_191inline_191_191_scheme_base);
  add_global("__glo_sqrt_scheme_base", (object *) &__glo_sqrt_scheme_base);
  add_global("__glo_sqrt_191_191inline_191_191_scheme_base", (object *) &__glo_sqrt_191_191inline_191_191_scheme_base);
  add_global("__glo_exact_91integer_91sqrt_scheme_base", (object *) &__glo_exact_91integer_91sqrt_scheme_base);
  add_global("__glo_bignum_91sqrt_scheme_base", (object *) &__glo_bignum_91sqrt_scheme_base);
  add_global("__glo_bignum_127_scheme_base", (object *) &__glo_bignum_127_scheme_base);
  add_global("__glo_even_127_scheme_base", (object *) &__glo_even_127_scheme_base);
  add_global("__glo_odd_127_scheme_base", (object *) &__glo_odd_127_scheme_base);
  add_global("__glo_modulo_scheme_base", (object *) &__glo_modulo_scheme_base);
  add_global("__glo_remainder_scheme_base", (object *) &__glo_remainder_scheme_base);
  add_global("__glo_abs_scheme_base", (object *) &__glo_abs_scheme_base);
  add_global("__glo_inexact_scheme_base", (object *) &__glo_inexact_scheme_base);
  add_global("__glo_inexact_191_191inline_191_191_scheme_base", (object *) &__glo_inexact_191_191inline_191_191_scheme_base);
  add_global("__glo_exact_scheme_base", (object *) &__glo_exact_scheme_base);
  add_global("__glo_exact_191_191inline_191_191_scheme_base", (object *) &__glo_exact_191_191inline_191_191_scheme_base);
  add_global("__glo_round_scheme_base", (object *) &__glo_round_scheme_base);
  add_global("__glo_round_191_191inline_191_191_scheme_base", (object *) &__glo_round_191_191inline_191_191_scheme_base);
  add_global("__glo_truncate_scheme_base", (object *) &__glo_truncate_scheme_base);
  add_global("__glo_truncate_191_191inline_191_191_scheme_base", (object *) &__glo_truncate_191_191inline_191_191_scheme_base);
  add_global("__glo_ceiling_scheme_base", (object *) &__glo_ceiling_scheme_base);
  add_global("__glo_ceiling_191_191inline_191_191_scheme_base", (object *) &__glo_ceiling_191_191inline_191_191_scheme_base);
  add_global("__glo_floor_scheme_base", (object *) &__glo_floor_scheme_base);
  add_global("__glo_floor_191_191inline_191_191_scheme_base", (object *) &__glo_floor_191_191inline_191_191_scheme_base);
  add_global("__glo_every_scheme_base", (object *) &__glo_every_scheme_base);
  add_global("__glo_any_scheme_base", (object *) &__glo_any_scheme_base);
  add_global("__glo_error_95loc_scheme_base", (object *) &__glo_error_95loc_scheme_base);
  add_global("__glo_Cyc_91remove_91exception_91handler_scheme_base", (object *) &__glo_Cyc_91remove_91exception_91handler_scheme_base);
  add_global("__glo_Cyc_91add_91exception_91handler_scheme_base", (object *) &__glo_Cyc_91add_91exception_91handler_scheme_base);
  add_global("__glo_with_91exception_91handler_scheme_base", (object *) &__glo_with_91exception_91handler_scheme_base);
  add_global("__glo_with_91handler_scheme_base", (object *) &__glo_with_91handler_scheme_base);
  add_global("__glo_raise_91continuable_scheme_base", (object *) &__glo_raise_91continuable_scheme_base);
  add_global("__glo_raise_scheme_base", (object *) &__glo_raise_scheme_base);
  add_global("__glo_error_scheme_base", (object *) &__glo_error_scheme_base);
  add_global("__glo_error_91object_91irritants_scheme_base", (object *) &__glo_error_91object_91irritants_scheme_base);
  add_global("__glo_error_91object_91message_scheme_base", (object *) &__glo_error_91object_91message_scheme_base);
  add_global("__glo_error_91object_127_scheme_base", (object *) &__glo_error_91object_127_scheme_base);
  add_global("__glo_current_91error_91port_scheme_base", (object *) &__glo_current_91error_91port_scheme_base);
  add_global("__glo_current_91input_91port_scheme_base", (object *) &__glo_current_91input_91port_scheme_base);
  add_global("__glo_current_91output_91port_scheme_base", (object *) &__glo_current_91output_91port_scheme_base);
  add_global("__glo_make_91parameter_scheme_base", (object *) &__glo_make_91parameter_scheme_base);
  add_global("__glo__85parameter_91id_85_scheme_base", (object *) &__glo__85parameter_91id_85_scheme_base);
  add_global("__glo_set_91param_91obj_67_scheme_base", (object *) &__glo_set_91param_91obj_67_scheme_base);
  add_global("__glo_get_91param_91objs_scheme_base", (object *) &__glo_get_91param_91objs_scheme_base);
  add_global("__glo_parameterize_scheme_base", (object *) &__glo_parameterize_scheme_base);
  add_global("__glo_Cyc_91make_91string_scheme_base", (object *) &__glo_Cyc_91make_91string_scheme_base);
  add_global("__glo_make_91string_scheme_base", (object *) &__glo_make_91string_scheme_base);
  add_global("__glo_string_scheme_base", (object *) &__glo_string_scheme_base);
  add_global("__glo_Cyc_91obj_123_127_scheme_base", (object *) &__glo_Cyc_91obj_123_127_scheme_base);
  add_global("__glo_symbol_123_127_scheme_base", (object *) &__glo_symbol_123_127_scheme_base);
  add_global("__glo_boolean_123_127_scheme_base", (object *) &__glo_boolean_123_127_scheme_base);
  add_global("__glo_vector_91fill_67_scheme_base", (object *) &__glo_vector_91fill_67_scheme_base);
  add_global("__glo_vector_91copy_67_scheme_base", (object *) &__glo_vector_91copy_67_scheme_base);
  add_global("__glo_vector_91copy_scheme_base", (object *) &__glo_vector_91copy_scheme_base);
  add_global("__glo_vector_91append_scheme_base", (object *) &__glo_vector_91append_scheme_base);
  add_global("__glo_vector_91for_91each_scheme_base", (object *) &__glo_vector_91for_91each_scheme_base);
  add_global("__glo_vector_91map_scheme_base", (object *) &__glo_vector_91map_scheme_base);
  add_global("__glo_string_91for_91each_scheme_base", (object *) &__glo_string_91for_91each_scheme_base);
  add_global("__glo_string_91map_scheme_base", (object *) &__glo_string_91map_scheme_base);
  add_global("__glo_string_91fill_67_scheme_base", (object *) &__glo_string_91fill_67_scheme_base);
  add_global("__glo_string_91copy_67_scheme_base", (object *) &__glo_string_91copy_67_scheme_base);
  add_global("__glo_string_91copy_scheme_base", (object *) &__glo_string_91copy_scheme_base);
  add_global("__glo_string_91_125vector_scheme_base", (object *) &__glo_string_91_125vector_scheme_base);
  add_global("__glo_string_91_125list_scheme_base", (object *) &__glo_string_91_125list_scheme_base);
  add_global("__glo_vector_91_125string_scheme_base", (object *) &__glo_vector_91_125string_scheme_base);
  add_global("__glo_string_91_125utf8_scheme_base", (object *) &__glo_string_91_125utf8_scheme_base);
  add_global("__glo_utf8_91_125string_scheme_base", (object *) &__glo_utf8_91_125string_scheme_base);
  add_global("__glo_bytevector_91copy_67_scheme_base", (object *) &__glo_bytevector_91copy_67_scheme_base);
  add_global("__glo_bytevector_91copy_scheme_base", (object *) &__glo_bytevector_91copy_scheme_base);
  add_global("__glo_vector_91_125list_scheme_base", (object *) &__glo_vector_91_125list_scheme_base);
  add_global("__glo_vector_scheme_base", (object *) &__glo_vector_scheme_base);
  add_global("__glo_reverse_scheme_base", (object *) &__glo_reverse_scheme_base);
  add_global("__glo_list_91set_67_scheme_base", (object *) &__glo_list_91set_67_scheme_base);
  add_global("__glo_list_91ref_scheme_base", (object *) &__glo_list_91ref_scheme_base);
  add_global("__glo_list_91tail_scheme_base", (object *) &__glo_list_91tail_scheme_base);
  add_global("__glo_for_91each_scheme_base", (object *) &__glo_for_91each_scheme_base);
  add_global("__glo_Cyc_91for_91each_91loop_912_scheme_base", (object *) &__glo_Cyc_91for_91each_91loop_912_scheme_base);
  add_global("__glo_Cyc_91for_91each_91loop_911_scheme_base", (object *) &__glo_Cyc_91for_91each_91loop_911_scheme_base);
  add_global("__glo_Cyc_91map_91loop_912_scheme_base", (object *) &__glo_Cyc_91map_91loop_912_scheme_base);
  add_global("__glo_Cyc_91map_91loop_911_scheme_base", (object *) &__glo_Cyc_91map_91loop_911_scheme_base);
  add_global("__glo_map_scheme_base", (object *) &__glo_map_scheme_base);
  add_global("__glo__75cars_87cdrs_scheme_base", (object *) &__glo__75cars_87cdrs_scheme_base);
  add_global("__glo_car_87cdr_scheme_base", (object *) &__glo_car_87cdr_scheme_base);
  add_global("__glo_receive_scheme_base", (object *) &__glo_receive_scheme_base);
  add_global("__glo_list_91copy_scheme_base", (object *) &__glo_list_91copy_scheme_base);
  add_global("__glo_make_91list_scheme_base", (object *) &__glo_make_91list_scheme_base);
  add_global("__glo__list_scheme_base", (object *) &__glo__list_scheme_base);
  add_global("__glo_append_scheme_base", (object *) &__glo_append_scheme_base);
  add_global("__glo_negative_127_191_191inline_191_191_scheme_base", (object *) &__glo_negative_127_191_191inline_191_191_scheme_base);
  add_global("__glo_negative_127_scheme_base", (object *) &__glo_negative_127_scheme_base);
  add_global("__glo_positive_127_191_191inline_191_191_scheme_base", (object *) &__glo_positive_127_191_191inline_191_191_scheme_base);
  add_global("__glo_positive_127_scheme_base", (object *) &__glo_positive_127_scheme_base);
  add_global("__glo_zero_127_191_191inline_191_191_scheme_base", (object *) &__glo_zero_127_191_191inline_191_191_scheme_base);
  add_global("__glo_zero_127_scheme_base", (object *) &__glo_zero_127_scheme_base);
  add_global("__glo_list_127_scheme_base", (object *) &__glo_list_127_scheme_base);
  add_global("__glo_list_127_191_191inline_191_191_scheme_base", (object *) &__glo_list_127_191_191inline_191_191_scheme_base);
  add_global("__glo_not_191_191inline_191_191_scheme_base", (object *) &__glo_not_191_191inline_191_191_scheme_base);
  add_global("__glo_not_scheme_base", (object *) &__glo_not_scheme_base);
  add_global("__glo_newline_scheme_base", (object *) &__glo_newline_scheme_base);
  add_global("__glo_write_91char_scheme_base", (object *) &__glo_write_91char_scheme_base);
  add_global("__glo__75write_91bytevector_scheme_base", (object *) &__glo__75write_91bytevector_scheme_base);
  add_global("__glo__75write_91bytevector_191_191inline_191_191_scheme_base", (object *) &__glo__75write_91bytevector_191_191inline_191_191_scheme_base);
  add_global("__glo_write_91bytevector_scheme_base", (object *) &__glo_write_91bytevector_scheme_base);
  add_global("__glo_read_91bytevector_67_scheme_base", (object *) &__glo_read_91bytevector_67_scheme_base);
  add_global("__glo_read_91bytevector_scheme_base", (object *) &__glo_read_91bytevector_scheme_base);
  add_global("__glo_write_91string_scheme_base", (object *) &__glo_write_91string_scheme_base);
  add_global("__glo_write_91string_912_scheme_base", (object *) &__glo_write_91string_912_scheme_base);
  add_global("__glo_write_91string_911_scheme_base", (object *) &__glo_write_91string_911_scheme_base);
  add_global("__glo_flush_91output_91port_scheme_base", (object *) &__glo_flush_91output_91port_scheme_base);
  add_global("__glo_textual_91port_127_scheme_base", (object *) &__glo_textual_91port_127_scheme_base);
  add_global("__glo_binary_91port_127_scheme_base", (object *) &__glo_binary_91port_127_scheme_base);
  add_global("__glo__191binary_91port_127_scheme_base", (object *) &__glo__191binary_91port_127_scheme_base);
  add_global("__glo_read_91string_scheme_base", (object *) &__glo_read_91string_scheme_base);
  add_global("__glo__191read_91line_scheme_base", (object *) &__glo__191read_91line_scheme_base);
  add_global("__glo_read_91line_scheme_base", (object *) &__glo_read_91line_scheme_base);
  add_global("__glo_read_91char_scheme_base", (object *) &__glo_read_91char_scheme_base);
  add_global("__glo_peek_91char_scheme_base", (object *) &__glo_peek_91char_scheme_base);
  add_global("__glo_char_91ready_127_scheme_base", (object *) &__glo_char_91ready_127_scheme_base);
  add_global("__glo_Cyc_91char_91ready_127_scheme_base", (object *) &__glo_Cyc_91char_91ready_127_scheme_base);
  add_global("__glo_write_91u8_scheme_base", (object *) &__glo_write_91u8_scheme_base);
  add_global("__glo_peek_91u8_scheme_base", (object *) &__glo_peek_91u8_scheme_base);
  add_global("__glo_read_91u8_scheme_base", (object *) &__glo_read_91u8_scheme_base);
  add_global("__glo__191write_91u8_scheme_base", (object *) &__glo__191write_91u8_scheme_base);
  add_global("__glo__191peek_91u8_scheme_base", (object *) &__glo__191peek_91u8_scheme_base);
  add_global("__glo__191read_91u8_scheme_base", (object *) &__glo__191read_91u8_scheme_base);
  add_global("__glo_foldr_scheme_base", (object *) &__glo_foldr_scheme_base);
  add_global("__glo_foldl_scheme_base", (object *) &__glo_foldl_scheme_base);
  add_global("__glo_assoc_scheme_base", (object *) &__glo_assoc_scheme_base);
  add_global("__glo_assoc_91helper_scheme_base", (object *) &__glo_assoc_91helper_scheme_base);
  add_global("__glo_member_scheme_base", (object *) &__glo_member_scheme_base);
  add_global("__glo_member_91helper_scheme_base", (object *) &__glo_member_91helper_scheme_base);
  add_global("__glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base", (object *) &__glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base);
  add_global("__glo_fast_91string_125_123_127_scheme_base", (object *) &__glo_fast_91string_125_123_127_scheme_base);
  add_global("__glo_fast_91string_125_127_191_191inline_191_191_scheme_base", (object *) &__glo_fast_91string_125_127_191_191inline_191_191_scheme_base);
  add_global("__glo_fast_91string_125_127_scheme_base", (object *) &__glo_fast_91string_125_127_scheme_base);
  add_global("__glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base", (object *) &__glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base);
  add_global("__glo_fast_91string_121_123_127_scheme_base", (object *) &__glo_fast_91string_121_123_127_scheme_base);
  add_global("__glo_fast_91string_121_127_191_191inline_191_191_scheme_base", (object *) &__glo_fast_91string_121_127_191_191inline_191_191_scheme_base);
  add_global("__glo_fast_91string_121_127_scheme_base", (object *) &__glo_fast_91string_121_127_scheme_base);
  add_global("__glo_fast_91string_123_127_191_191inline_191_191_scheme_base", (object *) &__glo_fast_91string_123_127_191_191inline_191_191_scheme_base);
  add_global("__glo_fast_91string_123_127_scheme_base", (object *) &__glo_fast_91string_123_127_scheme_base);
  add_global("__glo_string_125_123_127_scheme_base", (object *) &__glo_string_125_123_127_scheme_base);
  add_global("__glo_string_125_127_scheme_base", (object *) &__glo_string_125_127_scheme_base);
  add_global("__glo_string_121_123_127_scheme_base", (object *) &__glo_string_121_123_127_scheme_base);
  add_global("__glo_string_121_127_scheme_base", (object *) &__glo_string_121_127_scheme_base);
  add_global("__glo_string_123_127_scheme_base", (object *) &__glo_string_123_127_scheme_base);
  add_global("__glo_char_125_123_127_scheme_base", (object *) &__glo_char_125_123_127_scheme_base);
  add_global("__glo_char_121_123_127_scheme_base", (object *) &__glo_char_121_123_127_scheme_base);
  add_global("__glo_char_125_127_scheme_base", (object *) &__glo_char_125_127_scheme_base);
  add_global("__glo_char_121_127_scheme_base", (object *) &__glo_char_121_127_scheme_base);
  add_global("__glo_char_123_127_scheme_base", (object *) &__glo_char_123_127_scheme_base);
  add_global("__glo_Cyc_91bin_91op_91char_scheme_base", (object *) &__glo_Cyc_91bin_91op_91char_scheme_base);
  add_global("__glo_Cyc_91bin_91op_scheme_base", (object *) &__glo_Cyc_91bin_91op_scheme_base);
  add_global("__glo_call_91with_91port_scheme_base", (object *) &__glo_call_91with_91port_scheme_base);
  add_global("__glo_dynamic_91wind_scheme_base", (object *) &__glo_dynamic_91wind_scheme_base);
  add_global("__glo_call_91with_91values_scheme_base", (object *) &__glo_call_91with_91values_scheme_base);
  add_global("__glo_values_scheme_base", (object *) &__glo_values_scheme_base);
  add_global("__glo_call_91with_91current_91continuation_scheme_base", (object *) &__glo_call_91with_91current_91continuation_scheme_base);
  add_global("__glo_syntax_91error_scheme_base", (object *) &__glo_syntax_91error_scheme_base);
  add_global("__glo_quasiquote_scheme_base", (object *) &__glo_quasiquote_scheme_base);
  add_global("__glo__do_scheme_base", (object *) &__glo__do_scheme_base);
  add_global("__glo_unless_scheme_base", (object *) &__glo_unless_scheme_base);
  add_global("__glo_when_scheme_base", (object *) &__glo_when_scheme_base);
  add_global("__glo__case_scheme_base", (object *) &__glo__case_scheme_base);
  add_global("__glo_cond_scheme_base", (object *) &__glo_cond_scheme_base);
  add_global("__glo_cond_91expand_scheme_base", (object *) &__glo_cond_91expand_scheme_base);
  add_global("__glo_begin_scheme_base", (object *) &__glo_begin_scheme_base);
  add_global("__glo_letrec_scheme_base", (object *) &__glo_letrec_scheme_base);
  add_global("__glo_let_85_scheme_base", (object *) &__glo_let_85_scheme_base);
  add_global("__glo_let_scheme_base", (object *) &__glo_let_scheme_base);
  add_global("__glo_or_scheme_base", (object *) &__glo_or_scheme_base);
  add_global("__glo_and_scheme_base", (object *) &__glo_and_scheme_base);
  add_global("__glo_Cyc_91version_scheme_base", (object *) &__glo_Cyc_91version_scheme_base);
  add_global("__glo_Cyc_91add_91feature_67_scheme_base", (object *) &__glo_Cyc_91add_91feature_67_scheme_base);
  add_global("__glo__85other_91features_85_scheme_base", (object *) &__glo__85other_91features_85_scheme_base);
  add_global("__glo_features_scheme_base", (object *) &__glo_features_scheme_base);
  add_global("__glo_call_95cc_scheme_base", (object *) &__glo_call_95cc_scheme_base);
  mclosure0(c_7328753, (function_type)__lambda_1327);c_7328753.num_args = 0; 
  __glo_lib_91init_117schemebase_scheme_base = &c_7328753; 
  mmacro(c_7328011, (function_type)__lambda_1269);c_7328011.num_args = 3; 
  __glo_define_91values_scheme_base = &c_7328011; 
  mmacro(c_7327548, (function_type)__lambda_1238);c_7327548.num_args = 3; 
  __glo_define_91record_91type_scheme_base = &c_7327548; 
  mclosure0(c_7327526, (function_type)__lambda_1235);c_7327526.num_args = 2; 
  __glo_is_91a_127_scheme_base = &c_7327526; 
  mclosure0(c_7327525, (function_type)__lambda_1514);c_7327525.num_args = 1; 
  __glo_record_127_scheme_base = &c_7327525; 
  mclosure0(c_7327477, (function_type)__lambda_1229);c_7327477.num_args = 2; 
  __glo__191list_91index_scheme_base = &c_7327477; 
  mclosure0(c_7327447, (function_type)__lambda_1225);c_7327447.num_args = 3; 
  __glo_make_91setter_scheme_base = &c_7327447; 
  mclosure0(c_7327429, (function_type)__lambda_1223);c_7327429.num_args = 3; 
  __glo_make_91getter_scheme_base = &c_7327429; 
  mclosure0(c_7327406, (function_type)__lambda_1220);c_7327406.num_args = 3; 
  __glo_slot_91ref_scheme_base = &c_7327406; 
  mclosure0(c_7327390, (function_type)__lambda_1217);c_7327390.num_args = 4; 
  __glo_slot_91set_67_scheme_base = &c_7327390; 
  mclosure0(c_7327386, (function_type)__lambda_1216);c_7327386.num_args = 2; 
  __glo_type_91slot_91offset_scheme_base = &c_7327386; 
  mclosure0(c_7327350, (function_type)__lambda_1211);c_7327350.num_args = 2; 
  __glo_make_91constructor_95args_scheme_base = &c_7327350; 
  mclosure0(c_7327329, (function_type)__lambda_1208);c_7327329.num_args = 2; 
  __glo_make_91constructor_scheme_base = &c_7327329; 
  mclosure0(c_7327312, (function_type)__lambda_1205);c_7327312.num_args = 2; 
  __glo_make_91type_91predicate_scheme_base = &c_7327312; 
  mclosure0(c_7327307, (function_type)__lambda_1204);c_7327307.num_args = 3; 
  __glo_register_91simple_91type_scheme_base = &c_7327307; 
  mmacro(c_7326286, (function_type)__lambda_1153);c_7326286.num_args = 3; 
  __glo_guard_91aux_scheme_base = &c_7326286; 
  mmacro(c_7325899, (function_type)__lambda_1121);c_7325899.num_args = 3; 
  __glo_guard_scheme_base = &c_7325899; 
  mmacro(c_7324650, (function_type)__lambda_1066);c_7324650.num_args = 3; 
  __glo_let_91values_scheme_base = &c_7324650; 
  mmacro(c_7324319, (function_type)__lambda_1046);c_7324319.num_args = 3; 
  __glo_let_85_91values_scheme_base = &c_7324319; 
  mmacro(c_7324140, (function_type)__lambda_1025);c_7324140.num_args = 3; 
  __glo_letrec_85_scheme_base = &c_7324140; 
  mmacro(c_7322038, (function_type)__lambda_810);c_7322038.num_args = 3; 
  __glo_syntax_91rules_scheme_base = &c_7322038; 
  mclosure0(c_7322033, (function_type)__lambda_809);c_7322033.num_args = 3; 
  __glo_cons_91source_scheme_base = &c_7322033; 
  mclosure0(c_7322023, (function_type)__lambda_807);c_7322023.num_args = 2; 
  __glo_find_scheme_base = &c_7322023; 
  mclosure0(c_7322005, (function_type)__lambda_805);c_7322005.num_args = 2; 
  __glo_find_91tail_scheme_base = &c_7322005; 
  mclosure0(c_7322004, (function_type)__lambda_1513);c_7322004.num_args = 1; 
  __glo_open_91input_91bytevector_scheme_base = &c_7322004; 
  mclosure0(c_7322003, (function_type)__lambda_1512);c_7322003.num_args = 1; 
  __glo_get_91output_91bytevector_scheme_base = &c_7322003; 
  mclosure0(c_7322002, (function_type)__lambda_1511);c_7322002.num_args = 1; 
  __glo_get_91output_91string_scheme_base = &c_7322002; 
  mclosure0(c_7322001, (function_type)__lambda_1510);c_7322001.num_args = 0; 
  __glo_open_91output_91string_scheme_base = &c_7322001; 
  mclosure0(c_7322000, (function_type)__lambda_1509);c_7322000.num_args = 1; 
  __glo_open_91input_91string_scheme_base = &c_7322000; 
  mclosure0(c_7321999, (function_type)__lambda_1508);c_7321999.num_args = 1; 
  __glo_output_91port_91open_127_scheme_base = &c_7321999; 
  mclosure0(c_7321998, (function_type)__lambda_1507);c_7321998.num_args = 1; 
  __glo_input_91port_91open_127_scheme_base = &c_7321998; 
  mclosure0(c_7321997, (function_type)__lambda_1506);c_7321997.num_args = 1; 
  __glo_output_91port_127_scheme_base = &c_7321997; 
  mclosure0(c_7321996, (function_type)__lambda_1505);c_7321996.num_args = 1; 
  __glo_input_91port_127_scheme_base = &c_7321996; 
  mclosure0(c_7321995, (function_type)__lambda_1503);c_7321995.num_args = 0; 
  __glo_make_91record_91marker_scheme_base = &c_7321995; 
  mclosure0(c_7321994, (function_type)__lambda_1504);c_7321994.num_args = -2; 
  __glo_make_91record_91marker_191_191inline_191_191_scheme_base = &c_7321994; 
  mclosure0(c_7321993, (function_type)__lambda_1501);c_7321993.num_args = 0; 
  __glo__void_scheme_base = &c_7321993; 
  mclosure0(c_7321992, (function_type)__lambda_1502);c_7321992.num_args = -2; 
  __glo_void_191_191inline_191_191_scheme_base = &c_7321992; 
  mclosure0(c_7321991, (function_type)__lambda_1499);c_7321991.num_args = 0; 
  __glo_eof_91object_scheme_base = &c_7321991; 
  mclosure0(c_7321990, (function_type)__lambda_1500);c_7321990.num_args = -2; 
  __glo_eof_91object_191_191inline_191_191_scheme_base = &c_7321990; 
  mclosure0(c_7321989, (function_type)__lambda_1498);c_7321989.num_args = 2; 
  __glo_expt_scheme_base = &c_7321989; 
  mclosure0(c_7321984, (function_type)__lambda_1497);c_7321984.num_args = 1; 
  __glo_square_191_191inline_191_191_scheme_base = &c_7321984; 
  mclosure0(c_7321979, (function_type)__lambda_804);c_7321979.num_args = 1; 
  __glo_square_scheme_base = &c_7321979; 
  mclosure0(c_7321967, (function_type)__lambda_801);c_7321967.num_args = 2; 
  __glo_floor_95_scheme_base = &c_7321967; 
  mclosure0(c_7321953, (function_type)__lambda_799);c_7321953.num_args = 2; 
  __glo_floor_91remainder_scheme_base = &c_7321953; 
  mclosure0(c_7321926, (function_type)__lambda_798);c_7321926.num_args = 2; 
  __glo_floor_91quotient_scheme_base = &c_7321926; 
  mclosure0(c_7321914, (function_type)__lambda_795);c_7321914.num_args = 2; 
  __glo_truncate_95_scheme_base = &c_7321914; 
  mclosure0(c_7321887, (function_type)__lambda_1496);c_7321887.num_args = 2; 
  __glo_quotient_191_191inline_191_191_scheme_base = &c_7321887; 
  mclosure0(c_7321860, (function_type)__lambda_794);c_7321860.num_args = 2; 
  __glo_quotient_scheme_base = &c_7321860; 
  mclosure0(c_7321859, (function_type)__lambda_1494);c_7321859.num_args = 1; 
  __glo_fixnum_127_scheme_base = &c_7321859; 
  mclosure0(c_7321858, (function_type)__lambda_1495);c_7321858.num_args = -1; 
  __glo_fixnum_127_191_191inline_191_191_scheme_base = &c_7321858; 
  mclosure0(c_7321857, (function_type)__lambda_1493);c_7321857.num_args = 1; 
  __glo_denominator_scheme_base = &c_7321857; 
  mclosure0(c_7321856, (function_type)__lambda_1492);c_7321856.num_args = 1; 
  __glo_numerator_scheme_base = &c_7321856; 
  mclosure0(c_7321847, (function_type)__lambda_793);c_7321847.num_args = 0; 
  __glo_lcm_95entry_scheme_base = &c_7321847; 
  mclosure0(c_7321833, (function_type)__lambda_791);c_7321833.num_args = 2; 
  __glo_lcm_95main_scheme_base = &c_7321833; 
  mclosure0(c_7321824, (function_type)__lambda_790);c_7321824.num_args = 0; 
  __glo_gcd_95entry_scheme_base = &c_7321824; 
  mclosure0(c_7321814, (function_type)__lambda_788);c_7321814.num_args = 2; 
  __glo_gcd_95main_scheme_base = &c_7321814; 
  mclosure0(c_7321801, (function_type)__lambda_785);c_7321801.num_args = 1; 
  __glo_min_scheme_base = &c_7321801; 
  mclosure0(c_7321788, (function_type)__lambda_782);c_7321788.num_args = 1; 
  __glo_max_scheme_base = &c_7321788; 
  mclosure0(c_7321783, (function_type)__lambda_781);c_7321783.num_args = 2; 
  __glo_rationalize_scheme_base = &c_7321783; 
  mclosure0(c_7321782, (function_type)__lambda_1490);c_7321782.num_args = 1; 
  __glo_complex_127_scheme_base = &c_7321782; 
  mclosure0(c_7321781, (function_type)__lambda_1491);c_7321781.num_args = -1; 
  __glo_complex_127_191_191inline_191_191_scheme_base = &c_7321781; 
  mclosure0(c_7321775, (function_type)__lambda_780);c_7321775.num_args = 1; 
  __glo_inexact_127_scheme_base = &c_7321775; 
  mclosure0(c_7321774, (function_type)__lambda_1488);c_7321774.num_args = 1; 
  __glo_exact_127_scheme_base = &c_7321774; 
  mclosure0(c_7321773, (function_type)__lambda_1489);c_7321773.num_args = -1; 
  __glo_exact_127_191_191inline_191_191_scheme_base = &c_7321773; 
  mclosure0(c_7321772, (function_type)__lambda_1486);c_7321772.num_args = 1; 
  __glo_exact_91integer_127_scheme_base = &c_7321772; 
  mclosure0(c_7321771, (function_type)__lambda_1487);c_7321771.num_args = -1; 
  __glo_exact_91integer_127_191_191inline_191_191_scheme_base = &c_7321771; 
  mclosure0(c_7321770, (function_type)__lambda_1484);c_7321770.num_args = 1; 
  __glo_sqrt_scheme_base = &c_7321770; 
  mclosure0(c_7321769, (function_type)__lambda_1485);c_7321769.num_args = -1; 
  __glo_sqrt_191_191inline_191_191_scheme_base = &c_7321769; 
  mclosure0(c_7321711, (function_type)__lambda_774);c_7321711.num_args = 1; 
  __glo_exact_91integer_91sqrt_scheme_base = &c_7321711; 
  mclosure0(c_7321710, (function_type)__lambda_1483);c_7321710.num_args = 1; 
  __glo_bignum_91sqrt_scheme_base = &c_7321710; 
  mclosure0(c_7321709, (function_type)__lambda_1482);c_7321709.num_args = 1; 
  __glo_bignum_127_scheme_base = &c_7321709; 
  mclosure0(c_7321697, (function_type)__lambda_772);c_7321697.num_args = 1; 
  __glo_even_127_scheme_base = &c_7321697; 
  mclosure0(c_7321685, (function_type)__lambda_770);c_7321685.num_args = 1; 
  __glo_odd_127_scheme_base = &c_7321685; 
  mclosure0(c_7321658, (function_type)__lambda_768);c_7321658.num_args = 2; 
  __glo_modulo_scheme_base = &c_7321658; 
  mclosure0(c_7321657, (function_type)__lambda_1481);c_7321657.num_args = 2; 
  __glo_remainder_scheme_base = &c_7321657; 
  mclosure0(c_7321656, (function_type)__lambda_1480);c_7321656.num_args = 1; 
  __glo_abs_scheme_base = &c_7321656; 
  mclosure0(c_7321655, (function_type)__lambda_1478);c_7321655.num_args = 1; 
  __glo_inexact_scheme_base = &c_7321655; 
  mclosure0(c_7321654, (function_type)__lambda_1479);c_7321654.num_args = -1; 
  __glo_inexact_191_191inline_191_191_scheme_base = &c_7321654; 
  mclosure0(c_7321653, (function_type)__lambda_1476);c_7321653.num_args = 1; 
  __glo_exact_scheme_base = &c_7321653; 
  mclosure0(c_7321652, (function_type)__lambda_1477);c_7321652.num_args = -1; 
  __glo_exact_191_191inline_191_191_scheme_base = &c_7321652; 
  mclosure0(c_7321651, (function_type)__lambda_1474);c_7321651.num_args = 1; 
  __glo_round_scheme_base = &c_7321651; 
  mclosure0(c_7321650, (function_type)__lambda_1475);c_7321650.num_args = -1; 
  __glo_round_191_191inline_191_191_scheme_base = &c_7321650; 
  mclosure0(c_7321649, (function_type)__lambda_1472);c_7321649.num_args = 1; 
  __glo_truncate_scheme_base = &c_7321649; 
  mclosure0(c_7321648, (function_type)__lambda_1473);c_7321648.num_args = -1; 
  __glo_truncate_191_191inline_191_191_scheme_base = &c_7321648; 
  mclosure0(c_7321647, (function_type)__lambda_1470);c_7321647.num_args = 1; 
  __glo_ceiling_scheme_base = &c_7321647; 
  mclosure0(c_7321646, (function_type)__lambda_1471);c_7321646.num_args = -1; 
  __glo_ceiling_191_191inline_191_191_scheme_base = &c_7321646; 
  mclosure0(c_7321645, (function_type)__lambda_1468);c_7321645.num_args = 1; 
  __glo_floor_scheme_base = &c_7321645; 
  mclosure0(c_7321644, (function_type)__lambda_1469);c_7321644.num_args = -1; 
  __glo_floor_191_191inline_191_191_scheme_base = &c_7321644; 
  mclosure0(c_7321602, (function_type)__lambda_762);c_7321602.num_args = 2; 
  __glo_every_scheme_base = &c_7321602; 
  mclosure0(c_7321560, (function_type)__lambda_756);c_7321560.num_args = 2; 
  __glo_any_scheme_base = &c_7321560; 
  mclosure0(c_7321442, (function_type)__lambda_742);c_7321442.num_args = 2; 
  __glo_error_95loc_scheme_base = &c_7321442; 
  mclosure0(c_7321441, (function_type)__lambda_1467);c_7321441.num_args = 0; 
  __glo_Cyc_91remove_91exception_91handler_scheme_base = &c_7321441; 
  mclosure0(c_7321440, (function_type)__lambda_1466);c_7321440.num_args = 1; 
  __glo_Cyc_91add_91exception_91handler_scheme_base = &c_7321440; 
  mclosure0(c_7321360, (function_type)__lambda_730);c_7321360.num_args = 2; 
  __glo_with_91exception_91handler_scheme_base = &c_7321360; 
  mmacro(c_7321297, (function_type)__lambda_729);c_7321297.num_args = 3; 
  __glo_with_91handler_scheme_base = &c_7321297; 
  mclosure0(c_7321282, (function_type)__lambda_728);c_7321282.num_args = 1; 
  __glo_raise_91continuable_scheme_base = &c_7321282; 
  mclosure0(c_7321267, (function_type)__lambda_727);c_7321267.num_args = 1; 
  __glo_raise_scheme_base = &c_7321267; 
  mclosure0(c_7321262, (function_type)__lambda_726);c_7321262.num_args = 1; 
  __glo_error_scheme_base = &c_7321262; 
  mclosure0(c_7321253, (function_type)__lambda_725);c_7321253.num_args = 1; 
  __glo_error_91object_127_scheme_base = &c_7321253; 
  mclosure0(c_7321123, (function_type)__lambda_707);c_7321123.num_args = 1; 
  __glo_make_91parameter_scheme_base = &c_7321123; 
  mclosure0(c_7321122, (function_type)__lambda_1465);c_7321122.num_args = 1; 
  __glo_set_91param_91obj_67_scheme_base = &c_7321122; 
  mclosure0(c_7321121, (function_type)__lambda_1464);c_7321121.num_args = 0; 
  __glo_get_91param_91objs_scheme_base = &c_7321121; 
  mmacro(c_7320170, (function_type)__lambda_636);c_7320170.num_args = 3; 
  __glo_parameterize_scheme_base = &c_7320170; 
  mclosure0(c_7320169, (function_type)__lambda_1463);c_7320169.num_args = 2; 
  __glo_Cyc_91make_91string_scheme_base = &c_7320169; 
  mclosure0(c_7320160, (function_type)__lambda_635);c_7320160.num_args = 1; 
  __glo_make_91string_scheme_base = &c_7320160; 
  mclosure0(c_7320155, (function_type)__lambda_634);c_7320155.num_args = 0; 
  __glo_string_scheme_base = &c_7320155; 
  mclosure0(c_7320125, (function_type)__lambda_627);c_7320125.num_args = 3; 
  __glo_Cyc_91obj_123_127_scheme_base = &c_7320125; 
  mclosure0(c_7320120, (function_type)__lambda_626);c_7320120.num_args = 2; 
  __glo_symbol_123_127_scheme_base = &c_7320120; 
  mclosure0(c_7320115, (function_type)__lambda_625);c_7320115.num_args = 2; 
  __glo_boolean_123_127_scheme_base = &c_7320115; 
  mclosure0(c_7319983, (function_type)__lambda_612);c_7319983.num_args = 2; 
  __glo_vector_91fill_67_scheme_base = &c_7319983; 
  mclosure0(c_7319852, (function_type)__lambda_601);c_7319852.num_args = 3; 
  __glo_vector_91copy_67_scheme_base = &c_7319852; 
  mclosure0(c_7319703, (function_type)__lambda_588);c_7319703.num_args = 1; 
  __glo_vector_91copy_scheme_base = &c_7319703; 
  mclosure0(c_7319688, (function_type)__lambda_585);c_7319688.num_args = 0; 
  __glo_vector_91append_scheme_base = &c_7319688; 
  mclosure0(c_7319667, (function_type)__lambda_582);c_7319667.num_args = 2; 
  __glo_vector_91for_91each_scheme_base = &c_7319667; 
  mclosure0(c_7319640, (function_type)__lambda_578);c_7319640.num_args = 2; 
  __glo_vector_91map_scheme_base = &c_7319640; 
  mclosure0(c_7319619, (function_type)__lambda_575);c_7319619.num_args = 2; 
  __glo_string_91for_91each_scheme_base = &c_7319619; 
  mclosure0(c_7319592, (function_type)__lambda_571);c_7319592.num_args = 2; 
  __glo_string_91map_scheme_base = &c_7319592; 
  mclosure0(c_7319463, (function_type)__lambda_559);c_7319463.num_args = 2; 
  __glo_string_91fill_67_scheme_base = &c_7319463; 
  mclosure0(c_7319338, (function_type)__lambda_549);c_7319338.num_args = 3; 
  __glo_string_91copy_67_scheme_base = &c_7319338; 
  mclosure0(c_7319252, (function_type)__lambda_542);c_7319252.num_args = 1; 
  __glo_string_91copy_scheme_base = &c_7319252; 
  mclosure0(c_7319237, (function_type)__lambda_540);c_7319237.num_args = 1; 
  __glo_string_91_125vector_scheme_base = &c_7319237; 
  mclosure0(c_7319118, (function_type)__lambda_530);c_7319118.num_args = 1; 
  __glo_string_91_125list_scheme_base = &c_7319118; 
  mclosure0(c_7319103, (function_type)__lambda_528);c_7319103.num_args = 1; 
  __glo_vector_91_125string_scheme_base = &c_7319103; 
  mclosure0(c_7319017, (function_type)__lambda_521);c_7319017.num_args = 1; 
  __glo_string_91_125utf8_scheme_base = &c_7319017; 
  mclosure0(c_7318931, (function_type)__lambda_514);c_7318931.num_args = 1; 
  __glo_utf8_91_125string_scheme_base = &c_7318931; 
  mclosure0(c_7318728, (function_type)__lambda_493);c_7318728.num_args = 3; 
  __glo_bytevector_91copy_67_scheme_base = &c_7318728; 
  mclosure0(c_7318642, (function_type)__lambda_486);c_7318642.num_args = 1; 
  __glo_bytevector_91copy_scheme_base = &c_7318642; 
  mclosure0(c_7318523, (function_type)__lambda_476);c_7318523.num_args = 1; 
  __glo_vector_91_125list_scheme_base = &c_7318523; 
  mclosure0(c_7318518, (function_type)__lambda_475);c_7318518.num_args = 0; 
  __glo_vector_scheme_base = &c_7318518; 
  mclosure0(c_7318516, (function_type)__lambda_474);c_7318516.num_args = 1; 
  __glo_reverse_scheme_base = &c_7318516; 
  mclosure0(c_7318506, (function_type)__lambda_472);c_7318506.num_args = 3; 
  __glo_list_91set_67_scheme_base = &c_7318506; 
  mclosure0(c_7318498, (function_type)__lambda_470);c_7318498.num_args = 2; 
  __glo_list_91ref_scheme_base = &c_7318498; 
  mclosure0(c_7318488, (function_type)__lambda_469);c_7318488.num_args = 2; 
  __glo_list_91tail_scheme_base = &c_7318488; 
  mclosure0(c_7318401, (function_type)__lambda_457);c_7318401.num_args = 2; 
  __glo_for_91each_scheme_base = &c_7318401; 
  mclosure0(c_7318371, (function_type)__lambda_455);c_7318371.num_args = 3; 
  __glo_Cyc_91for_91each_91loop_912_scheme_base = &c_7318371; 
  mclosure0(c_7318353, (function_type)__lambda_453);c_7318353.num_args = 2; 
  __glo_Cyc_91for_91each_91loop_911_scheme_base = &c_7318353; 
  mclosure0(c_7318319, (function_type)__lambda_450);c_7318319.num_args = 3; 
  __glo_Cyc_91map_91loop_912_scheme_base = &c_7318319; 
  mclosure0(c_7318297, (function_type)__lambda_447);c_7318297.num_args = 2; 
  __glo_Cyc_91map_91loop_911_scheme_base = &c_7318297; 
  mclosure0(c_7318206, (function_type)__lambda_432);c_7318206.num_args = 2; 
  __glo_map_scheme_base = &c_7318206; 
  mclosure0(c_7318094, (function_type)__lambda_412);c_7318094.num_args = 1; 
  __glo__75cars_87cdrs_scheme_base = &c_7318094; 
  mclosure0(c_7318088, (function_type)__lambda_411);c_7318088.num_args = 1; 
  __glo_car_87cdr_scheme_base = &c_7318088; 
  mmacro(c_7318056, (function_type)__lambda_410);c_7318056.num_args = 3; 
  __glo_receive_scheme_base = &c_7318056; 
  mclosure0(c_7318006, (function_type)__lambda_403);c_7318006.num_args = 1; 
  __glo_list_91copy_scheme_base = &c_7318006; 
  mclosure0(c_7317936, (function_type)__lambda_396);c_7317936.num_args = 1; 
  __glo_make_91list_scheme_base = &c_7317936; 
  mclosure0(c_7317934, (function_type)__lambda_395);c_7317934.num_args = 0; 
  __glo__list_scheme_base = &c_7317934; 
  mclosure0(c_7317869, (function_type)__lambda_386);c_7317869.num_args = 0; 
  __glo_append_scheme_base = &c_7317869; 
  mclosure0(c_7317865, (function_type)__lambda_1462);c_7317865.num_args = 1; 
  __glo_negative_127_191_191inline_191_191_scheme_base = &c_7317865; 
  mclosure0(c_7317861, (function_type)__lambda_385);c_7317861.num_args = 1; 
  __glo_negative_127_scheme_base = &c_7317861; 
  mclosure0(c_7317857, (function_type)__lambda_1461);c_7317857.num_args = 1; 
  __glo_positive_127_191_191inline_191_191_scheme_base = &c_7317857; 
  mclosure0(c_7317853, (function_type)__lambda_384);c_7317853.num_args = 1; 
  __glo_positive_127_scheme_base = &c_7317853; 
  mclosure0(c_7317849, (function_type)__lambda_1460);c_7317849.num_args = 1; 
  __glo_zero_127_191_191inline_191_191_scheme_base = &c_7317849; 
  mclosure0(c_7317845, (function_type)__lambda_383);c_7317845.num_args = 1; 
  __glo_zero_127_scheme_base = &c_7317845; 
  mclosure0(c_7317844, (function_type)__lambda_1458);c_7317844.num_args = 1; 
  __glo_list_127_scheme_base = &c_7317844; 
  mclosure0(c_7317843, (function_type)__lambda_1459);c_7317843.num_args = -1; 
  __glo_list_127_191_191inline_191_191_scheme_base = &c_7317843; 
  mclosure0(c_7317840, (function_type)__lambda_1457);c_7317840.num_args = 1; 
  __glo_not_191_191inline_191_191_scheme_base = &c_7317840; 
  mclosure0(c_7317837, (function_type)__lambda_382);c_7317837.num_args = 1; 
  __glo_not_scheme_base = &c_7317837; 
  mclosure0(c_7317829, (function_type)__lambda_381);c_7317829.num_args = 0; 
  __glo_newline_scheme_base = &c_7317829; 
  mclosure0(c_7317813, (function_type)__lambda_379);c_7317813.num_args = 1; 
  __glo_write_91char_scheme_base = &c_7317813; 
  mclosure0(c_7317812, (function_type)__lambda_1455);c_7317812.num_args = 4; 
  __glo__75write_91bytevector_scheme_base = &c_7317812; 
  mclosure0(c_7317811, (function_type)__lambda_1456);c_7317811.num_args = 2; 
  __glo__75write_91bytevector_191_191inline_191_191_scheme_base = &c_7317811; 
  mclosure0(c_7317694, (function_type)__lambda_369);c_7317694.num_args = 1; 
  __glo_write_91bytevector_scheme_base = &c_7317694; 
  mclosure0(c_7317549, (function_type)__lambda_352);c_7317549.num_args = 1; 
  __glo_read_91bytevector_67_scheme_base = &c_7317549; 
  mclosure0(c_7317431, (function_type)__lambda_340);c_7317431.num_args = 1; 
  __glo_read_91bytevector_scheme_base = &c_7317431; 
  mclosure0(c_7317381, (function_type)__lambda_336);c_7317381.num_args = 1; 
  __glo_write_91string_scheme_base = &c_7317381; 
  mclosure0(c_7317377, (function_type)__lambda_335);c_7317377.num_args = 2; 
  __glo_write_91string_912_scheme_base = &c_7317377; 
  mclosure0(c_7317368, (function_type)__lambda_333);c_7317368.num_args = 1; 
  __glo_write_91string_911_scheme_base = &c_7317368; 
  mclosure0(c_7317353, (function_type)__lambda_331);c_7317353.num_args = 0; 
  __glo_flush_91output_91port_scheme_base = &c_7317353; 
  mclosure0(c_7317339, (function_type)__lambda_329);c_7317339.num_args = 1; 
  __glo_textual_91port_127_scheme_base = &c_7317339; 
  mclosure0(c_7317334, (function_type)__lambda_328);c_7317334.num_args = 1; 
  __glo_binary_91port_127_scheme_base = &c_7317334; 
  mclosure0(c_7317333, (function_type)__lambda_1454);c_7317333.num_args = 1; 
  __glo__191binary_91port_127_scheme_base = &c_7317333; 
  mclosure0(c_7317226, (function_type)__lambda_316);c_7317226.num_args = 1; 
  __glo_read_91string_scheme_base = &c_7317226; 
  mclosure0(c_7317143, (function_type)__lambda_306);c_7317143.num_args = 2; 
  __glo__191read_91line_scheme_base = &c_7317143; 
  mclosure0(c_7317105, (function_type)__lambda_301);c_7317105.num_args = 0; 
  __glo_read_91line_scheme_base = &c_7317105; 
  mclosure0(c_7317088, (function_type)__lambda_299);c_7317088.num_args = 0; 
  __glo_read_91char_scheme_base = &c_7317088; 
  mclosure0(c_7317071, (function_type)__lambda_297);c_7317071.num_args = 0; 
  __glo_peek_91char_scheme_base = &c_7317071; 
  mclosure0(c_7317060, (function_type)__lambda_295);c_7317060.num_args = 0; 
  __glo_char_91ready_127_scheme_base = &c_7317060; 
  mclosure0(c_7317059, (function_type)__lambda_1453);c_7317059.num_args = 1; 
  __glo_Cyc_91char_91ready_127_scheme_base = &c_7317059; 
  mclosure0(c_7317047, (function_type)__lambda_293);c_7317047.num_args = 1; 
  __glo_write_91u8_scheme_base = &c_7317047; 
  mclosure0(c_7317036, (function_type)__lambda_291);c_7317036.num_args = 0; 
  __glo_peek_91u8_scheme_base = &c_7317036; 
  mclosure0(c_7317025, (function_type)__lambda_289);c_7317025.num_args = 0; 
  __glo_read_91u8_scheme_base = &c_7317025; 
  mclosure0(c_7317024, (function_type)__lambda_1452);c_7317024.num_args = 2; 
  __glo__191write_91u8_scheme_base = &c_7317024; 
  mclosure0(c_7317023, (function_type)__lambda_1451);c_7317023.num_args = 1; 
  __glo__191peek_91u8_scheme_base = &c_7317023; 
  mclosure0(c_7317022, (function_type)__lambda_1450);c_7317022.num_args = 1; 
  __glo__191read_91u8_scheme_base = &c_7317022; 
  mclosure0(c_7317007, (function_type)__lambda_287);c_7317007.num_args = 3; 
  __glo_foldr_scheme_base = &c_7317007; 
  mclosure0(c_7316992, (function_type)__lambda_285);c_7316992.num_args = 3; 
  __glo_foldl_scheme_base = &c_7316992; 
  mclosure0(c_7316985, (function_type)__lambda_284);c_7316985.num_args = 2; 
  __glo_assoc_scheme_base = &c_7316985; 
  mclosure0(c_7316950, (function_type)__lambda_281);c_7316950.num_args = 3; 
  __glo_assoc_91helper_scheme_base = &c_7316950; 
  mclosure0(c_7316943, (function_type)__lambda_280);c_7316943.num_args = 2; 
  __glo_member_scheme_base = &c_7316943; 
  mclosure0(c_7316924, (function_type)__lambda_278);c_7316924.num_args = 3; 
  __glo_member_91helper_scheme_base = &c_7316924; 
  mclosure0(c_7316918, (function_type)__lambda_1449);c_7316918.num_args = 2; 
  __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base = &c_7316918; 
  mclosure0(c_7316912, (function_type)__lambda_277);c_7316912.num_args = 2; 
  __glo_fast_91string_125_123_127_scheme_base = &c_7316912; 
  mclosure0(c_7316906, (function_type)__lambda_1448);c_7316906.num_args = 2; 
  __glo_fast_91string_125_127_191_191inline_191_191_scheme_base = &c_7316906; 
  mclosure0(c_7316900, (function_type)__lambda_276);c_7316900.num_args = 2; 
  __glo_fast_91string_125_127_scheme_base = &c_7316900; 
  mclosure0(c_7316894, (function_type)__lambda_1447);c_7316894.num_args = 2; 
  __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base = &c_7316894; 
  mclosure0(c_7316888, (function_type)__lambda_275);c_7316888.num_args = 2; 
  __glo_fast_91string_121_123_127_scheme_base = &c_7316888; 
  mclosure0(c_7316882, (function_type)__lambda_1446);c_7316882.num_args = 2; 
  __glo_fast_91string_121_127_191_191inline_191_191_scheme_base = &c_7316882; 
  mclosure0(c_7316876, (function_type)__lambda_274);c_7316876.num_args = 2; 
  __glo_fast_91string_121_127_scheme_base = &c_7316876; 
  mclosure0(c_7316870, (function_type)__lambda_1445);c_7316870.num_args = 2; 
  __glo_fast_91string_123_127_191_191inline_191_191_scheme_base = &c_7316870; 
  mclosure0(c_7316864, (function_type)__lambda_273);c_7316864.num_args = 2; 
  __glo_fast_91string_123_127_scheme_base = &c_7316864; 
  mclosure0(c_7316859, (function_type)__lambda_272);c_7316859.num_args = 2; 
  __glo_string_125_123_127_scheme_base = &c_7316859; 
  mclosure0(c_7316854, (function_type)__lambda_271);c_7316854.num_args = 2; 
  __glo_string_125_127_scheme_base = &c_7316854; 
  mclosure0(c_7316849, (function_type)__lambda_270);c_7316849.num_args = 2; 
  __glo_string_121_123_127_scheme_base = &c_7316849; 
  mclosure0(c_7316844, (function_type)__lambda_269);c_7316844.num_args = 2; 
  __glo_string_121_127_scheme_base = &c_7316844; 
  mclosure0(c_7316839, (function_type)__lambda_268);c_7316839.num_args = 2; 
  __glo_string_123_127_scheme_base = &c_7316839; 
  mclosure0(c_7316834, (function_type)__lambda_267);c_7316834.num_args = 2; 
  __glo_char_125_123_127_scheme_base = &c_7316834; 
  mclosure0(c_7316829, (function_type)__lambda_266);c_7316829.num_args = 2; 
  __glo_char_121_123_127_scheme_base = &c_7316829; 
  mclosure0(c_7316824, (function_type)__lambda_265);c_7316824.num_args = 2; 
  __glo_char_125_127_scheme_base = &c_7316824; 
  mclosure0(c_7316819, (function_type)__lambda_264);c_7316819.num_args = 2; 
  __glo_char_121_127_scheme_base = &c_7316819; 
  mclosure0(c_7316814, (function_type)__lambda_263);c_7316814.num_args = 2; 
  __glo_char_123_127_scheme_base = &c_7316814; 
  mclosure0(c_7316798, (function_type)__lambda_260);c_7316798.num_args = 3; 
  __glo_Cyc_91bin_91op_91char_scheme_base = &c_7316798; 
  mclosure0(c_7316778, (function_type)__lambda_258);c_7316778.num_args = 3; 
  __glo_Cyc_91bin_91op_scheme_base = &c_7316778; 
  mclosure0(c_7316768, (function_type)__lambda_256);c_7316768.num_args = 2; 
  __glo_call_91with_91port_scheme_base = &c_7316768; 
  mclosure0(c_7316753, (function_type)__lambda_252);c_7316753.num_args = 3; 
  __glo_dynamic_91wind_scheme_base = &c_7316753; 
  mclosure0(c_7316726, (function_type)__lambda_250);c_7316726.num_args = 2; 
  __glo_call_91with_91values_scheme_base = &c_7316726; 
  mclosure0(c_7316706, (function_type)__lambda_249);c_7316706.num_args = 0; 
  __glo_values_scheme_base = &c_7316706; 
  mmacro(c_7316699, (function_type)__lambda_248);c_7316699.num_args = 3; 
  __glo_syntax_91error_scheme_base = &c_7316699; 
  mmacro(c_7316366, (function_type)__lambda_213);c_7316366.num_args = 3; 
  __glo_quasiquote_scheme_base = &c_7316366; 
  mmacro(c_7316131, (function_type)__lambda_189);c_7316131.num_args = 3; 
  __glo__do_scheme_base = &c_7316131; 
  mmacro(c_7316060, (function_type)__lambda_182);c_7316060.num_args = 3; 
  __glo_unless_scheme_base = &c_7316060; 
  mmacro(c_7315995, (function_type)__lambda_175);c_7315995.num_args = 3; 
  __glo_when_scheme_base = &c_7315995; 
  mmacro(c_7315641, (function_type)__lambda_142);c_7315641.num_args = 3; 
  __glo__case_scheme_base = &c_7315641; 
  mmacro(c_7315449, (function_type)__lambda_121);c_7315449.num_args = 3; 
  __glo_cond_scheme_base = &c_7315449; 
  mmacro(c_7315033, (function_type)__lambda_84);c_7315033.num_args = 3; 
  __glo_cond_91expand_scheme_base = &c_7315033; 
  mmacro(c_7314950, (function_type)__lambda_75);c_7314950.num_args = 3; 
  __glo_begin_scheme_base = &c_7314950; 
  mmacro(c_7314856, (function_type)__lambda_58);c_7314856.num_args = 3; 
  __glo_letrec_scheme_base = &c_7314856; 
  mmacro(c_7314714, (function_type)__lambda_43);c_7314714.num_args = 3; 
  __glo_let_85_scheme_base = &c_7314714; 
  mmacro(c_7314514, (function_type)__lambda_24);c_7314514.num_args = 3; 
  __glo_let_scheme_base = &c_7314514; 
  mmacro(c_7314450, (function_type)__lambda_17);c_7314450.num_args = 3; 
  __glo_or_scheme_base = &c_7314450; 
  mmacro(c_7314415, (function_type)__lambda_14);c_7314415.num_args = 3; 
  __glo_and_scheme_base = &c_7314415; 
  mclosure0(c_7314413, (function_type)__lambda_13);c_7314413.num_args = 0; 
  __glo_Cyc_91version_scheme_base = &c_7314413; 
  mclosure0(c_7314401, (function_type)__lambda_11);c_7314401.num_args = 1; 
  __glo_Cyc_91add_91feature_67_scheme_base = &c_7314401; 
  mclosure0(c_7314328, (function_type)__lambda_3);c_7314328.num_args = 0; 
  __glo_features_scheme_base = &c_7314328; 
  mclosure0(c_7314322, (function_type)__lambda_1);c_7314322.num_args = 2; 
  __glo_call_95cc_scheme_base = &c_7314322; 
  __glo_record_91marker_scheme_base = boolean_f; 
  __glo_identifier_127_scheme_base = boolean_f; 
  __glo_open_91output_91bytevector_scheme_base = boolean_f; 
  __glo_truncate_91remainder_scheme_base = boolean_f; 
  __glo_truncate_91quotient_scheme_base = boolean_f; 
  __glo_lcm_scheme_base = boolean_f; 
  __glo_gcd_scheme_base = boolean_f; 
  __glo_rational_127_scheme_base = boolean_f; 
  __glo_error_91object_91irritants_scheme_base = boolean_f; 
  __glo_error_91object_91message_scheme_base = boolean_f; 
  __glo_current_91error_91port_scheme_base = boolean_f; 
  __glo_current_91input_91port_scheme_base = boolean_f; 
  __glo_current_91output_91port_scheme_base = boolean_f; 
  __glo__85parameter_91id_85_scheme_base = obj_int2obj(0); 
  __glo_call_91with_91current_91continuation_scheme_base = boolean_f; 
  __glo__85other_91features_85_scheme_base = boolean_f; 

  mclosure0(clo_7328923, c_schemebase_inlinable_lambdas); make_pair(pair_7328922, find_or_add_symbol("c_schemebase_inlinable_lambdas"), &clo_7328923);
  make_cvar(cvar_7328924, (object *)&__glo_lib_91init_117schemebase_scheme_base);make_pair(pair_7328925, find_or_add_symbol("lib-init:schemebase"), &cvar_7328924);
  make_cvar(cvar_7328926, (object *)&__glo_define_91values_scheme_base);make_pair(pair_7328927, find_or_add_symbol("define-values"), &cvar_7328926);
  make_cvar(cvar_7328928, (object *)&__glo_define_91record_91type_scheme_base);make_pair(pair_7328929, find_or_add_symbol("define-record-type"), &cvar_7328928);
  make_cvar(cvar_7328930, (object *)&__glo_is_91a_127_scheme_base);make_pair(pair_7328931, find_or_add_symbol("is-a?"), &cvar_7328930);
  make_cvar(cvar_7328932, (object *)&__glo_record_127_scheme_base);make_pair(pair_7328933, find_or_add_symbol("record?"), &cvar_7328932);
  make_cvar(cvar_7328934, (object *)&__glo__191list_91index_scheme_base);make_pair(pair_7328935, find_or_add_symbol("_list-index"), &cvar_7328934);
  make_cvar(cvar_7328936, (object *)&__glo_make_91setter_scheme_base);make_pair(pair_7328937, find_or_add_symbol("make-setter"), &cvar_7328936);
  make_cvar(cvar_7328938, (object *)&__glo_make_91getter_scheme_base);make_pair(pair_7328939, find_or_add_symbol("make-getter"), &cvar_7328938);
  make_cvar(cvar_7328940, (object *)&__glo_slot_91ref_scheme_base);make_pair(pair_7328941, find_or_add_symbol("slot-ref"), &cvar_7328940);
  make_cvar(cvar_7328942, (object *)&__glo_slot_91set_67_scheme_base);make_pair(pair_7328943, find_or_add_symbol("slot-set!"), &cvar_7328942);
  make_cvar(cvar_7328944, (object *)&__glo_type_91slot_91offset_scheme_base);make_pair(pair_7328945, find_or_add_symbol("type-slot-offset"), &cvar_7328944);
  make_cvar(cvar_7328946, (object *)&__glo_make_91constructor_95args_scheme_base);make_pair(pair_7328947, find_or_add_symbol("make-constructor/args"), &cvar_7328946);
  make_cvar(cvar_7328948, (object *)&__glo_make_91constructor_scheme_base);make_pair(pair_7328949, find_or_add_symbol("make-constructor"), &cvar_7328948);
  make_cvar(cvar_7328950, (object *)&__glo_make_91type_91predicate_scheme_base);make_pair(pair_7328951, find_or_add_symbol("make-type-predicate"), &cvar_7328950);
  make_cvar(cvar_7328952, (object *)&__glo_register_91simple_91type_scheme_base);make_pair(pair_7328953, find_or_add_symbol("register-simple-type"), &cvar_7328952);
  make_cvar(cvar_7328954, (object *)&__glo_record_91marker_scheme_base);make_pair(pair_7328955, find_or_add_symbol("record-marker"), &cvar_7328954);
  make_cvar(cvar_7328956, (object *)&__glo_guard_91aux_scheme_base);make_pair(pair_7328957, find_or_add_symbol("guard-aux"), &cvar_7328956);
  make_cvar(cvar_7328958, (object *)&__glo_guard_scheme_base);make_pair(pair_7328959, find_or_add_symbol("guard"), &cvar_7328958);
  make_cvar(cvar_7328960, (object *)&__glo_let_91values_scheme_base);make_pair(pair_7328961, find_or_add_symbol("let-values"), &cvar_7328960);
  make_cvar(cvar_7328962, (object *)&__glo_let_85_91values_scheme_base);make_pair(pair_7328963, find_or_add_symbol("let*-values"), &cvar_7328962);
  make_cvar(cvar_7328964, (object *)&__glo_letrec_85_scheme_base);make_pair(pair_7328965, find_or_add_symbol("letrec*"), &cvar_7328964);
  make_cvar(cvar_7328966, (object *)&__glo_syntax_91rules_scheme_base);make_pair(pair_7328967, find_or_add_symbol("syntax-rules"), &cvar_7328966);
  make_cvar(cvar_7328968, (object *)&__glo_cons_91source_scheme_base);make_pair(pair_7328969, find_or_add_symbol("cons-source"), &cvar_7328968);
  make_cvar(cvar_7328970, (object *)&__glo_find_scheme_base);make_pair(pair_7328971, find_or_add_symbol("find"), &cvar_7328970);
  make_cvar(cvar_7328972, (object *)&__glo_find_91tail_scheme_base);make_pair(pair_7328973, find_or_add_symbol("find-tail"), &cvar_7328972);
  make_cvar(cvar_7328974, (object *)&__glo_identifier_127_scheme_base);make_pair(pair_7328975, find_or_add_symbol("identifier?"), &cvar_7328974);
  make_cvar(cvar_7328976, (object *)&__glo_open_91output_91bytevector_scheme_base);make_pair(pair_7328977, find_or_add_symbol("open-output-bytevector"), &cvar_7328976);
  make_cvar(cvar_7328978, (object *)&__glo_open_91input_91bytevector_scheme_base);make_pair(pair_7328979, find_or_add_symbol("open-input-bytevector"), &cvar_7328978);
  make_cvar(cvar_7328980, (object *)&__glo_get_91output_91bytevector_scheme_base);make_pair(pair_7328981, find_or_add_symbol("get-output-bytevector"), &cvar_7328980);
  make_cvar(cvar_7328982, (object *)&__glo_get_91output_91string_scheme_base);make_pair(pair_7328983, find_or_add_symbol("get-output-string"), &cvar_7328982);
  make_cvar(cvar_7328984, (object *)&__glo_open_91output_91string_scheme_base);make_pair(pair_7328985, find_or_add_symbol("open-output-string"), &cvar_7328984);
  make_cvar(cvar_7328986, (object *)&__glo_open_91input_91string_scheme_base);make_pair(pair_7328987, find_or_add_symbol("open-input-string"), &cvar_7328986);
  make_cvar(cvar_7328988, (object *)&__glo_output_91port_91open_127_scheme_base);make_pair(pair_7328989, find_or_add_symbol("output-port-open?"), &cvar_7328988);
  make_cvar(cvar_7328990, (object *)&__glo_input_91port_91open_127_scheme_base);make_pair(pair_7328991, find_or_add_symbol("input-port-open?"), &cvar_7328990);
  make_cvar(cvar_7328992, (object *)&__glo_output_91port_127_scheme_base);make_pair(pair_7328993, find_or_add_symbol("output-port?"), &cvar_7328992);
  make_cvar(cvar_7328994, (object *)&__glo_input_91port_127_scheme_base);make_pair(pair_7328995, find_or_add_symbol("input-port?"), &cvar_7328994);
  make_cvar(cvar_7328996, (object *)&__glo_make_91record_91marker_scheme_base);make_pair(pair_7328997, find_or_add_symbol("make-record-marker"), &cvar_7328996);
  make_cvar(cvar_7328998, (object *)&__glo_make_91record_91marker_191_191inline_191_191_scheme_base);make_pair(pair_7328999, find_or_add_symbol("make-record-marker__inline__"), &cvar_7328998);
  make_cvar(cvar_7329000, (object *)&__glo__void_scheme_base);make_pair(pair_7329001, find_or_add_symbol("void"), &cvar_7329000);
  make_cvar(cvar_7329002, (object *)&__glo_void_191_191inline_191_191_scheme_base);make_pair(pair_7329003, find_or_add_symbol("void__inline__"), &cvar_7329002);
  make_cvar(cvar_7329004, (object *)&__glo_eof_91object_scheme_base);make_pair(pair_7329005, find_or_add_symbol("eof-object"), &cvar_7329004);
  make_cvar(cvar_7329006, (object *)&__glo_eof_91object_191_191inline_191_191_scheme_base);make_pair(pair_7329007, find_or_add_symbol("eof-object__inline__"), &cvar_7329006);
  make_cvar(cvar_7329008, (object *)&__glo_expt_scheme_base);make_pair(pair_7329009, find_or_add_symbol("expt"), &cvar_7329008);
  make_cvar(cvar_7329010, (object *)&__glo_square_191_191inline_191_191_scheme_base);make_pair(pair_7329011, find_or_add_symbol("square__inline__"), &cvar_7329010);
  make_cvar(cvar_7329012, (object *)&__glo_square_scheme_base);make_pair(pair_7329013, find_or_add_symbol("square"), &cvar_7329012);
  make_cvar(cvar_7329014, (object *)&__glo_floor_95_scheme_base);make_pair(pair_7329015, find_or_add_symbol("floor/"), &cvar_7329014);
  make_cvar(cvar_7329016, (object *)&__glo_floor_91remainder_scheme_base);make_pair(pair_7329017, find_or_add_symbol("floor-remainder"), &cvar_7329016);
  make_cvar(cvar_7329018, (object *)&__glo_floor_91quotient_scheme_base);make_pair(pair_7329019, find_or_add_symbol("floor-quotient"), &cvar_7329018);
  make_cvar(cvar_7329020, (object *)&__glo_truncate_95_scheme_base);make_pair(pair_7329021, find_or_add_symbol("truncate/"), &cvar_7329020);
  make_cvar(cvar_7329022, (object *)&__glo_truncate_91remainder_scheme_base);make_pair(pair_7329023, find_or_add_symbol("truncate-remainder"), &cvar_7329022);
  make_cvar(cvar_7329024, (object *)&__glo_truncate_91quotient_scheme_base);make_pair(pair_7329025, find_or_add_symbol("truncate-quotient"), &cvar_7329024);
  make_cvar(cvar_7329026, (object *)&__glo_quotient_191_191inline_191_191_scheme_base);make_pair(pair_7329027, find_or_add_symbol("quotient__inline__"), &cvar_7329026);
  make_cvar(cvar_7329028, (object *)&__glo_quotient_scheme_base);make_pair(pair_7329029, find_or_add_symbol("quotient"), &cvar_7329028);
  make_cvar(cvar_7329030, (object *)&__glo_fixnum_127_scheme_base);make_pair(pair_7329031, find_or_add_symbol("fixnum?"), &cvar_7329030);
  make_cvar(cvar_7329032, (object *)&__glo_fixnum_127_191_191inline_191_191_scheme_base);make_pair(pair_7329033, find_or_add_symbol("fixnum?__inline__"), &cvar_7329032);
  make_cvar(cvar_7329034, (object *)&__glo_denominator_scheme_base);make_pair(pair_7329035, find_or_add_symbol("denominator"), &cvar_7329034);
  make_cvar(cvar_7329036, (object *)&__glo_numerator_scheme_base);make_pair(pair_7329037, find_or_add_symbol("numerator"), &cvar_7329036);
  make_cvar(cvar_7329038, (object *)&__glo_lcm_95entry_scheme_base);make_pair(pair_7329039, find_or_add_symbol("lcm/entry"), &cvar_7329038);
  make_cvar(cvar_7329040, (object *)&__glo_lcm_95main_scheme_base);make_pair(pair_7329041, find_or_add_symbol("lcm/main"), &cvar_7329040);
  make_cvar(cvar_7329042, (object *)&__glo_gcd_95entry_scheme_base);make_pair(pair_7329043, find_or_add_symbol("gcd/entry"), &cvar_7329042);
  make_cvar(cvar_7329044, (object *)&__glo_gcd_95main_scheme_base);make_pair(pair_7329045, find_or_add_symbol("gcd/main"), &cvar_7329044);
  make_cvar(cvar_7329046, (object *)&__glo_lcm_scheme_base);make_pair(pair_7329047, find_or_add_symbol("lcm"), &cvar_7329046);
  make_cvar(cvar_7329048, (object *)&__glo_gcd_scheme_base);make_pair(pair_7329049, find_or_add_symbol("gcd"), &cvar_7329048);
  make_cvar(cvar_7329050, (object *)&__glo_min_scheme_base);make_pair(pair_7329051, find_or_add_symbol("min"), &cvar_7329050);
  make_cvar(cvar_7329052, (object *)&__glo_max_scheme_base);make_pair(pair_7329053, find_or_add_symbol("max"), &cvar_7329052);
  make_cvar(cvar_7329054, (object *)&__glo_rationalize_scheme_base);make_pair(pair_7329055, find_or_add_symbol("rationalize"), &cvar_7329054);
  make_cvar(cvar_7329056, (object *)&__glo_rational_127_scheme_base);make_pair(pair_7329057, find_or_add_symbol("rational?"), &cvar_7329056);
  make_cvar(cvar_7329058, (object *)&__glo_complex_127_scheme_base);make_pair(pair_7329059, find_or_add_symbol("complex?"), &cvar_7329058);
  make_cvar(cvar_7329060, (object *)&__glo_complex_127_191_191inline_191_191_scheme_base);make_pair(pair_7329061, find_or_add_symbol("complex?__inline__"), &cvar_7329060);
  make_cvar(cvar_7329062, (object *)&__glo_inexact_127_scheme_base);make_pair(pair_7329063, find_or_add_symbol("inexact?"), &cvar_7329062);
  make_cvar(cvar_7329064, (object *)&__glo_exact_127_scheme_base);make_pair(pair_7329065, find_or_add_symbol("exact?"), &cvar_7329064);
  make_cvar(cvar_7329066, (object *)&__glo_exact_127_191_191inline_191_191_scheme_base);make_pair(pair_7329067, find_or_add_symbol("exact?__inline__"), &cvar_7329066);
  make_cvar(cvar_7329068, (object *)&__glo_exact_91integer_127_scheme_base);make_pair(pair_7329069, find_or_add_symbol("exact-integer?"), &cvar_7329068);
  make_cvar(cvar_7329070, (object *)&__glo_exact_91integer_127_191_191inline_191_191_scheme_base);make_pair(pair_7329071, find_or_add_symbol("exact-integer?__inline__"), &cvar_7329070);
  make_cvar(cvar_7329072, (object *)&__glo_sqrt_scheme_base);make_pair(pair_7329073, find_or_add_symbol("sqrt"), &cvar_7329072);
  make_cvar(cvar_7329074, (object *)&__glo_sqrt_191_191inline_191_191_scheme_base);make_pair(pair_7329075, find_or_add_symbol("sqrt__inline__"), &cvar_7329074);
  make_cvar(cvar_7329076, (object *)&__glo_exact_91integer_91sqrt_scheme_base);make_pair(pair_7329077, find_or_add_symbol("exact-integer-sqrt"), &cvar_7329076);
  make_cvar(cvar_7329078, (object *)&__glo_bignum_91sqrt_scheme_base);make_pair(pair_7329079, find_or_add_symbol("bignum-sqrt"), &cvar_7329078);
  make_cvar(cvar_7329080, (object *)&__glo_bignum_127_scheme_base);make_pair(pair_7329081, find_or_add_symbol("bignum?"), &cvar_7329080);
  make_cvar(cvar_7329082, (object *)&__glo_even_127_scheme_base);make_pair(pair_7329083, find_or_add_symbol("even?"), &cvar_7329082);
  make_cvar(cvar_7329084, (object *)&__glo_odd_127_scheme_base);make_pair(pair_7329085, find_or_add_symbol("odd?"), &cvar_7329084);
  make_cvar(cvar_7329086, (object *)&__glo_modulo_scheme_base);make_pair(pair_7329087, find_or_add_symbol("modulo"), &cvar_7329086);
  make_cvar(cvar_7329088, (object *)&__glo_remainder_scheme_base);make_pair(pair_7329089, find_or_add_symbol("remainder"), &cvar_7329088);
  make_cvar(cvar_7329090, (object *)&__glo_abs_scheme_base);make_pair(pair_7329091, find_or_add_symbol("abs"), &cvar_7329090);
  make_cvar(cvar_7329092, (object *)&__glo_inexact_scheme_base);make_pair(pair_7329093, find_or_add_symbol("inexact"), &cvar_7329092);
  make_cvar(cvar_7329094, (object *)&__glo_inexact_191_191inline_191_191_scheme_base);make_pair(pair_7329095, find_or_add_symbol("inexact__inline__"), &cvar_7329094);
  make_cvar(cvar_7329096, (object *)&__glo_exact_scheme_base);make_pair(pair_7329097, find_or_add_symbol("exact"), &cvar_7329096);
  make_cvar(cvar_7329098, (object *)&__glo_exact_191_191inline_191_191_scheme_base);make_pair(pair_7329099, find_or_add_symbol("exact__inline__"), &cvar_7329098);
  make_cvar(cvar_7329100, (object *)&__glo_round_scheme_base);make_pair(pair_7329101, find_or_add_symbol("round"), &cvar_7329100);
  make_cvar(cvar_7329102, (object *)&__glo_round_191_191inline_191_191_scheme_base);make_pair(pair_7329103, find_or_add_symbol("round__inline__"), &cvar_7329102);
  make_cvar(cvar_7329104, (object *)&__glo_truncate_scheme_base);make_pair(pair_7329105, find_or_add_symbol("truncate"), &cvar_7329104);
  make_cvar(cvar_7329106, (object *)&__glo_truncate_191_191inline_191_191_scheme_base);make_pair(pair_7329107, find_or_add_symbol("truncate__inline__"), &cvar_7329106);
  make_cvar(cvar_7329108, (object *)&__glo_ceiling_scheme_base);make_pair(pair_7329109, find_or_add_symbol("ceiling"), &cvar_7329108);
  make_cvar(cvar_7329110, (object *)&__glo_ceiling_191_191inline_191_191_scheme_base);make_pair(pair_7329111, find_or_add_symbol("ceiling__inline__"), &cvar_7329110);
  make_cvar(cvar_7329112, (object *)&__glo_floor_scheme_base);make_pair(pair_7329113, find_or_add_symbol("floor"), &cvar_7329112);
  make_cvar(cvar_7329114, (object *)&__glo_floor_191_191inline_191_191_scheme_base);make_pair(pair_7329115, find_or_add_symbol("floor__inline__"), &cvar_7329114);
  make_cvar(cvar_7329116, (object *)&__glo_every_scheme_base);make_pair(pair_7329117, find_or_add_symbol("every"), &cvar_7329116);
  make_cvar(cvar_7329118, (object *)&__glo_any_scheme_base);make_pair(pair_7329119, find_or_add_symbol("any"), &cvar_7329118);
  make_cvar(cvar_7329120, (object *)&__glo_error_95loc_scheme_base);make_pair(pair_7329121, find_or_add_symbol("error/loc"), &cvar_7329120);
  make_cvar(cvar_7329122, (object *)&__glo_Cyc_91remove_91exception_91handler_scheme_base);make_pair(pair_7329123, find_or_add_symbol("Cyc-remove-exception-handler"), &cvar_7329122);
  make_cvar(cvar_7329124, (object *)&__glo_Cyc_91add_91exception_91handler_scheme_base);make_pair(pair_7329125, find_or_add_symbol("Cyc-add-exception-handler"), &cvar_7329124);
  make_cvar(cvar_7329126, (object *)&__glo_with_91exception_91handler_scheme_base);make_pair(pair_7329127, find_or_add_symbol("with-exception-handler"), &cvar_7329126);
  make_cvar(cvar_7329128, (object *)&__glo_with_91handler_scheme_base);make_pair(pair_7329129, find_or_add_symbol("with-handler"), &cvar_7329128);
  make_cvar(cvar_7329130, (object *)&__glo_raise_91continuable_scheme_base);make_pair(pair_7329131, find_or_add_symbol("raise-continuable"), &cvar_7329130);
  make_cvar(cvar_7329132, (object *)&__glo_raise_scheme_base);make_pair(pair_7329133, find_or_add_symbol("raise"), &cvar_7329132);
  make_cvar(cvar_7329134, (object *)&__glo_error_scheme_base);make_pair(pair_7329135, find_or_add_symbol("error"), &cvar_7329134);
  make_cvar(cvar_7329136, (object *)&__glo_error_91object_91irritants_scheme_base);make_pair(pair_7329137, find_or_add_symbol("error-object-irritants"), &cvar_7329136);
  make_cvar(cvar_7329138, (object *)&__glo_error_91object_91message_scheme_base);make_pair(pair_7329139, find_or_add_symbol("error-object-message"), &cvar_7329138);
  make_cvar(cvar_7329140, (object *)&__glo_error_91object_127_scheme_base);make_pair(pair_7329141, find_or_add_symbol("error-object?"), &cvar_7329140);
  make_cvar(cvar_7329142, (object *)&__glo_current_91error_91port_scheme_base);make_pair(pair_7329143, find_or_add_symbol("current-error-port"), &cvar_7329142);
  make_cvar(cvar_7329144, (object *)&__glo_current_91input_91port_scheme_base);make_pair(pair_7329145, find_or_add_symbol("current-input-port"), &cvar_7329144);
  make_cvar(cvar_7329146, (object *)&__glo_current_91output_91port_scheme_base);make_pair(pair_7329147, find_or_add_symbol("current-output-port"), &cvar_7329146);
  make_cvar(cvar_7329148, (object *)&__glo_make_91parameter_scheme_base);make_pair(pair_7329149, find_or_add_symbol("make-parameter"), &cvar_7329148);
  make_cvar(cvar_7329150, (object *)&__glo__85parameter_91id_85_scheme_base);make_pair(pair_7329151, find_or_add_symbol("*parameter-id*"), &cvar_7329150);
  make_cvar(cvar_7329152, (object *)&__glo_set_91param_91obj_67_scheme_base);make_pair(pair_7329153, find_or_add_symbol("set-param-obj!"), &cvar_7329152);
  make_cvar(cvar_7329154, (object *)&__glo_get_91param_91objs_scheme_base);make_pair(pair_7329155, find_or_add_symbol("get-param-objs"), &cvar_7329154);
  make_cvar(cvar_7329156, (object *)&__glo_parameterize_scheme_base);make_pair(pair_7329157, find_or_add_symbol("parameterize"), &cvar_7329156);
  make_cvar(cvar_7329158, (object *)&__glo_Cyc_91make_91string_scheme_base);make_pair(pair_7329159, find_or_add_symbol("Cyc-make-string"), &cvar_7329158);
  make_cvar(cvar_7329160, (object *)&__glo_make_91string_scheme_base);make_pair(pair_7329161, find_or_add_symbol("make-string"), &cvar_7329160);
  make_cvar(cvar_7329162, (object *)&__glo_string_scheme_base);make_pair(pair_7329163, find_or_add_symbol("string"), &cvar_7329162);
  make_cvar(cvar_7329164, (object *)&__glo_Cyc_91obj_123_127_scheme_base);make_pair(pair_7329165, find_or_add_symbol("Cyc-obj=?"), &cvar_7329164);
  make_cvar(cvar_7329166, (object *)&__glo_symbol_123_127_scheme_base);make_pair(pair_7329167, find_or_add_symbol("symbol=?"), &cvar_7329166);
  make_cvar(cvar_7329168, (object *)&__glo_boolean_123_127_scheme_base);make_pair(pair_7329169, find_or_add_symbol("boolean=?"), &cvar_7329168);
  make_cvar(cvar_7329170, (object *)&__glo_vector_91fill_67_scheme_base);make_pair(pair_7329171, find_or_add_symbol("vector-fill!"), &cvar_7329170);
  make_cvar(cvar_7329172, (object *)&__glo_vector_91copy_67_scheme_base);make_pair(pair_7329173, find_or_add_symbol("vector-copy!"), &cvar_7329172);
  make_cvar(cvar_7329174, (object *)&__glo_vector_91copy_scheme_base);make_pair(pair_7329175, find_or_add_symbol("vector-copy"), &cvar_7329174);
  make_cvar(cvar_7329176, (object *)&__glo_vector_91append_scheme_base);make_pair(pair_7329177, find_or_add_symbol("vector-append"), &cvar_7329176);
  make_cvar(cvar_7329178, (object *)&__glo_vector_91for_91each_scheme_base);make_pair(pair_7329179, find_or_add_symbol("vector-for-each"), &cvar_7329178);
  make_cvar(cvar_7329180, (object *)&__glo_vector_91map_scheme_base);make_pair(pair_7329181, find_or_add_symbol("vector-map"), &cvar_7329180);
  make_cvar(cvar_7329182, (object *)&__glo_string_91for_91each_scheme_base);make_pair(pair_7329183, find_or_add_symbol("string-for-each"), &cvar_7329182);
  make_cvar(cvar_7329184, (object *)&__glo_string_91map_scheme_base);make_pair(pair_7329185, find_or_add_symbol("string-map"), &cvar_7329184);
  make_cvar(cvar_7329186, (object *)&__glo_string_91fill_67_scheme_base);make_pair(pair_7329187, find_or_add_symbol("string-fill!"), &cvar_7329186);
  make_cvar(cvar_7329188, (object *)&__glo_string_91copy_67_scheme_base);make_pair(pair_7329189, find_or_add_symbol("string-copy!"), &cvar_7329188);
  make_cvar(cvar_7329190, (object *)&__glo_string_91copy_scheme_base);make_pair(pair_7329191, find_or_add_symbol("string-copy"), &cvar_7329190);
  make_cvar(cvar_7329192, (object *)&__glo_string_91_125vector_scheme_base);make_pair(pair_7329193, find_or_add_symbol("string->vector"), &cvar_7329192);
  make_cvar(cvar_7329194, (object *)&__glo_string_91_125list_scheme_base);make_pair(pair_7329195, find_or_add_symbol("string->list"), &cvar_7329194);
  make_cvar(cvar_7329196, (object *)&__glo_vector_91_125string_scheme_base);make_pair(pair_7329197, find_or_add_symbol("vector->string"), &cvar_7329196);
  make_cvar(cvar_7329198, (object *)&__glo_string_91_125utf8_scheme_base);make_pair(pair_7329199, find_or_add_symbol("string->utf8"), &cvar_7329198);
  make_cvar(cvar_7329200, (object *)&__glo_utf8_91_125string_scheme_base);make_pair(pair_7329201, find_or_add_symbol("utf8->string"), &cvar_7329200);
  make_cvar(cvar_7329202, (object *)&__glo_bytevector_91copy_67_scheme_base);make_pair(pair_7329203, find_or_add_symbol("bytevector-copy!"), &cvar_7329202);
  make_cvar(cvar_7329204, (object *)&__glo_bytevector_91copy_scheme_base);make_pair(pair_7329205, find_or_add_symbol("bytevector-copy"), &cvar_7329204);
  make_cvar(cvar_7329206, (object *)&__glo_vector_91_125list_scheme_base);make_pair(pair_7329207, find_or_add_symbol("vector->list"), &cvar_7329206);
  make_cvar(cvar_7329208, (object *)&__glo_vector_scheme_base);make_pair(pair_7329209, find_or_add_symbol("vector"), &cvar_7329208);
  make_cvar(cvar_7329210, (object *)&__glo_reverse_scheme_base);make_pair(pair_7329211, find_or_add_symbol("reverse"), &cvar_7329210);
  make_cvar(cvar_7329212, (object *)&__glo_list_91set_67_scheme_base);make_pair(pair_7329213, find_or_add_symbol("list-set!"), &cvar_7329212);
  make_cvar(cvar_7329214, (object *)&__glo_list_91ref_scheme_base);make_pair(pair_7329215, find_or_add_symbol("list-ref"), &cvar_7329214);
  make_cvar(cvar_7329216, (object *)&__glo_list_91tail_scheme_base);make_pair(pair_7329217, find_or_add_symbol("list-tail"), &cvar_7329216);
  make_cvar(cvar_7329218, (object *)&__glo_for_91each_scheme_base);make_pair(pair_7329219, find_or_add_symbol("for-each"), &cvar_7329218);
  make_cvar(cvar_7329220, (object *)&__glo_Cyc_91for_91each_91loop_912_scheme_base);make_pair(pair_7329221, find_or_add_symbol("Cyc-for-each-loop-2"), &cvar_7329220);
  make_cvar(cvar_7329222, (object *)&__glo_Cyc_91for_91each_91loop_911_scheme_base);make_pair(pair_7329223, find_or_add_symbol("Cyc-for-each-loop-1"), &cvar_7329222);
  make_cvar(cvar_7329224, (object *)&__glo_Cyc_91map_91loop_912_scheme_base);make_pair(pair_7329225, find_or_add_symbol("Cyc-map-loop-2"), &cvar_7329224);
  make_cvar(cvar_7329226, (object *)&__glo_Cyc_91map_91loop_911_scheme_base);make_pair(pair_7329227, find_or_add_symbol("Cyc-map-loop-1"), &cvar_7329226);
  make_cvar(cvar_7329228, (object *)&__glo_map_scheme_base);make_pair(pair_7329229, find_or_add_symbol("map"), &cvar_7329228);
  make_cvar(cvar_7329230, (object *)&__glo__75cars_87cdrs_scheme_base);make_pair(pair_7329231, find_or_add_symbol("%cars+cdrs"), &cvar_7329230);
  make_cvar(cvar_7329232, (object *)&__glo_car_87cdr_scheme_base);make_pair(pair_7329233, find_or_add_symbol("car+cdr"), &cvar_7329232);
  make_cvar(cvar_7329234, (object *)&__glo_receive_scheme_base);make_pair(pair_7329235, find_or_add_symbol("receive"), &cvar_7329234);
  make_cvar(cvar_7329236, (object *)&__glo_list_91copy_scheme_base);make_pair(pair_7329237, find_or_add_symbol("list-copy"), &cvar_7329236);
  make_cvar(cvar_7329238, (object *)&__glo_make_91list_scheme_base);make_pair(pair_7329239, find_or_add_symbol("make-list"), &cvar_7329238);
  make_cvar(cvar_7329240, (object *)&__glo__list_scheme_base);make_pair(pair_7329241, find_or_add_symbol("list"), &cvar_7329240);
  make_cvar(cvar_7329242, (object *)&__glo_append_scheme_base);make_pair(pair_7329243, find_or_add_symbol("append"), &cvar_7329242);
  make_cvar(cvar_7329244, (object *)&__glo_negative_127_191_191inline_191_191_scheme_base);make_pair(pair_7329245, find_or_add_symbol("negative?__inline__"), &cvar_7329244);
  make_cvar(cvar_7329246, (object *)&__glo_negative_127_scheme_base);make_pair(pair_7329247, find_or_add_symbol("negative?"), &cvar_7329246);
  make_cvar(cvar_7329248, (object *)&__glo_positive_127_191_191inline_191_191_scheme_base);make_pair(pair_7329249, find_or_add_symbol("positive?__inline__"), &cvar_7329248);
  make_cvar(cvar_7329250, (object *)&__glo_positive_127_scheme_base);make_pair(pair_7329251, find_or_add_symbol("positive?"), &cvar_7329250);
  make_cvar(cvar_7329252, (object *)&__glo_zero_127_191_191inline_191_191_scheme_base);make_pair(pair_7329253, find_or_add_symbol("zero?__inline__"), &cvar_7329252);
  make_cvar(cvar_7329254, (object *)&__glo_zero_127_scheme_base);make_pair(pair_7329255, find_or_add_symbol("zero?"), &cvar_7329254);
  make_cvar(cvar_7329256, (object *)&__glo_list_127_scheme_base);make_pair(pair_7329257, find_or_add_symbol("list?"), &cvar_7329256);
  make_cvar(cvar_7329258, (object *)&__glo_list_127_191_191inline_191_191_scheme_base);make_pair(pair_7329259, find_or_add_symbol("list?__inline__"), &cvar_7329258);
  make_cvar(cvar_7329260, (object *)&__glo_not_191_191inline_191_191_scheme_base);make_pair(pair_7329261, find_or_add_symbol("not__inline__"), &cvar_7329260);
  make_cvar(cvar_7329262, (object *)&__glo_not_scheme_base);make_pair(pair_7329263, find_or_add_symbol("not"), &cvar_7329262);
  make_cvar(cvar_7329264, (object *)&__glo_newline_scheme_base);make_pair(pair_7329265, find_or_add_symbol("newline"), &cvar_7329264);
  make_cvar(cvar_7329266, (object *)&__glo_write_91char_scheme_base);make_pair(pair_7329267, find_or_add_symbol("write-char"), &cvar_7329266);
  make_cvar(cvar_7329268, (object *)&__glo__75write_91bytevector_scheme_base);make_pair(pair_7329269, find_or_add_symbol("%write-bytevector"), &cvar_7329268);
  make_cvar(cvar_7329270, (object *)&__glo__75write_91bytevector_191_191inline_191_191_scheme_base);make_pair(pair_7329271, find_or_add_symbol("%write-bytevector__inline__"), &cvar_7329270);
  make_cvar(cvar_7329272, (object *)&__glo_write_91bytevector_scheme_base);make_pair(pair_7329273, find_or_add_symbol("write-bytevector"), &cvar_7329272);
  make_cvar(cvar_7329274, (object *)&__glo_read_91bytevector_67_scheme_base);make_pair(pair_7329275, find_or_add_symbol("read-bytevector!"), &cvar_7329274);
  make_cvar(cvar_7329276, (object *)&__glo_read_91bytevector_scheme_base);make_pair(pair_7329277, find_or_add_symbol("read-bytevector"), &cvar_7329276);
  make_cvar(cvar_7329278, (object *)&__glo_write_91string_scheme_base);make_pair(pair_7329279, find_or_add_symbol("write-string"), &cvar_7329278);
  make_cvar(cvar_7329280, (object *)&__glo_write_91string_912_scheme_base);make_pair(pair_7329281, find_or_add_symbol("write-string-2"), &cvar_7329280);
  make_cvar(cvar_7329282, (object *)&__glo_write_91string_911_scheme_base);make_pair(pair_7329283, find_or_add_symbol("write-string-1"), &cvar_7329282);
  make_cvar(cvar_7329284, (object *)&__glo_flush_91output_91port_scheme_base);make_pair(pair_7329285, find_or_add_symbol("flush-output-port"), &cvar_7329284);
  make_cvar(cvar_7329286, (object *)&__glo_textual_91port_127_scheme_base);make_pair(pair_7329287, find_or_add_symbol("textual-port?"), &cvar_7329286);
  make_cvar(cvar_7329288, (object *)&__glo_binary_91port_127_scheme_base);make_pair(pair_7329289, find_or_add_symbol("binary-port?"), &cvar_7329288);
  make_cvar(cvar_7329290, (object *)&__glo__191binary_91port_127_scheme_base);make_pair(pair_7329291, find_or_add_symbol("_binary-port?"), &cvar_7329290);
  make_cvar(cvar_7329292, (object *)&__glo_read_91string_scheme_base);make_pair(pair_7329293, find_or_add_symbol("read-string"), &cvar_7329292);
  make_cvar(cvar_7329294, (object *)&__glo__191read_91line_scheme_base);make_pair(pair_7329295, find_or_add_symbol("_read-line"), &cvar_7329294);
  make_cvar(cvar_7329296, (object *)&__glo_read_91line_scheme_base);make_pair(pair_7329297, find_or_add_symbol("read-line"), &cvar_7329296);
  make_cvar(cvar_7329298, (object *)&__glo_read_91char_scheme_base);make_pair(pair_7329299, find_or_add_symbol("read-char"), &cvar_7329298);
  make_cvar(cvar_7329300, (object *)&__glo_peek_91char_scheme_base);make_pair(pair_7329301, find_or_add_symbol("peek-char"), &cvar_7329300);
  make_cvar(cvar_7329302, (object *)&__glo_char_91ready_127_scheme_base);make_pair(pair_7329303, find_or_add_symbol("char-ready?"), &cvar_7329302);
  make_cvar(cvar_7329304, (object *)&__glo_Cyc_91char_91ready_127_scheme_base);make_pair(pair_7329305, find_or_add_symbol("Cyc-char-ready?"), &cvar_7329304);
  make_cvar(cvar_7329306, (object *)&__glo_write_91u8_scheme_base);make_pair(pair_7329307, find_or_add_symbol("write-u8"), &cvar_7329306);
  make_cvar(cvar_7329308, (object *)&__glo_peek_91u8_scheme_base);make_pair(pair_7329309, find_or_add_symbol("peek-u8"), &cvar_7329308);
  make_cvar(cvar_7329310, (object *)&__glo_read_91u8_scheme_base);make_pair(pair_7329311, find_or_add_symbol("read-u8"), &cvar_7329310);
  make_cvar(cvar_7329312, (object *)&__glo__191write_91u8_scheme_base);make_pair(pair_7329313, find_or_add_symbol("_write-u8"), &cvar_7329312);
  make_cvar(cvar_7329314, (object *)&__glo__191peek_91u8_scheme_base);make_pair(pair_7329315, find_or_add_symbol("_peek-u8"), &cvar_7329314);
  make_cvar(cvar_7329316, (object *)&__glo__191read_91u8_scheme_base);make_pair(pair_7329317, find_or_add_symbol("_read-u8"), &cvar_7329316);
  make_cvar(cvar_7329318, (object *)&__glo_foldr_scheme_base);make_pair(pair_7329319, find_or_add_symbol("foldr"), &cvar_7329318);
  make_cvar(cvar_7329320, (object *)&__glo_foldl_scheme_base);make_pair(pair_7329321, find_or_add_symbol("foldl"), &cvar_7329320);
  make_cvar(cvar_7329322, (object *)&__glo_assoc_scheme_base);make_pair(pair_7329323, find_or_add_symbol("assoc"), &cvar_7329322);
  make_cvar(cvar_7329324, (object *)&__glo_assoc_91helper_scheme_base);make_pair(pair_7329325, find_or_add_symbol("assoc-helper"), &cvar_7329324);
  make_cvar(cvar_7329326, (object *)&__glo_member_scheme_base);make_pair(pair_7329327, find_or_add_symbol("member"), &cvar_7329326);
  make_cvar(cvar_7329328, (object *)&__glo_member_91helper_scheme_base);make_pair(pair_7329329, find_or_add_symbol("member-helper"), &cvar_7329328);
  make_cvar(cvar_7329330, (object *)&__glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7329331, find_or_add_symbol("fast-string>=?__inline__"), &cvar_7329330);
  make_cvar(cvar_7329332, (object *)&__glo_fast_91string_125_123_127_scheme_base);make_pair(pair_7329333, find_or_add_symbol("fast-string>=?"), &cvar_7329332);
  make_cvar(cvar_7329334, (object *)&__glo_fast_91string_125_127_191_191inline_191_191_scheme_base);make_pair(pair_7329335, find_or_add_symbol("fast-string>?__inline__"), &cvar_7329334);
  make_cvar(cvar_7329336, (object *)&__glo_fast_91string_125_127_scheme_base);make_pair(pair_7329337, find_or_add_symbol("fast-string>?"), &cvar_7329336);
  make_cvar(cvar_7329338, (object *)&__glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7329339, find_or_add_symbol("fast-string<=?__inline__"), &cvar_7329338);
  make_cvar(cvar_7329340, (object *)&__glo_fast_91string_121_123_127_scheme_base);make_pair(pair_7329341, find_or_add_symbol("fast-string<=?"), &cvar_7329340);
  make_cvar(cvar_7329342, (object *)&__glo_fast_91string_121_127_191_191inline_191_191_scheme_base);make_pair(pair_7329343, find_or_add_symbol("fast-string<?__inline__"), &cvar_7329342);
  make_cvar(cvar_7329344, (object *)&__glo_fast_91string_121_127_scheme_base);make_pair(pair_7329345, find_or_add_symbol("fast-string<?"), &cvar_7329344);
  make_cvar(cvar_7329346, (object *)&__glo_fast_91string_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7329347, find_or_add_symbol("fast-string=?__inline__"), &cvar_7329346);
  make_cvar(cvar_7329348, (object *)&__glo_fast_91string_123_127_scheme_base);make_pair(pair_7329349, find_or_add_symbol("fast-string=?"), &cvar_7329348);
  make_cvar(cvar_7329350, (object *)&__glo_string_125_123_127_scheme_base);make_pair(pair_7329351, find_or_add_symbol("string>=?"), &cvar_7329350);
  make_cvar(cvar_7329352, (object *)&__glo_string_125_127_scheme_base);make_pair(pair_7329353, find_or_add_symbol("string>?"), &cvar_7329352);
  make_cvar(cvar_7329354, (object *)&__glo_string_121_123_127_scheme_base);make_pair(pair_7329355, find_or_add_symbol("string<=?"), &cvar_7329354);
  make_cvar(cvar_7329356, (object *)&__glo_string_121_127_scheme_base);make_pair(pair_7329357, find_or_add_symbol("string<?"), &cvar_7329356);
  make_cvar(cvar_7329358, (object *)&__glo_string_123_127_scheme_base);make_pair(pair_7329359, find_or_add_symbol("string=?"), &cvar_7329358);
  make_cvar(cvar_7329360, (object *)&__glo_char_125_123_127_scheme_base);make_pair(pair_7329361, find_or_add_symbol("char>=?"), &cvar_7329360);
  make_cvar(cvar_7329362, (object *)&__glo_char_121_123_127_scheme_base);make_pair(pair_7329363, find_or_add_symbol("char<=?"), &cvar_7329362);
  make_cvar(cvar_7329364, (object *)&__glo_char_125_127_scheme_base);make_pair(pair_7329365, find_or_add_symbol("char>?"), &cvar_7329364);
  make_cvar(cvar_7329366, (object *)&__glo_char_121_127_scheme_base);make_pair(pair_7329367, find_or_add_symbol("char<?"), &cvar_7329366);
  make_cvar(cvar_7329368, (object *)&__glo_char_123_127_scheme_base);make_pair(pair_7329369, find_or_add_symbol("char=?"), &cvar_7329368);
  make_cvar(cvar_7329370, (object *)&__glo_Cyc_91bin_91op_91char_scheme_base);make_pair(pair_7329371, find_or_add_symbol("Cyc-bin-op-char"), &cvar_7329370);
  make_cvar(cvar_7329372, (object *)&__glo_Cyc_91bin_91op_scheme_base);make_pair(pair_7329373, find_or_add_symbol("Cyc-bin-op"), &cvar_7329372);
  make_cvar(cvar_7329374, (object *)&__glo_call_91with_91port_scheme_base);make_pair(pair_7329375, find_or_add_symbol("call-with-port"), &cvar_7329374);
  make_cvar(cvar_7329376, (object *)&__glo_dynamic_91wind_scheme_base);make_pair(pair_7329377, find_or_add_symbol("dynamic-wind"), &cvar_7329376);
  make_cvar(cvar_7329378, (object *)&__glo_call_91with_91values_scheme_base);make_pair(pair_7329379, find_or_add_symbol("call-with-values"), &cvar_7329378);
  make_cvar(cvar_7329380, (object *)&__glo_values_scheme_base);make_pair(pair_7329381, find_or_add_symbol("values"), &cvar_7329380);
  make_cvar(cvar_7329382, (object *)&__glo_call_91with_91current_91continuation_scheme_base);make_pair(pair_7329383, find_or_add_symbol("call-with-current-continuation"), &cvar_7329382);
  make_cvar(cvar_7329384, (object *)&__glo_syntax_91error_scheme_base);make_pair(pair_7329385, find_or_add_symbol("syntax-error"), &cvar_7329384);
  make_cvar(cvar_7329386, (object *)&__glo_quasiquote_scheme_base);make_pair(pair_7329387, find_or_add_symbol("quasiquote"), &cvar_7329386);
  make_cvar(cvar_7329388, (object *)&__glo__do_scheme_base);make_pair(pair_7329389, find_or_add_symbol("do"), &cvar_7329388);
  make_cvar(cvar_7329390, (object *)&__glo_unless_scheme_base);make_pair(pair_7329391, find_or_add_symbol("unless"), &cvar_7329390);
  make_cvar(cvar_7329392, (object *)&__glo_when_scheme_base);make_pair(pair_7329393, find_or_add_symbol("when"), &cvar_7329392);
  make_cvar(cvar_7329394, (object *)&__glo__case_scheme_base);make_pair(pair_7329395, find_or_add_symbol("case"), &cvar_7329394);
  make_cvar(cvar_7329396, (object *)&__glo_cond_scheme_base);make_pair(pair_7329397, find_or_add_symbol("cond"), &cvar_7329396);
  make_cvar(cvar_7329398, (object *)&__glo_cond_91expand_scheme_base);make_pair(pair_7329399, find_or_add_symbol("cond-expand"), &cvar_7329398);
  make_cvar(cvar_7329400, (object *)&__glo_begin_scheme_base);make_pair(pair_7329401, find_or_add_symbol("begin"), &cvar_7329400);
  make_cvar(cvar_7329402, (object *)&__glo_letrec_scheme_base);make_pair(pair_7329403, find_or_add_symbol("letrec"), &cvar_7329402);
  make_cvar(cvar_7329404, (object *)&__glo_let_85_scheme_base);make_pair(pair_7329405, find_or_add_symbol("let*"), &cvar_7329404);
  make_cvar(cvar_7329406, (object *)&__glo_let_scheme_base);make_pair(pair_7329407, find_or_add_symbol("let"), &cvar_7329406);
  make_cvar(cvar_7329408, (object *)&__glo_or_scheme_base);make_pair(pair_7329409, find_or_add_symbol("or"), &cvar_7329408);
  make_cvar(cvar_7329410, (object *)&__glo_and_scheme_base);make_pair(pair_7329411, find_or_add_symbol("and"), &cvar_7329410);
  make_cvar(cvar_7329412, (object *)&__glo_Cyc_91version_scheme_base);make_pair(pair_7329413, find_or_add_symbol("Cyc-version"), &cvar_7329412);
  make_cvar(cvar_7329414, (object *)&__glo_Cyc_91add_91feature_67_scheme_base);make_pair(pair_7329415, find_or_add_symbol("Cyc-add-feature!"), &cvar_7329414);
  make_cvar(cvar_7329416, (object *)&__glo__85other_91features_85_scheme_base);make_pair(pair_7329417, find_or_add_symbol("*other-features*"), &cvar_7329416);
  make_cvar(cvar_7329418, (object *)&__glo_features_scheme_base);make_pair(pair_7329419, find_or_add_symbol("features"), &cvar_7329418);
  make_cvar(cvar_7329420, (object *)&__glo_call_95cc_scheme_base);make_pair(pair_7329421, find_or_add_symbol("call/cc"), &cvar_7329420);
make_pair(c_7329671, &pair_7328922,Cyc_global_variables);
make_pair(c_7329670, &pair_7328925, &c_7329671);
make_pair(c_7329669, &pair_7328927, &c_7329670);
make_pair(c_7329668, &pair_7328929, &c_7329669);
make_pair(c_7329667, &pair_7328931, &c_7329668);
make_pair(c_7329666, &pair_7328933, &c_7329667);
make_pair(c_7329665, &pair_7328935, &c_7329666);
make_pair(c_7329664, &pair_7328937, &c_7329665);
make_pair(c_7329663, &pair_7328939, &c_7329664);
make_pair(c_7329662, &pair_7328941, &c_7329663);
make_pair(c_7329661, &pair_7328943, &c_7329662);
make_pair(c_7329660, &pair_7328945, &c_7329661);
make_pair(c_7329659, &pair_7328947, &c_7329660);
make_pair(c_7329658, &pair_7328949, &c_7329659);
make_pair(c_7329657, &pair_7328951, &c_7329658);
make_pair(c_7329656, &pair_7328953, &c_7329657);
make_pair(c_7329655, &pair_7328955, &c_7329656);
make_pair(c_7329654, &pair_7328957, &c_7329655);
make_pair(c_7329653, &pair_7328959, &c_7329654);
make_pair(c_7329652, &pair_7328961, &c_7329653);
make_pair(c_7329651, &pair_7328963, &c_7329652);
make_pair(c_7329650, &pair_7328965, &c_7329651);
make_pair(c_7329649, &pair_7328967, &c_7329650);
make_pair(c_7329648, &pair_7328969, &c_7329649);
make_pair(c_7329647, &pair_7328971, &c_7329648);
make_pair(c_7329646, &pair_7328973, &c_7329647);
make_pair(c_7329645, &pair_7328975, &c_7329646);
make_pair(c_7329644, &pair_7328977, &c_7329645);
make_pair(c_7329643, &pair_7328979, &c_7329644);
make_pair(c_7329642, &pair_7328981, &c_7329643);
make_pair(c_7329641, &pair_7328983, &c_7329642);
make_pair(c_7329640, &pair_7328985, &c_7329641);
make_pair(c_7329639, &pair_7328987, &c_7329640);
make_pair(c_7329638, &pair_7328989, &c_7329639);
make_pair(c_7329637, &pair_7328991, &c_7329638);
make_pair(c_7329636, &pair_7328993, &c_7329637);
make_pair(c_7329635, &pair_7328995, &c_7329636);
make_pair(c_7329634, &pair_7328997, &c_7329635);
make_pair(c_7329633, &pair_7328999, &c_7329634);
make_pair(c_7329632, &pair_7329001, &c_7329633);
make_pair(c_7329631, &pair_7329003, &c_7329632);
make_pair(c_7329630, &pair_7329005, &c_7329631);
make_pair(c_7329629, &pair_7329007, &c_7329630);
make_pair(c_7329628, &pair_7329009, &c_7329629);
make_pair(c_7329627, &pair_7329011, &c_7329628);
make_pair(c_7329626, &pair_7329013, &c_7329627);
make_pair(c_7329625, &pair_7329015, &c_7329626);
make_pair(c_7329624, &pair_7329017, &c_7329625);
make_pair(c_7329623, &pair_7329019, &c_7329624);
make_pair(c_7329622, &pair_7329021, &c_7329623);
make_pair(c_7329621, &pair_7329023, &c_7329622);
make_pair(c_7329620, &pair_7329025, &c_7329621);
make_pair(c_7329619, &pair_7329027, &c_7329620);
make_pair(c_7329618, &pair_7329029, &c_7329619);
make_pair(c_7329617, &pair_7329031, &c_7329618);
make_pair(c_7329616, &pair_7329033, &c_7329617);
make_pair(c_7329615, &pair_7329035, &c_7329616);
make_pair(c_7329614, &pair_7329037, &c_7329615);
make_pair(c_7329613, &pair_7329039, &c_7329614);
make_pair(c_7329612, &pair_7329041, &c_7329613);
make_pair(c_7329611, &pair_7329043, &c_7329612);
make_pair(c_7329610, &pair_7329045, &c_7329611);
make_pair(c_7329609, &pair_7329047, &c_7329610);
make_pair(c_7329608, &pair_7329049, &c_7329609);
make_pair(c_7329607, &pair_7329051, &c_7329608);
make_pair(c_7329606, &pair_7329053, &c_7329607);
make_pair(c_7329605, &pair_7329055, &c_7329606);
make_pair(c_7329604, &pair_7329057, &c_7329605);
make_pair(c_7329603, &pair_7329059, &c_7329604);
make_pair(c_7329602, &pair_7329061, &c_7329603);
make_pair(c_7329601, &pair_7329063, &c_7329602);
make_pair(c_7329600, &pair_7329065, &c_7329601);
make_pair(c_7329599, &pair_7329067, &c_7329600);
make_pair(c_7329598, &pair_7329069, &c_7329599);
make_pair(c_7329597, &pair_7329071, &c_7329598);
make_pair(c_7329596, &pair_7329073, &c_7329597);
make_pair(c_7329595, &pair_7329075, &c_7329596);
make_pair(c_7329594, &pair_7329077, &c_7329595);
make_pair(c_7329593, &pair_7329079, &c_7329594);
make_pair(c_7329592, &pair_7329081, &c_7329593);
make_pair(c_7329591, &pair_7329083, &c_7329592);
make_pair(c_7329590, &pair_7329085, &c_7329591);
make_pair(c_7329589, &pair_7329087, &c_7329590);
make_pair(c_7329588, &pair_7329089, &c_7329589);
make_pair(c_7329587, &pair_7329091, &c_7329588);
make_pair(c_7329586, &pair_7329093, &c_7329587);
make_pair(c_7329585, &pair_7329095, &c_7329586);
make_pair(c_7329584, &pair_7329097, &c_7329585);
make_pair(c_7329583, &pair_7329099, &c_7329584);
make_pair(c_7329582, &pair_7329101, &c_7329583);
make_pair(c_7329581, &pair_7329103, &c_7329582);
make_pair(c_7329580, &pair_7329105, &c_7329581);
make_pair(c_7329579, &pair_7329107, &c_7329580);
make_pair(c_7329578, &pair_7329109, &c_7329579);
make_pair(c_7329577, &pair_7329111, &c_7329578);
make_pair(c_7329576, &pair_7329113, &c_7329577);
make_pair(c_7329575, &pair_7329115, &c_7329576);
make_pair(c_7329574, &pair_7329117, &c_7329575);
make_pair(c_7329573, &pair_7329119, &c_7329574);
make_pair(c_7329572, &pair_7329121, &c_7329573);
make_pair(c_7329571, &pair_7329123, &c_7329572);
make_pair(c_7329570, &pair_7329125, &c_7329571);
make_pair(c_7329569, &pair_7329127, &c_7329570);
make_pair(c_7329568, &pair_7329129, &c_7329569);
make_pair(c_7329567, &pair_7329131, &c_7329568);
make_pair(c_7329566, &pair_7329133, &c_7329567);
make_pair(c_7329565, &pair_7329135, &c_7329566);
make_pair(c_7329564, &pair_7329137, &c_7329565);
make_pair(c_7329563, &pair_7329139, &c_7329564);
make_pair(c_7329562, &pair_7329141, &c_7329563);
make_pair(c_7329561, &pair_7329143, &c_7329562);
make_pair(c_7329560, &pair_7329145, &c_7329561);
make_pair(c_7329559, &pair_7329147, &c_7329560);
make_pair(c_7329558, &pair_7329149, &c_7329559);
make_pair(c_7329557, &pair_7329151, &c_7329558);
make_pair(c_7329556, &pair_7329153, &c_7329557);
make_pair(c_7329555, &pair_7329155, &c_7329556);
make_pair(c_7329554, &pair_7329157, &c_7329555);
make_pair(c_7329553, &pair_7329159, &c_7329554);
make_pair(c_7329552, &pair_7329161, &c_7329553);
make_pair(c_7329551, &pair_7329163, &c_7329552);
make_pair(c_7329550, &pair_7329165, &c_7329551);
make_pair(c_7329549, &pair_7329167, &c_7329550);
make_pair(c_7329548, &pair_7329169, &c_7329549);
make_pair(c_7329547, &pair_7329171, &c_7329548);
make_pair(c_7329546, &pair_7329173, &c_7329547);
make_pair(c_7329545, &pair_7329175, &c_7329546);
make_pair(c_7329544, &pair_7329177, &c_7329545);
make_pair(c_7329543, &pair_7329179, &c_7329544);
make_pair(c_7329542, &pair_7329181, &c_7329543);
make_pair(c_7329541, &pair_7329183, &c_7329542);
make_pair(c_7329540, &pair_7329185, &c_7329541);
make_pair(c_7329539, &pair_7329187, &c_7329540);
make_pair(c_7329538, &pair_7329189, &c_7329539);
make_pair(c_7329537, &pair_7329191, &c_7329538);
make_pair(c_7329536, &pair_7329193, &c_7329537);
make_pair(c_7329535, &pair_7329195, &c_7329536);
make_pair(c_7329534, &pair_7329197, &c_7329535);
make_pair(c_7329533, &pair_7329199, &c_7329534);
make_pair(c_7329532, &pair_7329201, &c_7329533);
make_pair(c_7329531, &pair_7329203, &c_7329532);
make_pair(c_7329530, &pair_7329205, &c_7329531);
make_pair(c_7329529, &pair_7329207, &c_7329530);
make_pair(c_7329528, &pair_7329209, &c_7329529);
make_pair(c_7329527, &pair_7329211, &c_7329528);
make_pair(c_7329526, &pair_7329213, &c_7329527);
make_pair(c_7329525, &pair_7329215, &c_7329526);
make_pair(c_7329524, &pair_7329217, &c_7329525);
make_pair(c_7329523, &pair_7329219, &c_7329524);
make_pair(c_7329522, &pair_7329221, &c_7329523);
make_pair(c_7329521, &pair_7329223, &c_7329522);
make_pair(c_7329520, &pair_7329225, &c_7329521);
make_pair(c_7329519, &pair_7329227, &c_7329520);
make_pair(c_7329518, &pair_7329229, &c_7329519);
make_pair(c_7329517, &pair_7329231, &c_7329518);
make_pair(c_7329516, &pair_7329233, &c_7329517);
make_pair(c_7329515, &pair_7329235, &c_7329516);
make_pair(c_7329514, &pair_7329237, &c_7329515);
make_pair(c_7329513, &pair_7329239, &c_7329514);
make_pair(c_7329512, &pair_7329241, &c_7329513);
make_pair(c_7329511, &pair_7329243, &c_7329512);
make_pair(c_7329510, &pair_7329245, &c_7329511);
make_pair(c_7329509, &pair_7329247, &c_7329510);
make_pair(c_7329508, &pair_7329249, &c_7329509);
make_pair(c_7329507, &pair_7329251, &c_7329508);
make_pair(c_7329506, &pair_7329253, &c_7329507);
make_pair(c_7329505, &pair_7329255, &c_7329506);
make_pair(c_7329504, &pair_7329257, &c_7329505);
make_pair(c_7329503, &pair_7329259, &c_7329504);
make_pair(c_7329502, &pair_7329261, &c_7329503);
make_pair(c_7329501, &pair_7329263, &c_7329502);
make_pair(c_7329500, &pair_7329265, &c_7329501);
make_pair(c_7329499, &pair_7329267, &c_7329500);
make_pair(c_7329498, &pair_7329269, &c_7329499);
make_pair(c_7329497, &pair_7329271, &c_7329498);
make_pair(c_7329496, &pair_7329273, &c_7329497);
make_pair(c_7329495, &pair_7329275, &c_7329496);
make_pair(c_7329494, &pair_7329277, &c_7329495);
make_pair(c_7329493, &pair_7329279, &c_7329494);
make_pair(c_7329492, &pair_7329281, &c_7329493);
make_pair(c_7329491, &pair_7329283, &c_7329492);
make_pair(c_7329490, &pair_7329285, &c_7329491);
make_pair(c_7329489, &pair_7329287, &c_7329490);
make_pair(c_7329488, &pair_7329289, &c_7329489);
make_pair(c_7329487, &pair_7329291, &c_7329488);
make_pair(c_7329486, &pair_7329293, &c_7329487);
make_pair(c_7329485, &pair_7329295, &c_7329486);
make_pair(c_7329484, &pair_7329297, &c_7329485);
make_pair(c_7329483, &pair_7329299, &c_7329484);
make_pair(c_7329482, &pair_7329301, &c_7329483);
make_pair(c_7329481, &pair_7329303, &c_7329482);
make_pair(c_7329480, &pair_7329305, &c_7329481);
make_pair(c_7329479, &pair_7329307, &c_7329480);
make_pair(c_7329478, &pair_7329309, &c_7329479);
make_pair(c_7329477, &pair_7329311, &c_7329478);
make_pair(c_7329476, &pair_7329313, &c_7329477);
make_pair(c_7329475, &pair_7329315, &c_7329476);
make_pair(c_7329474, &pair_7329317, &c_7329475);
make_pair(c_7329473, &pair_7329319, &c_7329474);
make_pair(c_7329472, &pair_7329321, &c_7329473);
make_pair(c_7329471, &pair_7329323, &c_7329472);
make_pair(c_7329470, &pair_7329325, &c_7329471);
make_pair(c_7329469, &pair_7329327, &c_7329470);
make_pair(c_7329468, &pair_7329329, &c_7329469);
make_pair(c_7329467, &pair_7329331, &c_7329468);
make_pair(c_7329466, &pair_7329333, &c_7329467);
make_pair(c_7329465, &pair_7329335, &c_7329466);
make_pair(c_7329464, &pair_7329337, &c_7329465);
make_pair(c_7329463, &pair_7329339, &c_7329464);
make_pair(c_7329462, &pair_7329341, &c_7329463);
make_pair(c_7329461, &pair_7329343, &c_7329462);
make_pair(c_7329460, &pair_7329345, &c_7329461);
make_pair(c_7329459, &pair_7329347, &c_7329460);
make_pair(c_7329458, &pair_7329349, &c_7329459);
make_pair(c_7329457, &pair_7329351, &c_7329458);
make_pair(c_7329456, &pair_7329353, &c_7329457);
make_pair(c_7329455, &pair_7329355, &c_7329456);
make_pair(c_7329454, &pair_7329357, &c_7329455);
make_pair(c_7329453, &pair_7329359, &c_7329454);
make_pair(c_7329452, &pair_7329361, &c_7329453);
make_pair(c_7329451, &pair_7329363, &c_7329452);
make_pair(c_7329450, &pair_7329365, &c_7329451);
make_pair(c_7329449, &pair_7329367, &c_7329450);
make_pair(c_7329448, &pair_7329369, &c_7329449);
make_pair(c_7329447, &pair_7329371, &c_7329448);
make_pair(c_7329446, &pair_7329373, &c_7329447);
make_pair(c_7329445, &pair_7329375, &c_7329446);
make_pair(c_7329444, &pair_7329377, &c_7329445);
make_pair(c_7329443, &pair_7329379, &c_7329444);
make_pair(c_7329442, &pair_7329381, &c_7329443);
make_pair(c_7329441, &pair_7329383, &c_7329442);
make_pair(c_7329440, &pair_7329385, &c_7329441);
make_pair(c_7329439, &pair_7329387, &c_7329440);
make_pair(c_7329438, &pair_7329389, &c_7329439);
make_pair(c_7329437, &pair_7329391, &c_7329438);
make_pair(c_7329436, &pair_7329393, &c_7329437);
make_pair(c_7329435, &pair_7329395, &c_7329436);
make_pair(c_7329434, &pair_7329397, &c_7329435);
make_pair(c_7329433, &pair_7329399, &c_7329434);
make_pair(c_7329432, &pair_7329401, &c_7329433);
make_pair(c_7329431, &pair_7329403, &c_7329432);
make_pair(c_7329430, &pair_7329405, &c_7329431);
make_pair(c_7329429, &pair_7329407, &c_7329430);
make_pair(c_7329428, &pair_7329409, &c_7329429);
make_pair(c_7329427, &pair_7329411, &c_7329428);
make_pair(c_7329426, &pair_7329413, &c_7329427);
make_pair(c_7329425, &pair_7329415, &c_7329426);
make_pair(c_7329424, &pair_7329417, &c_7329425);
make_pair(c_7329423, &pair_7329419, &c_7329424);
make_pair(c_7329422, &pair_7329421, &c_7329423);
Cyc_global_variables = &c_7329422;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117schemebase_scheme_base)->fn)(data, buf[0], 1, buf);
}
void c_schemebase_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("scheme_base");
  c_schemebase_entry_pt_first_lambda(data, cont, argc, value);
}
