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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

#define closcall9(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 9, buf ); \
} else { \
   ((clo)->fn)(td, clo, 9, buf); \
;\
}
#define return_closcall9(td, clo,a1,a2,a3,a4,a5,a6,a7,a8,a9) { \
 char top; \
 object buf[9]; 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;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 9); \
     return; \
 } else {\
     closcall9(td, (closure) (clo), buf); \
     return;\
 } \
}

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

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

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

#define closcall18(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 18, buf ); \
} else { \
   ((clo)->fn)(td, clo, 18, buf); \
;\
}
#define return_closcall18(td, clo,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18) { \
 char top; \
 object buf[18]; 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;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 18); \
     return; \
 } else {\
     closcall18(td, (closure) (clo), buf); \
     return;\
 } \
}

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

#define return_direct18(td, _fn,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18) { \
 char top; \
 object buf[18]; 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; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 18); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 18, buf); \
 }}

#define return_direct_with_clo18(td, clo, _fn,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18) { \
 char top; \
 object buf[18]; 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;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 18); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 18, buf); \
 }}

#include "cyclone/types.h"
object __glo_lib_91init_117schemecyclonecgen_scheme_cyclone_cgen = NULL;
object __glo_autogen_117primitive_91procedures_scheme_cyclone_cgen = NULL;
object __glo_autogen_117defprimitives_scheme_cyclone_cgen = NULL;
object __glo_autogen_scheme_cyclone_cgen = NULL;
object __glo_filter_91invalid_91chars_scheme_cyclone_cgen = NULL;
object __glo_c_117old_91c_91args_91_125new_91decls_91from_91args_scheme_cyclone_cgen = NULL;
object __glo_mta_117code_91gen_scheme_cyclone_cgen = NULL;
object __glo_mangle_91exported_91ident_scheme_cyclone_cgen = NULL;
object __glo_import_91_125string_scheme_cyclone_cgen = NULL;
object __glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen = NULL;
object __glo_ast_117lambda_91varargs_91var_scheme_cyclone_cgen = NULL;
object __glo_cgen_117mangle_91global_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91lambda_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91formals_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91closure_scheme_cyclone_cgen = NULL;
object __glo_find_91closure_91assigned_91var_91index_67_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen = NULL;
object __glo_fl_95cont_127_scheme_cyclone_cgen = NULL;
object __glo_fl_95closure_127_scheme_cyclone_cgen = NULL;
object __glo_ast_117lambda_91num_91args_scheme_cyclone_cgen = NULL;
object __glo_compute_91num_91args_scheme_cyclone_cgen = NULL;
object __glo_lambda_91_125env_scheme_cyclone_cgen = NULL;
object __glo_allocate_91lambda_scheme_cyclone_cgen = NULL;
object __glo_inline_91lambdas_scheme_cyclone_cgen = NULL;
object __glo_lambdas_scheme_cyclone_cgen = NULL;
object __glo_num_91lambdas_scheme_cyclone_cgen = NULL;
object __glo_allocate_91symbol_scheme_cyclone_cgen = NULL;
object __glo__85symbols_85_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91global_scheme_cyclone_cgen = NULL;
object __glo_add_91global_scheme_cyclone_cgen = NULL;
object __glo_global_91not_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen = NULL;
object __glo_global_91not_91lambda_127_scheme_cyclone_cgen = NULL;
object __glo_global_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen = NULL;
object __glo_global_91lambda_127_scheme_cyclone_cgen = NULL;
object __glo__85global_91syms_85_scheme_cyclone_cgen = NULL;
object __glo__85globals_85_scheme_cyclone_cgen = NULL;
object __glo_add_91global_91inline_scheme_cyclone_cgen = NULL;
object __glo__85global_91inlines_85_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91if_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91app_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91args_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91ref_scheme_cyclone_cgen = NULL;
object __glo_self_91closure_91call_127_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91prim_scheme_cyclone_cgen = NULL;
object __glo_alloca_127_scheme_cyclone_cgen = NULL;
object __glo_set_91use_91alloca_67_scheme_cyclone_cgen = NULL;
object __glo__85use_91alloca_85_scheme_cyclone_cgen = NULL;
object __glo_str_91ending_127_scheme_cyclone_cgen = NULL;
object __glo_string_91byte_91length_scheme_cyclone_cgen = NULL;
object __glo__91_125cstr_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91const_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91string_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91bytevector_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91vector_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91scalars_scheme_cyclone_cgen = NULL;
object __glo_c_91set_91immutable_91field_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91quote_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91exp_scheme_cyclone_cgen = NULL;
object __glo_c_91compile_91program_scheme_cyclone_cgen = NULL;
object __glo_c_117serialize_scheme_cyclone_cgen = NULL;
object __glo_c_117append_95prefix_scheme_cyclone_cgen = NULL;
object __glo_c_117append_scheme_cyclone_cgen = NULL;
object __glo_c_117allocs_91_125str2_scheme_cyclone_cgen = NULL;
object __glo_c_117allocs_91_125str_scheme_cyclone_cgen = NULL;
object __glo_c_117num_91args_191_191inline_191_191_scheme_cyclone_cgen = NULL;
object __glo_c_117num_91args_scheme_cyclone_cgen = NULL;
object __glo_c_117allocs_191_191inline_191_191_scheme_cyclone_cgen = NULL;
object __glo_c_117allocs_scheme_cyclone_cgen = NULL;
object __glo_c_117body_scheme_cyclone_cgen = NULL;
object __glo_c_117tuple_95args_scheme_cyclone_cgen = NULL;
object __glo_c_117code_scheme_cyclone_cgen = NULL;
object __glo_c_117code_95vars_scheme_cyclone_cgen = NULL;
object __glo_st_117_91_125var_191_191inline_191_191_scheme_cyclone_cgen = NULL;
object __glo_st_117_91_125var_scheme_cyclone_cgen = NULL;
object __glo_st_117_91_125code_scheme_cyclone_cgen = NULL;
object __glo_st_117add_91function_67_scheme_cyclone_cgen = NULL;
object __glo_c_91macro_91array_91assign_scheme_cyclone_cgen = NULL;
object __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen = NULL;
object __glo_c_91macro_91closcall_scheme_cyclone_cgen = NULL;
object __glo_c_91macro_91return_91direct_91with_91object_scheme_cyclone_cgen = NULL;
object __glo_c_91macro_91return_91direct_91with_91closure_scheme_cyclone_cgen = NULL;
object __glo_c_91macro_91return_91direct_scheme_cyclone_cgen = NULL;
object __glo_c_91macro_91continue_91or_91gc_scheme_cyclone_cgen = NULL;
object __glo_c_91macro_91return_91closcall_scheme_cyclone_cgen = NULL;
object __glo_emit_91c_91arity_91macros_scheme_cyclone_cgen = NULL;
object __glo_set_91c_91call_91arity_67_scheme_cyclone_cgen = NULL;
object __glo__85c_91call_91arity_85_scheme_cyclone_cgen = NULL;
object __glo__85c_91call_91max_91args_85_scheme_cyclone_cgen = NULL;
object __glo__85c_91main_91function_85_scheme_cyclone_cgen = NULL;
object __glo_cstr_117escape_91chars_scheme_cyclone_cgen = NULL;
object __glo_emit_91newline_scheme_cyclone_cgen = NULL;
object __glo_emits_85_scheme_cyclone_cgen = NULL;
object __glo_emits_scheme_cyclone_cgen = NULL;
object __glo_emit_85_scheme_cyclone_cgen = NULL;
object __glo_emit_scheme_cyclone_cgen = NULL;
object __glo__85ref_91table_85_scheme_cyclone_cgen = NULL;
object __glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen = NULL;
object __glo__85cgen_117use_91unsafe_91prims_85_scheme_cyclone_cgen = NULL;
object __glo__85cgen_117track_91call_91history_85_scheme_cyclone_cgen = NULL;
extern object __glo_member_scheme_base;
extern object __glo_assoc_scheme_base;
extern object __glo_cons_91source_scheme_base;
extern object __glo_syntax_91rules_scheme_base;
extern object __glo_letrec_85_scheme_base;
extern object __glo_guard_scheme_base;
extern object __glo_guard_91aux_scheme_base;
extern object __glo_define_91record_91type_scheme_base;
extern object __glo_record_127_scheme_base;
extern object __glo_is_91a_127_scheme_base;
extern object __glo_register_91simple_91type_scheme_base;
extern object __glo_make_91type_91predicate_scheme_base;
extern object __glo_make_91constructor_scheme_base;
extern object __glo_make_91constructor_95args_scheme_base;
extern object __glo_make_91getter_scheme_base;
extern object __glo_make_91setter_scheme_base;
extern object __glo_slot_91ref_scheme_base;
extern object __glo_slot_91set_67_scheme_base;
extern object __glo_type_91slot_91offset_scheme_base;
extern object __glo_make_91record_91marker_scheme_base;
extern object __glo_receive_scheme_base;
extern object __glo_abs_scheme_base;
extern object __glo_max_scheme_base;
extern object __glo_min_scheme_base;
extern object __glo_modulo_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_even_127_scheme_base;
extern object __glo_exact_91integer_127_scheme_base;
extern object __glo_exact_91integer_91sqrt_scheme_base;
extern object __glo_exact_127_scheme_base;
extern object __glo_inexact_127_scheme_base;
extern object __glo_odd_127_scheme_base;
extern object __glo_complex_127_scheme_base;
extern object __glo_rational_127_scheme_base;
extern object __glo_bignum_127_scheme_base;
extern object __glo_gcd_scheme_base;
extern object __glo_lcm_scheme_base;
extern object __glo_quotient_scheme_base;
extern object __glo_remainder_scheme_base;
extern object __glo_truncate_91quotient_scheme_base;
extern object __glo_truncate_91remainder_scheme_base;
extern object __glo_truncate_95_scheme_base;
extern object __glo_floor_91quotient_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_floor_95_scheme_base;
extern object __glo_square_scheme_base;
extern object __glo_expt_scheme_base;
extern object __glo_call_91with_91current_91continuation_scheme_base;
extern object __glo_call_95cc_scheme_base;
extern object __glo_call_91with_91values_scheme_base;
extern object __glo_dynamic_91wind_scheme_base;
extern object __glo_values_scheme_base;
extern object __glo_char_123_127_scheme_base;
extern object __glo_char_121_127_scheme_base;
extern object __glo_char_125_127_scheme_base;
extern object __glo_char_121_123_127_scheme_base;
extern object __glo_char_125_123_127_scheme_base;
extern object __glo_string_123_127_scheme_base;
extern object __glo_string_121_127_scheme_base;
extern object __glo_string_121_123_127_scheme_base;
extern object __glo_string_125_127_scheme_base;
extern object __glo_string_125_123_127_scheme_base;
extern object __glo_fast_91string_123_127_scheme_base;
extern object __glo_fast_91string_121_127_scheme_base;
extern object __glo_fast_91string_121_123_127_scheme_base;
extern object __glo_fast_91string_125_127_scheme_base;
extern object __glo_fast_91string_125_123_127_scheme_base;
extern object __glo_foldl_scheme_base;
extern object __glo_foldr_scheme_base;
extern object __glo_not_scheme_base;
extern object __glo_list_127_scheme_base;
extern object __glo_zero_127_scheme_base;
extern object __glo_positive_127_scheme_base;
extern object __glo_negative_127_scheme_base;
extern object __glo_append_scheme_base;
extern object __glo__list_scheme_base;
extern object __glo_make_91list_scheme_base;
extern object __glo_list_91copy_scheme_base;
extern object __glo_map_scheme_base;
extern object __glo_Cyc_91map_91loop_911_scheme_base;
extern object __glo_Cyc_91map_91loop_912_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_911_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_912_scheme_base;
extern object __glo_for_91each_scheme_base;
extern object __glo_list_91tail_scheme_base;
extern object __glo_list_91ref_scheme_base;
extern object __glo_list_91set_67_scheme_base;
extern object __glo_reverse_scheme_base;
extern object __glo_boolean_123_127_scheme_base;
extern object __glo_symbol_123_127_scheme_base;
extern object __glo_Cyc_91obj_123_127_scheme_base;
extern object __glo_vector_scheme_base;
extern object __glo_vector_91append_scheme_base;
extern object __glo_vector_91copy_scheme_base;
extern object __glo_vector_91copy_67_scheme_base;
extern object __glo_vector_91fill_67_scheme_base;
extern object __glo_vector_91_125list_scheme_base;
extern object __glo_vector_91_125string_scheme_base;
extern object __glo_vector_91map_scheme_base;
extern object __glo_vector_91for_91each_scheme_base;
extern object __glo_make_91string_scheme_base;
extern object __glo_string_scheme_base;
extern object __glo_string_91copy_scheme_base;
extern object __glo_string_91copy_67_scheme_base;
extern object __glo_string_91fill_67_scheme_base;
extern object __glo_string_91_125list_scheme_base;
extern object __glo_string_91_125vector_scheme_base;
extern object __glo_string_91map_scheme_base;
extern object __glo_string_91for_91each_scheme_base;
extern object __glo_make_91parameter_scheme_base;
extern object __glo_current_91output_91port_scheme_base;
extern object __glo_current_91input_91port_scheme_base;
extern object __glo_current_91error_91port_scheme_base;
extern object __glo_call_91with_91port_scheme_base;
extern object __glo_error_91object_127_scheme_base;
extern object __glo_error_91object_91message_scheme_base;
extern object __glo_error_91object_91irritants_scheme_base;
extern object __glo_error_95loc_scheme_base;
extern object __glo_error_scheme_base;
extern object __glo_raise_scheme_base;
extern object __glo_raise_91continuable_scheme_base;
extern object __glo_with_91handler_scheme_base;
extern object __glo_with_91exception_91handler_scheme_base;
extern object __glo_Cyc_91add_91exception_91handler_scheme_base;
extern object __glo_Cyc_91remove_91exception_91handler_scheme_base;
extern object __glo_newline_scheme_base;
extern object __glo_write_91char_scheme_base;
extern object __glo_write_91string_scheme_base;
extern object __glo_write_91string_911_scheme_base;
extern object __glo_write_91string_912_scheme_base;
extern object __glo_flush_91output_91port_scheme_base;
extern object __glo_char_91ready_127_scheme_base;
extern object __glo_peek_91char_scheme_base;
extern object __glo_read_91char_scheme_base;
extern object __glo_read_91line_scheme_base;
extern object __glo_read_91string_scheme_base;
extern object __glo_input_91port_127_scheme_base;
extern object __glo_output_91port_127_scheme_base;
extern object __glo_input_91port_91open_127_scheme_base;
extern object __glo_output_91port_91open_127_scheme_base;
extern object __glo_get_91output_91string_scheme_base;
extern object __glo_open_91output_91string_scheme_base;
extern object __glo_open_91input_91string_scheme_base;
extern object __glo_get_91output_91bytevector_scheme_base;
extern object __glo_open_91input_91bytevector_scheme_base;
extern object __glo_open_91output_91bytevector_scheme_base;
extern object __glo_features_scheme_base;
extern object __glo_Cyc_91add_91feature_67_scheme_base;
extern object __glo_Cyc_91version_scheme_base;
extern object __glo_any_scheme_base;
extern object __glo_every_scheme_base;
extern object __glo_and_scheme_base;
extern object __glo_or_scheme_base;
extern object __glo_let_scheme_base;
extern object __glo_let_85_scheme_base;
extern object __glo_letrec_scheme_base;
extern object __glo_let_85_91values_scheme_base;
extern object __glo_let_91values_scheme_base;
extern object __glo_define_91values_scheme_base;
extern object __glo_begin_scheme_base;
extern object __glo__case_scheme_base;
extern object __glo_cond_scheme_base;
extern object __glo_cond_91expand_scheme_base;
extern object __glo__do_scheme_base;
extern object __glo_when_scheme_base;
extern object __glo_unless_scheme_base;
extern object __glo_quasiquote_scheme_base;
extern object __glo_floor_scheme_base;
extern object __glo_ceiling_scheme_base;
extern object __glo_truncate_scheme_base;
extern object __glo_round_scheme_base;
extern object __glo_exact_scheme_base;
extern object __glo_inexact_scheme_base;
extern object __glo_eof_91object_scheme_base;
extern object __glo__void_scheme_base;
extern object __glo_syntax_91error_scheme_base;
extern object __glo_bytevector_91copy_scheme_base;
extern object __glo_bytevector_91copy_67_scheme_base;
extern object __glo_utf8_91_125string_scheme_base;
extern object __glo_string_91_125utf8_scheme_base;
extern object __glo_denominator_scheme_base;
extern object __glo_numerator_scheme_base;
extern object __glo_parameterize_scheme_base;
extern object __glo_read_91bytevector_scheme_base;
extern object __glo_read_91bytevector_67_scheme_base;
extern object __glo_write_91bytevector_scheme_base;
extern object __glo_peek_91u8_scheme_base;
extern object __glo_read_91u8_scheme_base;
extern object __glo_write_91u8_scheme_base;
extern object __glo_binary_91port_127_scheme_base;
extern object __glo_textual_91port_127_scheme_base;
extern object __glo_rationalize_scheme_base;
extern object __glo_char_91alphabetic_127_scheme__char;
extern object __glo_char_91downcase_scheme__char;
extern object __glo_char_91foldcase_scheme__char;
extern object __glo_char_91lower_91case_127_scheme__char;
extern object __glo_char_91numeric_127_scheme__char;
extern object __glo_char_91upcase_scheme__char;
extern object __glo_char_91upper_91case_127_scheme__char;
extern object __glo_char_91whitespace_127_scheme__char;
extern object __glo_char_91ci_121_123_127_scheme__char;
extern object __glo_char_91ci_121_127_scheme__char;
extern object __glo_char_91ci_123_127_scheme__char;
extern object __glo_char_91ci_125_123_127_scheme__char;
extern object __glo_char_91ci_125_127_scheme__char;
extern object __glo_digit_91value_scheme__char;
extern object __glo_string_91upcase_scheme__char;
extern object __glo_string_91downcase_scheme__char;
extern object __glo_string_91foldcase_scheme__char;
extern object __glo_string_91ci_121_123_127_scheme__char;
extern object __glo_string_91ci_121_127_scheme__char;
extern object __glo_string_91ci_123_127_scheme__char;
extern object __glo_string_91ci_125_123_127_scheme__char;
extern object __glo_string_91ci_125_127_scheme__char;
extern object __glo_angle_scheme_complex;
extern object __glo_imag_91part_scheme_complex;
extern object __glo_magnitude_scheme_complex;
extern object __glo_make_91polar_scheme_complex;
extern object __glo_make_91rectangular_scheme_complex;
extern object __glo_real_91part_scheme_complex;
extern object __glo_eval_scheme_eval;
extern object __glo_eval_91from_91c_scheme_eval;
extern object __glo_create_91environment_scheme_eval;
extern object __glo_setup_91environment_scheme_eval;
extern object __glo__75import_scheme_eval;
extern object __glo_imported_127_scheme_eval;
extern object __glo__75set_91import_91dirs_67_scheme_eval;
extern object __glo_import_91shared_91object_scheme_eval;
extern object __glo__85defined_91macros_85_scheme_eval;
extern object __glo_get_91macros_scheme_eval;
extern object __glo_macro_117macro_127_scheme_eval;
extern object __glo_macro_117expand_scheme_eval;
extern object __glo_macro_117add_67_scheme_eval;
extern object __glo_macro_117cleanup_scheme_eval;
extern object __glo_macro_117load_91env_67_scheme_eval;
extern object __glo_macro_117get_91env_scheme_eval;
extern object __glo_macro_117get_91defined_91macros_scheme_eval;
extern object __glo_expand_scheme_eval;
extern object __glo_expand_91lambda_91body_scheme_eval;
extern object __glo_acos_scheme_inexact;
extern object __glo_asin_scheme_inexact;
extern object __glo_atan_scheme_inexact;
extern object __glo_cos_scheme_inexact;
extern object __glo_exp_scheme_inexact;
extern object __glo_finite_127_scheme_inexact;
extern object __glo_infinite_127_scheme_inexact;
extern object __glo_log_scheme_inexact;
extern object __glo_nan_127_scheme_inexact;
extern object __glo_sin_scheme_inexact;
extern object __glo_sqrt_scheme_inexact;
extern object __glo_tan_scheme_inexact;
extern object __glo_display_scheme_write;
extern object __glo_write_scheme_write;
extern object __glo_write_91shared_scheme_write;
extern object __glo_write_91simple_scheme_write;
extern object __glo_opaque_127_cyclone_foreign;
extern object __glo_opaque_91null_127_cyclone_foreign;
extern object __glo_make_91opaque_cyclone_foreign;
extern object __glo_c_91code_cyclone_foreign;
extern object __glo_c_91value_cyclone_foreign;
extern object __glo_c_91define_cyclone_foreign;
extern object __glo_c_91_125scm_cyclone_foreign;
extern object __glo_scm_91_125c_cyclone_foreign;
extern object __glo_c_91define_91type_cyclone_foreign;
extern object __glo_make_91hash_91table_srfi_69;
extern object __glo_hash_91table_127_srfi_69;
extern object __glo_alist_91_125hash_91table_srfi_69;
extern object __glo_hash_91table_91equivalence_91function_srfi_69;
extern object __glo_hash_91table_91hash_91function_srfi_69;
extern object __glo_hash_91table_91ref_srfi_69;
extern object __glo_hash_91table_91ref_95default_srfi_69;
extern object __glo_hash_91table_91set_67_srfi_69;
extern object __glo_hash_91table_91delete_67_srfi_69;
extern object __glo_hash_91table_91exists_127_srfi_69;
extern object __glo_hash_91table_91update_67_srfi_69;
extern object __glo_hash_91table_91update_67_95default_srfi_69;
extern object __glo_hash_91table_91size_srfi_69;
extern object __glo_hash_91table_91keys_srfi_69;
extern object __glo_hash_91table_91values_srfi_69;
extern object __glo_hash_91table_91walk_srfi_69;
extern object __glo_hash_91table_91fold_srfi_69;
extern object __glo_hash_91table_91_125alist_srfi_69;
extern object __glo_hash_91table_91copy_srfi_69;
extern object __glo_hash_91table_91merge_67_srfi_69;
extern object __glo_hash_srfi_69;
extern object __glo_string_91hash_srfi_69;
extern object __glo_string_91ci_91hash_srfi_69;
extern object __glo_hash_91by_91identity_srfi_69;
extern object __glo_Cyc_91memoize_srfi_69;
extern object __glo_prim_127_scheme_cyclone_primitives;
extern object __glo__85primitives_85_scheme_cyclone_primitives;
extern object __glo__85primitives_91num_91args_85_scheme_cyclone_primitives;
extern object __glo_prim_91call_127_scheme_cyclone_primitives;
extern object __glo_prim_91_125c_91func_scheme_cyclone_primitives;
extern object __glo_prim_91_125c_91func_91uses_91alloca_127_scheme_cyclone_primitives;
extern object __glo_prim_95data_91arg_127_scheme_cyclone_primitives;
extern object __glo_prim_95c_91var_91pointer_scheme_cyclone_primitives;
extern object __glo_prim_95c_91var_91assign_scheme_cyclone_primitives;
extern object __glo_prim_95cvar_127_scheme_cyclone_primitives;
extern object __glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives;
extern object __glo_prim_117check_91arg_91count_scheme_cyclone_primitives;
extern object __glo_prim_117mutates_127_scheme_cyclone_primitives;
extern object __glo_prim_117cont_127_scheme_cyclone_primitives;
extern object __glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives;
extern object __glo_prim_117arg_91count_127_scheme_cyclone_primitives;
extern object __glo_prim_117allocates_91object_127_scheme_cyclone_primitives;
extern object __glo_prim_117immutable_91args_95result_127_scheme_cyclone_primitives;
extern object __glo_prim_117udf_127_scheme_cyclone_primitives;
extern object __glo_prim_117add_91udf_67_scheme_cyclone_primitives;
extern object __glo_prim_117func_91_125prim_scheme_cyclone_primitives;
extern object __glo__85do_91code_91gen_85_scheme_cyclone_transforms;
extern object __glo__85trace_91level_85_scheme_cyclone_transforms;
extern object __glo__85primitives_85_scheme_cyclone_primitives;
extern object __glo_built_91in_91syms_scheme_cyclone_transforms;
extern object __glo_trace_scheme_cyclone_transforms;
extern object __glo_trace_117error_scheme_cyclone_transforms;
extern object __glo_trace_117warn_scheme_cyclone_transforms;
extern object __glo_trace_117info_scheme_cyclone_transforms;
extern object __glo_trace_117debug_scheme_cyclone_transforms;
extern object __glo_cyc_117error_scheme_cyclone_transforms;
extern object __glo_basename_scheme_cyclone_transforms;
extern object __glo_list_91index_scheme_cyclone_transforms;
extern object __glo_symbol_121_127_scheme_cyclone_transforms;
extern object __glo_insert_scheme_cyclone_transforms;
extern object __glo_remove_scheme_cyclone_transforms;
extern object __glo__union_scheme_cyclone_transforms;
extern object __glo_difference_scheme_cyclone_transforms;
extern object __glo_reduce_scheme_cyclone_transforms;
extern object __glo_azip_scheme_cyclone_transforms;
extern object __glo_assq_91remove_91key_scheme_cyclone_transforms;
extern object __glo_assq_91remove_91keys_scheme_cyclone_transforms;
extern object __glo_let_127_scheme_cyclone_transforms;
extern object __glo_let_91_125bindings_scheme_cyclone_transforms;
extern object __glo_let_91_125exp_scheme_cyclone_transforms;
extern object __glo_let_91_125bound_91vars_scheme_cyclone_transforms;
extern object __glo_let_91_125args_scheme_cyclone_transforms;
extern object __glo_letrec_127_scheme_cyclone_transforms;
extern object __glo_letrec_91_125bindings_scheme_cyclone_transforms;
extern object __glo_letrec_91_125exp_scheme_cyclone_transforms;
extern object __glo_letrec_91_125bound_91vars_scheme_cyclone_transforms;
extern object __glo_letrec_91_125args_scheme_cyclone_transforms;
extern object __glo_lambda_91num_91args_scheme_cyclone_transforms;
extern object __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms;
extern object __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms;
extern object __glo_list_91_125lambda_91formals_scheme_cyclone_transforms;
extern object __glo_list_91_125pair_scheme_cyclone_transforms;
extern object __glo_app_91_125fun_scheme_cyclone_transforms;
extern object __glo_app_91_125args_scheme_cyclone_transforms;
extern object __glo_precompute_91prim_91app_127_scheme_cyclone_transforms;
extern object __glo_begin_91_125exps_scheme_cyclone_transforms;
extern object __glo_closure_127_scheme_cyclone_transforms;
extern object __glo_closure_91_125lam_scheme_cyclone_transforms;
extern object __glo_closure_91_125env_scheme_cyclone_transforms;
extern object __glo_closure_91_125fv_scheme_cyclone_transforms;
extern object __glo_env_91make_127_scheme_cyclone_transforms;
extern object __glo_env_91make_91_125id_scheme_cyclone_transforms;
extern object __glo_env_91make_91_125fields_scheme_cyclone_transforms;
extern object __glo_env_91make_91_125values_scheme_cyclone_transforms;
extern object __glo_env_91get_127_scheme_cyclone_transforms;
extern object __glo_env_91get_91_125id_scheme_cyclone_transforms;
extern object __glo_env_91get_91_125field_scheme_cyclone_transforms;
extern object __glo_env_91get_91_125env_scheme_cyclone_transforms;
extern object __glo_set_91cell_67_127_scheme_cyclone_transforms;
extern object __glo_set_91cell_67_91_125cell_scheme_cyclone_transforms;
extern object __glo_set_91cell_67_91_125value_scheme_cyclone_transforms;
extern object __glo_cell_127_scheme_cyclone_transforms;
extern object __glo_cell_91_125value_scheme_cyclone_transforms;
extern object __glo_cell_91get_127_scheme_cyclone_transforms;
extern object __glo_cell_91get_91_125cell_scheme_cyclone_transforms;
extern object __glo_isolate_91globals_scheme_cyclone_transforms;
extern object __glo_has_91global_127_scheme_cyclone_transforms;
extern object __glo_global_91vars_scheme_cyclone_transforms;
extern object __glo_filter_91unused_91variables_scheme_cyclone_transforms;
extern object __glo_free_91vars_scheme_cyclone_transforms;
extern object __glo_clear_91mutables_scheme_cyclone_transforms;
extern object __glo_mark_91mutable_scheme_cyclone_transforms;
extern object __glo_is_91mutable_127_scheme_cyclone_transforms;
extern object __glo_analyze_91mutable_91variables_scheme_cyclone_transforms;
extern object __glo_wrap_91mutables_scheme_cyclone_transforms;
extern object __glo_alpha_91convert_scheme_cyclone_transforms;
extern object __glo_cps_91convert_scheme_cyclone_transforms;
extern object __glo_prim_91convert_scheme_cyclone_transforms;
extern object __glo_validate_91keyword_91syntax_scheme_cyclone_transforms;
extern object __glo_ast_117make_91lambda_scheme_cyclone_ast;
extern object __glo_ast_117_75make_91lambda_scheme_cyclone_ast;
extern object __glo_ast_117lambda_127_scheme_cyclone_ast;
extern object __glo_ast_117lambda_91id_scheme_cyclone_ast;
extern object __glo_ast_117lambda_91args_scheme_cyclone_ast;
extern object __glo_ast_117set_91lambda_91args_67_scheme_cyclone_ast;
extern object __glo_ast_117lambda_91body_scheme_cyclone_ast;
extern object __glo_ast_117set_91lambda_91body_67_scheme_cyclone_ast;
extern object __glo_ast_117lambda_91has_91cont_scheme_cyclone_ast;
extern object __glo_ast_117set_91lambda_91has_91cont_67_scheme_cyclone_ast;
extern object __glo_ast_117get_91next_91lambda_91id_67_scheme_cyclone_ast;
extern object __glo_ast_117reset_91lambda_91ids_67_scheme_cyclone_ast;
extern object __glo_ast_117ast_91_125pp_91sexp_scheme_cyclone_ast;
extern object __glo_ast_117ast_91_125sexp_scheme_cyclone_ast;
extern object __glo_ast_117sexp_91_125ast_scheme_cyclone_ast;
extern object __glo_closure_91convert_scheme_cyclone_cps_91optimizations;
extern object __glo_analyze_117cc_91ast_91_125vars_scheme_cyclone_cps_91optimizations;
extern object __glo_pos_91in_91list_scheme_cyclone_cps_91optimizations;
extern object __glo_inlinable_91top_91level_91lambda_127_scheme_cyclone_cps_91optimizations;
extern object __glo_optimize_91cps_scheme_cyclone_cps_91optimizations;
extern object __glo_analyze_91cps_scheme_cyclone_cps_91optimizations;
extern object __glo_analyze_91find_91lambdas_scheme_cyclone_cps_91optimizations;
extern object __glo_analyze_117find_91named_91lets_scheme_cyclone_cps_91optimizations;
extern object __glo_analyze_117find_91direct_91recursive_91calls_scheme_cyclone_cps_91optimizations;
extern object __glo_analyze_117find_91known_91lambdas_scheme_cyclone_cps_91optimizations;
extern object __glo_analyze_117find_91inlinable_91vars_scheme_cyclone_cps_91optimizations;
extern object __glo_opt_117renumber_91lambdas_67_scheme_cyclone_cps_91optimizations;
extern object __glo_opt_117add_91inlinable_91functions_scheme_cyclone_cps_91optimizations;
extern object __glo_opt_117contract_scheme_cyclone_cps_91optimizations;
extern object __glo_opt_117inline_91prims_scheme_cyclone_cps_91optimizations;
extern object __glo_opt_117beta_91expand_scheme_cyclone_cps_91optimizations;
extern object __glo_opt_117local_91var_91reduction_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117clear_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117get_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117set_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117get_91db_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117lambda_91ids_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117max_91lambda_91id_scheme_cyclone_cps_91optimizations;
extern object __glo_simple_91lambda_127_scheme_cyclone_cps_91optimizations;
extern object __glo_one_91instance_91of_91new_91mutable_91obj_127_scheme_cyclone_cps_91optimizations;
extern object __glo_well_91known_91lambda_scheme_cyclone_cps_91optimizations;
extern object __glo_analyze_117find_91known_91lambdas_scheme_cyclone_cps_91optimizations;
extern object __glo_validate_117num_91function_91args_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117make_91var_scheme_cyclone_cps_91optimizations;
extern object __glo__75adb_117make_91var_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117variable_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117global_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91global_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117defined_91by_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91defined_91by_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117mutated_91by_91set_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91mutated_91by_91set_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117reassigned_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91reassigned_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117assigned_91value_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91assigned_91value_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117const_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91const_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117const_91value_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91const_91value_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117ref_91count_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91ref_91by_91and_91count_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117ref_91by_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117def_91in_91loop_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91def_91in_91loop_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117ref_91in_91loop_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91ref_91in_91loop_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117direct_91rec_91call_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91direct_91rec_91call_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117self_91rec_91call_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91self_91rec_91call_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117app_91fnc_91count_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91app_91fnc_91count_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117app_91arg_91count_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91app_91arg_91count_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117cannot_91inline_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91cannot_91inline_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117inlinable_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91inlinable_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117mutated_91indirectly_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91mutated_91indirectly_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117cont_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbv_117set_91cont_67_scheme_cyclone_cps_91optimizations;
extern object __glo_with_91var_scheme_cyclone_cps_91optimizations;
extern object __glo_with_91var_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117make_91fnc_scheme_cyclone_cps_91optimizations;
extern object __glo__75adb_117make_91fnc_scheme_cyclone_cps_91optimizations;
extern object __glo_adb_117function_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117simple_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91simple_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91all_91params_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117unused_91params_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91unused_91params_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117assigned_91to_91var_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91assigned_91to_91var_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117side_91effects_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91side_91effects_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91well_91known_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117cgen_91id_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91cgen_91id_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91closure_91size_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117self_91closure_91index_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91self_91closure_91index_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117calls_91self_127_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91calls_91self_67_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117vars_91mutated_91by_91set_scheme_cyclone_cps_91optimizations;
extern object __glo_adbf_117set_91vars_91mutated_91by_91set_67_scheme_cyclone_cps_91optimizations;
extern object __glo_with_91fnc_scheme_cyclone_cps_91optimizations;
extern object __glo_with_91fnc_67_scheme_cyclone_cps_91optimizations;
extern object __glo_define_91syntax_127_scheme_cyclone_util;
extern object __glo_let_91syntax_127_scheme_cyclone_util;
extern object __glo_letrec_91syntax_127_scheme_cyclone_util;
extern object __glo_tagged_91list_127_scheme_cyclone_util;
extern object __glo_if_127_scheme_cyclone_util;
extern object __glo_if_91syntax_127_scheme_cyclone_util;
extern object __glo_begin_127_scheme_cyclone_util;
extern object __glo_lambda_127_scheme_cyclone_util;
extern object __glo_pair_91_125list_scheme_cyclone_util;
extern object __glo_define_91lambda_127_scheme_cyclone_util;
extern object __glo_define_91_125lambda_scheme_cyclone_util;
extern object __glo_formals_91_125list_scheme_cyclone_util;
extern object __glo_lambda_91formals_91_125list_scheme_cyclone_util;
extern object __glo_lambda_91varargs_127_scheme_cyclone_util;
extern object __glo_lambda_91_125formals_scheme_cyclone_util;
extern object __glo_lambda_91_125exp_scheme_cyclone_util;
extern object __glo_lambda_91formals_91type_scheme_cyclone_util;
extern object __glo_lambda_91varargs_91var_scheme_cyclone_util;
extern object __glo_pack_91lambda_91arguments_scheme_cyclone_util;
extern object __glo_if_91_125condition_scheme_cyclone_util;
extern object __glo_if_91_125then_scheme_cyclone_util;
extern object __glo_if_91else_127_scheme_cyclone_util;
extern object __glo_if_91_125else_scheme_cyclone_util;
extern object __glo_const_127_scheme_cyclone_util;
extern object __glo_ref_127_scheme_cyclone_util;
extern object __glo_quote_127_scheme_cyclone_util;
extern object __glo_define_91c_127_scheme_cyclone_util;
extern object __glo_set_67_127_scheme_cyclone_util;
extern object __glo_set_67_91_125var_scheme_cyclone_util;
extern object __glo_set_67_91_125exp_scheme_cyclone_util;
extern object __glo_define_127_scheme_cyclone_util;
extern object __glo_define_91_125var_scheme_cyclone_util;
extern object __glo_define_91_125exp_scheme_cyclone_util;
extern object __glo_app_127_scheme_cyclone_util;
extern object __glo_env_117enclosing_91environment_scheme_cyclone_util;
extern object __glo_env_117first_91frame_scheme_cyclone_util;
extern object __glo_env_117the_91empty_91environment_scheme_cyclone_util;
extern object __glo_env_117make_91frame_scheme_cyclone_util;
extern object __glo_env_117frame_91variables_scheme_cyclone_util;
extern object __glo_env_117frame_91values_scheme_cyclone_util;
extern object __glo_env_117add_91binding_91to_91frame_67_scheme_cyclone_util;
extern object __glo_env_117all_91variables_scheme_cyclone_util;
extern object __glo_env_117all_91values_scheme_cyclone_util;
extern object __glo_env_117extend_91environment_scheme_cyclone_util;
extern object __glo_env_117lookup_scheme_cyclone_util;
extern object __glo_env_117lookup_91variable_91value_scheme_cyclone_util;
extern object __glo_env_117_191lookup_91variable_91value_scheme_cyclone_util;
extern object __glo_env_117set_91variable_91value_67_scheme_cyclone_util;
extern object __glo_env_117define_91variable_67_scheme_cyclone_util;
extern object __glo_make_91syntactic_91closure_scheme_cyclone_util;
extern object __glo_strip_91syntactic_91closures_scheme_cyclone_util;
extern object __glo_identifier_91_125symbol_scheme_cyclone_util;
extern object __glo_identifier_127_scheme_cyclone_util;
extern object __glo_identifier_123_127_scheme_cyclone_util;
extern object __glo_Cyc_91er_91rename_scheme_cyclone_util;
extern object __glo_Cyc_91er_91compare_127_scheme_cyclone_util;
extern object __glo_mangle_scheme_cyclone_util;
extern object __glo_mangle_91global_scheme_cyclone_util;
extern object __glo_define_91c_91inline_127_scheme_cyclone_util;
extern object __glo_define_91c_91_125inline_91var_scheme_cyclone_util;
extern object __glo_Cyc_91set_91immutable_67_scheme_cyclone_util;
extern object __glo_string_91join_scheme_cyclone_util;
extern object __glo_string_91split_scheme_cyclone_util;
extern object __glo_gensym_scheme_cyclone_util;
extern object __glo_delete_scheme_cyclone_util;
extern object __glo_delete_91duplicates_scheme_cyclone_util;
extern object __glo_flatten_scheme_cyclone_util;
extern object __glo_length_95obj_scheme_cyclone_util;
extern object __glo_list_91index2_scheme_cyclone_util;
extern object __glo_list_91insert_91at_67_scheme_cyclone_util;
extern object __glo_list_91prefix_127_scheme_cyclone_util;
extern object __glo_string_91replace_91all_scheme_cyclone_util;
extern object __glo_take_scheme_cyclone_util;
extern object __glo_drop_scheme_cyclone_util;
extern object __glo_filter_scheme_cyclone_util;
extern object __glo_current_91expand_91filepath_scheme_cyclone_util;
extern object __glo_library_127_scheme_cyclone_libraries;
extern object __glo_library_91exists_127_scheme_cyclone_libraries;
extern object __glo_lib_117list_91_125import_91set_scheme_cyclone_libraries;
extern object __glo_lib_117name_scheme_cyclone_libraries;
extern object __glo_lib_117name_91_125string_scheme_cyclone_libraries;
extern object __glo_lib_117name_91_125symbol_scheme_cyclone_libraries;
extern object __glo_lib_117name_91_125unique_91string_scheme_cyclone_libraries;
extern object __glo_lib_117result_scheme_cyclone_libraries;
extern object __glo_lib_117exports_scheme_cyclone_libraries;
extern object __glo_lib_117rename_91exports_scheme_cyclone_libraries;
extern object __glo_lib_117imports_scheme_cyclone_libraries;
extern object __glo_lib_117body_scheme_cyclone_libraries;
extern object __glo_lib_117cond_91expand_scheme_cyclone_libraries;
extern object __glo_lib_117cond_91expand_91decls_scheme_cyclone_libraries;
extern object __glo_lib_117includes_scheme_cyclone_libraries;
extern object __glo_lib_117include_91c_91headers_scheme_cyclone_libraries;
extern object __glo_lib_117inlines_scheme_cyclone_libraries;
extern object __glo_lib_117import_91set_117library_91name_127_scheme_cyclone_libraries;
extern object __glo_lib_117import_91set_91_125import_91set_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125library_91name_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125filename_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125metalist_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125path_scheme_cyclone_libraries;
extern object __glo_lib_117check_91system_91path_scheme_cyclone_libraries;
extern object __glo_lib_117read_91imports_scheme_cyclone_libraries;
extern object __glo_lib_117read_91includes_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125export_91list_scheme_cyclone_libraries;
extern object __glo_lib_117import_91set_95exports_91_125imports_scheme_cyclone_libraries;
extern object __glo_lib_117resolve_91meta_scheme_cyclone_libraries;
extern object __glo_lib_117get_91all_scheme_cyclone_libraries;
extern object __glo_lib_117get_91all_91import_91deps_scheme_cyclone_libraries;
extern object __glo_lib_117get_91dep_91list_scheme_cyclone_libraries;
extern object __glo_lib_117c_91linker_91options_scheme_cyclone_libraries;
extern object __glo_lib_117read_91c_91linker_91options_scheme_cyclone_libraries;
extern object __glo_lib_117get_91all_91c_91linker_91options_scheme_cyclone_libraries;
extern object __glo_lib_117c_91compiler_91options_scheme_cyclone_libraries;
extern object __glo_lib_117read_91c_91compiler_91options_scheme_cyclone_libraries;
extern object __glo_lib_117get_91all_91c_91compiler_91options_scheme_cyclone_libraries;
extern object __glo_lib_117imports_91_125idb_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117ids_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117lookup_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117entry_91_125library_91name_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117entry_91_125library_91id_scheme_cyclone_libraries;
extern object __glo_fast_91string_123_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_121_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_125_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base;
extern object __glo__75write_91bytevector_191_191inline_191_191_scheme_base;
extern object __glo_not_191_191inline_191_191_scheme_base;
extern object __glo_list_127_191_191inline_191_191_scheme_base;
extern object __glo_zero_127_191_191inline_191_191_scheme_base;
extern object __glo_positive_127_191_191inline_191_191_scheme_base;
extern object __glo_negative_127_191_191inline_191_191_scheme_base;
extern object __glo_floor_191_191inline_191_191_scheme_base;
extern object __glo_ceiling_191_191inline_191_191_scheme_base;
extern object __glo_truncate_191_191inline_191_191_scheme_base;
extern object __glo_round_191_191inline_191_191_scheme_base;
extern object __glo_exact_191_191inline_191_191_scheme_base;
extern object __glo_inexact_191_191inline_191_191_scheme_base;
extern object __glo_sqrt_191_191inline_191_191_scheme_base;
extern object __glo_exact_91integer_127_191_191inline_191_191_scheme_base;
extern object __glo_exact_127_191_191inline_191_191_scheme_base;
extern object __glo_complex_127_191_191inline_191_191_scheme_base;
extern object __glo_fixnum_127_191_191inline_191_191_scheme_base;
extern object __glo_quotient_191_191inline_191_191_scheme_base;
extern object __glo_square_191_191inline_191_191_scheme_base;
extern object __glo_eof_91object_191_191inline_191_191_scheme_base;
extern object __glo_void_191_191inline_191_191_scheme_base;
extern object __glo_make_91record_91marker_191_191inline_191_191_scheme_base;
extern object __glo_variable_127_191_191inline_191_191_scheme_eval;
extern object __glo_assignment_91variable_191_191inline_191_191_scheme_eval;
extern object __glo_assignment_91value_191_191inline_191_191_scheme_eval;
extern object __glo_definition_91variable_191_191inline_191_191_scheme_eval;
extern object __glo_lambda_91parameters_191_191inline_191_191_scheme_eval;
extern object __glo_lambda_91body_191_191inline_191_191_scheme_eval;
extern object __glo_if_91predicate_191_191inline_191_191_scheme_eval;
extern object __glo_if_91consequent_191_191inline_191_191_scheme_eval;
extern object __glo_if_91alternative_191_191inline_191_191_scheme_eval;
extern object __glo_application_127_191_191inline_191_191_scheme_eval;
extern object __glo_operator_191_191inline_191_191_scheme_eval;
extern object __glo_operands_191_191inline_191_191_scheme_eval;
extern object __glo_procedure_91parameters_191_191inline_191_191_scheme_eval;
extern object __glo_procedure_91body_191_191inline_191_191_scheme_eval;
extern object __glo_procedure_91environment_191_191inline_191_191_scheme_eval;
extern object __glo_primitive_91implementation_191_191inline_191_191_scheme_eval;
extern object __glo_macro_117macro_127_191_191inline_191_191_scheme_eval;
extern object __glo_symbol_91hash_191_191inline_191_191_srfi_69;
extern object __glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_app_127_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_ref_127_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_set_67_91_125exp_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_lambda_91_125formals_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_env_117enclosing_91environment_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_env_117first_91frame_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_env_117frame_91variables_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_env_117frame_91values_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_lib_117import_91set_91_125import_91set_191_191inline_191_191_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117entry_91_125library_91name_191_191inline_191_191_scheme_cyclone_libraries;
#include "cyclone/runtime.h"
defsymbol(_85c_91call_91arity_85);
defsymbol(quote);
defsymbol(_list);
defsymbol(_85ref_91table_85);
defsymbol(_85global_91syms_85);
defsymbol(track_91call_91history);
defsymbol(_85cgen_117track_91call_91history_85);
defsymbol(use_91unsafe_91prims);
defsymbol(_85cgen_117use_91unsafe_91prims_85);
defsymbol(cgen_117mangle_91global);
defsymbol(cvar);
defsymbol(clo);
defsymbol(pair);
defsymbol(importing);
defsymbol(library);
defsymbol(a);
defsymbol(find);
defsymbol(to);
defsymbol(Unable);
defsymbol(args_117fixed);
defsymbol(call_95cc);
defsymbol(args_117fixed_91with_91varargs);
defsymbol(args_117varargs);
defsymbol(unused);
defsymbol(lambdas);
defsymbol(inline_91lambdas);
defsymbol(num_91lambdas);
defsymbol(_85symbols_85);
defsymbol(define_91c);
defsymbol(precompiled_91lambda);
defsymbol(precompiled_91inline_91lambda);
defsymbol(_85globals_85);
defsymbol(_85global_91inlines_85);
defsymbol(Cyc_91foreign_91code);
defsymbol(Cyc_91foreign_91value);
defsymbol(application);
defsymbol(function);
defsymbol(Unsupported);
defsymbol(let);
defsymbol(Cyc_91local_91set_67);
defsymbol(Cyc_91seq);
defsymbol(set_91global_67);
defsymbol(c_91void);
defsymbol(opaque);
defsymbol(bytevector);
defsymbol(string);
defsymbol(_char);
defsymbol(bool);
defsymbol(bigint);
defsymbol(bignum);
defsymbol(var);
defsymbol(_double);
defsymbol(_float);
defsymbol(integer);
defsymbol(_int);
defsymbol(cell_91get);
defsymbol(_75closure_91ref);
defsymbol(local);
defsymbol(_85use_91alloca_85);
defsymbol(tmp);
defsymbol(vec);
defsymbol(e);
defsymbol(c);
defsymbol(_75closure);
defsymbol(received);
defsymbol(arguments);
defsymbol(of);
defsymbol(number);
defsymbol(Non_91numeric);
static void __lambda_1286(void *data, object clo, int argc, object *args) ;/*closure _,object k_734083*/
static void __lambda_1287(void *data, object clo, int argc, object *args) ;/*object self_736399, object r_734097*/
static void __lambda_1288(void *data, object clo, int argc, object *args) ;/*object self_736400, object r_734085*/
static void __lambda_1289(void *data, object clo, int argc, object *args) ;/*object self_736401, object r_734086*/
static void __lambda_1290(void *data, object clo, int argc, object *args) ;/*object self_736402, object r_734087*/
static void __lambda_1291(void *data, object clo, int argc, object *args) ;/*object self_736403, object r_734088*/
static void __lambda_1292(void *data, object clo, int argc, object *args) ;/*object self_736404, object r_734089*/
static void __lambda_1293(void *data, object clo, int argc, object *args) ;/*object self_736405, object r_734090*/
static void __lambda_1282(void *data, object clo, int argc, object *args) ;/*closure _,object k_734067, object fp_731400_731947*/
static void __lambda_1285(void *data, object clo, int argc, object *args) ;/*object self_736396, object k_734072, object p_731402_731949*/
static void __lambda_1283(void *data, object clo, int argc, object *args) ;/*object self_736397, object r_734071*/
static void __lambda_1284(void *data, object clo, int argc, object *args) ;/*object self_736398, object r_734070*/
static void __lambda_1272(void *data, object clo, int argc, object *args) ;/*closure _,object k_734055, object fp_731398_731945*/
static void __lambda_1273(void *data, object clo, int argc, object *args) ;/*object self_736387, object r_734056*/
static void __lambda_1276(void *data, object clo, int argc, object *args) ;/*object self_736388, object k_734059, object p_731399_731946*/
static void __lambda_1277(void *data, object clo, int argc, object *args) ;/*object self_736389, object r_734061*/
static void __lambda_1278(void *data, object clo, int argc, object *args) ;/*object self_736390, object r_734062*/
static void __lambda_1279(void *data, object clo, int argc, object *args) ;/*object self_736391, object r_734063*/
static void __lambda_1280(void *data, object clo, int argc, object *args) ;/*object self_736392, object r_734064*/
static void __lambda_1281(void *data, object clo, int argc, object *args) ;/*object self_736393, object r_734060*/
static void __lambda_1274(void *data, object clo, int argc, object *args) ;/*object self_736394, object r_734058*/
static void __lambda_1275(void *data, object clo, int argc, object *args) ;/*object self_736395, object r_734057*/
static void __lambda_1268(void *data, object clo, int argc, object *args) ;/*closure _,object k_734049, object filename_731396_731943*/
static void __lambda_1269(void *data, object clo, int argc, object *args) ;/*object self_736384, object fp_731397_731944*/
static void __lambda_1270(void *data, object clo, int argc, object *args) ;/*object self_736385, object r_734051*/
static void __lambda_1271(void *data, object clo, int argc, object *args) ;/*object self_736386, object r_734052*/
static void __lambda_1262(void *data, object clo, int argc, object *args) ;/*closure _,object k_734040, object str_731394_731941*/
static void __lambda_1266(void *data, object clo, int argc, object *args) ;/*object self_736379, object k_734044, object c_731395_731942*/
static void __lambda_1267(void *data, object clo, int argc, object *args) ;/*object self_736380, object r_734045*/
static void __lambda_1263(void *data, object clo, int argc, object *args) ;/*object self_736381, object r_734042*/
static void __lambda_1264(void *data, object clo, int argc, object *args) ;/*object self_736382, object r_734043*/
static void __lambda_1265(void *data, object clo, int argc, object *args) ;/*object self_736383, object r_734041*/
static void __lambda_1246(void *data, object clo, int argc, object *args) ;/*closure _,object k_734023, object cstr_731378_731934*/
static void __lambda_1247(void *data, object clo, int argc, object *args) ;/*object self_736362, object r_734037*/
static void __lambda_1248(void *data, object clo, int argc, object *args) ;/*object self_736363, object r_734036*/
static void __lambda_1260(void *data, object clo, int argc, object *args) ;/*object self_736364, object k_734034, object a_731393_731940*/
static void __lambda_1261(void *data, object clo, int argc, object *args) ;/*object self_736365, object r_734035*/
static void __lambda_1249(void *data, object clo, int argc, object *args) ;/*object self_736366, object r_734033*/
static void __lambda_1250(void *data, object clo, int argc, object *args) ;/*object self_736367, object vars_731384_731936*/
static void __lambda_1251(void *data, object clo, int argc, object *args) ;/*object self_736368, object i_731387_731937*/
static void __lambda_1337(void *data, object clo, int argc, object *args) ;/*object self_736369, object i_731387_731937*/
static void __lambda_1252(void *data, object clo, int argc, object *args) ;/*object self_736370, object str_731390_731938*/
static void __lambda_1336(void *data, object clo, int argc, object *args) ;/*object self_736371, object str_731390_731938*/
static void __lambda_1255(void *data, object clo, int argc, object *args) ;/*object self_736372, object k_734028, object v_731392_731939*/
static void __lambda_1256(void *data, object clo, int argc, object *args) ;/*object self_736373, object r_734032*/
static void __lambda_1257(void *data, object clo, int argc, object *args) ;/*object self_736374, object r_734031*/
static void __lambda_1258(void *data, object clo, int argc, object *args) ;/*object self_736375, object r_734029*/
static void __lambda_1259(void *data, object clo, int argc, object *args) ;/*object self_736376, object r_734030*/
static void __lambda_1253(void *data, object clo, int argc, object *args) ;/*object self_736377, object r_734027*/
static void __lambda_1254(void *data, object clo, int argc, object *args) ;/*object self_736378, object r_734026*/
static void __lambda_972(void *data, object clo, int argc, object *args) ;/*closure _,object k_733631, object input_91program_731210_731858, object program_127_731211_731859, object lib_91name_731212_731860, object lib_91pass_91thru_91exports_731213_731861, object import_91db_731214_731862, object globals_731215_731863, object c_91headers_731216_731864, object required_91libs_731217_731865, object src_91file_731218_731866, object flag_91set_127_731219_731867*/
static void __lambda_973(void *data, object clo, int argc, object *args) ;/*object self_736079, object r_734020*/
static void __lambda_974(void *data, object clo, int argc, object *args) ;/*object self_736080, object r_733632*/
static void __lambda_975(void *data, object clo, int argc, object *args) ;/*object self_736081, object r_734019*/
static void __lambda_976(void *data, object clo, int argc, object *args) ;/*object self_736082, object r_734018*/
static void __lambda_977(void *data, object clo, int argc, object *args) ;/*object self_736083, object r_733633*/
static void __lambda_978(void *data, object clo, int argc, object *args) ;/*object self_736084, object r_734016*/
static void __lambda_979(void *data, object clo, int argc, object *args) ;/*object self_736085, object r_733634*/
static void __lambda_980(void *data, object clo, int argc, object *args) ;/*object self_736086, object r_734014*/
static void __lambda_981(void *data, object clo, int argc, object *args) ;/*object self_736087, object r_733635*/
static void __lambda_982(void *data, object clo, int argc, object *args) ;/*object self_736088, object r_734013*/
static void __lambda_983(void *data, object clo, int argc, object *args) ;/*object self_736089, object r_733636*/
static void __lambda_1233(void *data, object clo, int argc, object *args) ;/*object self_736090, object k_733985, object ident_731220_731868*/
static void __lambda_1234(void *data, object clo, int argc, object *args) ;/*object self_736091, object tmp_731229_731231_731869*/
static void __lambda_1236(void *data, object clo, int argc, object *args) ;/*object self_736092, object r_733987*/
static void __lambda_1240(void *data, object clo, int argc, object *args) ;/*object self_736096, object idb_91entry_731235_731872*/
static void __lambda_1241(void *data, object clo, int argc, object *args) ;/*object self_736097, object r_733994*/
static void __lambda_1242(void *data, object clo, int argc, object *args) ;/*object self_736098, object r_733991*/
static void __lambda_1243(void *data, object clo, int argc, object *args) ;/*object self_736099, object r_733993*/
static void __lambda_1244(void *data, object clo, int argc, object *args) ;/*object self_736100, object r_733992*/
static void __lambda_1245(void *data, object clo, int argc, object *args) ;/*object self_736101, object suffix_731243_731873, object prefix_731244_731874*/
static void __lambda_1237(void *data, object clo, int argc, object *args) ;/*object self_736093, object r_733988*/
static void __lambda_1238(void *data, object clo, int argc, object *args) ;/*object self_736094, object r_733989*/
static void __lambda_1239(void *data, object clo, int argc, object *args) ;/*object self_736095, object suffix_731232_731870, object prefix_731233_731871*/
static void __lambda_1235(void *data, object clo, int argc, object *args) ;/*object self_736102, object k_734010*/
static void __lambda_984(void *data, object clo, int argc, object *args) ;/*object self_736103, object r_733984*/
static void __lambda_985(void *data, object clo, int argc, object *args) ;/*object self_736104, object r_733637*/
static void __lambda_986(void *data, object clo, int argc, object *args) ;/*object self_736105, object compiled_91program_91lst_731245_731875, object compiled_91program_731246_731876*/
static void __lambda_1335(void *data, object clo, int argc, object *args) ;/*object self_736106, object compiled_91program_91lst_731245_731875*/
static void __lambda_1334(void *data, object clo, int argc, object *args) ;/*object self_736107, object compiled_91program_731246_731876*/
static void __lambda_1230(void *data, object clo, int argc, object *args) ;/*object self_736108, object k_733981, object expr_731247_731877*/
static void __lambda_1231(void *data, object clo, int argc, object *args) ;/*object self_736109, object r_733983*/
static void __lambda_1232(void *data, object clo, int argc, object *args) ;/*object self_736110, object r_733982*/
static void __lambda_987(void *data, object clo, int argc, object *args) ;/*object self_736111, object r_733980*/
static void __lambda_988(void *data, object clo, int argc, object *args) ;/*object self_736112, object r_733639*/
static void __lambda_989(void *data, object clo, int argc, object *args) ;/*object self_736113, object r_733979*/
static void __lambda_990(void *data, object clo, int argc, object *args) ;/*object self_736114, object r_733978*/
static void __lambda_991(void *data, object clo, int argc, object *args) ;/*object self_736115, object r_733640*/
static void __lambda_992(void *data, object clo, int argc, object *args) ;/*object self_736116, object r_733641*/
static void __lambda_1229(void *data, object clo, int argc, object *args) ;/*object self_736117, object k_733971, object h_731248_731878*/
static void __lambda_993(void *data, object clo, int argc, object *args) ;/*object self_736118, object r_733970*/
static void __lambda_994(void *data, object clo, int argc, object *args) ;/*object self_736119, object r_733642*/
static void __lambda_995(void *data, object clo, int argc, object *args) ;/*object self_736120, object r_733643*/
static void __lambda_1225(void *data, object clo, int argc, object *args) ;/*object self_736121, object k_733965, object global_731255_731879*/
static void __lambda_1226(void *data, object clo, int argc, object *args) ;/*object self_736122, object r_733966_735141*/
static void __lambda_1227(void *data, object clo, int argc, object *args) ;/*object self_736123, object r_733968_735142*/
static void __lambda_1228(void *data, object clo, int argc, object *args) ;/*object self_736124, object r_733967_735143_735144*/
static void __lambda_996(void *data, object clo, int argc, object *args) ;/*object self_736125, object r_733964*/
static void __lambda_997(void *data, object clo, int argc, object *args) ;/*object self_736126, object r_733644*/
static void __lambda_1217(void *data, object clo, int argc, object *args) ;/*object self_736127, object k_733956, object global_731256_731880*/
static void __lambda_1218(void *data, object clo, int argc, object *args) ;/*object self_736128, object r_733957_735122*/
static void __lambda_1219(void *data, object clo, int argc, object *args) ;/*object self_736129, object r_733963_735123*/
static void __lambda_1220(void *data, object clo, int argc, object *args) ;/*object self_736130, object r_733958_735124_735129*/
static void __lambda_1221(void *data, object clo, int argc, object *args) ;/*object self_736131, object r_733959_735125_735130_735134*/
static void __lambda_1222(void *data, object clo, int argc, object *args) ;/*object self_736132, object extern_731257_731881_735126_735131_735135*/
static void __lambda_1223(void *data, object clo, int argc, object *args) ;/*object self_736133, object r_733961_735127_735132_735136_735138*/
static void __lambda_1224(void *data, object clo, int argc, object *args) ;/*object self_736134, object r_733962_735128_735133_735137_735139_735140*/
static void __lambda_998(void *data, object clo, int argc, object *args) ;/*object self_736135, object r_733955*/
static void __lambda_999(void *data, object clo, int argc, object *args) ;/*object self_736136, object r_733645*/
static void __lambda_1213(void *data, object clo, int argc, object *args) ;/*object self_736137, object k_733951, object global_731261_731882*/
static void __lambda_1214(void *data, object clo, int argc, object *args) ;/*object self_736138, object r_733952_735118*/
static void __lambda_1215(void *data, object clo, int argc, object *args) ;/*object self_736139, object r_733954_735119*/
static void __lambda_1216(void *data, object clo, int argc, object *args) ;/*object self_736140, object r_733953_735120_735121*/
static void __lambda_1000(void *data, object clo, int argc, object *args) ;/*object self_736141, object r_733949*/
static void __lambda_1001(void *data, object clo, int argc, object *args) ;/*object self_736142, object r_733950*/
static void __lambda_1002(void *data, object clo, int argc, object *args) ;/*object self_736143, object r_733646*/
static void __lambda_1003(void *data, object clo, int argc, object *args) ;/*object self_736144, object r_733647*/
static void __lambda_1005(void *data, object clo, int argc, object *args) ;/*object self_736145, object r_733648*/
static void __lambda_1211(void *data, object clo, int argc, object *args) ;/*object self_736146, object k_733946, object sym_731262_731883*/
static void __lambda_1212(void *data, object clo, int argc, object *args) ;/*object self_736147, object r_733947*/
static void __lambda_1006(void *data, object clo, int argc, object *args) ;/*object self_736148, object r_733945*/
static void __lambda_1007(void *data, object clo, int argc, object *args) ;/*object self_736149, object r_733649*/
static void __lambda_1205(void *data, object clo, int argc, object *args) ;/*object self_736150, object k_733924, object l_731263_731884*/
static void __lambda_1208(void *data, object clo, int argc, object *args) ;/*object self_736153, object r_733933*/
static void __lambda_1210(void *data, object clo, int argc, object *args) ;/*object self_736155, object r_733937*/
static void __lambda_1209(void *data, object clo, int argc, object *args) ;/*object self_736154, object r_733934*/
static void __lambda_1207(void *data, object clo, int argc, object *args) ;/*object self_736152, object r_733930*/
static void __lambda_1206(void *data, object clo, int argc, object *args) ;/*object self_736151, object r_733926*/
static void __lambda_1008(void *data, object clo, int argc, object *args) ;/*object self_736156, object r_733923*/
static void __lambda_1009(void *data, object clo, int argc, object *args) ;/*object self_736157, object r_733650*/
static void __lambda_1010(void *data, object clo, int argc, object *args) ;/*object self_736158, object r_733651*/
static void __lambda_1184(void *data, object clo, int argc, object *args) ;/*object self_736159, object k_733893, object l_731274_731885*/
static void __lambda_1185(void *data, object clo, int argc, object *args) ;/*object self_736160, object r_733895*/
static void __lambda_1186(void *data, object clo, int argc, object *args) ;/*object self_736161, object r_733896*/
static void __lambda_1188(void *data, object clo, int argc, object *args) ;/*object self_736162, object k_733898, object fnc_731276_731887*/
static void __lambda_1192(void *data, object clo, int argc, object *args) ;/*object self_736163, object r_733899*/
static void __lambda_1193(void *data, object clo, int argc, object *args) ;/*object self_736164, object r_733919*/
static void __lambda_1194(void *data, object clo, int argc, object *args) ;/*object self_736165, object r_733918*/
static void __lambda_1195(void *data, object clo, int argc, object *args) ;/*object self_736166, object args_91str_731284_731889*/
static void __lambda_1196(void *data, object clo, int argc, object *args) ;/*object self_736167, object r_733916*/
static void __lambda_1197(void *data, object clo, int argc, object *args) ;/*object self_736168, object r_733915*/
static void __lambda_1198(void *data, object clo, int argc, object *args) ;/*object self_736169, object unpack_91args_91str_731287_731890*/
static void __lambda_1199(void *data, object clo, int argc, object *args) ;/*object self_736170, object r_733903*/
static void __lambda_1200(void *data, object clo, int argc, object *args) ;/*object self_736171, object r_733912*/
static void __lambda_1201(void *data, object clo, int argc, object *args) ;/*object self_736172, object r_733904*/
static void __lambda_1202(void *data, object clo, int argc, object *args) ;/*object self_736173, object r_733905*/
static void __lambda_1204(void *data, object clo, int argc, object *args) ;/*object self_736174, object r_733906*/
static void __lambda_1203(void *data, object clo, int argc, object *args) ;/*object self_736175, object k_733907*/
static void __lambda_1189(void *data, object clo, int argc, object *args) ;/*object self_736176, object k_733920*/
static void __lambda_1190(void *data, object clo, int argc, object *args) ;/*object self_736177, object r_733921*/
static void __lambda_1191(void *data, object clo, int argc, object *args) ;/*object self_736178, object r_733922*/
static void __lambda_1187(void *data, object clo, int argc, object *args) ;/*object self_736179, object r_733897*/
static void __lambda_1011(void *data, object clo, int argc, object *args) ;/*object self_736180, object r_733892*/
static void __lambda_1012(void *data, object clo, int argc, object *args) ;/*object self_736181, object r_733652*/
static void __lambda_1169(void *data, object clo, int argc, object *args) ;/*object self_736182, object k_733852, object l_731289_731891*/
static void __lambda_1177(void *data, object clo, int argc, object *args) ;/*object self_736190, object r_733876*/
static void __lambda_1181(void *data, object clo, int argc, object *args) ;/*object self_736194, object r_733885*/
static void __lambda_1182(void *data, object clo, int argc, object *args) ;/*object self_736195, object r_733884*/
static void __lambda_1183(void *data, object clo, int argc, object *args) ;/*object self_736196, object r_733882*/
static void __lambda_1178(void *data, object clo, int argc, object *args) ;/*object self_736191, object r_733880*/
static void __lambda_1179(void *data, object clo, int argc, object *args) ;/*object self_736192, object r_733879*/
static void __lambda_1180(void *data, object clo, int argc, object *args) ;/*object self_736193, object r_733877*/
static void __lambda_1176(void *data, object clo, int argc, object *args) ;/*object self_736189, object r_733871*/
static void __lambda_1170(void *data, object clo, int argc, object *args) ;/*object self_736183, object r_733868*/
static void __lambda_1171(void *data, object clo, int argc, object *args) ;/*object self_736184, object r_733866*/
static void __lambda_1172(void *data, object clo, int argc, object *args) ;/*object self_736185, object r_733867*/
static void __lambda_1175(void *data, object clo, int argc, object *args) ;/*object self_736188, object r_733861*/
static void __lambda_1173(void *data, object clo, int argc, object *args) ;/*object self_736186, object r_733855*/
static void __lambda_1174(void *data, object clo, int argc, object *args) ;/*object self_736187, object r_733856*/
static void __lambda_1013(void *data, object clo, int argc, object *args) ;/*object self_736197, object r_733851*/
static void __lambda_1014(void *data, object clo, int argc, object *args) ;/*object self_736198, object r_733653*/
static void __lambda_1049(void *data, object clo, int argc, object *args) ;/*object self_736199, object r_733654*/
static void __lambda_1057(void *data, object clo, int argc, object *args) ;/*object self_736200, object r_733655*/
static void __lambda_1058(void *data, object clo, int argc, object *args) ;/*object self_736201, object r_733656*/
static void __lambda_1166(void *data, object clo, int argc, object *args) ;/*object self_736202, object k_733788, object sym_731333_731906*/
static void __lambda_1167(void *data, object clo, int argc, object *args) ;/*object self_736203, object r_733789*/
static void __lambda_1168(void *data, object clo, int argc, object *args) ;/*object self_736204, object r_733790*/
static void __lambda_1059(void *data, object clo, int argc, object *args) ;/*object self_736205, object r_733787*/
static void __lambda_1060(void *data, object clo, int argc, object *args) ;/*object self_736206, object r_733657*/
static void __lambda_1161(void *data, object clo, int argc, object *args) ;/*object self_736207, object k_733781, object global_731334_731907*/
static void __lambda_1162(void *data, object clo, int argc, object *args) ;/*object self_736208, object mglo_731335_731908*/
static void __lambda_1163(void *data, object clo, int argc, object *args) ;/*object self_736209, object r_733785*/
static void __lambda_1164(void *data, object clo, int argc, object *args) ;/*object self_736210, object r_733783_735115*/
static void __lambda_1165(void *data, object clo, int argc, object *args) ;/*object self_736211, object r_733784_735116_735117*/
static void __lambda_1061(void *data, object clo, int argc, object *args) ;/*object self_736212, object r_733780*/
static void __lambda_1062(void *data, object clo, int argc, object *args) ;/*object self_736213, object r_733658*/
static void __lambda_1063(void *data, object clo, int argc, object *args) ;/*object self_736214, object r_733659*/
static void __lambda_1064(void *data, object clo, int argc, object *args) ;/*object self_736215, object prefix_731338_731909*/
static void __lambda_1152(void *data, object clo, int argc, object *args) ;/*object self_736216, object k_733767, object global_731343_731911*/
static void __lambda_1153(void *data, object clo, int argc, object *args) ;/*object self_736217, object r_733777_735084*/
static void __lambda_1154(void *data, object clo, int argc, object *args) ;/*object self_736218, object r_733768_735085_735092*/
static void __lambda_1155(void *data, object clo, int argc, object *args) ;/*object self_736219, object r_733769_735086_735093_735099*/
static void __lambda_1156(void *data, object clo, int argc, object *args) ;/*object self_736220, object r_733775_735087_735094_735100*/
static void __lambda_1157(void *data, object clo, int argc, object *args) ;/*object self_736221, object r_733770_735088_735095_735101_735105*/
static void __lambda_1158(void *data, object clo, int argc, object *args) ;/*object self_736222, object r_733771_735089_735096_735102_735106_735109*/
static void __lambda_1159(void *data, object clo, int argc, object *args) ;/*object self_736223, object r_733773_735090_735097_735103_735107_735110_735112*/
static void __lambda_1160(void *data, object clo, int argc, object *args) ;/*object self_736224, object r_733772_735091_735098_735104_735108_735111_735113_735114*/
static void __lambda_1065(void *data, object clo, int argc, object *args) ;/*object self_736225, object emit_91global_731341_731910*/
static void __lambda_1066(void *data, object clo, int argc, object *args) ;/*object self_736226, object r_733766*/
static void __lambda_1067(void *data, object clo, int argc, object *args) ;/*object self_736227, object r_733763*/
static void __lambda_1068(void *data, object clo, int argc, object *args) ;/*object self_736228, object r_733765*/
static void __lambda_1069(void *data, object clo, int argc, object *args) ;/*object self_736229, object r_733764*/
static void __lambda_1070(void *data, object clo, int argc, object *args) ;/*object self_736230, object r_733660*/
static void __lambda_1071(void *data, object clo, int argc, object *args) ;/*object self_736231, object pairs_731344_731912, object head_91pair_731345_731913*/
static void __lambda_1333(void *data, object clo, int argc, object *args) ;/*object self_736232, object pairs_731344_731912*/
static void __lambda_1332(void *data, object clo, int argc, object *args) ;/*object self_736233, object head_91pair_731345_731913*/
static void __lambda_1083(void *data, object clo, int argc, object *args) ;/*object self_736234, object r_733692*/
static void __lambda_1141(void *data, object clo, int argc, object *args) ;/*object self_736235, object k_733736, object g_731349_731917*/
static void __lambda_1142(void *data, object clo, int argc, object *args) ;/*object self_736236, object r_733748*/
static void __lambda_1143(void *data, object clo, int argc, object *args) ;/*object self_736237, object r_733737*/
static void __lambda_1144(void *data, object clo, int argc, object *args) ;/*object self_736238, object r_733746*/
static void __lambda_1145(void *data, object clo, int argc, object *args) ;/*object self_736239, object r_733738*/
static void __lambda_1146(void *data, object clo, int argc, object *args) ;/*object self_736240, object cvar_91sym_731350_731918, object pair_91sym_731351_731919*/
static void __lambda_1147(void *data, object clo, int argc, object *args) ;/*object self_736241, object r_733744*/
static void __lambda_1148(void *data, object clo, int argc, object *args) ;/*object self_736242, object r_733739*/
static void __lambda_1149(void *data, object clo, int argc, object *args) ;/*object self_736243, object r_733742*/
static void __lambda_1150(void *data, object clo, int argc, object *args) ;/*object self_736244, object r_733740*/
static void __lambda_1151(void *data, object clo, int argc, object *args) ;/*object self_736245, object r_733741*/
static void __lambda_1084(void *data, object clo, int argc, object *args) ;/*object self_736246, object r_733735*/
static void __lambda_1085(void *data, object clo, int argc, object *args) ;/*object self_736247, object r_733693*/
static void __lambda_1137(void *data, object clo, int argc, object *args) ;/*object self_736248, object k_733731, object g_731352_731920*/
static void __lambda_1138(void *data, object clo, int argc, object *args) ;/*object self_736249, object idb_91entry_731353_731921*/
static void __lambda_1139(void *data, object clo, int argc, object *args) ;/*object self_736250, object r_733733*/
static void __lambda_1140(void *data, object clo, int argc, object *args) ;/*object self_736251, object r_733734*/
static void __lambda_1086(void *data, object clo, int argc, object *args) ;/*object self_736252, object r_733730*/
static void __lambda_1087(void *data, object clo, int argc, object *args) ;/*object self_736253, object r_733694*/
static void __lambda_1135(void *data, object clo, int argc, object *args) ;/*object self_736254, object k_733727, object _191_731370_731930*/
static void __lambda_1136(void *data, object clo, int argc, object *args) ;/*object self_736255, object r_733728*/
static void __lambda_1088(void *data, object clo, int argc, object *args) ;/*object self_736256, object r_733726*/
static void __lambda_1089(void *data, object clo, int argc, object *args) ;/*object self_736257, object r_733698*/
static void __lambda_1090(void *data, object clo, int argc, object *args) ;/*object self_736258, object code_731355_731922, object ps_731356_731923, object cs_731357_731924*/
static void __lambda_1091(void *data, object clo, int argc, object *args) ;/*object self_736259, object loop_731358_731925*/
static void __lambda_1331(void *data, object clo, int argc, object *args) ;/*object self_736260, object loop_731358_731925*/
static void __lambda_1126(void *data, object clo, int argc, object *args) ;/*object self_736261, object k_733701, object code_731359_731926, object ps_731360_731927, object cs_731361_731928*/
static void __lambda_1133(void *data, object clo, int argc, object *args) ;/*object self_736267, object r_733715*/
static void __lambda_1134(void *data, object clo, int argc, object *args) ;/*object self_736268, object r_733719*/
static void __lambda_1132(void *data, object clo, int argc, object *args) ;/*object self_736269, object k_733723*/
static void __lambda_1130(void *data, object clo, int argc, object *args) ;/*object self_736264, object r_733706*/
static void __lambda_1131(void *data, object clo, int argc, object *args) ;/*object self_736265, object r_733710*/
static void __lambda_1129(void *data, object clo, int argc, object *args) ;/*object self_736266, object k_733713*/
static void __lambda_1128(void *data, object clo, int argc, object *args) ;/*object self_736262, object k_733704, object str_731365_731929*/
static void __lambda_1127(void *data, object clo, int argc, object *args) ;/*object self_736263, object r_733703*/
static void __lambda_1092(void *data, object clo, int argc, object *args) ;/*object self_736270, object r_733700*/
static void __lambda_1093(void *data, object clo, int argc, object *args) ;/*object self_736271, object r_733699*/
static void __lambda_1094(void *data, object clo, int argc, object *args) ;/*object self_736272, object r_733695*/
static void __lambda_1096(void *data, object clo, int argc, object *args) ;/*object self_736273, object r_733661*/
static void __lambda_1124(void *data, object clo, int argc, object *args) ;/*object self_736274, object r_733662*/
static void __lambda_1125(void *data, object clo, int argc, object *args) ;/*object self_736275, object r_733663*/
static void __lambda_1097(void *data, object clo, int argc, object *args) ;/*object self_736276, object k_733664*/
static void __lambda_1113(void *data, object clo, int argc, object *args) ;/*object self_736294, object r_733679*/
static void __lambda_1114(void *data, object clo, int argc, object *args) ;/*object self_736295, object r_733690*/
static void __lambda_1115(void *data, object clo, int argc, object *args) ;/*object self_736296, object r_733689*/
static void __lambda_1116(void *data, object clo, int argc, object *args) ;/*object self_736297, object r_733680*/
static void __lambda_1117(void *data, object clo, int argc, object *args) ;/*object self_736298, object r_733681*/
static void __lambda_1118(void *data, object clo, int argc, object *args) ;/*object self_736299, object r_733688*/
static void __lambda_1119(void *data, object clo, int argc, object *args) ;/*object self_736300, object r_733682*/
static void __lambda_1120(void *data, object clo, int argc, object *args) ;/*object self_736301, object r_733687*/
static void __lambda_1121(void *data, object clo, int argc, object *args) ;/*object self_736302, object r_733683*/
static void __lambda_1123(void *data, object clo, int argc, object *args) ;/*object self_736304, object r_733686*/
static void __lambda_1122(void *data, object clo, int argc, object *args) ;/*object self_736303, object r_733685*/
static void __lambda_1098(void *data, object clo, int argc, object *args) ;/*object self_736277, object this_91clo_731374_731931, object prev_91clo_731375_731932*/
static void __lambda_1330(void *data, object clo, int argc, object *args) ;/*object self_736278, object this_91clo_731374_731931*/
static void __lambda_1329(void *data, object clo, int argc, object *args) ;/*object self_736279, object prev_91clo_731375_731932*/
static void __lambda_1099(void *data, object clo, int argc, object *args) ;/*object self_736280, object r_733665*/
static void __lambda_1107(void *data, object clo, int argc, object *args) ;/*object self_736281, object k_733673, object lib_91name_731376_731933*/
static void __lambda_1108(void *data, object clo, int argc, object *args) ;/*object self_736282, object r_733674*/
static void __lambda_1109(void *data, object clo, int argc, object *args) ;/*object self_736283, object r_733678*/
static void __lambda_1110(void *data, object clo, int argc, object *args) ;/*object self_736284, object r_733677*/
static void __lambda_1111(void *data, object clo, int argc, object *args) ;/*object self_736285, object r_733675*/
static void __lambda_1112(void *data, object clo, int argc, object *args) ;/*object self_736286, object r_733676*/
static void __lambda_1100(void *data, object clo, int argc, object *args) ;/*object self_736287, object r_733671*/
static void __lambda_1101(void *data, object clo, int argc, object *args) ;/*object self_736288, object r_733672*/
static void __lambda_1102(void *data, object clo, int argc, object *args) ;/*object self_736289, object r_733666*/
static void __lambda_1103(void *data, object clo, int argc, object *args) ;/*object self_736290, object r_733667*/
static void __lambda_1104(void *data, object clo, int argc, object *args) ;/*object self_736291, object r_733668*/
static void __lambda_1105(void *data, object clo, int argc, object *args) ;/*object self_736292, object r_733669*/
static void __lambda_1106(void *data, object clo, int argc, object *args) ;/*object self_736293, object r_733670*/
static void __lambda_1095(void *data, object clo, int argc, object *args) ;/*object self_736305, object k_733696*/
static void __lambda_1072(void *data, object clo, int argc, object *args) ;/*object self_736306, object k_733750*/
static void __lambda_1073(void *data, object clo, int argc, object *args) ;/*object self_736307, object r_733760*/
static void __lambda_1074(void *data, object clo, int argc, object *args) ;/*object self_736308, object r_733751*/
static void __lambda_1075(void *data, object clo, int argc, object *args) ;/*object self_736309, object r_733758*/
static void __lambda_1076(void *data, object clo, int argc, object *args) ;/*object self_736310, object r_733752*/
static void __lambda_1077(void *data, object clo, int argc, object *args) ;/*object self_736311, object r_733757*/
static void __lambda_1078(void *data, object clo, int argc, object *args) ;/*object self_736312, object r_733753*/
static void __lambda_1079(void *data, object clo, int argc, object *args) ;/*object self_736313, object pair_91sym_731346_731914, object clo_91sym_731347_731915, object fnc_731348_731916*/
static void __lambda_1080(void *data, object clo, int argc, object *args) ;/*object self_736314, object r_733754*/
static void __lambda_1081(void *data, object clo, int argc, object *args) ;/*object self_736315, object r_733755*/
static void __lambda_1082(void *data, object clo, int argc, object *args) ;/*object self_736316, object r_733756*/
static void __lambda_1050(void *data, object clo, int argc, object *args) ;/*object self_736317, object k_733791*/
static void __lambda_1056(void *data, object clo, int argc, object *args) ;/*object self_736323, object r_733797*/
static void __lambda_1051(void *data, object clo, int argc, object *args) ;/*object self_736318, object r_733792*/
static void __lambda_1054(void *data, object clo, int argc, object *args) ;/*object self_736319, object k_733795, object lib_91name_731331_731905*/
static void __lambda_1055(void *data, object clo, int argc, object *args) ;/*object self_736320, object r_733796*/
static void __lambda_1052(void *data, object clo, int argc, object *args) ;/*object self_736321, object r_733794*/
static void __lambda_1053(void *data, object clo, int argc, object *args) ;/*object self_736322, object r_733793*/
static void __lambda_1015(void *data, object clo, int argc, object *args) ;/*object self_736324, object k_733798*/
static void __lambda_1016(void *data, object clo, int argc, object *args) ;/*object self_736325, object r_733850*/
static void __lambda_1017(void *data, object clo, int argc, object *args) ;/*object self_736326, object r_733799*/
static void __lambda_1018(void *data, object clo, int argc, object *args) ;/*object self_736327, object pairs_731307_731892, object head_91pair_731308_731893*/
static void __lambda_1328(void *data, object clo, int argc, object *args) ;/*object self_736328, object pairs_731307_731892*/
static void __lambda_1327(void *data, object clo, int argc, object *args) ;/*object self_736329, object head_91pair_731308_731893*/
static void __lambda_1042(void *data, object clo, int argc, object *args) ;/*object self_736330, object k_733840, object g_731309_731894*/
static void __lambda_1043(void *data, object clo, int argc, object *args) ;/*object self_736331, object r_733848*/
static void __lambda_1044(void *data, object clo, int argc, object *args) ;/*object self_736332, object pair_91sym_731310_731895*/
static void __lambda_1045(void *data, object clo, int argc, object *args) ;/*object self_736333, object r_733844*/
static void __lambda_1046(void *data, object clo, int argc, object *args) ;/*object self_736334, object r_733845*/
static void __lambda_1047(void *data, object clo, int argc, object *args) ;/*object self_736335, object r_733842*/
static void __lambda_1048(void *data, object clo, int argc, object *args) ;/*object self_736336, object r_733843*/
static void __lambda_1019(void *data, object clo, int argc, object *args) ;/*object self_736337, object r_733839*/
static void __lambda_1020(void *data, object clo, int argc, object *args) ;/*object self_736338, object r_733801*/
static void __lambda_1040(void *data, object clo, int argc, object *args) ;/*object self_736339, object k_733836, object _191_731327_731904*/
static void __lambda_1041(void *data, object clo, int argc, object *args) ;/*object self_736340, object r_733837*/
static void __lambda_1021(void *data, object clo, int argc, object *args) ;/*object self_736341, object r_733835*/
static void __lambda_1022(void *data, object clo, int argc, object *args) ;/*object self_736342, object r_733807*/
static void __lambda_1023(void *data, object clo, int argc, object *args) ;/*object self_736343, object code_731312_731896, object ps_731313_731897, object cs_731314_731898*/
static void __lambda_1024(void *data, object clo, int argc, object *args) ;/*object self_736344, object loop_731315_731899*/
static void __lambda_1326(void *data, object clo, int argc, object *args) ;/*object self_736345, object loop_731315_731899*/
static void __lambda_1031(void *data, object clo, int argc, object *args) ;/*object self_736346, object k_733810, object code_731316_731900, object ps_731317_731901, object cs_731318_731902*/
static void __lambda_1038(void *data, object clo, int argc, object *args) ;/*object self_736352, object r_733824*/
static void __lambda_1039(void *data, object clo, int argc, object *args) ;/*object self_736353, object r_733828*/
static void __lambda_1037(void *data, object clo, int argc, object *args) ;/*object self_736354, object k_733832*/
static void __lambda_1035(void *data, object clo, int argc, object *args) ;/*object self_736349, object r_733815*/
static void __lambda_1036(void *data, object clo, int argc, object *args) ;/*object self_736350, object r_733819*/
static void __lambda_1034(void *data, object clo, int argc, object *args) ;/*object self_736351, object k_733822*/
static void __lambda_1033(void *data, object clo, int argc, object *args) ;/*object self_736347, object k_733813, object str_731322_731903*/
static void __lambda_1032(void *data, object clo, int argc, object *args) ;/*object self_736348, object r_733812*/
static void __lambda_1025(void *data, object clo, int argc, object *args) ;/*object self_736355, object r_733809*/
static void __lambda_1026(void *data, object clo, int argc, object *args) ;/*object self_736356, object r_733808*/
static void __lambda_1027(void *data, object clo, int argc, object *args) ;/*object self_736357, object r_733802*/
static void __lambda_1028(void *data, object clo, int argc, object *args) ;/*object self_736358, object r_733803*/
static void __lambda_1030(void *data, object clo, int argc, object *args) ;/*object self_736359, object r_733804*/
static void __lambda_1029(void *data, object clo, int argc, object *args) ;/*object self_736360, object k_733805*/
static void __lambda_1004(void *data, object clo, int argc, object *args) ;/*object self_736361, object k_733948*/
static void __lambda_965(void *data, object clo, int argc, object *args) ;/*closure _,object k_733609, object import_91db_731197_731852, object ident_731198_731853, object error_127_731199_731854*/
static void __lambda_966(void *data, object clo, int argc, object *args) ;/*object self_736073, object idb_91entry_731200_731855*/
static void __lambda_967(void *data, object clo, int argc, object *args) ;/*object self_736074, object r_733614*/
static void __lambda_968(void *data, object clo, int argc, object *args) ;/*object self_736075, object r_733611*/
static void __lambda_969(void *data, object clo, int argc, object *args) ;/*object self_736076, object r_733613*/
static void __lambda_970(void *data, object clo, int argc, object *args) ;/*object self_736077, object r_733612*/
static void __lambda_971(void *data, object clo, int argc, object *args) ;/*object self_736078, object suffix_731208_731856, object prefix_731209_731857*/
static void __lambda_960(void *data, object clo, int argc, object *args) ;/*closure _,object k_733602, object import_731194_731849*/
static void __lambda_963(void *data, object clo, int argc, object *args) ;/*object self_736069, object k_733605, object id_731195_731850, object s_731196_731851*/
static void __lambda_964(void *data, object clo, int argc, object *args) ;/*object self_736070, object r_733606*/
static void __lambda_961(void *data, object clo, int argc, object *args) ;/*object self_736071, object r_733603*/
static void __lambda_962(void *data, object clo, int argc, object *args) ;/*object self_736072, object r_733604*/
static void __lambda_958(void *data, object clo, int argc, object *args) ;/*closure _,object k_733595, object exp_731188_731846*/
static void __lambda_959(void *data, object clo, int argc, object *args) ;/*object self_736068, object type_731189_731847*/
static void __lambda_953(void *data, object clo, int argc, object *args) ;/*closure _,object k_733586, object exp_731187_731845*/
static void __lambda_954(void *data, object clo, int argc, object *args) ;/*object self_736064, object r_733587*/
static void __lambda_955(void *data, object clo, int argc, object *args) ;/*object self_736065, object r_733591*/
static void __lambda_956(void *data, object clo, int argc, object *args) ;/*object self_736066, object r_733590*/
static void __lambda_957(void *data, object clo, int argc, object *args) ;/*object self_736067, object r_733589*/
static void __lambda_861(void *data, object clo, int argc, object *args) ;/*closure _,object k_733473, object exp_731097_731813, object trace_731098_731814, object cps_127_731099_731815*/
static void __lambda_862(void *data, object clo, int argc, object *args) ;/*object self_735969, object preamble_731102_731816*/
static void __lambda_1325(void *data, object clo, int argc, object *args) ;/*object self_735970, object preamble_731102_731816*/
static void __lambda_951(void *data, object clo, int argc, object *args) ;/*object self_735971, object k_733580, object s_731186_731844*/
static void __lambda_952(void *data, object clo, int argc, object *args) ;/*object self_735972, object r_733581*/
static void __lambda_863(void *data, object clo, int argc, object *args) ;/*object self_735973, object append_91preamble_731105_731817*/
static void __lambda_866(void *data, object clo, int argc, object *args) ;/*object self_735974, object r_733576*/
static void __lambda_867(void *data, object clo, int argc, object *args) ;/*object self_735975, object r_733577*/
static void __lambda_868(void *data, object clo, int argc, object *args) ;/*object self_735976, object formals_731109_731818*/
static void __lambda_875(void *data, object clo, int argc, object *args) ;/*object self_735977, object tmp_91ident_731112_731819*/
static void __lambda_877(void *data, object clo, int argc, object *args) ;/*object self_735978, object arg_91argc_731118_731821*/
static void __lambda_879(void *data, object clo, int argc, object *args) ;/*object self_735979, object arg_91closure_731121_731822*/
static void __lambda_882(void *data, object clo, int argc, object *args) ;/*object self_735980, object has_91closure_127_731124_731823*/
static void __lambda_883(void *data, object clo, int argc, object *args) ;/*object self_735981, object lis_731184_731843*/
static void __lambda_885(void *data, object clo, int argc, object *args) ;/*object self_735982, object formals_91as_91list_731127_731824*/
static void __lambda_889(void *data, object clo, int argc, object *args) ;/*object self_735983, object closure_91name_731130_731825*/
static void __lambda_890(void *data, object clo, int argc, object *args) ;/*object self_735984, object r_733551*/
static void __lambda_891(void *data, object clo, int argc, object *args) ;/*object self_735985, object r_733552*/
static void __lambda_892(void *data, object clo, int argc, object *args) ;/*object self_735986, object r_733550*/
static void __lambda_893(void *data, object clo, int argc, object *args) ;/*object self_735987, object tmp_731171_731173_731840*/
static void __lambda_896(void *data, object clo, int argc, object *args) ;/*object self_735988, object has_91loop_127_731133_731826*/
static void __lambda_898(void *data, object clo, int argc, object *args) ;/*object self_735989, object r_733540*/
static void __lambda_899(void *data, object clo, int argc, object *args) ;/*object self_735990, object formals_85_731136_731827*/
static void __lambda_901(void *data, object clo, int argc, object *args) ;/*object self_735991, object c_91formals_731139_731828*/
static void __lambda_923(void *data, object clo, int argc, object *args) ;/*object self_735992, object c_91arg_91unpacking_731142_731829*/
static void __lambda_924(void *data, object clo, int argc, object *args) ;/*object self_735993, object env_91closure_731145_731830*/
static void __lambda_925(void *data, object clo, int argc, object *args) ;/*object self_735994, object r_733517*/
static void __lambda_926(void *data, object clo, int argc, object *args) ;/*object self_735995, object r_733515*/
static void __lambda_927(void *data, object clo, int argc, object *args) ;/*object self_735996, object r_733516*/
static void __lambda_928(void *data, object clo, int argc, object *args) ;/*object self_735997, object body_731148_731831*/
static void __lambda_930(void *data, object clo, int argc, object *args) ;/*object self_735998, object k_733490, object name_731150_731832*/
static void __lambda_940(void *data, object clo, int argc, object *args) ;/*object self_735999, object r_733491*/
static void __lambda_945(void *data, object clo, int argc, object *args) ;/*object self_736000, object r_733497*/
static void __lambda_946(void *data, object clo, int argc, object *args) ;/*object self_736001, object r_733496*/
static void __lambda_947(void *data, object clo, int argc, object *args) ;/*object self_736002, object r_733495*/
static void __lambda_948(void *data, object clo, int argc, object *args) ;/*object self_736003, object r_733492*/
static void __lambda_950(void *data, object clo, int argc, object *args) ;/*object self_736004, object r_733493*/
static void __lambda_949(void *data, object clo, int argc, object *args) ;/*object self_736005, object k_733494*/
static void __lambda_941(void *data, object clo, int argc, object *args) ;/*object self_736006, object k_733498*/
static void __lambda_942(void *data, object clo, int argc, object *args) ;/*object self_736007, object r_733499*/
static void __lambda_944(void *data, object clo, int argc, object *args) ;/*object self_736008, object r_733500*/
static void __lambda_943(void *data, object clo, int argc, object *args) ;/*object self_736009, object k_733501*/
static void __lambda_931(void *data, object clo, int argc, object *args) ;/*object self_736010, object k_733502*/
static void __lambda_932(void *data, object clo, int argc, object *args) ;/*object self_736011, object r_733503*/
static void __lambda_933(void *data, object clo, int argc, object *args) ;/*object self_736012, object r_733513*/
static void __lambda_935(void *data, object clo, int argc, object *args) ;/*object self_736013, object r_733510*/
static void __lambda_936(void *data, object clo, int argc, object *args) ;/*object self_736014, object r_733508*/
static void __lambda_937(void *data, object clo, int argc, object *args) ;/*object self_736015, object r_733505*/
static void __lambda_938(void *data, object clo, int argc, object *args) ;/*object self_736016, object r_733506*/
static void __lambda_939(void *data, object clo, int argc, object *args) ;/*object self_736017, object r_733507*/
static void __lambda_934(void *data, object clo, int argc, object *args) ;/*object self_736018, object k_733511*/
static void __lambda_929(void *data, object clo, int argc, object *args) ;/*object self_736019, object r_733489*/
static void __lambda_902(void *data, object clo, int argc, object *args) ;/*object self_736020, object k_733518*/
static void __lambda_903(void *data, object clo, int argc, object *args) ;/*object self_736021, object r_733519*/
static void __lambda_904(void *data, object clo, int argc, object *args) ;/*object self_736022, object i_731159_731834, object cstr_731160_731835, object scm_91args_731161_731836, object args_731162_731837*/
static void __lambda_1324(void *data, object clo, int argc, object *args) ;/*object self_736023, object i_731159_731834*/
static void __lambda_1323(void *data, object clo, int argc, object *args) ;/*object self_736024, object cstr_731160_731835*/
static void __lambda_1322(void *data, object clo, int argc, object *args) ;/*object self_736025, object args_731162_731837*/
static void __lambda_909(void *data, object clo, int argc, object *args) ;/*object self_736026, object r_733520*/
static void __lambda_916(void *data, object clo, int argc, object *args) ;/*object self_736027, object k_733527, object scm_91arg_731163_731838, object arg_731164_731839*/
static void __lambda_921(void *data, object clo, int argc, object *args) ;/*object self_736028, object r_733528*/
static void __lambda_922(void *data, object clo, int argc, object *args) ;/*object self_736029, object r_733529*/
static void __lambda_917(void *data, object clo, int argc, object *args) ;/*object self_736030, object k_733530*/
static void __lambda_918(void *data, object clo, int argc, object *args) ;/*object self_736031, object r_733531*/
static void __lambda_919(void *data, object clo, int argc, object *args) ;/*object self_736032, object r_733533*/
static void __lambda_920(void *data, object clo, int argc, object *args) ;/*object self_736033, object r_733532*/
static void __lambda_910(void *data, object clo, int argc, object *args) ;/*object self_736034, object r_733522*/
static void __lambda_912(void *data, object clo, int argc, object *args) ;/*object self_736035, object r_733523*/
static void __lambda_914(void *data, object clo, int argc, object *args) ;/*object self_736036, object r_733524*/
static void __lambda_915(void *data, object clo, int argc, object *args) ;/*object self_736037, object r_733521*/
static void __lambda_913(void *data, object clo, int argc, object *args) ;/*object self_736038, object k_733525*/
static void __lambda_911(void *data, object clo, int argc, object *args) ;/*object self_736039, object k_733526*/
static void __lambda_905(void *data, object clo, int argc, object *args) ;/*object self_736040, object k_733534*/
static void __lambda_906(void *data, object clo, int argc, object *args) ;/*object self_736041, object r_733535*/
static void __lambda_907(void *data, object clo, int argc, object *args) ;/*object self_736042, object r_733538*/
static void __lambda_908(void *data, object clo, int argc, object *args) ;/*object self_736043, object r_733536*/
static void __lambda_900(void *data, object clo, int argc, object *args) ;/*object self_736044, object k_733539*/
static void __lambda_897(void *data, object clo, int argc, object *args) ;/*object self_736045, object k_733541*/
static void __lambda_894(void *data, object clo, int argc, object *args) ;/*object self_736046, object k_733544*/
static void __lambda_895(void *data, object clo, int argc, object *args) ;/*object self_736047, object r_733547*/
static void __lambda_886(void *data, object clo, int argc, object *args) ;/*object self_736048, object k_733553*/
static void __lambda_887(void *data, object clo, int argc, object *args) ;/*object self_736049, object lis_731179_731841*/
static void __lambda_888(void *data, object clo, int argc, object *args) ;/*object self_736050, object r_733555*/
static void __lambda_884(void *data, object clo, int argc, object *args) ;/*object self_736051, object k_733558*/
static void __lambda_880(void *data, object clo, int argc, object *args) ;/*object self_736052, object k_733560*/
static void __lambda_881(void *data, object clo, int argc, object *args) ;/*object self_736053, object r_733562*/
static void __lambda_878(void *data, object clo, int argc, object *args) ;/*object self_736054, object k_733564*/
static void __lambda_876(void *data, object clo, int argc, object *args) ;/*object self_736055, object k_733565*/
static void __lambda_869(void *data, object clo, int argc, object *args) ;/*object self_736056, object k_733567*/
static void __lambda_870(void *data, object clo, int argc, object *args) ;/*object self_736057, object r_733575*/
static void __lambda_874(void *data, object clo, int argc, object *args) ;/*object self_736058, object r_733569*/
static void __lambda_871(void *data, object clo, int argc, object *args) ;/*object self_736059, object k_733570*/
static void __lambda_872(void *data, object clo, int argc, object *args) ;/*object self_736060, object r_733573*/
static void __lambda_873(void *data, object clo, int argc, object *args) ;/*object self_736061, object r_733572*/
static void __lambda_864(void *data, object clo, int argc, object *args) ;/*object self_736062, object k_733578*/
static void __lambda_865(void *data, object clo, int argc, object *args) ;/*object self_736063, object r_733579*/
static void __lambda_854(void *data, object clo, int argc, object *args) ;/*closure _,object k_733452, object formals_731080_731811, object type_731081_731812*/
static void __lambda_856(void *data, object clo, int argc, object *args) ;/*object self_735964, object r_733456*/
static void __lambda_860(void *data, object clo, int argc, object *args) ;/*object self_735965, object r_733457*/
static void __lambda_857(void *data, object clo, int argc, object *args) ;/*object self_735966, object k_733458*/
static void __lambda_859(void *data, object clo, int argc, object *args) ;/*object self_735968, object r_733463*/
static void __lambda_858(void *data, object clo, int argc, object *args) ;/*object self_735967, object r_733460*/
static void __lambda_855(void *data, object clo, int argc, object *args) ;/*object self_735963, object r_733454*/
static void __lambda_781(void *data, object clo, int argc, object *args) ;/*closure _,object k_733353, object exp_731005_731779, object append_91preamble_731006_731780, object cont_731007_731781, object ast_91id_731008_731782, object trace_731009_731783, object cps_127_731010_731784*/
static void __lambda_782(void *data, object clo, int argc, object *args) ;/*object self_735890, object r_733448*/
static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_735891, object r_733449*/
static void __lambda_784(void *data, object clo, int argc, object *args) ;/*object self_735892, object r_733354*/
static void __lambda_785(void *data, object clo, int argc, object *args) ;/*object self_735893, object lam_731013_731785*/
static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_735894, object use_91alloca_127_731016_731786*/
static void __lambda_850(void *data, object clo, int argc, object *args) ;/*object self_735895, object k_733441, object free_91var_731077_731808*/
static void __lambda_851(void *data, object clo, int argc, object *args) ;/*object self_735896, object r_733442*/
static void __lambda_852(void *data, object clo, int argc, object *args) ;/*object self_735897, object r_733444*/
static void __lambda_853(void *data, object clo, int argc, object *args) ;/*object self_735898, object var_731078_731809, object idx_731079_731810*/
static void __lambda_787(void *data, object clo, int argc, object *args) ;/*object self_735899, object r_733439*/
static void __lambda_788(void *data, object clo, int argc, object *args) ;/*object self_735900, object r_733440*/
static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_735901, object free_91vars_731019_731787*/
static void __lambda_790(void *data, object clo, int argc, object *args) ;/*object self_735902, object r_733437*/
static void __lambda_791(void *data, object clo, int argc, object *args) ;/*object self_735903, object cv_91name_731022_731788*/
static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_735904, object r_733436*/
static void __lambda_793(void *data, object clo, int argc, object *args) ;/*object self_735905, object lid_731025_731789*/
static void __lambda_794(void *data, object clo, int argc, object *args) ;/*object self_735906, object r_733431*/
static void __lambda_847(void *data, object clo, int argc, object *args) ;/*object self_735907, object k_733433, object fnc_731074_731807*/
static void __lambda_848(void *data, object clo, int argc, object *args) ;/*object self_735908, object r_733434*/
static void __lambda_849(void *data, object clo, int argc, object *args) ;/*object self_735909, object r_733435*/
static void __lambda_795(void *data, object clo, int argc, object *args) ;/*object self_735910, object r_733432*/
static void __lambda_796(void *data, object clo, int argc, object *args) ;/*object self_735911, object use_91obj_91instead_91of_91closure_127_731028_731790*/
static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_735912, object r_733430_735026*/
static void __lambda_798(void *data, object clo, int argc, object *args) ;/*object self_735913, object macro_127_731031_731791_735027*/
static void __lambda_801(void *data, object clo, int argc, object *args) ;/*object self_735914, object num_91args_91str_731037_731793_735034*/
static void __lambda_845(void *data, object clo, int argc, object *args) ;/*object self_735915, object k_733419_735080*/
static void __lambda_846(void *data, object clo, int argc, object *args) ;/*object self_735916, object r_733421_735081*/
static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_735917, object create_91object_731040_731794_735035*/
static void __lambda_821(void *data, object clo, int argc, object *args) ;/*object self_735918, object k_733390_735054*/
static void __lambda_823(void *data, object clo, int argc, object *args) ;/*object self_735919, object decl_731056_731798_735056*/
static void __lambda_824(void *data, object clo, int argc, object *args) ;/*object self_735920, object r_733416_735057*/
static void __lambda_825(void *data, object clo, int argc, object *args) ;/*object self_735921, object ev_91name_731059_731799_735058*/
static void __lambda_829(void *data, object clo, int argc, object *args) ;/*object self_735922, object elem_91decl_731062_731800_735062*/
static void __lambda_831(void *data, object clo, int argc, object *args) ;/*object self_735923, object sep_731065_731801_735064*/
static void __lambda_833(void *data, object clo, int argc, object *args) ;/*object self_735924, object r_733395_735066*/
static void __lambda_834(void *data, object clo, int argc, object *args) ;/*object self_735925, object r_733396_735067*/
static void __lambda_835(void *data, object clo, int argc, object *args) ;/*object self_735926, object r_733408_735068*/
static void __lambda_836(void *data, object clo, int argc, object *args) ;/*object self_735927, object r_733397_735069*/
static void __lambda_837(void *data, object clo, int argc, object *args) ;/*object self_735928, object vars_731069_731803_735070*/
static void __lambda_838(void *data, object clo, int argc, object *args) ;/*object self_735929, object loop_731070_731804_735071*/
static void __lambda_1321(void *data, object clo, int argc, object *args) ;/*object self_735930, object loop_731070_731804_735071*/
static void __lambda_842(void *data, object clo, int argc, object *args) ;/*object self_735931, object k_733401_735075, object i_731071_731805_735076, object vars_731072_731806_735077*/
static void __lambda_843(void *data, object clo, int argc, object *args) ;/*object self_735932, object r_733403_735078*/
static void __lambda_844(void *data, object clo, int argc, object *args) ;/*object self_735933, object r_733405_735079*/
static void __lambda_839(void *data, object clo, int argc, object *args) ;/*object self_735934, object r_733400_735072*/
static void __lambda_840(void *data, object clo, int argc, object *args) ;/*object self_735935, object r_733399_735073*/
static void __lambda_841(void *data, object clo, int argc, object *args) ;/*object self_735936, object r_733398_735074*/
static void __lambda_832(void *data, object clo, int argc, object *args) ;/*object self_735937, object k_733409_735065*/
static void __lambda_830(void *data, object clo, int argc, object *args) ;/*object self_735938, object k_733410_735063*/
static void __lambda_826(void *data, object clo, int argc, object *args) ;/*object self_735939, object k_733411_735059*/
static void __lambda_828(void *data, object clo, int argc, object *args) ;/*object self_735941, object r_733414_735061*/
static void __lambda_827(void *data, object clo, int argc, object *args) ;/*object self_735940, object r_733412_735060*/
static void __lambda_822(void *data, object clo, int argc, object *args) ;/*object self_735942, object k_733418_735055*/
static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_735943, object create_91nclosure_731043_731795_735036*/
static void __lambda_811(void *data, object clo, int argc, object *args) ;/*object self_735944, object k_733377_735044*/
static void __lambda_814(void *data, object clo, int argc, object *args) ;/*object self_735945, object prefix_731053_731797_735047*/
static void __lambda_815(void *data, object clo, int argc, object *args) ;/*object self_735946, object r_733379_735048*/
static void __lambda_817(void *data, object clo, int argc, object *args) ;/*object self_735947, object r_733380_735050*/
static void __lambda_818(void *data, object clo, int argc, object *args) ;/*object self_735948, object r_733381_735051*/
static void __lambda_819(void *data, object clo, int argc, object *args) ;/*object self_735949, object r_733383_735052*/
static void __lambda_820(void *data, object clo, int argc, object *args) ;/*object self_735950, object r_733382_735053*/
static void __lambda_816(void *data, object clo, int argc, object *args) ;/*object self_735951, object k_733384_735049*/
static void __lambda_812(void *data, object clo, int argc, object *args) ;/*object self_735952, object k_733387_735045*/
static void __lambda_813(void *data, object clo, int argc, object *args) ;/*object self_735953, object r_733388_735046*/
static void __lambda_804(void *data, object clo, int argc, object *args) ;/*object self_735954, object create_91mclosure_731046_731796_735037*/
static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_735955, object r_733367_735041*/
static void __lambda_810(void *data, object clo, int argc, object *args) ;/*object self_735956, object r_733369_735043*/
static void __lambda_809(void *data, object clo, int argc, object *args) ;/*object self_735957, object k_733370_735042*/
static void __lambda_805(void *data, object clo, int argc, object *args) ;/*object self_735958, object k_733373_735038*/
static void __lambda_807(void *data, object clo, int argc, object *args) ;/*object self_735959, object r_733374_735040*/
static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_735960, object k_733375_735039*/
static void __lambda_799(void *data, object clo, int argc, object *args) ;/*object self_735961, object k_733422_735032*/
static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_735962, object r_733423_735033*/
static void __lambda_764(void *data, object clo, int argc, object *args) ;/*closure _,object k_733334, object ast_91fnc_73994_731774, object closure_91args_73995_731775*/
static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_735873, object r_733350*/
static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_735874, object r_733335*/
static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_735875, object index_73996_731776, object fnc_73997_731777*/
static void __lambda_1320(void *data, object clo, int argc, object *args) ;/*object self_735876, object index_73996_731776*/
static void __lambda_770(void *data, object clo, int argc, object *args) ;/*object self_735877, object r_733336*/
static void __lambda_772(void *data, object clo, int argc, object *args) ;/*object self_735878, object k_733338, object arg_731002_731778*/
static void __lambda_779(void *data, object clo, int argc, object *args) ;/*object self_735879, object r_733339*/
static void __lambda_780(void *data, object clo, int argc, object *args) ;/*object self_735880, object r_733340*/
static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_735881, object k_733341*/
static void __lambda_776(void *data, object clo, int argc, object *args) ;/*object self_735882, object r_733342*/
static void __lambda_777(void *data, object clo, int argc, object *args) ;/*object self_735883, object r_733343*/
static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_735884, object r_733344*/
static void __lambda_774(void *data, object clo, int argc, object *args) ;/*object self_735885, object k_733345*/
static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_735886, object r_733347*/
static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_735887, object r_733337*/
static void __lambda_768(void *data, object clo, int argc, object *args) ;/*object self_735888, object k_733348*/
static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_735889, object r_733349*/
static void __lambda_755(void *data, object clo, int argc, object *args) ;/*closure _,object k_733322, object ast_91id_73984_731770, object var_73985_731771, object idx_73986_731772*/
static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_735865, object k_733324, object fnc_73987_731773*/
static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_735866, object r_733325*/
static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_735868, object r_733328*/
static void __lambda_762(void *data, object clo, int argc, object *args) ;/*object self_735867, object r_733327*/
static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_735869, object k_733329*/
static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_735870, object r_733330*/
static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_735871, object r_733331*/
static void __lambda_756(void *data, object clo, int argc, object *args) ;/*object self_735872, object r_733323*/
static void __lambda_749(void *data, object clo, int argc, object *args) ;/*closure _,object k_733309, object lis_73975_731766*/
static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_735860, object k_733313, object lis_73977_731768*/
static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_735861, object arg_73982_731769*/
static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_735862, object r_733317*/
static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_735863, object check_73976_731767*/
static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_735864, object r_733311*/
static void __lambda_746(void *data, object clo, int argc, object *args) ;/*closure _,object k_733300, object lis_73968_731764*/
static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_735858, object arg_73973_731765*/
static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_735859, object r_733304*/
static void __lambda_742(void *data, object clo, int argc, object *args) ;/*closure _,object k_733290, object exp_73958_731761*/
static void __lambda_743(void *data, object clo, int argc, object *args) ;/*object self_735855, object r_733291*/
static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_735856, object r_733297*/
static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_735857, object type_73959_731762, object num_73960_731763*/
static void __lambda_733(void *data, object clo, int argc, object *args) ;/*closure _,object k_733277, object lam_73951_731758*/
static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_735847, object count_73952_731759*/
static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_735848, object formals_73957_731760*/
static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_735849, object r_733285*/
static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_735850, object r_733282*/
static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_735851, object k_733283*/
static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_735852, object r_733284*/
static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_735853, object k_733286*/
static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_735854, object r_733287*/
static void __lambda_731(void *data, object clo, int argc, object *args) ;/*closure _,object k_733272, object exp_73949_731756*/
static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_735846, object formals_73950_731757*/
static void __lambda_719(void *data, object clo, int argc, object *args) ;/*closure _,object k_733253, object ast_117lam_73940_731752, object lam_73941_731753, object cps_127_73942_731754_raw, ...*/
static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_735834, object id_73943_731755*/
static void __lambda_1319(void *data, object clo, int argc, object *args) ;/*object self_735835, object id_73943_731755*/
static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_735836, object r_733254*/
static void __lambda_725(void *data, object clo, int argc, object *args) ;/*object self_735837, object r_733262*/
static void __lambda_726(void *data, object clo, int argc, object *args) ;/*object self_735838, object r_733261*/
static void __lambda_727(void *data, object clo, int argc, object *args) ;/*object self_735839, object r_733255*/
static void __lambda_730(void *data, object clo, int argc, object *args) ;/*object self_735840, object r_733256*/
static void __lambda_728(void *data, object clo, int argc, object *args) ;/*object self_735841, object k_733257*/
static void __lambda_729(void *data, object clo, int argc, object *args) ;/*object self_735842, object r_733259*/
static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_735843, object k_733263*/
static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_735845, object r_733266*/
static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_735844, object r_733265*/
static void __lambda_716(void *data, object clo, int argc, object *args) ;/*closure _,object k_733242, object sym_73939_731751*/
static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_735832, object r_733243*/
static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_735833, object r_733244*/
static void __lambda_691(void *data, object clo, int argc, object *args) ;/*closure _,object k_733195, object exp_73905_731737, object append_91preamble_73906_731738, object cont_73907_731739, object trace_73908_731740, object cps_127_73909_731741_raw, ...*/
static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_735807, object r_733231*/
static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_735808, object r_733233*/
static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_735809, object lid_73918_731744*/
static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_735810, object count_73934_731749*/
static void __lambda_1318(void *data, object clo, int argc, object *args) ;/*object self_735811, object count_73934_731749*/
static void __lambda_714(void *data, object clo, int argc, object *args) ;/*object self_735812, object k_733227, object c_73935_731750*/
static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_735813, object r_733229*/
static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_735814, object r_733225*/
static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_735815, object r_733226*/
static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_735816, object r_733224*/
static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_735817, object total_91num_91args_73921_731745*/
static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_735818, object r_733201*/
static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_735819, object r_733204*/
static void __lambda_707(void *data, object clo, int argc, object *args) ;/*object self_735820, object r_733212*/
static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_735821, object cv_91name_73933_731748*/
static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_735822, object r_733207*/
static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_735823, object r_733210*/
static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_735824, object r_733211*/
static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_735825, object r_733209*/
static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_735826, object r_733202_735024*/
static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_735827, object k_733214*/
static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_735828, object r_733223*/
static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_735829, object fnc_91sym_73929_731747*/
static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_735830, object r_733222*/
static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_735831, object r_733217*/
static void __lambda_669(void *data, object clo, int argc, object *args) ;/*closure _,object k_733166, object exp_73898_731731, object append_91preamble_73899_731732, object cont_73900_731733, object trace_73901_731734*/
static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_735786, object r_733167*/
static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_735787, object var_73902_731735, object body_73903_731736*/
static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_735788, object r_733183*/
static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_735789, object r_733185*/
static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_735790, object r_733186*/
static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_735791, object r_733184*/
static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_735792, object r_733169*/
static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_735793, object r_733170*/
static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_735794, object k_733172*/
static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_735795, object r_733173*/
static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_735796, object r_733179*/
static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_735797, object r_733174*/
static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_735798, object r_733175*/
static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_735799, object r_733177*/
static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_735800, object r_733178*/
static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_735801, object r_733176*/
static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_735802, object k_733180*/
static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_735803, object r_733181*/
static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_735804, object r_733182*/
static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_735805, object k_733187*/
static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_735806, object r_733188*/
static void __lambda_667(void *data, object clo, int argc, object *args) ;/*closure _,object k_733161, object var_91sym_73895_731728, object lambda_127_73896_731729, object code_73897_731730*/
static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_735785, object r_733162*/
static object __lambda_1343(void *data, object ptr,object global_73894_731727) ;
static void __lambda_666(void *data, object clo, int argc, object *args) ;/*closure _,object k_733157, object global_73894_731727*/
static object __lambda_1342(void *data, object ptr,object global_73893_731726) ;
static void __lambda_665(void *data, object clo, int argc, object *args) ;/*closure _,object k_733154, object global_73893_731726*/
static void __lambda_663(void *data, object clo, int argc, object *args) ;/*closure _,object k_733145, object orig_91sym_73891_731724, object inline_91sym_73892_731725*/
static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_735784, object r_733146*/
static void __lambda_653(void *data, object clo, int argc, object *args) ;/*closure _,object k_733126, object exp_73871_731713, object append_91preamble_73872_731714, object cont_73873_731715, object ast_91id_73874_731716, object trace_73875_731717, object cps_127_73876_731718*/
static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_735775, object k_733140, object exp_73890_731723*/
static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_735776, object compile_73879_731719*/
static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_735777, object test_73882_731720*/
static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_735778, object then_73885_731721*/
static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_735779, object els_73888_731722*/
static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_735780, object r_733132_735014*/
static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_735781, object r_733134_735016_735020*/
static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_735782, object r_733135_735017_735021*/
static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_735783, object r_733131_735018_735022*/
static void __lambda_384(void *data, object clo, int argc, object *args) ;/*closure _,object k_732656, object exp_73551_731620, object append_91preamble_73552_731621, object cont_73553_731622, object ast_91id_73554_731623, object trace_73555_731624, object cps_127_73556_731625*/
static void __lambda_385(void *data, object clo, int argc, object *args) ;/*object self_735507, object r_733122*/
static void __lambda_386(void *data, object clo, int argc, object *args) ;/*object self_735508, object _73tmp_73557_731626*/
static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_735509, object args_73560_731627*/
static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_735510, object fun_73563_731628*/
static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_735511, object r_732660*/
static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_735521, object r_732676*/
static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_735541, object r_732708*/
static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_735542, object r_732710*/
static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_735575, object r_732787*/
static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_735616, object r_732844*/
static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_735620, object r_732852*/
static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_735703, object r_732977*/
static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_735759, object k_733075, object var_95val_73862_731708, object acc_73863_731709*/
static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_735760, object r_733076_734971*/
static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_735761, object r_733077_734972*/
static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_735762, object cp1_73864_731710_734973, object cp2_73865_731711_734974*/
static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_735763, object r_733078_734975_734984*/
static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_735764, object r_733079_734978_734987_734995_735002*/
static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_735765, object r_733085_734979_734988_734996_735003*/
static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_735766, object r_733084_734980_734989_734997_735004*/
static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_735767, object r_733080_734983_734992_735000_735007_735010_735012*/
static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_735768, object r_733073*/
static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_735769, object r_733074*/
static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_735770, object vexps_73857_731706*/
static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_735771, object body_91exp_73860_731707*/
static void __lambda_636(void *data, object clo, int argc, object *args) ;/*object self_735755, object val_91exp_73845_731703*/
static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_735756, object r_733064*/
static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_735757, object r_733065_734967*/
static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_735758, object r_733062_734968*/
static void __lambda_627(void *data, object clo, int argc, object *args) ;/*object self_735743, object k_733043, object expr_73830_731698, object acc_73831_731699*/
static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_735744, object r_733044*/
static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_735745, object cp1_73832_731700, object cp2_73833_731701*/
static void __lambda_634(void *data, object clo, int argc, object *args) ;/*object self_735746, object r_733045_734957*/
static void __lambda_635(void *data, object clo, int argc, object *args) ;/*object self_735747, object r_733046_734960_734964_734966*/
static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_735748, object k_733050_734955*/
static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_735749, object k_733054*/
static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_735750, object r_733055*/
static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_735751, object r_733057*/
static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_735752, object r_733041*/
static void __lambda_625(void *data, object clo, int argc, object *args) ;/*object self_735753, object r_733042*/
static void __lambda_626(void *data, object clo, int argc, object *args) ;/*object self_735754, object exps_73829_731697*/
static void __lambda_585(void *data, object clo, int argc, object *args) ;/*object self_735704, object cfun_73784_731687*/
static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_735705, object r_733038_734775*/
static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_735706, object this_91cont_73787_731688_734776*/
static void __lambda_588(void *data, object clo, int argc, object *args) ;/*object self_735707, object cargs_73790_731689_734777*/
static void __lambda_621(void *data, object clo, int argc, object *args) ;/*object self_735740, object r_733033_734828_734883_734943*/
static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_735741, object r_733034_734830_734885_734945_734949*/
static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_735742, object r_733032_734832_734887_734947_734951_734953*/
static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_735708, object r_732982_734779_734834*/
static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_735709, object r_733031_734780_734835*/
static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_735710, object r_732983_734781_734836*/
static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_735711, object k_732985_734783_734838, object fnc_73799_731691_734784_734839*/
static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_735712, object r_732986_734788_734843*/
static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_735723, object r_733003_734804_734859*/
static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_735732, object r_733019_734819_734874_734925*/
static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_735733, object r_733020_734821_734876_734927_734934*/
static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_735734, object r_733021_734822_734877_734928_734935*/
static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_735735, object r_733018_734826_734881_734932_734939_734941*/
static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_735724, object r_733017_734805_734860*/
static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_735725, object lid_73820_731695_734806_734861*/
static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_735726, object r_733016_734807_734862*/
static void __lambda_612(void *data, object clo, int argc, object *args) ;/*object self_735727, object c_91lambda_91fnc_91str_73823_731696_734808_734863*/
static void __lambda_613(void *data, object clo, int argc, object *args) ;/*object self_735728, object r_733007_734810_734865_734907*/
static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_735729, object r_733008_734812_734867_734909_734916*/
static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_735730, object r_733009_734813_734868_734910_734917*/
static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_735731, object r_733006_734817_734872_734914_734921_734923*/
static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_735713, object r_733002_734789_734844*/
static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_735714, object lid_73807_731692_734790_734845*/
static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_735715, object r_733001_734791_734846*/
static void __lambda_601(void *data, object clo, int argc, object *args) ;/*object self_735716, object c_91lambda_91fnc_91str_73810_731693_734792_734847*/
static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_735717, object r_733000_734793_734848*/
static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_735718, object c_91lambda_91fnc_91gc_91ret_91str_73813_731694_734794_734849*/
static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_735719, object r_732991_734796_734851_734889*/
static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_735720, object r_732992_734798_734853_734891_734898*/
static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_735721, object r_732993_734799_734854_734892_734899*/
static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_735722, object r_732990_734803_734858_734896_734903_734905*/
static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_735736, object k_733028_734785_734840*/
static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_735737, object r_733029_734786_734841*/
static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_735738, object r_733030_734787_734842*/
static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_735739, object r_732984_734782_734837*/
static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_735621, object cfun_73684_731662*/
static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_735622, object this_91cont_73687_731663_734292*/
static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_735623, object cargs_73690_731664_734293*/
static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_735700, object r_732966_734401_734513_734764*/
static void __lambda_582(void *data, object clo, int argc, object *args) ;/*object self_735701, object r_732967_734403_734515_734766_734770*/
static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_735702, object r_732965_734405_734517_734768_734772_734774*/
static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_735624, object r_732859_734298_734410_734519*/
static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_735625, object wkf_73707_731668_734299_734411_734520*/
static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_735626, object fnc_73710_731669_734302_734414_734523*/
static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_735627, object adbf_117fnc_73713_731670_734303_734415_734524*/
static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_735628, object r_732863_734309_734421_734530*/
static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_735655, object r_732898_734349_734461_734570*/
static void __lambda_559(void *data, object clo, int argc, object *args) ;/*object self_735667, object r_732914_734365_734477_734586*/
static void __lambda_575(void *data, object clo, int argc, object *args) ;/*object self_735683, object r_732941_734390_734502_734611_734734*/
static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_735684, object r_732942_734392_734504_734613_734736_734745*/
static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_735685, object r_732943_734394_734506_734615_734738_734747_734754*/
static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_735686, object r_732944_734397_734509_734618_734741_734750_734757*/
static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_735687, object r_732940_734399_734511_734620_734743_734752_734759_734762*/
static void __lambda_578(void *data, object clo, int argc, object *args) ;/*object self_735688, object k_732946_734395_734507_734616_734739_734748_734755*/
static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_735677, object r_732929_734379_734491_734600_734704*/
static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_735678, object r_732930_734381_734493_734602_734706_734715*/
static void __lambda_571(void *data, object clo, int argc, object *args) ;/*object self_735679, object r_732931_734383_734495_734604_734708_734717_734724*/
static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_735680, object r_732932_734386_734498_734607_734711_734720_734727*/
static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_735681, object r_732928_734388_734500_734609_734713_734722_734729_734732*/
static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_735682, object k_732934_734384_734496_734605_734709_734718_734725*/
static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_735668, object lid_73769_731685_734366_734478_734587*/
static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_735669, object r_732927_734367_734479_734588*/
static void __lambda_562(void *data, object clo, int argc, object *args) ;/*object self_735670, object c_91lambda_91fnc_91str_73772_731686_734368_734480_734589*/
static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_735671, object r_732918_734370_734482_734591_734686*/
static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_735672, object r_732919_734372_734484_734593_734688_734695*/
static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_735673, object r_732920_734373_734485_734594_734689_734696*/
static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_735674, object r_732921_734375_734487_734596_734691_734698*/
static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_735675, object r_732917_734377_734489_734598_734693_734700_734702*/
static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_735676, object k_732923_734374_734486_734595_734690_734697*/
static void __lambda_558(void *data, object clo, int argc, object *args) ;/*object self_735689, object k_732952_734364_734476_734585*/
static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_735656, object lid_73755_731682_734350_734462_734571*/
static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_735657, object r_732913_734351_734463_734572*/
static void __lambda_549(void *data, object clo, int argc, object *args) ;/*object self_735658, object c_91lambda_91fnc_91str_73758_731683_734352_734464_734573*/
static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_735659, object r_732912_734353_734465_734574*/
static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_735660, object c_91lambda_91fnc_91gc_91ret_91str_73761_731684_734354_734466_734575*/
static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_735661, object r_732903_734356_734468_734577_734668*/
static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_735662, object r_732904_734358_734470_734579_734670_734677*/
static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_735663, object r_732905_734359_734471_734580_734671_734678*/
static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_735664, object r_732906_734361_734473_734582_734673_734680*/
static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_735665, object r_732902_734363_734475_734584_734675_734682_734684*/
static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_735666, object k_732908_734360_734472_734581_734672_734679*/
static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_735690, object k_732953_734346_734458_734567*/
static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_735691, object r_732954_734347_734459_734568*/
static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_735692, object r_732955_734348_734460_734569*/
static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_735629, object r_732897_734310_734422_734531*/
static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_735630, object params_73722_731671_734311_734423_734532*/
static void __lambda_542(void *data, object clo, int argc, object *args) ;/*object self_735631, object k_732895_734344_734456_734565, object param_73745_731681_734345_734457_734566*/
static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_735632, object r_732894_734312_734424_734533*/
static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_735633, object tmp_91params_73725_731672_734313_734425_734534*/
static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_735634, object args_73728_731673_734314_734426_734535*/
static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_735635, object k_732892_734341_734453_734562, object param_73739_731679_734342_734454_734563, object arg_73740_731680_734343_734455_734564*/
static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_735636, object r_732891_734315_734427_734536*/
static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_735637, object r_732890_734316_734428_734537*/
static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_735638, object reassignments_73731_731674_734317_734429_734538*/
static void __lambda_540(void *data, object clo, int argc, object *args) ;/*object self_735639, object k_732889_734338_734450_734559, object p_73737_731677_734339_734451_734560, object tmp_73738_731678_734340_734452_734561*/
static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_735640, object r_732888_734318_734430_734539*/
static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_735641, object r_732887_734319_734431_734540*/
static void __lambda_527(void *data, object clo, int argc, object *args) ;/*object self_735642, object swap_91tmps_73734_731675_734320_734432_734541*/
static void __lambda_528(void *data, object clo, int argc, object *args) ;/*object self_735643, object r_732873_734322_734434_734543_734622*/
static void __lambda_529(void *data, object clo, int argc, object *args) ;/*object self_735644, object r_732874_734324_734436_734545_734624_734639*/
static void __lambda_530(void *data, object clo, int argc, object *args) ;/*object self_735645, object r_732875_734326_734438_734547_734626_734641_734654*/
static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_735646, object r_732883_734327_734439_734548_734627_734642_734655*/
static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_735647, object r_732876_734328_734440_734549_734628_734643_734656*/
static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_735648, object r_732877_734331_734443_734552_734631_734646_734659*/
static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_735649, object r_732878_734332_734444_734553_734632_734647_734660*/
static void __lambda_536(void *data, object clo, int argc, object *args) ;/*object self_735650, object r_732869_734333_734445_734554_734633_734648_734661*/
static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_735651, object k_732872_734336_734448_734557_734636_734651_734664, object param_73736_731676_734337_734449_734558_734637_734652_734665*/
static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_735652, object r_732871_734334_734446_734555_734634_734649_734662*/
static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_735653, object r_732870_734335_734447_734556_734635_734650_734663*/
static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_735654, object k_732879_734329_734441_734550_734629_734644_734657*/
static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_735693, object k_732956_734304_734416_734525*/
static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_735694, object r_732957_734305_734417_734526*/
static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_735695, object r_732960_734306_734418_734527*/
static void __lambda_514(void *data, object clo, int argc, object *args) ;/*object self_735696, object r_732958_734307_734419_734528*/
static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_735697, object r_732959_734308_734420_734529*/
static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_735698, object k_732961_734300_734412_734521*/
static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_735699, object r_732962_734301_734413_734522*/
static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_735617, object r_732849*/
static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_735618, object r_732847*/
static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_735619, object r_732845*/
static void __lambda_457(void *data, object clo, int argc, object *args) ;/*object self_735576, object c_91fun_73631_731649*/
static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_735577, object c_91args_73634_731650*/
static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_735578, object r_732840*/
static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_735579, object num_91args_91str_73640_731652*/
static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_735580, object c_91args_85_73643_731653*/
static void __lambda_472(void *data, object clo, int argc, object *args) ;/*object self_735581, object r_732793*/
static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_735582, object r_732794*/
static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_735596, object r_732815*/
static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_735597, object r_732813*/
static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_735598, object r_732814*/
static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_735599, object k_732816*/
static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_735600, object tmp_73668_73670_731660_734286*/
static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_735601, object r_732817_734290*/
static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_735602, object r_732818_734291*/
static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_735603, object k_732820_734287*/
static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_735604, object tmp_73672_73674_731661_734288*/
static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_735605, object r_732822_734289*/
static void __lambda_474(void *data, object clo, int argc, object *args) ;/*object self_735583, object r_732795_734230*/
static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_735584, object r_732797_734231_734246*/
static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_735585, object r_732801_734242_734257_734271*/
static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_735586, object r_732802_734243_734258_734272_734282*/
static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_735587, object r_732799_734244_734259_734273_734283*/
static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_735588, object r_732796_734245_734260_734274_734284*/
static void __lambda_476(void *data, object clo, int argc, object *args) ;/*object self_735589, object k_732803_734233_734248_734262*/
static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_735590, object r_732804_734234_734249_734263*/
static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_735591, object tmp_73659_73661_731658_734237_734252_734266_734277*/
static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_735592, object r_732805_734241_734256_734270_734281*/
static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_735593, object k_732807_734238_734253_734267_734278*/
static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_735594, object tmp_73663_73665_731659_734239_734254_734268_734279*/
static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_735595, object r_732809_734240_734255_734269_734280*/
static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_735606, object k_732824*/
static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_735607, object r_732835*/
static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_735608, object mangled_73650_731655*/
static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_735609, object all_91args_73653_731656*/
static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_735610, object new_91all_91args_73656_731657*/
static void __lambda_470(void *data, object clo, int argc, object *args) ;/*object self_735611, object r_732830*/
static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_735612, object r_732831*/
static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_735613, object k_732837*/
static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_735614, object r_732838*/
static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_735615, object r_732839*/
static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_735543, object kons_73616_731642*/
static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_735544, object k_732716*/
static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_735545, object r_732717*/
static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_735547, object r_732720*/
static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_735552, object r_732727*/
static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_735571, object r_732762*/
static void __lambda_450(void *data, object clo, int argc, object *args) ;/*object self_735567, object r_732759*/
static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_735568, object var_73625_731648*/
static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_735569, object r_732756*/
static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_735570, object r_732757*/
static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_735563, object r_732752*/
static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_735564, object var_73624_731647*/
static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_735565, object r_732749*/
static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_735566, object r_732750*/
static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_735559, object r_732745*/
static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_735560, object var_73623_731646*/
static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_735561, object r_732742*/
static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_735562, object r_732743*/
static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_735558, object r_732738*/
static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_735557, object r_732735*/
static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_735553, object r_732732*/
static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_735554, object var_73622_731645*/
static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_735555, object r_732729*/
static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_735556, object r_732730*/
static void __lambda_434(void *data, object clo, int argc, object *args) ;/*object self_735572, object k_732771*/
static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_735548, object r_732725*/
static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_735549, object var_73621_731644*/
static void __lambda_432(void *data, object clo, int argc, object *args) ;/*object self_735550, object r_732722*/
static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_735551, object r_732723*/
static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_735573, object k_732775*/
static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_735546, object r_732718*/
static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_735574, object k_732779*/
static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_735522, object k_732707, object e_73609_731641*/
static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_735523, object r_732705*/
static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_735524, object cgen_91lis_73592_731633*/
static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_735525, object k_732703, object a_73608_731640*/
static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_735526, object r_732702*/
static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_735527, object r_732701*/
static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_735528, object cgen_91allocs_73595_731634*/
static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_735529, object r_732699*/
static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_735530, object parent_91fnc_73598_731635*/
static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_735531, object r_732695*/
static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_735532, object k_732689, object arg_73606_731638, object body_91exp_73607_731639*/
static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_735533, object r_732693*/
static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_735534, object r_732691_734226*/
static void __lambda_411(void *data, object clo, int argc, object *args) ;/*object self_735535, object r_732688*/
static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_735536, object r_732687*/
static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_735537, object cgen_91body_73604_731637*/
static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_735538, object r_732683*/
static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_735539, object r_732684*/
static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_735540, object r_732682*/
static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_735772, object k_733106*/
static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_735773, object r_733119*/
static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_735774, object r_733109*/
static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_735512, object r_732675*/
static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_735513, object lid_73570_731629*/
static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_735514, object r_732674*/
static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_735515, object this_91cont_73573_731630*/
static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_735516, object cgen_73576_731631*/
static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_735517, object r_732665_734208*/
static void __lambda_396(void *data, object clo, int argc, object *args) ;/*object self_735518, object r_732667_734210_734217*/
static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_735519, object r_732668_734211_734218*/
static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_735520, object r_732666_734215_734222_734224*/
static void __lambda_368(void *data, object clo, int argc, object *args) ;/*closure _,object k_732635, object args_73532_731605, object append_91preamble_73533_731606, object prefix_73534_731607, object cont_73535_731608, object ast_91id_73536_731609, object trace_73537_731610, object cps_127_73538_731611*/
static void __lambda_369(void *data, object clo, int argc, object *args) ;/*object self_735489, object num_91args_73539_731612, object cp_91lis_73540_731613, object _191c_91compile_91args_73541_731614*/
static void __lambda_1317(void *data, object clo, int argc, object *args) ;/*object self_735490, object num_91args_73539_731612*/
static void __lambda_1316(void *data, object clo, int argc, object *args) ;/*object self_735491, object cp_91lis_73540_731613*/
static void __lambda_1315(void *data, object clo, int argc, object *args) ;/*object self_735492, object _191c_91compile_91args_73541_731614*/
static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_735493, object r_732636*/
static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_735494, object r_732637*/
static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_735495, object k_732643, object args_73542_731615, object append_91preamble_73543_731616, object prefix_73544_731617, object cont_73545_731618*/
static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_735496, object cp_73550_731619*/
static void __lambda_379(void *data, object clo, int argc, object *args) ;/*object self_735497, object r_732651*/
static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_735498, object r_732646*/
static void __lambda_381(void *data, object clo, int argc, object *args) ;/*object self_735499, object r_732650*/
static void __lambda_382(void *data, object clo, int argc, object *args) ;/*object self_735500, object r_732647*/
static void __lambda_383(void *data, object clo, int argc, object *args) ;/*object self_735501, object r_732648*/
static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_735502, object r_732642*/
static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_735503, object r_732638*/
static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_735504, object r_732641*/
static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_735505, object r_732639_735145*/
static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_735506, object r_732640_735146*/
static void __lambda_364(void *data, object clo, int argc, object *args) ;/*closure _,object k_732629, object exp_73531_731604*/
static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_735486, object r_732630*/
static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_735487, object k_732631*/
static void __lambda_366(void *data, object clo, int argc, object *args) ;/*object self_735488, object r_732632*/
static void __lambda_363(void *data, object clo, int argc, object *args) ;/*closure _,object k_732612, object ast_73487_731594, object self_73488_731595, object closure_91index_73489_731596*/
static void __lambda_304(void *data, object clo, int argc, object *args) ;/*closure _,object k_732536, object p_73383_731573, object cont_73384_731574, object ast_91id_73385_731575*/
static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_735428, object use_91alloca_127_73388_731576*/
static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_735429, object c_91func_73391_731577*/
static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_735430, object r_732605*/
static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_735431, object closure_91sym_73394_731578*/
static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_735432, object closure_91def_73397_731579*/
static void __lambda_320(void *data, object clo, int argc, object *args) ;/*object self_735433, object tdata_73400_731580*/
static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_735434, object tptr_91type_73406_731582*/
static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_735435, object tptr_91comma_73409_731583*/
static void __lambda_328(void *data, object clo, int argc, object *args) ;/*object self_735436, object tptr_73412_731584*/
static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_735437, object tptr_91decl_73415_731585*/
static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_735438, object k_732563, object type_73432_731589*/
static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_735439, object r_732581*/
static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_735440, object cv_91name_73433_731590*/
static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_735441, object r_732573*/
static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_735442, object r_732565*/
static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_735443, object r_732568*/
static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_735444, object r_732569*/
static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_735445, object r_732567*/
static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_735446, object k_732570*/
static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_735447, object r_732571*/
static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_735448, object k_732572*/
static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_735449, object k_732574*/
static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_735450, object tmp_73435_73437_731591*/
static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_735451, object r_732575*/
static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_735452, object k_732577*/
static void __lambda_352(void *data, object clo, int argc, object *args) ;/*object self_735453, object r_732580*/
static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_735454, object tmp_73443_73445_731593*/
static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_735455, object c_91var_91assign_73418_731586*/
static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_735456, object r_732548*/
static void __lambda_336(void *data, object clo, int argc, object *args) ;/*object self_735458, object r_732550*/
static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_735467, object r_732561*/
static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_735459, object r_732559*/
static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_735460, object cv_91name_73426_731587*/
static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_735461, object r_732552*/
static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_735462, object r_732554*/
static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_735463, object k_732555*/
static void __lambda_340(void *data, object clo, int argc, object *args) ;/*object self_735464, object tmp_73428_73430_731588*/
static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_735465, object r_732556*/
static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_735466, object k_732558*/
static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_735457, object r_732549*/
static void __lambda_329(void *data, object clo, int argc, object *args) ;/*object self_735468, object k_732583*/
static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_735469, object r_732584*/
static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_735470, object k_732585*/
static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_735471, object k_732586*/
static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_735472, object r_732587*/
static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_735473, object k_732589*/
static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_735474, object r_732590*/
static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_735475, object k_732591*/
static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_735476, object k_732595*/
static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_735477, object r_732596*/
static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_735478, object k_732597*/
static void __lambda_316(void *data, object clo, int argc, object *args) ;/*object self_735479, object r_732598*/
static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_735480, object k_732599*/
static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_735481, object r_732600*/
static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_735482, object r_732602*/
static void __lambda_306(void *data, object clo, int argc, object *args) ;/*object self_735483, object k_732607*/
static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_735484, object r_732608*/
static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_735485, object r_732609*/
static void __lambda_298(void *data, object clo, int argc, object *args) ;/*closure _,object k_732525, object ast_91id_73369_731568, object trace_73370_731569*/
static void __lambda_299(void *data, object clo, int argc, object *args) ;/*object self_735423, object tmp_73372_73374_731570*/
static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_735424, object adbf_117fnc_73375_731571*/
static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_735425, object tmp_73377_73379_731572*/
static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_735426, object r_732530*/
static void __lambda_301(void *data, object clo, int argc, object *args) ;/*object self_735427, object k_732533*/
static void __lambda_297(void *data, object clo, int argc, object *args) ;/*closure _,object k_732522, object v_73368_731567*/
static void __lambda_295(void *data, object clo, int argc, object *args) ;/*closure _,object k_732513, object str_73364_731564, object end_73365_731565*/
static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_735422, object r_732516*/
static void __lambda_1341(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object s)*/
static void __lambda_293(void *data, object clo, int argc, object *args) ;/*closure _,object k_732509, object str_73363_731563*/
static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_735421, object r_732510*/
static void __lambda_244(void *data, object clo, int argc, object *args) ;/*closure _,object k_732438, object exp_73275_731547, object use_91alloca_73276_731548, object immutable_73277_731549*/
static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_735373, object r_732440*/
static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_735374, object r_732441*/
static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_735375, object r_732444*/
static void __lambda_248(void *data, object clo, int argc, object *args) ;/*object self_735376, object r_732445*/
static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_735383, object r_732453*/
static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_735418, object r_732500*/
static void __lambda_291(void *data, object clo, int argc, object *args) ;/*object self_735419, object r_732502*/
static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_735420, object r_732501*/
static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_735416, object r_732496*/
static void __lambda_289(void *data, object clo, int argc, object *args) ;/*object self_735417, object r_732495*/
static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_735413, object r_732492*/
static void __lambda_287(void *data, object clo, int argc, object *args) ;/*object self_735414, object r_732491*/
static void __lambda_285(void *data, object clo, int argc, object *args) ;/*object self_735415, object k_732493*/
static void __lambda_272(void *data, object clo, int argc, object *args) ;/*object self_735400, object r_732488*/
static void __lambda_273(void *data, object clo, int argc, object *args) ;/*object self_735401, object r_732476*/
static void __lambda_277(void *data, object clo, int argc, object *args) ;/*object self_735402, object r_732477*/
static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_735403, object r_732478*/
static void __lambda_281(void *data, object clo, int argc, object *args) ;/*object self_735404, object r_732479*/
static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_735405, object cvar_91name_73339_731559, object num2str_73340_731560, object addr_91op_73341_731561, object c_91make_91macro_73342_731562*/
static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_735406, object r_732480*/
static void __lambda_284(void *data, object clo, int argc, object *args) ;/*object self_735407, object r_732482*/
static void __lambda_280(void *data, object clo, int argc, object *args) ;/*object self_735408, object k_732483*/
static void __lambda_278(void *data, object clo, int argc, object *args) ;/*object self_735409, object k_732484*/
static void __lambda_274(void *data, object clo, int argc, object *args) ;/*object self_735410, object k_732485*/
static void __lambda_275(void *data, object clo, int argc, object *args) ;/*object self_735411, object r_732486*/
static void __lambda_276(void *data, object clo, int argc, object *args) ;/*object self_735412, object r_732487*/
static void __lambda_270(void *data, object clo, int argc, object *args) ;/*object self_735398, object r_732474*/
static void __lambda_271(void *data, object clo, int argc, object *args) ;/*object self_735399, object r_732473*/
static void __lambda_256(void *data, object clo, int argc, object *args) ;/*object self_735384, object r_732470*/
static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_735385, object cvar_91name_73307_731552*/
static void __lambda_267(void *data, object clo, int argc, object *args) ;/*object self_735386, object k_732467, object n_73324_731558*/
static void __lambda_268(void *data, object clo, int argc, object *args) ;/*object self_735387, object r_732468*/
static void __lambda_269(void *data, object clo, int argc, object *args) ;/*object self_735388, object r_732469*/
static void __lambda_258(void *data, object clo, int argc, object *args) ;/*object self_735389, object num2str_73310_731553*/
static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_735390, object r_732466*/
static void __lambda_260(void *data, object clo, int argc, object *args) ;/*object self_735391, object rnum_73313_731554*/
static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_735392, object r_732465*/
static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_735393, object inum_73316_731555*/
static void __lambda_264(void *data, object clo, int argc, object *args) ;/*object self_735394, object c_91make_91macro_73322_731557*/
static void __lambda_265(void *data, object clo, int argc, object *args) ;/*object self_735395, object r_732460*/
static void __lambda_266(void *data, object clo, int argc, object *args) ;/*object self_735396, object r_732462*/
static void __lambda_263(void *data, object clo, int argc, object *args) ;/*object self_735397, object k_732463*/
static void __lambda_249(void *data, object clo, int argc, object *args) ;/*object self_735377, object r_732451*/
static void __lambda_250(void *data, object clo, int argc, object *args) ;/*object self_735378, object r_732446*/
static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_735379, object r_732447*/
static void __lambda_252(void *data, object clo, int argc, object *args) ;/*object self_735380, object cvar_91name_73299_731550, object num2str_73300_731551*/
static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_735381, object r_732448*/
static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_735382, object r_732450*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*closure _,object k_732410, object exp_73265_731541, object use_91alloca_73266_731542, object immutable_73267_731543*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_735352, object r_732434*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_735353, object cvar_91name_73268_731544*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_735366, object r_732425*/
static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_735367, object r_732428*/
static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_735368, object r_732433*/
static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_735369, object r_732429*/
static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_735370, object r_732430*/
static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_735371, object r_732431*/
static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_735372, object r_732427*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_735354, object r_732423*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_735355, object r_732412*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_735356, object r_732422*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_735357, object r_732413*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_735358, object tmp_91name_73272_731545, object blen_73273_731546*/
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_735359, object r_732414*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_735360, object r_732421*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_735361, object r_732417*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_735362, object r_732418*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_735363, object r_732420*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_735364, object r_732419*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_735365, object r_732416*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*closure _,object k_732366, object exp_73248_731528, object use_91alloca_73249_731529, object immutable_73250_731530*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_735318, object cvar_91name_73251_731531, object len_73252_731532, object addr_91op_73253_731533, object deref_91op_73254_731534, object c_91make_91macro_73255_731535, object loop_73256_731536*/
static void __lambda_1314(void *data, object clo, int argc, object *args) ;/*object self_735319, object cvar_91name_73251_731531*/
static void __lambda_1313(void *data, object clo, int argc, object *args) ;/*object self_735320, object len_73252_731532*/
static void __lambda_1312(void *data, object clo, int argc, object *args) ;/*object self_735321, object addr_91op_73253_731533*/
static void __lambda_1311(void *data, object clo, int argc, object *args) ;/*object self_735322, object deref_91op_73254_731534*/
static void __lambda_1310(void *data, object clo, int argc, object *args) ;/*object self_735323, object c_91make_91macro_73255_731535*/
static void __lambda_1309(void *data, object clo, int argc, object *args) ;/*object self_735324, object loop_73256_731536*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_735325, object r_732406*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_735326, object r_732405*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*object self_735327, object r_732367*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_735328, object r_732368*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_735329, object r_732369*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_735330, object r_732400*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_735331, object r_732370*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_735332, object r_732398*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_735333, object r_732371*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_735334, object k_732386, object i_73257_731537, object code_73258_731538*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_735335, object r_732397*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_735336, object byte_91val_73259_731539*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_735337, object r_732396_734197_734202*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_735338, object r_732395_734198_734203*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_735339, object r_732392_734199_734204*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_735340, object r_732385*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_735341, object r_732372*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_735345, object r_732379*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_735346, object r_732382*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*object self_735347, object r_732383*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_735348, object r_732384*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_735349, object r_732381*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_735342, object r_732374*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_735343, object r_732377*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_735344, object r_732376*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_735350, object k_732399*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_735351, object k_732401*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*closure _,object k_732312, object exp_73229_731513, object use_91alloca_73230_731514, object immutable_73231_731515*/
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_735276, object cvar_91name_73232_731516, object len_73233_731517, object ev_91name_73234_731518, object elem_91decl_73235_731519, object addr_91op_73236_731520, object deref_91op_73237_731521, object c_91make_91macro_73238_731522, object loop_73239_731523*/
static void __lambda_1308(void *data, object clo, int argc, object *args) ;/*object self_735277, object cvar_91name_73232_731516*/
static void __lambda_1307(void *data, object clo, int argc, object *args) ;/*object self_735278, object len_73233_731517*/
static void __lambda_1306(void *data, object clo, int argc, object *args) ;/*object self_735279, object ev_91name_73234_731518*/
static void __lambda_1305(void *data, object clo, int argc, object *args) ;/*object self_735280, object elem_91decl_73235_731519*/
static void __lambda_1304(void *data, object clo, int argc, object *args) ;/*object self_735281, object addr_91op_73236_731520*/
static void __lambda_1303(void *data, object clo, int argc, object *args) ;/*object self_735282, object deref_91op_73237_731521*/
static void __lambda_1302(void *data, object clo, int argc, object *args) ;/*object self_735283, object c_91make_91macro_73238_731522*/
static void __lambda_1301(void *data, object clo, int argc, object *args) ;/*object self_735284, object loop_73239_731523*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_735285, object r_732362*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_735286, object r_732361*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_735287, object r_732313*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_735288, object r_732314*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_735289, object r_732358*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_735290, object r_732357*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_735291, object r_732315*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_735292, object r_732353*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_735293, object r_732316*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_735294, object r_732317*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_735295, object r_732349*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*object self_735296, object r_732318*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_735297, object r_732347*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_735298, object r_732319*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_735299, object k_732333, object i_73240_731524, object code_73241_731525*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*object self_735300, object idx_91code_73242_731526*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_735301, object r_732344_734171_734178_734184*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_735302, object r_732343_734173_734180_734186_734190*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_735303, object r_732339_734174_734181_734187_734191*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_735304, object r_732332*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_735305, object r_732320*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_735309, object r_732327*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_735310, object r_732330*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_735311, object r_732331*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_735312, object r_732329*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_735306, object r_732322*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*object self_735307, object r_732325*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_735308, object r_732324*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_735313, object k_732348*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_735314, object k_732350*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_735315, object k_732354*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_735317, object r_732356*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_735316, object r_732355*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*closure _,object k_732271, object args_73203_731499, object use_91alloca_73204_731500, object immutable_73205_731501*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_735245, object addr_91op_73206_731502, object c_91make_91macro_73207_731503, object num_91args_73208_731504, object create_91cons_73209_731505, object _191c_91compile_91scalars_73210_731506*/
static void __lambda_1300(void *data, object clo, int argc, object *args) ;/*object self_735246, object addr_91op_73206_731502*/
static void __lambda_1299(void *data, object clo, int argc, object *args) ;/*object self_735247, object c_91make_91macro_73207_731503*/
static void __lambda_1298(void *data, object clo, int argc, object *args) ;/*object self_735248, object num_91args_73208_731504*/
static void __lambda_1297(void *data, object clo, int argc, object *args) ;/*object self_735249, object create_91cons_73209_731505*/
static void __lambda_1296(void *data, object clo, int argc, object *args) ;/*object self_735250, object _191c_91compile_91scalars_73210_731506*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_735251, object r_732272*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_735252, object r_732306*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_735253, object r_732273*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_735254, object r_732274*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_735255, object k_732298, object cvar_73211_731507, object a_73212_731508, object b_73213_731509*/
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_735256, object r_732305_734151_734157*/
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_735257, object r_732299_734152_734158*/
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_735258, object r_732300_734155_734161_734164_734166*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_735259, object r_732297*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_735260, object r_732275*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_735261, object k_732279, object args_73214_731510*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_735262, object r_732295*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_735263, object cvar_91name_73224_731511*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_735264, object r_732291*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_735265, object r_732293*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_735266, object r_732292*/
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_735267, object cell_73227_731512*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_735268, object r_732290*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_735269, object r_732284*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_735270, object r_732285*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_735271, object r_732286_734146_734148*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_735272, object r_732278*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_735273, object r_732276*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*object self_735274, object r_732277*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_735275, object k_732307*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*closure _,object k_732264, object cvar_73191_731496, object use_91alloca_73192_731497, object immutable_73193_731498*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_735243, object r_732266*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_735244, object k_732267*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*closure _,object k_732260, object qexp_73188_731493, object use_91alloca_73189_731494*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*closure _,object k_732238, object exp_73148_731487, object append_91preamble_73149_731488, object cont_73150_731489, object ast_91id_73151_731490, object trace_73152_731491, object cps_127_73153_731492*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_735229, object r_732239*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_735230, object r_732244*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_735232, object r_732246*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_735235, object r_732249*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_735236, object r_732250*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_735238, object r_732252*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_735239, object r_732253*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_735240, object r_732254*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_735241, object r_732255*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_735242, object r_732256*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*object self_735237, object r_732251*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_735233, object r_732248*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_735234, object r_732247*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_735231, object r_732245*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*closure _,object k_732229, object exp_73135_731481, object src_91file_73136_731482*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_735222, object preamble_73139_731483*/
static void __lambda_1295(void *data, object clo, int argc, object *args) ;/*object self_735223, object preamble_73139_731483*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_735224, object k_732234, object s_73147_731486*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_735225, object r_732235*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_735226, object append_91preamble_73142_731484*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_735227, object body_73145_731485*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_735228, object r_732232*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*closure _,object k_732214, object cp_73125_731477, object prefix_73126_731478*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_735219, object r_732217_734133_734139*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_735220, object r_732218_734137_734143*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_735221, object k_732219_734134_734140*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*closure _,object k_732205, object prefix_73122_731474, object cp1_73123_731475, object cp2_73124_731476*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_735217, object r_732206_734117_734122*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_735218, object r_732207_734120_734125_734128_734130*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*closure _,object k_732196, object cp1_73120_731472, object cp2_73121_731473*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_735215, object r_732197_734101_734106*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_735216, object r_732198_734104_734109_734112_734114*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*closure _,object k_732190, object c_91allocs_73115_731467, object prefix_73116_731468, object suffix_73117_731469*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_735212, object k_732192, object x_73118_731470, object y_73119_731471*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_735213, object r_732193*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_735214, object r_732191*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*closure _,object k_732181, object c_91allocs_73111_731463, object prefix_73112_731464_raw, ...*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_735209, object k_732183, object x_73113_731465, object y_73114_731466*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_735210, object r_732184*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_735211, object r_732182*/
static object __lambda_1340(void *data, object ptr,object c_91tuple_73110_731462) ;
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*closure _,object k_732178, object c_91tuple_73110_731462*/
static object __lambda_1339(void *data, object ptr,object c_91pair_73109_731461) ;
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*closure _,object k_732175, object c_91pair_73109_731461*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*closure _,object k_732172, object c_91pair_73108_731460*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*closure _,object k_732168, object cp_73106_731458, object num_91args_73107_731459*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*closure _,object k_732164, object str_73105_731457*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_735208, object r_732165*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*closure _,object k_732161, object str_73103_731455, object cvars_73104_731456*/
static object __lambda_1338(void *data, object ptr,object trace_73102_731454) ;
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*closure _,object k_732158, object trace_73102_731454*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*closure _,object k_732146, object trace_7393_731451*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_735207, object r_732149*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*closure _,object k_732140, object trace_7391_731449, object fnc_7392_731450*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*closure _,object k_732131, object n_7388_731446, object prefix_7389_731447, object assign_7390_731448*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_735204, object r_732133*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_735205, object r_732134*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_735206, object r_732135*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*closure _,object k_732123, object n_7386_731444, object prefix_7387_731445*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_735201, object r_732125*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_735202, object r_732127*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_735203, object r_732126*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*closure _,object k_732107, object num_91args_7380_731438*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_735191, object r_732108*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_735192, object r_732109*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_735193, object r_732110*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_735194, object k_732116, object s_7385_731443*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_735195, object r_732111*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_735196, object args_7381_731439, object n_7382_731440, object n_911_7383_731441, object wrap_7384_731442*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_735197, object r_732115*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_735198, object r_732112*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_735199, object r_732113*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_735200, object r_732114*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*closure _,object k_732101, object num_91args_7376_731434*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_735187, object r_732102*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_735188, object r_732103*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_735189, object r_732104*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_735190, object args_7377_731435, object n_7378_731436, object arry_91assign_7379_731437*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*closure _,object k_732095, object num_91args_7372_731430*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_735183, object r_732096*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_735184, object r_732097*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_735185, object r_732098*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_735186, object args_7373_731431, object n_7374_731432, object arry_91assign_7375_731433*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*closure _,object k_732089, object num_91args_7368_731426*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*object self_735179, object r_732090*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_735180, object r_732091*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_735181, object r_732092*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_735182, object args_7369_731427, object n_7370_731428, object arry_91assign_7371_731429*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*closure _,object k_732083, object num_91args_7364_731422*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_735175, object r_732084*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_735176, object r_732085*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_735177, object r_732086*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_735178, object args_7365_731423, object n_7366_731424, object arry_91assign_7367_731425*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*closure _,object k_732077, object num_91args_7360_731418*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_735171, object r_732078*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_735172, object r_732079*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_735173, object r_732080*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_735174, object args_7361_731419, object n_7362_731420, object arry_91assign_7363_731421*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*closure _,object k_732055, object arity_7348_731415*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_735158, object r_732057*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_735159, object k_732059*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_735160, object r_732071*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_735161, object r_732061*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_735162, object r_732070*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_735163, object r_732062*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_735164, object r_732069*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_735165, object r_732063*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_735166, object r_732068*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_735167, object r_732064*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_735168, object r_732067*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_735169, object r_732065*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_735170, object r_732066*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*closure _,object k_732036, object arity_7337_731414*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_735156, object r_732040*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_735157, object r_732039*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*closure _,object k_731977, object str_735_731410*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_735149, object next_736_731411*/
static void __lambda_1294(void *data, object clo, int argc, object *args) ;/*object self_735150, object next_736_731411*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*object self_735151, object k_731982, object head_737_731412, object tail_738_731413*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_735152, object r_731984*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_735153, object r_731981*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_735154, object r_731978*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_735155, object r_731979*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*closure _,object k_731974*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*closure _,object k_731971, object strs_734_731409_raw, ...*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*closure _,object k_731968, object str_733_731408*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*closure _,object k_731964, object strs_732_731407_raw, ...*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_735148, object r_731965*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_731960, object line_731_731406*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_735147, object r_731961*/

static void __lambda_1286(void *data, object _, int argc, object *args) /* closure _,object k_734083 */
 {
object k_734083 = args[0];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:lib-init:schemecyclonecgen");

closureN_type c_7316142;
object e_7316184 [1];
c_7316142.hdr.mark = gc_color_red;
 c_7316142.hdr.grayed = 0;
c_7316142.tag = closureN_tag;
 c_7316142.fn = (function_type)__lambda_1287;
c_7316142.num_args = 1;
c_7316142.num_elements = 1;
c_7316142.elements = (object *)e_7316184;
c_7316142.elements[0] = k_734083;


complex_num_type local_7316190; 

object c_7316187 = Cyc_make_vector(data,(closure)&c_7316142,2,Cyc_fast_sum(data,&local_7316190, obj_int2obj(1), __glo__85c_91call_91max_91args_85_scheme_cyclone_cgen), boolean_f);
return_closcall1(data,(closure)&c_7316142,  c_7316187);; 
}

static void __lambda_1287(void *data, object self_736399, int argc, object *args) /* object self_736399, object r_734097 */
 {
 object r_734097 = args[0];
  
closureN_type c_7316144;
object e_7316180 [1];
c_7316144.hdr.mark = gc_color_red;
 c_7316144.hdr.grayed = 0;
c_7316144.tag = closureN_tag;
 c_7316144.fn = (function_type)__lambda_1288;
c_7316144.num_args = 1;
c_7316144.num_elements = 1;
c_7316144.elements = (object *)e_7316180;
c_7316144.elements[0] = ((closureN)self_736399)->elements[0];


object c_7316183 = global_set_cps_id(data,(closure)&c_7316144,"__glo__85c_91call_91arity_85_scheme_cyclone_cgen", __glo__85c_91call_91arity_85_scheme_cyclone_cgen, r_734097);
return_closcall1(data,(closure)&c_7316144,  c_7316183);; 
}

static void __lambda_1288(void *data, object self_736400, int argc, object *args) /* object self_736400, object r_734085 */
 {

  
closureN_type c_7316146;
object e_7316176 [1];
c_7316146.hdr.mark = gc_color_red;
 c_7316146.hdr.grayed = 0;
c_7316146.tag = closureN_tag;
 c_7316146.fn = (function_type)__lambda_1289;
c_7316146.num_args = 1;
c_7316146.num_elements = 1;
c_7316146.elements = (object *)e_7316176;
c_7316146.elements[0] = ((closureN)self_736400)->elements[0];


object c_7316179 = global_set_cps_id(data,(closure)&c_7316146,"__glo__85global_91inlines_85_scheme_cyclone_cgen", __glo__85global_91inlines_85_scheme_cyclone_cgen, NULL);
return_closcall1(data,(closure)&c_7316146,  c_7316179);; 
}

static void __lambda_1289(void *data, object self_736401, int argc, object *args) /* object self_736401, object r_734086 */
 {

  
closureN_type c_7316148;
object e_7316172 [1];
c_7316148.hdr.mark = gc_color_red;
 c_7316148.hdr.grayed = 0;
c_7316148.tag = closureN_tag;
 c_7316148.fn = (function_type)__lambda_1290;
c_7316148.num_args = 1;
c_7316148.num_elements = 1;
c_7316148.elements = (object *)e_7316172;
c_7316148.elements[0] = ((closureN)self_736401)->elements[0];


object c_7316175 = global_set_cps_id(data,(closure)&c_7316148,"__glo__85globals_85_scheme_cyclone_cgen", __glo__85globals_85_scheme_cyclone_cgen, NULL);
return_closcall1(data,(closure)&c_7316148,  c_7316175);; 
}

static void __lambda_1290(void *data, object self_736402, int argc, object *args) /* object self_736402, object r_734087 */
 {

  
closureN_type c_7316150;
object e_7316168 [1];
c_7316150.hdr.mark = gc_color_red;
 c_7316150.hdr.grayed = 0;
c_7316150.tag = closureN_tag;
 c_7316150.fn = (function_type)__lambda_1291;
c_7316150.num_args = 1;
c_7316150.num_elements = 1;
c_7316150.elements = (object *)e_7316168;
c_7316150.elements[0] = ((closureN)self_736402)->elements[0];


object c_7316171 = global_set_cps_id(data,(closure)&c_7316150,"__glo__85global_91syms_85_scheme_cyclone_cgen", __glo__85global_91syms_85_scheme_cyclone_cgen, NULL);
return_closcall1(data,(closure)&c_7316150,  c_7316171);; 
}

static void __lambda_1291(void *data, object self_736403, int argc, object *args) /* object self_736403, object r_734088 */
 {

  
closureN_type c_7316152;
object e_7316164 [1];
c_7316152.hdr.mark = gc_color_red;
 c_7316152.hdr.grayed = 0;
c_7316152.tag = closureN_tag;
 c_7316152.fn = (function_type)__lambda_1292;
c_7316152.num_args = 1;
c_7316152.num_elements = 1;
c_7316152.elements = (object *)e_7316164;
c_7316152.elements[0] = ((closureN)self_736403)->elements[0];


object c_7316167 = global_set_cps_id(data,(closure)&c_7316152,"__glo__85symbols_85_scheme_cyclone_cgen", __glo__85symbols_85_scheme_cyclone_cgen, NULL);
return_closcall1(data,(closure)&c_7316152,  c_7316167);; 
}

static void __lambda_1292(void *data, object self_736404, int argc, object *args) /* object self_736404, object r_734089 */
 {

  
closureN_type c_7316154;
object e_7316160 [1];
c_7316154.hdr.mark = gc_color_red;
 c_7316154.hdr.grayed = 0;
c_7316154.tag = closureN_tag;
 c_7316154.fn = (function_type)__lambda_1293;
c_7316154.num_args = 1;
c_7316154.num_elements = 1;
c_7316154.elements = (object *)e_7316160;
c_7316154.elements[0] = ((closureN)self_736404)->elements[0];


object c_7316163 = global_set_cps_id(data,(closure)&c_7316154,"__glo_lambdas_scheme_cyclone_cgen", __glo_lambdas_scheme_cyclone_cgen, NULL);
return_closcall1(data,(closure)&c_7316154,  c_7316163);; 
}

static void __lambda_1293(void *data, object self_736405, int argc, object *args) /* object self_736405, object r_734090 */
 {

  
object c_7316159 = global_set_cps_id(data,  ((closureN)self_736405)->elements[0],"__glo_inline_91lambdas_scheme_cyclone_cgen", __glo_inline_91lambdas_scheme_cyclone_cgen, NULL);
return_direct_with_clo1(data,  ((closureN)self_736405)->elements[0], (((closure)  ((closureN)self_736405)->elements[0])->fn),  c_7316159);; 
}

static void __lambda_1282(void *data, object _, int argc, object *args) /* closure _,object k_734067, object fp_731400_731947 */
 {
object k_734067 = args[0]; object fp_731400_731947 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:autogen:primitive-procedures");

closureN_type c_7316112;
object e_7316122 [2];
c_7316112.hdr.mark = gc_color_red;
 c_7316112.hdr.grayed = 0;
c_7316112.tag = closureN_tag;
 c_7316112.fn = (function_type)__lambda_1283;
c_7316112.num_args = 1;
c_7316112.num_elements = 2;
c_7316112.elements = (object *)e_7316122;
c_7316112.elements[0] = fp_731400_731947;
c_7316112.elements[1] = k_734067;


mclosure0(c_7316123, (function_type)__lambda_1285);c_7316123.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7316112,__lambda_1283,  &c_7316123);; 
}

static void __lambda_1285(void *data, object self_736396, int argc, object *args) /* object self_736396, object k_734072, object p_731402_731949 */
 {
 object k_734072 = args[0]; object p_731402_731949 = args[1];
  
pair_type local_7316127; 

pair_type local_7316130; 

pair_type local_7316133; 

pair_type local_7316136; 

pair_type local_7316139; 
return_direct_with_clo1(data,  k_734072, (((closure)  k_734072)->fn),  set_pair_as_expr(&local_7316127, quote__list, set_pair_as_expr(&local_7316130, set_pair_as_expr(&local_7316133, quote_quote, set_pair_as_expr(&local_7316136, p_731402_731949, NULL)), set_pair_as_expr(&local_7316139, p_731402_731949, NULL))));; 
}

static void __lambda_1283(void *data, object self_736397, int argc, object *args) /* object self_736397, object r_734071 */
 {
 object r_734071 = args[0];
  
closureN_type c_7316114;
object e_7316121 [2];
c_7316114.hdr.mark = gc_color_red;
 c_7316114.hdr.grayed = 0;
c_7316114.tag = closureN_tag;
 c_7316114.fn = (function_type)__lambda_1284;
c_7316114.num_args = 1;
c_7316114.num_elements = 2;
c_7316114.elements = (object *)e_7316121;
c_7316114.elements[0] = ((closureN)self_736397)->elements[0];
c_7316114.elements[1] = ((closureN)self_736397)->elements[1];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7316114, r_734071, __glo__85primitives_85_scheme_cyclone_primitives);; 
}

static void __lambda_1284(void *data, object self_736398, int argc, object *args) /* object self_736398, object r_734070 */
 {
 object r_734070 = args[0];
  
pair_type local_7316119; 
return_direct_with_clo3(data,  __glo_write_scheme_write, (((closure)  __glo_write_scheme_write)->fn),  ((closureN)self_736398)->elements[1], set_pair_as_expr(&local_7316119, quote__list, r_734070), ((closureN)self_736398)->elements[0]);; 
}

static void __lambda_1272(void *data, object _, int argc, object *args) /* closure _,object k_734055, object fp_731398_731945 */
 {
object k_734055 = args[0]; object fp_731398_731945 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:autogen:defprimitives");

closureN_type c_7316057;
object e_7316108 [2];
c_7316057.hdr.mark = gc_color_red;
 c_7316057.hdr.grayed = 0;
c_7316057.tag = closureN_tag;
 c_7316057.fn = (function_type)__lambda_1273;
c_7316057.num_args = 1;
c_7316057.num_elements = 2;
c_7316057.elements = (object *)e_7316108;
c_7316057.elements[0] = fp_731398_731945;
c_7316057.elements[1] = k_734055;


make_utf8_string_with_len(c_7316109, "/* This section is auto-generated via --autogen */\n", 51, 51);
return_direct_with_clo3(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7316057, &c_7316109, fp_731398_731945);; 
}

static void __lambda_1273(void *data, object self_736387, int argc, object *args) /* object self_736387, object r_734056 */
 {

  
closureN_type c_7316059;
object e_7316067 [2];
c_7316059.hdr.mark = gc_color_red;
 c_7316059.hdr.grayed = 0;
c_7316059.tag = closureN_tag;
 c_7316059.fn = (function_type)__lambda_1274;
c_7316059.num_args = 1;
c_7316059.num_elements = 2;
c_7316059.elements = (object *)e_7316067;
c_7316059.elements[0] = ((closureN)self_736387)->elements[0];
c_7316059.elements[1] = ((closureN)self_736387)->elements[1];


closureN_type c_7316068;
object e_7316107 [1];
c_7316068.hdr.mark = gc_color_red;
 c_7316068.hdr.grayed = 0;
c_7316068.tag = closureN_tag;
 c_7316068.fn = (function_type)__lambda_1276;
c_7316068.num_args = 1;
c_7316068.num_elements = 1;
c_7316068.elements = (object *)e_7316107;
c_7316068.elements[0] = ((closureN)self_736387)->elements[0];

return_direct_with_clo1(data,(closure)&c_7316059,__lambda_1274,  &c_7316068);; 
}

static void __lambda_1276(void *data, object self_736388, int argc, object *args) /* object self_736388, object k_734059, object p_731399_731946 */
 {
 object k_734059 = args[0]; object p_731399_731946 = args[1];
  
closureN_type c_7316070;
object e_7316106 [3];
c_7316070.hdr.mark = gc_color_red;
 c_7316070.hdr.grayed = 0;
c_7316070.tag = closureN_tag;
 c_7316070.fn = (function_type)__lambda_1277;
c_7316070.num_args = 1;
c_7316070.num_elements = 3;
c_7316070.elements = (object *)e_7316106;
c_7316070.elements[0] = ((closureN)self_736388)->elements[0];
c_7316070.elements[1] = k_734059;
c_7316070.elements[2] = p_731399_731946;

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7316070, p_731399_731946);; 
}

static void __lambda_1277(void *data, object self_736389, int argc, object *args) /* object self_736389, object r_734061 */
 {
 object r_734061 = args[0];
  
closureN_type c_7316072;
object e_7316101 [4];
c_7316072.hdr.mark = gc_color_red;
 c_7316072.hdr.grayed = 0;
c_7316072.tag = closureN_tag;
 c_7316072.fn = (function_type)__lambda_1278;
c_7316072.num_args = 1;
c_7316072.num_elements = 4;
c_7316072.elements = (object *)e_7316101;
c_7316072.elements[0] = ((closureN)self_736389)->elements[0];
c_7316072.elements[1] = ((closureN)self_736389)->elements[1];
c_7316072.elements[2] = ((closureN)self_736389)->elements[2];
c_7316072.elements[3] = r_734061;


object c_7316104 = Cyc_symbol2string(data,(closure)&c_7316072,((closureN)self_736389)->elements[2]);
return_closcall1(data,(closure)&c_7316072,  c_7316104);; 
}

static void __lambda_1278(void *data, object self_736390, int argc, object *args) /* object self_736390, object r_734062 */
 {
 object r_734062 = args[0];
  
closureN_type c_7316074;
object e_7316099 [5];
c_7316074.hdr.mark = gc_color_red;
 c_7316074.hdr.grayed = 0;
c_7316074.tag = closureN_tag;
 c_7316074.fn = (function_type)__lambda_1279;
c_7316074.num_args = 1;
c_7316074.num_elements = 5;
c_7316074.elements = (object *)e_7316099;
c_7316074.elements[0] = ((closureN)self_736390)->elements[0];
c_7316074.elements[1] = ((closureN)self_736390)->elements[1];
c_7316074.elements[2] = ((closureN)self_736390)->elements[2];
c_7316074.elements[3] = ((closureN)self_736390)->elements[3];
c_7316074.elements[4] = r_734062;

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7316074, ((closureN)self_736390)->elements[2]);; 
}

static void __lambda_1279(void *data, object self_736391, int argc, object *args) /* object self_736391, object r_734063 */
 {
 object r_734063 = args[0];
  
closureN_type c_7316076;
object e_7316094 [5];
c_7316076.hdr.mark = gc_color_red;
 c_7316076.hdr.grayed = 0;
c_7316076.tag = closureN_tag;
 c_7316076.fn = (function_type)__lambda_1280;
c_7316076.num_args = 1;
c_7316076.num_elements = 5;
c_7316076.elements = (object *)e_7316094;
c_7316076.elements[0] = ((closureN)self_736391)->elements[0];
c_7316076.elements[1] = ((closureN)self_736391)->elements[1];
c_7316076.elements[2] = ((closureN)self_736391)->elements[3];
c_7316076.elements[3] = ((closureN)self_736391)->elements[4];
c_7316076.elements[4] = r_734063;


object c_7316097 = Cyc_symbol2string(data,(closure)&c_7316076,((closureN)self_736391)->elements[2]);
return_closcall1(data,(closure)&c_7316076,  c_7316097);; 
}

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


make_utf8_string_with_len(c_7316086, "defprimitive(", 13, 13);

make_utf8_string_with_len(c_7316088, ", ", 2, 2);

make_utf8_string_with_len(c_7316090, ", &_", 4, 4);

make_utf8_string_with_len(c_7316092, "); /* ", 6, 6);

make_utf8_string_with_len(c_7316093, " */\n", 4, 4);

object c_7316085 = Cyc_string_append(data,(closure)&c_7316078,9,&c_7316086, ((closureN)self_736392)->elements[2], &c_7316088, ((closureN)self_736392)->elements[3], &c_7316090, ((closureN)self_736392)->elements[4], &c_7316092, r_734064, &c_7316093);
return_closcall1(data,(closure)&c_7316078,  c_7316085);; 
}

static void __lambda_1281(void *data, object self_736393, int argc, object *args) /* object self_736393, object r_734060 */
 {
 object r_734060 = args[0];
  return_direct_with_clo3(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_736393)->elements[1], r_734060, ((closureN)self_736393)->elements[0]);; 
}

static void __lambda_1274(void *data, object self_736394, int argc, object *args) /* object self_736394, object r_734058 */
 {
 object r_734058 = args[0];
  
closureN_type c_7316061;
object e_7316066 [2];
c_7316061.hdr.mark = gc_color_red;
 c_7316061.hdr.grayed = 0;
c_7316061.tag = closureN_tag;
 c_7316061.fn = (function_type)__lambda_1275;
c_7316061.num_args = 1;
c_7316061.num_elements = 2;
c_7316061.elements = (object *)e_7316066;
c_7316061.elements[0] = ((closureN)self_736394)->elements[0];
c_7316061.elements[1] = ((closureN)self_736394)->elements[1];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7316061, r_734058, __glo__85primitives_85_scheme_cyclone_primitives);; 
}

static void __lambda_1275(void *data, object self_736395, int argc, object *args) /* object self_736395, object r_734057 */
 {

  
make_utf8_string_with_len(c_7316064, "/* -------------------------------------------- */\n", 51, 51);
return_direct_with_clo3(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_736395)->elements[1], &c_7316064, ((closureN)self_736395)->elements[0]);; 
}

static void __lambda_1268(void *data, object _, int argc, object *args) /* closure _,object k_734049, object filename_731396_731943 */
 {
object k_734049 = args[0]; object filename_731396_731943 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:autogen");

closureN_type c_7316038;
object e_7316051 [1];
c_7316038.hdr.mark = gc_color_red;
 c_7316038.hdr.grayed = 0;
c_7316038.tag = closureN_tag;
 c_7316038.fn = (function_type)__lambda_1269;
c_7316038.num_args = 1;
c_7316038.num_elements = 1;
c_7316038.elements = (object *)e_7316051;
c_7316038.elements[0] = k_734049;


port_type c_7316054 = Cyc_io_open_output_file(data,filename_731396_731943);
return_direct_with_clo1(data,(closure)&c_7316038,__lambda_1269,  &c_7316054);; 
}

static void __lambda_1269(void *data, object self_736384, int argc, object *args) /* object self_736384, object fp_731397_731944 */
 {
 object fp_731397_731944 = args[0];
  
closureN_type c_7316040;
object e_7316050 [2];
c_7316040.hdr.mark = gc_color_red;
 c_7316040.hdr.grayed = 0;
c_7316040.tag = closureN_tag;
 c_7316040.fn = (function_type)__lambda_1270;
c_7316040.num_args = 1;
c_7316040.num_elements = 2;
c_7316040.elements = (object *)e_7316050;
c_7316040.elements[0] = fp_731397_731944;
c_7316040.elements[1] = ((closureN)self_736384)->elements[0];

return_direct_with_clo2(data,  __glo_autogen_117defprimitives_scheme_cyclone_cgen, (((closure)  __glo_autogen_117defprimitives_scheme_cyclone_cgen)->fn),  &c_7316040, fp_731397_731944);; 
}

static void __lambda_1270(void *data, object self_736385, int argc, object *args) /* object self_736385, object r_734051 */
 {

  
closureN_type c_7316042;
object e_7316048 [2];
c_7316042.hdr.mark = gc_color_red;
 c_7316042.hdr.grayed = 0;
c_7316042.tag = closureN_tag;
 c_7316042.fn = (function_type)__lambda_1271;
c_7316042.num_args = 1;
c_7316042.num_elements = 2;
c_7316042.elements = (object *)e_7316048;
c_7316042.elements[0] = ((closureN)self_736385)->elements[0];
c_7316042.elements[1] = ((closureN)self_736385)->elements[1];

return_direct_with_clo2(data,  __glo_autogen_117primitive_91procedures_scheme_cyclone_cgen, (((closure)  __glo_autogen_117primitive_91procedures_scheme_cyclone_cgen)->fn),  &c_7316042, ((closureN)self_736385)->elements[0]);; 
}

static void __lambda_1271(void *data, object self_736386, int argc, object *args) /* object self_736386, object r_734052 */
 {

  

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

static void __lambda_1262(void *data, object _, int argc, object *args) /* closure _,object k_734040, object str_731394_731941 */
 {
object k_734040 = args[0]; object str_731394_731941 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:filter-invalid-chars");

closureN_type c_7316007;
object e_7316021 [2];
c_7316007.hdr.mark = gc_color_red;
 c_7316007.hdr.grayed = 0;
c_7316007.tag = closureN_tag;
 c_7316007.fn = (function_type)__lambda_1263;
c_7316007.num_args = 1;
c_7316007.num_elements = 2;
c_7316007.elements = (object *)e_7316021;
c_7316007.elements[0] = k_734040;
c_7316007.elements[1] = str_731394_731941;


mclosure0(c_7316022, (function_type)__lambda_1266);c_7316022.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7316007,__lambda_1263,  &c_7316022);; 
}

static void __lambda_1266(void *data, object self_736379, int argc, object *args) /* object self_736379, object k_734044, object c_731395_731942 */
 {
 object k_734044 = args[0]; object c_731395_731942 = args[1];
  
closureN_type c_7316024;
object e_7316030 [1];
c_7316024.hdr.mark = gc_color_red;
 c_7316024.hdr.grayed = 0;
c_7316024.tag = closureN_tag;
 c_7316024.fn = (function_type)__lambda_1267;
c_7316024.num_args = 1;
c_7316024.num_elements = 1;
c_7316024.elements = (object *)e_7316030;
c_7316024.elements[0] = k_734044;




make_pair(c_7316035,obj_char2obj(41),NULL);c_7316035.hdr.immutable = 1;

make_pair(c_7316034,obj_char2obj(40),&c_7316035);c_7316034.hdr.immutable = 1;

make_pair(c_7316033,obj_char2obj(10),&c_7316034);c_7316033.hdr.immutable = 1;
return_direct_with_clo1(data,(closure)&c_7316024,__lambda_1267,  memberp(data, c_731395_731942, &c_7316033));; 
}

static void __lambda_1267(void *data, object self_736380, int argc, object *args) /* object self_736380, object r_734045 */
 {
 object r_734045 = args[0];
  
complex_num_type local_7316029; 
return_direct_with_clo1(data,  ((closureN)self_736380)->elements[0], (((closure)  ((closureN)self_736380)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7316029, r_734045));; 
}

static void __lambda_1263(void *data, object self_736381, int argc, object *args) /* object self_736381, object r_734042 */
 {
 object r_734042 = args[0];
  
closureN_type c_7316009;
object e_7316019 [2];
c_7316009.hdr.mark = gc_color_red;
 c_7316009.hdr.grayed = 0;
c_7316009.tag = closureN_tag;
 c_7316009.fn = (function_type)__lambda_1264;
c_7316009.num_args = 1;
c_7316009.num_elements = 2;
c_7316009.elements = (object *)e_7316019;
c_7316009.elements[0] = ((closureN)self_736381)->elements[0];
c_7316009.elements[1] = r_734042;

return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7316009, ((closureN)self_736381)->elements[1]);; 
}

static void __lambda_1264(void *data, object self_736382, int argc, object *args) /* object self_736382, object r_734043 */
 {
 object r_734043 = args[0];
  
closureN_type c_7316011;
object e_7316017 [1];
c_7316011.hdr.mark = gc_color_red;
 c_7316011.hdr.grayed = 0;
c_7316011.tag = closureN_tag;
 c_7316011.fn = (function_type)__lambda_1265;
c_7316011.num_args = 1;
c_7316011.num_elements = 1;
c_7316011.elements = (object *)e_7316017;
c_7316011.elements[0] = ((closureN)self_736382)->elements[0];

return_direct_with_clo3(data,  __glo_filter_scheme_cyclone_util, (((closure)  __glo_filter_scheme_cyclone_util)->fn),  &c_7316011, ((closureN)self_736382)->elements[1], r_734043);; 
}

static void __lambda_1265(void *data, object self_736383, int argc, object *args) /* object self_736383, object r_734041 */
 {
 object r_734041 = args[0];
  
object c_7316016 = Cyc_list2string(data,  ((closureN)self_736383)->elements[0],r_734041);
return_direct_with_clo1(data,  ((closureN)self_736383)->elements[0], (((closure)  ((closureN)self_736383)->elements[0])->fn),  c_7316016);; 
}

static void __lambda_1246(void *data, object _, int argc, object *args) /* closure _,object k_734023, object cstr_731378_731934 */
 {
object k_734023 = args[0]; object cstr_731378_731934 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:old-c-args->new-decls-from-args");

closureN_type c_7315908;
object e_7316004 [1];
c_7315908.hdr.mark = gc_color_red;
 c_7315908.hdr.grayed = 0;
c_7315908.tag = closureN_tag;
 c_7315908.fn = (function_type)__lambda_1247;
c_7315908.num_args = 1;
c_7315908.num_elements = 1;
c_7315908.elements = (object *)e_7316004;
c_7315908.elements[0] = k_734023;

return_direct_with_clo2(data,  __glo_filter_91invalid_91chars_scheme_cyclone_cgen, (((closure)  __glo_filter_91invalid_91chars_scheme_cyclone_cgen)->fn),  &c_7315908, cstr_731378_731934);; 
}

static void __lambda_1247(void *data, object self_736362, int argc, object *args) /* object self_736362, object r_734037 */
 {
 object r_734037 = args[0];
  
closureN_type c_7315910;
object e_7316003 [1];
c_7315910.hdr.mark = gc_color_red;
 c_7315910.hdr.grayed = 0;
c_7315910.tag = closureN_tag;
 c_7315910.fn = (function_type)__lambda_1248;
c_7315910.num_args = 1;
c_7315910.num_elements = 1;
c_7315910.elements = (object *)e_7316003;
c_7315910.elements[0] = ((closureN)self_736362)->elements[0];

return_direct_with_clo3(data,  __glo_string_91split_scheme_cyclone_util, (((closure)  __glo_string_91split_scheme_cyclone_util)->fn),  &c_7315910, r_734037, obj_char2obj(44));; 
}

static void __lambda_1248(void *data, object self_736363, int argc, object *args) /* object self_736363, object r_734036 */
 {
 object r_734036 = args[0];
  
closureN_type c_7315912;
object e_7315994 [2];
c_7315912.hdr.mark = gc_color_red;
 c_7315912.hdr.grayed = 0;
c_7315912.tag = closureN_tag;
 c_7315912.fn = (function_type)__lambda_1249;
c_7315912.num_args = 1;
c_7315912.num_elements = 2;
c_7315912.elements = (object *)e_7315994;
c_7315912.elements[0] = ((closureN)self_736363)->elements[0];
c_7315912.elements[1] = r_734036;


mclosure0(c_7315995, (function_type)__lambda_1260);c_7315995.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7315912,__lambda_1249,  &c_7315995);; 
}

static void __lambda_1260(void *data, object self_736364, int argc, object *args) /* object self_736364, object k_734034, object a_731393_731940 */
 {
 object k_734034 = args[0]; object a_731393_731940 = args[1];
  
closureN_type c_7315997;
object e_7316002 [1];
c_7315997.hdr.mark = gc_color_red;
 c_7315997.hdr.grayed = 0;
c_7315997.tag = closureN_tag;
 c_7315997.fn = (function_type)__lambda_1261;
c_7315997.num_args = 1;
c_7315997.num_elements = 1;
c_7315997.elements = (object *)e_7316002;
c_7315997.elements[0] = k_734034;

return_direct_with_clo3(data,  __glo_string_91split_scheme_cyclone_util, (((closure)  __glo_string_91split_scheme_cyclone_util)->fn),  &c_7315997, a_731393_731940, obj_char2obj(32));; 
}

static void __lambda_1261(void *data, object self_736365, int argc, object *args) /* object self_736365, object r_734035 */
 {
 object r_734035 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_736365)->elements[0], (((closure)  ((closureN)self_736365)->elements[0])->fn),  Cyc_cadr(data, r_734035));; 
}

static void __lambda_1249(void *data, object self_736366, int argc, object *args) /* object self_736366, object r_734033 */
 {
 object r_734033 = args[0];
  
closureN_type c_7315914;
object e_7315990 [1];
c_7315914.hdr.mark = gc_color_red;
 c_7315914.hdr.grayed = 0;
c_7315914.tag = closureN_tag;
 c_7315914.fn = (function_type)__lambda_1250;
c_7315914.num_args = 1;
c_7315914.num_elements = 1;
c_7315914.elements = (object *)e_7315990;
c_7315914.elements[0] = ((closureN)self_736366)->elements[0];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7315914, r_734033, Cyc_cdddr(data, ((closureN)self_736366)->elements[1]));; 
}

static void __lambda_1250(void *data, object self_736367, int argc, object *args) /* object self_736367, object vars_731384_731936 */
 {
 object vars_731384_731936 = args[0];
  
closureN_type c_7315916;
object e_7315989 [2];
c_7315916.hdr.mark = gc_color_red;
 c_7315916.hdr.grayed = 0;
c_7315916.tag = closureN_tag;
 c_7315916.fn = (function_type)__lambda_1251;
c_7315916.num_args = 1;
c_7315916.num_elements = 2;
c_7315916.elements = (object *)e_7315989;
c_7315916.elements[0] = ((closureN)self_736367)->elements[0];
c_7315916.elements[1] = vars_731384_731936;

return_direct_with_clo1(data,(closure)&c_7315916,__lambda_1251,  obj_int2obj(0));; 
}

static void __lambda_1251(void *data, object self_736368, int argc, object *args) /* object self_736368, object i_731387_731937 */
 {
 object i_731387_731937 = args[0];
  
closureN_type c_7315918;
object e_7315985 [2];
c_7315918.hdr.mark = gc_color_red;
 c_7315918.hdr.grayed = 0;
c_7315918.tag = closureN_tag;
 c_7315918.fn = (function_type)__lambda_1337;
c_7315918.num_args = 1;
c_7315918.num_elements = 2;
c_7315918.elements = (object *)e_7315985;
c_7315918.elements[0] = ((closureN)self_736368)->elements[0];
c_7315918.elements[1] = ((closureN)self_736368)->elements[1];


pair_type local_7315988; 
return_direct_with_clo1(data,(closure)&c_7315918,__lambda_1337,  set_cell_as_expr(&local_7315988, i_731387_731937));; 
}

static void __lambda_1337(void *data, object self_736369, int argc, object *args) /* object self_736369, object i_731387_731937 */
 {
 object i_731387_731937 = args[0];
  
closureN_type c_7315920;
object e_7315983 [3];
c_7315920.hdr.mark = gc_color_red;
 c_7315920.hdr.grayed = 0;
c_7315920.tag = closureN_tag;
 c_7315920.fn = (function_type)__lambda_1252;
c_7315920.num_args = 1;
c_7315920.num_elements = 3;
c_7315920.elements = (object *)e_7315983;
c_7315920.elements[0] = i_731387_731937;
c_7315920.elements[1] = ((closureN)self_736369)->elements[0];
c_7315920.elements[2] = ((closureN)self_736369)->elements[1];


make_utf8_string_with_len(c_7315984, "", 0, 0);
return_direct_with_clo1(data,(closure)&c_7315920,__lambda_1252,  &c_7315984);; 
}

static void __lambda_1252(void *data, object self_736370, int argc, object *args) /* object self_736370, object str_731390_731938 */
 {
 object str_731390_731938 = args[0];
  
closureN_type c_7315922;
object e_7315979 [3];
c_7315922.hdr.mark = gc_color_red;
 c_7315922.hdr.grayed = 0;
c_7315922.tag = closureN_tag;
 c_7315922.fn = (function_type)__lambda_1336;
c_7315922.num_args = 1;
c_7315922.num_elements = 3;
c_7315922.elements = (object *)e_7315979;
c_7315922.elements[0] = ((closureN)self_736370)->elements[0];
c_7315922.elements[1] = ((closureN)self_736370)->elements[1];
c_7315922.elements[2] = ((closureN)self_736370)->elements[2];


pair_type local_7315982; 
return_direct_with_clo1(data,(closure)&c_7315922,__lambda_1336,  set_cell_as_expr(&local_7315982, str_731390_731938));; 
}

static void __lambda_1336(void *data, object self_736371, int argc, object *args) /* object self_736371, object str_731390_731938 */
 {
 object str_731390_731938 = args[0];
  
closureN_type c_7315924;
object e_7315934 [3];
c_7315924.hdr.mark = gc_color_red;
 c_7315924.hdr.grayed = 0;
c_7315924.tag = closureN_tag;
 c_7315924.fn = (function_type)__lambda_1253;
c_7315924.num_args = 1;
c_7315924.num_elements = 3;
c_7315924.elements = (object *)e_7315934;
c_7315924.elements[0] = ((closureN)self_736371)->elements[1];
c_7315924.elements[1] = str_731390_731938;
c_7315924.elements[2] = ((closureN)self_736371)->elements[2];


closureN_type c_7315935;
object e_7315978 [2];
c_7315935.hdr.mark = gc_color_red;
 c_7315935.hdr.grayed = 0;
c_7315935.tag = closureN_tag;
 c_7315935.fn = (function_type)__lambda_1255;
c_7315935.num_args = 1;
c_7315935.num_elements = 2;
c_7315935.elements = (object *)e_7315978;
c_7315935.elements[0] = ((closureN)self_736371)->elements[0];
c_7315935.elements[1] = str_731390_731938;

return_direct_with_clo1(data,(closure)&c_7315924,__lambda_1253,  &c_7315935);; 
}

static void __lambda_1255(void *data, object self_736372, int argc, object *args) /* object self_736372, object k_734028, object v_731392_731939 */
 {
 object k_734028 = args[0]; object v_731392_731939 = args[1];
  
closureN_type c_7315937;
object e_7315971 [4];
c_7315937.hdr.mark = gc_color_red;
 c_7315937.hdr.grayed = 0;
c_7315937.tag = closureN_tag;
 c_7315937.fn = (function_type)__lambda_1256;
c_7315937.num_args = 1;
c_7315937.num_elements = 4;
c_7315937.elements = (object *)e_7315971;
c_7315937.elements[0] = ((closureN)self_736372)->elements[0];
c_7315937.elements[1] = k_734028;
c_7315937.elements[2] = ((closureN)self_736372)->elements[1];
c_7315937.elements[3] = v_731392_731939;




object c_7315974 = Cyc_number2string2(data,(closure)&c_7315937,1,car(((closureN)self_736372)->elements[0]));
return_closcall1(data,(closure)&c_7315937,  c_7315974);; 
}

static void __lambda_1256(void *data, object self_736373, int argc, object *args) /* object self_736373, object r_734032 */
 {
 object r_734032 = args[0];
  
closureN_type c_7315939;
object e_7315960 [3];
c_7315939.hdr.mark = gc_color_red;
 c_7315939.hdr.grayed = 0;
c_7315939.tag = closureN_tag;
 c_7315939.fn = (function_type)__lambda_1257;
c_7315939.num_args = 1;
c_7315939.num_elements = 3;
c_7315939.elements = (object *)e_7315960;
c_7315939.elements[0] = ((closureN)self_736373)->elements[0];
c_7315939.elements[1] = ((closureN)self_736373)->elements[1];
c_7315939.elements[2] = ((closureN)self_736373)->elements[2];




make_utf8_string_with_len(c_7315967, "object ", 7, 7);

make_utf8_string_with_len(c_7315969, " = args[", 8, 8);

make_utf8_string_with_len(c_7315970, "];", 2, 2);

object c_7315963 = Cyc_string_append(data,(closure)&c_7315939,6,car(((closureN)self_736373)->elements[2]), &c_7315967, ((closureN)self_736373)->elements[3], &c_7315969, r_734032, &c_7315970);
return_closcall1(data,(closure)&c_7315939,  c_7315963);; 
}

static void __lambda_1257(void *data, object self_736374, int argc, object *args) /* object self_736374, object r_734031 */
 {
 object r_734031 = args[0];
  
closureN_type c_7315941;
object e_7315956 [2];
c_7315941.hdr.mark = gc_color_red;
 c_7315941.hdr.grayed = 0;
c_7315941.tag = closureN_tag;
 c_7315941.fn = (function_type)__lambda_1258;
c_7315941.num_args = 1;
c_7315941.num_elements = 2;
c_7315941.elements = (object *)e_7315956;
c_7315941.elements[0] = ((closureN)self_736374)->elements[0];
c_7315941.elements[1] = ((closureN)self_736374)->elements[1];



return_direct_with_clo1(data,(closure)&c_7315941,__lambda_1258,  Cyc_set_cell(data, ((closureN)self_736374)->elements[2], r_734031));; 
}

static void __lambda_1258(void *data, object self_736375, int argc, object *args) /* object self_736375, object r_734029 */
 {

  
closureN_type c_7315943;
object e_7315949 [2];
c_7315943.hdr.mark = gc_color_red;
 c_7315943.hdr.grayed = 0;
c_7315943.tag = closureN_tag;
 c_7315943.fn = (function_type)__lambda_1259;
c_7315943.num_args = 1;
c_7315943.num_elements = 2;
c_7315943.elements = (object *)e_7315949;
c_7315943.elements[0] = ((closureN)self_736375)->elements[0];
c_7315943.elements[1] = ((closureN)self_736375)->elements[1];


complex_num_type local_7315952; 


return_direct_with_clo1(data,(closure)&c_7315943,__lambda_1259,  Cyc_fast_sum(data,&local_7315952, car(((closureN)self_736375)->elements[0]), obj_int2obj(1)));; 
}

static void __lambda_1259(void *data, object self_736376, int argc, object *args) /* object self_736376, object r_734030 */
 {
 object r_734030 = args[0];
  

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

static void __lambda_1253(void *data, object self_736377, int argc, object *args) /* object self_736377, object r_734027 */
 {
 object r_734027 = args[0];
  
closureN_type c_7315926;
object e_7315932 [2];
c_7315926.hdr.mark = gc_color_red;
 c_7315926.hdr.grayed = 0;
c_7315926.tag = closureN_tag;
 c_7315926.fn = (function_type)__lambda_1254;
c_7315926.num_args = 1;
c_7315926.num_elements = 2;
c_7315926.elements = (object *)e_7315932;
c_7315926.elements[0] = ((closureN)self_736377)->elements[0];
c_7315926.elements[1] = ((closureN)self_736377)->elements[1];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7315926, r_734027, ((closureN)self_736377)->elements[2]);; 
}

static void __lambda_1254(void *data, object self_736378, int argc, object *args) /* object self_736378, object r_734026 */
 {

  

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

static void __lambda_972(void *data, object _, int argc, object *args) /* closure _,object k_733631, object input_91program_731210_731858, object program_127_731211_731859, object lib_91name_731212_731860, object lib_91pass_91thru_91exports_731213_731861, object import_91db_731214_731862, object globals_731215_731863, object c_91headers_731216_731864, object required_91libs_731217_731865, object src_91file_731218_731866, object flag_91set_127_731219_731867 */
 {
object k_733631 = args[0]; object input_91program_731210_731858 = args[1]; object program_127_731211_731859 = args[2]; object lib_91name_731212_731860 = args[3]; object lib_91pass_91thru_91exports_731213_731861 = args[4]; object import_91db_731214_731862 = args[5]; object globals_731215_731863 = args[6]; object c_91headers_731216_731864 = args[7]; object required_91libs_731217_731865 = args[8]; object src_91file_731218_731866 = args[9]; object flag_91set_127_731219_731867 = args[10];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:mta:code-gen");

closureN_type c_7314146;
object e_7315905 [11];
c_7314146.hdr.mark = gc_color_red;
 c_7314146.hdr.grayed = 0;
c_7314146.tag = closureN_tag;
 c_7314146.fn = (function_type)__lambda_973;
c_7314146.num_args = 1;
c_7314146.num_elements = 11;
c_7314146.elements = (object *)e_7315905;
c_7314146.elements[0] = c_91headers_731216_731864;
c_7314146.elements[1] = flag_91set_127_731219_731867;
c_7314146.elements[2] = globals_731215_731863;
c_7314146.elements[3] = import_91db_731214_731862;
c_7314146.elements[4] = input_91program_731210_731858;
c_7314146.elements[5] = k_733631;
c_7314146.elements[6] = lib_91name_731212_731860;
c_7314146.elements[7] = lib_91pass_91thru_91exports_731213_731861;
c_7314146.elements[8] = program_127_731211_731859;
c_7314146.elements[9] = required_91libs_731217_731865;
c_7314146.elements[10] = src_91file_731218_731866;

return_direct_with_clo2(data,  __glo_analyze_117cc_91ast_91_125vars_scheme_cyclone_cps_91optimizations, (((closure)  __glo_analyze_117cc_91ast_91_125vars_scheme_cyclone_cps_91optimizations)->fn),  &c_7314146, input_91program_731210_731858);; 
}

static void __lambda_973(void *data, object self_736079, int argc, object *args) /* object self_736079, object r_734020 */
 {
 object r_734020 = args[0];
  
closureN_type c_7314148;
object e_7315901 [11];
c_7314148.hdr.mark = gc_color_red;
 c_7314148.hdr.grayed = 0;
c_7314148.tag = closureN_tag;
 c_7314148.fn = (function_type)__lambda_974;
c_7314148.num_args = 1;
c_7314148.num_elements = 11;
c_7314148.elements = (object *)e_7315901;
c_7314148.elements[0] = ((closureN)self_736079)->elements[0];
c_7314148.elements[1] = ((closureN)self_736079)->elements[1];
c_7314148.elements[2] = ((closureN)self_736079)->elements[2];
c_7314148.elements[3] = ((closureN)self_736079)->elements[3];
c_7314148.elements[4] = ((closureN)self_736079)->elements[4];
c_7314148.elements[5] = ((closureN)self_736079)->elements[5];
c_7314148.elements[6] = ((closureN)self_736079)->elements[6];
c_7314148.elements[7] = ((closureN)self_736079)->elements[7];
c_7314148.elements[8] = ((closureN)self_736079)->elements[8];
c_7314148.elements[9] = ((closureN)self_736079)->elements[9];
c_7314148.elements[10] = ((closureN)self_736079)->elements[10];


object c_7315904 = global_set_cps_id(data,(closure)&c_7314148,"__glo__85ref_91table_85_scheme_cyclone_cgen", __glo__85ref_91table_85_scheme_cyclone_cgen, r_734020);
return_closcall1(data,(closure)&c_7314148,  c_7315904);; 
}

static void __lambda_974(void *data, object self_736080, int argc, object *args) /* object self_736080, object r_733632 */
 {

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

return_direct_with_clo2(data,  __glo_lib_117idb_117ids_scheme_cyclone_libraries, (((closure)  __glo_lib_117idb_117ids_scheme_cyclone_libraries)->fn),  &c_7314150, ((closureN)self_736080)->elements[3]);; 
}

static void __lambda_975(void *data, object self_736081, int argc, object *args) /* object self_736081, object r_734019 */
 {
 object r_734019 = args[0];
  
closureN_type c_7314152;
object e_7315897 [11];
c_7314152.hdr.mark = gc_color_red;
 c_7314152.hdr.grayed = 0;
c_7314152.tag = closureN_tag;
 c_7314152.fn = (function_type)__lambda_976;
c_7314152.num_args = 1;
c_7314152.num_elements = 11;
c_7314152.elements = (object *)e_7315897;
c_7314152.elements[0] = ((closureN)self_736081)->elements[0];
c_7314152.elements[1] = ((closureN)self_736081)->elements[1];
c_7314152.elements[2] = ((closureN)self_736081)->elements[2];
c_7314152.elements[3] = ((closureN)self_736081)->elements[3];
c_7314152.elements[4] = ((closureN)self_736081)->elements[4];
c_7314152.elements[5] = ((closureN)self_736081)->elements[5];
c_7314152.elements[6] = ((closureN)self_736081)->elements[6];
c_7314152.elements[7] = ((closureN)self_736081)->elements[7];
c_7314152.elements[8] = ((closureN)self_736081)->elements[8];
c_7314152.elements[9] = ((closureN)self_736081)->elements[9];
c_7314152.elements[10] = ((closureN)self_736081)->elements[10];

return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7314152, ((closureN)self_736081)->elements[2], r_734019);; 
}

static void __lambda_976(void *data, object self_736082, int argc, object *args) /* object self_736082, object r_734018 */
 {
 object r_734018 = args[0];
  
closureN_type c_7314154;
object e_7315893 [11];
c_7314154.hdr.mark = gc_color_red;
 c_7314154.hdr.grayed = 0;
c_7314154.tag = closureN_tag;
 c_7314154.fn = (function_type)__lambda_977;
c_7314154.num_args = 1;
c_7314154.num_elements = 11;
c_7314154.elements = (object *)e_7315893;
c_7314154.elements[0] = ((closureN)self_736082)->elements[0];
c_7314154.elements[1] = ((closureN)self_736082)->elements[1];
c_7314154.elements[2] = ((closureN)self_736082)->elements[2];
c_7314154.elements[3] = ((closureN)self_736082)->elements[3];
c_7314154.elements[4] = ((closureN)self_736082)->elements[4];
c_7314154.elements[5] = ((closureN)self_736082)->elements[5];
c_7314154.elements[6] = ((closureN)self_736082)->elements[6];
c_7314154.elements[7] = ((closureN)self_736082)->elements[7];
c_7314154.elements[8] = ((closureN)self_736082)->elements[8];
c_7314154.elements[9] = ((closureN)self_736082)->elements[9];
c_7314154.elements[10] = ((closureN)self_736082)->elements[10];


object c_7315896 = global_set_cps_id(data,(closure)&c_7314154,"__glo__85global_91syms_85_scheme_cyclone_cgen", __glo__85global_91syms_85_scheme_cyclone_cgen, r_734018);
return_closcall1(data,(closure)&c_7314154,  c_7315896);; 
}

static void __lambda_977(void *data, object self_736083, int argc, object *args) /* object self_736083, object r_733633 */
 {

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

return_closcall2(data,  ((closureN)self_736083)->elements[1],  &c_7314157, quote_track_91call_91history);; 
}

static void __lambda_978(void *data, object self_736084, int argc, object *args) /* object self_736084, object r_734016 */
 {
 object r_734016 = args[0];
  
closureN_type c_7314159;
object e_7315888 [11];
c_7314159.hdr.mark = gc_color_red;
 c_7314159.hdr.grayed = 0;
c_7314159.tag = closureN_tag;
 c_7314159.fn = (function_type)__lambda_979;
c_7314159.num_args = 1;
c_7314159.num_elements = 11;
c_7314159.elements = (object *)e_7315888;
c_7314159.elements[0] = ((closureN)self_736084)->elements[0];
c_7314159.elements[1] = ((closureN)self_736084)->elements[1];
c_7314159.elements[2] = ((closureN)self_736084)->elements[2];
c_7314159.elements[3] = ((closureN)self_736084)->elements[3];
c_7314159.elements[4] = ((closureN)self_736084)->elements[4];
c_7314159.elements[5] = ((closureN)self_736084)->elements[5];
c_7314159.elements[6] = ((closureN)self_736084)->elements[6];
c_7314159.elements[7] = ((closureN)self_736084)->elements[7];
c_7314159.elements[8] = ((closureN)self_736084)->elements[8];
c_7314159.elements[9] = ((closureN)self_736084)->elements[9];
c_7314159.elements[10] = ((closureN)self_736084)->elements[10];


object c_7315891 = global_set_cps_id(data,(closure)&c_7314159,"__glo__85cgen_117track_91call_91history_85_scheme_cyclone_cgen", __glo__85cgen_117track_91call_91history_85_scheme_cyclone_cgen, r_734016);
return_closcall1(data,(closure)&c_7314159,  c_7315891);; 
}

static void __lambda_979(void *data, object self_736085, int argc, object *args) /* object self_736085, object r_733634 */
 {

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

return_closcall2(data,  ((closureN)self_736085)->elements[1],  &c_7314162, quote_use_91unsafe_91prims);; 
}

static void __lambda_980(void *data, object self_736086, int argc, object *args) /* object self_736086, object r_734014 */
 {
 object r_734014 = args[0];
  
closureN_type c_7314164;
object e_7315883 [10];
c_7314164.hdr.mark = gc_color_red;
 c_7314164.hdr.grayed = 0;
c_7314164.tag = closureN_tag;
 c_7314164.fn = (function_type)__lambda_981;
c_7314164.num_args = 1;
c_7314164.num_elements = 10;
c_7314164.elements = (object *)e_7315883;
c_7314164.elements[0] = ((closureN)self_736086)->elements[0];
c_7314164.elements[1] = ((closureN)self_736086)->elements[1];
c_7314164.elements[2] = ((closureN)self_736086)->elements[2];
c_7314164.elements[3] = ((closureN)self_736086)->elements[3];
c_7314164.elements[4] = ((closureN)self_736086)->elements[4];
c_7314164.elements[5] = ((closureN)self_736086)->elements[5];
c_7314164.elements[6] = ((closureN)self_736086)->elements[6];
c_7314164.elements[7] = ((closureN)self_736086)->elements[7];
c_7314164.elements[8] = ((closureN)self_736086)->elements[8];
c_7314164.elements[9] = ((closureN)self_736086)->elements[9];


object c_7315886 = global_set_cps_id(data,(closure)&c_7314164,"__glo__85cgen_117use_91unsafe_91prims_85_scheme_cyclone_cgen", __glo__85cgen_117use_91unsafe_91prims_85_scheme_cyclone_cgen, r_734014);
return_closcall1(data,(closure)&c_7314164,  c_7315886);; 
}

static void __lambda_981(void *data, object self_736087, int argc, object *args) /* object self_736087, object r_733635 */
 {

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

return_direct_with_clo1(data,  __glo_adb_117max_91lambda_91id_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117max_91lambda_91id_scheme_cyclone_cps_91optimizations)->fn),  &c_7314166);; 
}

static void __lambda_982(void *data, object self_736088, int argc, object *args) /* object self_736088, object r_734013 */
 {
 object r_734013 = args[0];
  
closureN_type c_7314168;
object e_7315875 [10];
c_7314168.hdr.mark = gc_color_red;
 c_7314168.hdr.grayed = 0;
c_7314168.tag = closureN_tag;
 c_7314168.fn = (function_type)__lambda_983;
c_7314168.num_args = 1;
c_7314168.num_elements = 10;
c_7314168.elements = (object *)e_7315875;
c_7314168.elements[0] = ((closureN)self_736088)->elements[0];
c_7314168.elements[1] = ((closureN)self_736088)->elements[1];
c_7314168.elements[2] = ((closureN)self_736088)->elements[2];
c_7314168.elements[3] = ((closureN)self_736088)->elements[3];
c_7314168.elements[4] = ((closureN)self_736088)->elements[4];
c_7314168.elements[5] = ((closureN)self_736088)->elements[5];
c_7314168.elements[6] = ((closureN)self_736088)->elements[6];
c_7314168.elements[7] = ((closureN)self_736088)->elements[7];
c_7314168.elements[8] = ((closureN)self_736088)->elements[8];
c_7314168.elements[9] = ((closureN)self_736088)->elements[9];


complex_num_type local_7315881; 

object c_7315878 = global_set_cps_id(data,(closure)&c_7314168,"__glo_num_91lambdas_scheme_cyclone_cgen", __glo_num_91lambdas_scheme_cyclone_cgen, Cyc_fast_sum(data,&local_7315881, r_734013, obj_int2obj(1)));
return_closcall1(data,(closure)&c_7314168,  c_7315878);; 
}

static void __lambda_983(void *data, object self_736089, int argc, object *args) /* object self_736089, object r_733636 */
 {

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


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

return_direct_with_clo1(data,(closure)&c_7314170,__lambda_984,  &c_7315775);; 
}

static void __lambda_1233(void *data, object self_736090, int argc, object *args) /* object self_736090, object k_733985, object ident_731220_731868 */
 {
 object k_733985 = args[0]; object ident_731220_731868 = args[1];
  object r_733986;
  if( (boolean_f != ((closureN)self_736090)->elements[4]) ){ 
  
  r_733986 = memberp(data, ident_731220_731868, ((closureN)self_736090)->elements[0]);
} else { 
  r_733986 = boolean_f;}
;if( (boolean_f != r_733986) ){ 
  return_direct_with_clo2(data,  __glo_mangle_91global_scheme_cyclone_util, (((closure)  __glo_mangle_91global_scheme_cyclone_util)->fn),  k_733985, ident_731220_731868);
} else { 
  
closureN_type c_7315785;
object e_7315870 [5];
c_7315785.hdr.mark = gc_color_red;
 c_7315785.hdr.grayed = 0;
c_7315785.tag = closureN_tag;
 c_7315785.fn = (function_type)__lambda_1234;
c_7315785.num_args = 1;
c_7315785.num_elements = 5;
c_7315785.elements = (object *)e_7315870;
c_7315785.elements[0] = ident_731220_731868;
c_7315785.elements[1] = ((closureN)self_736090)->elements[1];
c_7315785.elements[2] = k_733985;
c_7315785.elements[3] = ((closureN)self_736090)->elements[2];
c_7315785.elements[4] = ((closureN)self_736090)->elements[3];



return_direct_with_clo1(data,(closure)&c_7315785,__lambda_1234,  memberp(data, ident_731220_731868, ((closureN)self_736090)->elements[0]));}
;; 
}

static void __lambda_1234(void *data, object self_736091, int argc, object *args) /* object self_736091, object tmp_731229_731231_731869 */
 {
 object tmp_731229_731231_731869 = args[0];
  
closureN_type c_7315787;
object e_7315796 [3];
c_7315787.hdr.mark = gc_color_red;
 c_7315787.hdr.grayed = 0;
c_7315787.tag = closureN_tag;
 c_7315787.fn = (function_type)__lambda_1235;
c_7315787.num_args = 0;
c_7315787.num_elements = 3;
c_7315787.elements = (object *)e_7315796;
c_7315787.elements[0] = ((closureN)self_736091)->elements[0];
c_7315787.elements[1] = ((closureN)self_736091)->elements[4];
c_7315787.elements[2] = tmp_731229_731231_731869;


closureN_type c_7315797;
object e_7315869 [4];
c_7315797.hdr.mark = gc_color_red;
 c_7315797.hdr.grayed = 0;
c_7315797.tag = closureN_tag;
 c_7315797.fn = (function_type)__lambda_1236;
c_7315797.num_args = 1;
c_7315797.num_elements = 4;
c_7315797.elements = (object *)e_7315869;
c_7315797.elements[0] = ((closureN)self_736091)->elements[0];
c_7315797.elements[1] = ((closureN)self_736091)->elements[1];
c_7315797.elements[2] = ((closureN)self_736091)->elements[2];
c_7315797.elements[3] = ((closureN)self_736091)->elements[3];

return_direct_with_clo1(data,(closure)&c_7315787,__lambda_1235,  &c_7315797);; 
}

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

return_direct_with_clo2(data,  __glo_import_91_125string_scheme_cyclone_cgen, (((closure)  __glo_import_91_125string_scheme_cyclone_cgen)->fn),  &c_7315799, ((closureN)self_736092)->elements[3]);
} else { 
  
closureN_type c_7315816;
object e_7315866 [2];
c_7315816.hdr.mark = gc_color_red;
 c_7315816.hdr.grayed = 0;
c_7315816.tag = closureN_tag;
 c_7315816.fn = (function_type)__lambda_1240;
c_7315816.num_args = 1;
c_7315816.num_elements = 2;
c_7315816.elements = (object *)e_7315866;
c_7315816.elements[0] = ((closureN)self_736092)->elements[0];
c_7315816.elements[1] = ((closureN)self_736092)->elements[2];

return_direct_with_clo3(data,  __glo_lib_117idb_117lookup_scheme_cyclone_libraries, (((closure)  __glo_lib_117idb_117lookup_scheme_cyclone_libraries)->fn),  &c_7315816, ((closureN)self_736092)->elements[1], ((closureN)self_736092)->elements[0]);}
;; 
}

static void __lambda_1240(void *data, object self_736096, int argc, object *args) /* object self_736096, object idb_91entry_731235_731872 */
 {
 object idb_91entry_731235_731872 = args[0];
  if( (boolean_f != idb_91entry_731235_731872) ){ 
  
closureN_type c_7315818;
object e_7315838 [2];
c_7315818.hdr.mark = gc_color_red;
 c_7315818.hdr.grayed = 0;
c_7315818.tag = closureN_tag;
 c_7315818.fn = (function_type)__lambda_1241;
c_7315818.num_args = 1;
c_7315818.num_elements = 2;
c_7315818.elements = (object *)e_7315838;
c_7315818.elements[0] = idb_91entry_731235_731872;
c_7315818.elements[1] = ((closureN)self_736096)->elements[1];


complex_num_type local_7315841; 
return_direct_with_clo1(data,(closure)&c_7315818,__lambda_1241,  ((inline_function_type)
                   ((closure)__glo_lib_117idb_117entry_91_125library_91name_191_191inline_191_191_scheme_cyclone_libraries)->fn)(data,&local_7315841, idb_91entry_731235_731872));
} else { 
  
pair_type local_7315846; 

pair_type local_7315849; 

pair_type local_7315852; 

pair_type local_7315855; 

pair_type local_7315858; 

pair_type local_7315861; 

pair_type local_7315864; 
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_736096)->elements[1], set_pair_as_expr(&local_7315846, quote_Unable, set_pair_as_expr(&local_7315849, quote_to, set_pair_as_expr(&local_7315852, quote_find, set_pair_as_expr(&local_7315855, quote_a, set_pair_as_expr(&local_7315858, quote_library, set_pair_as_expr(&local_7315861, quote_importing, set_pair_as_expr(&local_7315864, ((closureN)self_736096)->elements[0], NULL))))))));}
;; 
}

static void __lambda_1241(void *data, object self_736097, int argc, object *args) /* object self_736097, object r_733994 */
 {
 object r_733994 = args[0];
  
closureN_type c_7315820;
object e_7315837 [2];
c_7315820.hdr.mark = gc_color_red;
 c_7315820.hdr.grayed = 0;
c_7315820.tag = closureN_tag;
 c_7315820.fn = (function_type)__lambda_1242;
c_7315820.num_args = 1;
c_7315820.num_elements = 2;
c_7315820.elements = (object *)e_7315837;
c_7315820.elements[0] = ((closureN)self_736097)->elements[0];
c_7315820.elements[1] = ((closureN)self_736097)->elements[1];

return_direct_with_clo2(data,  __glo_import_91_125string_scheme_cyclone_cgen, (((closure)  __glo_import_91_125string_scheme_cyclone_cgen)->fn),  &c_7315820, r_733994);; 
}

static void __lambda_1242(void *data, object self_736098, int argc, object *args) /* object self_736098, object r_733991 */
 {
 object r_733991 = args[0];
  
closureN_type c_7315822;
object e_7315835 [2];
c_7315822.hdr.mark = gc_color_red;
 c_7315822.hdr.grayed = 0;
c_7315822.tag = closureN_tag;
 c_7315822.fn = (function_type)__lambda_1243;
c_7315822.num_args = 1;
c_7315822.num_elements = 2;
c_7315822.elements = (object *)e_7315835;
c_7315822.elements[0] = ((closureN)self_736098)->elements[1];
c_7315822.elements[1] = r_733991;

return_direct_with_clo2(data,  __glo_lib_117idb_117entry_91_125library_91id_scheme_cyclone_libraries, (((closure)  __glo_lib_117idb_117entry_91_125library_91id_scheme_cyclone_libraries)->fn),  &c_7315822, ((closureN)self_736098)->elements[0]);; 
}

static void __lambda_1243(void *data, object self_736099, int argc, object *args) /* object self_736099, object r_733993 */
 {
 object r_733993 = args[0];
  
closureN_type c_7315824;
object e_7315834 [2];
c_7315824.hdr.mark = gc_color_red;
 c_7315824.hdr.grayed = 0;
c_7315824.tag = closureN_tag;
 c_7315824.fn = (function_type)__lambda_1244;
c_7315824.num_args = 1;
c_7315824.num_elements = 2;
c_7315824.elements = (object *)e_7315834;
c_7315824.elements[0] = ((closureN)self_736099)->elements[0];
c_7315824.elements[1] = ((closureN)self_736099)->elements[1];

return_direct_with_clo2(data,  __glo_mangle_91global_scheme_cyclone_util, (((closure)  __glo_mangle_91global_scheme_cyclone_util)->fn),  &c_7315824, r_733993);; 
}

static void __lambda_1244(void *data, object self_736100, int argc, object *args) /* object self_736100, object r_733992 */
 {
 object r_733992 = args[0];
  
closureN_type c_7315826;
object e_7315832 [1];
c_7315826.hdr.mark = gc_color_red;
 c_7315826.hdr.grayed = 0;
c_7315826.tag = closureN_tag;
 c_7315826.fn = (function_type)__lambda_1245;
c_7315826.num_args = 2;
c_7315826.num_elements = 1;
c_7315826.elements = (object *)e_7315832;
c_7315826.elements[0] = ((closureN)self_736100)->elements[0];

return_direct_with_clo2(data,(closure)&c_7315826,__lambda_1245,  ((closureN)self_736100)->elements[1], r_733992);; 
}

static void __lambda_1245(void *data, object self_736101, int argc, object *args) /* object self_736101, object suffix_731243_731873, object prefix_731244_731874 */
 {
 object suffix_731243_731873 = args[0]; object prefix_731244_731874 = args[1];
  
object c_7315831 = Cyc_string_append(data,  ((closureN)self_736101)->elements[0],2,prefix_731244_731874, suffix_731243_731873);
return_direct_with_clo1(data,  ((closureN)self_736101)->elements[0], (((closure)  ((closureN)self_736101)->elements[0])->fn),  c_7315831);; 
}

static void __lambda_1237(void *data, object self_736093, int argc, object *args) /* object self_736093, object r_733988 */
 {
 object r_733988 = args[0];
  
closureN_type c_7315801;
object e_7315811 [2];
c_7315801.hdr.mark = gc_color_red;
 c_7315801.hdr.grayed = 0;
c_7315801.tag = closureN_tag;
 c_7315801.fn = (function_type)__lambda_1238;
c_7315801.num_args = 1;
c_7315801.num_elements = 2;
c_7315801.elements = (object *)e_7315811;
c_7315801.elements[0] = ((closureN)self_736093)->elements[1];
c_7315801.elements[1] = r_733988;

return_direct_with_clo2(data,  __glo_mangle_91global_scheme_cyclone_util, (((closure)  __glo_mangle_91global_scheme_cyclone_util)->fn),  &c_7315801, ((closureN)self_736093)->elements[0]);; 
}

static void __lambda_1238(void *data, object self_736094, int argc, object *args) /* object self_736094, object r_733989 */
 {
 object r_733989 = args[0];
  
closureN_type c_7315803;
object e_7315809 [1];
c_7315803.hdr.mark = gc_color_red;
 c_7315803.hdr.grayed = 0;
c_7315803.tag = closureN_tag;
 c_7315803.fn = (function_type)__lambda_1239;
c_7315803.num_args = 2;
c_7315803.num_elements = 1;
c_7315803.elements = (object *)e_7315809;
c_7315803.elements[0] = ((closureN)self_736094)->elements[0];

return_direct_with_clo2(data,(closure)&c_7315803,__lambda_1239,  ((closureN)self_736094)->elements[1], r_733989);; 
}

static void __lambda_1239(void *data, object self_736095, int argc, object *args) /* object self_736095, object suffix_731232_731870, object prefix_731233_731871 */
 {
 object suffix_731232_731870 = args[0]; object prefix_731233_731871 = args[1];
  
object c_7315808 = Cyc_string_append(data,  ((closureN)self_736095)->elements[0],2,prefix_731233_731871, suffix_731232_731870);
return_direct_with_clo1(data,  ((closureN)self_736095)->elements[0], (((closure)  ((closureN)self_736095)->elements[0])->fn),  c_7315808);; 
}

static void __lambda_1235(void *data, object self_736102, int argc, object *args) /* object self_736102, object k_734010 */
 {
 object k_734010 = args[0];
  if( (boolean_f != ((closureN)self_736102)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_734010,__lambda_1236,  ((closureN)self_736102)->elements[2]);
} else { 
  

return_direct_with_clo1(data,  k_734010,__lambda_1236,  memberp(data, ((closureN)self_736102)->elements[0], ((closureN)self_736102)->elements[1]));}
;; 
}

static void __lambda_984(void *data, object self_736103, int argc, object *args) /* object self_736103, object r_733984 */
 {
 object r_733984 = args[0];
  
closureN_type c_7314172;
object e_7315770 [9];
c_7314172.hdr.mark = gc_color_red;
 c_7314172.hdr.grayed = 0;
c_7314172.tag = closureN_tag;
 c_7314172.fn = (function_type)__lambda_985;
c_7314172.num_args = 1;
c_7314172.num_elements = 9;
c_7314172.elements = (object *)e_7315770;
c_7314172.elements[0] = ((closureN)self_736103)->elements[0];
c_7314172.elements[1] = ((closureN)self_736103)->elements[1];
c_7314172.elements[2] = ((closureN)self_736103)->elements[2];
c_7314172.elements[3] = ((closureN)self_736103)->elements[3];
c_7314172.elements[4] = ((closureN)self_736103)->elements[4];
c_7314172.elements[5] = ((closureN)self_736103)->elements[5];
c_7314172.elements[6] = ((closureN)self_736103)->elements[6];
c_7314172.elements[7] = ((closureN)self_736103)->elements[7];
c_7314172.elements[8] = ((closureN)self_736103)->elements[8];


object c_7315773 = global_set_cps_id(data,(closure)&c_7314172,"__glo_cgen_117mangle_91global_scheme_cyclone_cgen", __glo_cgen_117mangle_91global_scheme_cyclone_cgen, r_733984);
return_closcall1(data,(closure)&c_7314172,  c_7315773);; 
}

static void __lambda_985(void *data, object self_736104, int argc, object *args) /* object self_736104, object r_733637 */
 {

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

return_direct_with_clo2(data,(closure)&c_7314174,__lambda_986,  NULL, boolean_f);; 
}

static void __lambda_986(void *data, object self_736105, int argc, object *args) /* object self_736105, object compiled_91program_91lst_731245_731875, object compiled_91program_731246_731876 */
 {
 object compiled_91program_91lst_731245_731875 = args[0]; object compiled_91program_731246_731876 = args[1];
  
closureN_type c_7314176;
object e_7315765 [10];
c_7314176.hdr.mark = gc_color_red;
 c_7314176.hdr.grayed = 0;
c_7314176.tag = closureN_tag;
 c_7314176.fn = (function_type)__lambda_1335;
c_7314176.num_args = 1;
c_7314176.num_elements = 10;
c_7314176.elements = (object *)e_7315765;
c_7314176.elements[0] = ((closureN)self_736105)->elements[0];
c_7314176.elements[1] = compiled_91program_731246_731876;
c_7314176.elements[2] = ((closureN)self_736105)->elements[1];
c_7314176.elements[3] = ((closureN)self_736105)->elements[2];
c_7314176.elements[4] = ((closureN)self_736105)->elements[3];
c_7314176.elements[5] = ((closureN)self_736105)->elements[4];
c_7314176.elements[6] = ((closureN)self_736105)->elements[5];
c_7314176.elements[7] = ((closureN)self_736105)->elements[6];
c_7314176.elements[8] = ((closureN)self_736105)->elements[7];
c_7314176.elements[9] = ((closureN)self_736105)->elements[8];


pair_type local_7315768; 
return_direct_with_clo1(data,(closure)&c_7314176,__lambda_1335,  set_cell_as_expr(&local_7315768, compiled_91program_91lst_731245_731875));; 
}

static void __lambda_1335(void *data, object self_736106, int argc, object *args) /* object self_736106, object compiled_91program_91lst_731245_731875 */
 {
 object compiled_91program_91lst_731245_731875 = args[0];
  
closureN_type c_7314178;
object e_7315760 [10];
c_7314178.hdr.mark = gc_color_red;
 c_7314178.hdr.grayed = 0;
c_7314178.tag = closureN_tag;
 c_7314178.fn = (function_type)__lambda_1334;
c_7314178.num_args = 1;
c_7314178.num_elements = 10;
c_7314178.elements = (object *)e_7315760;
c_7314178.elements[0] = ((closureN)self_736106)->elements[0];
c_7314178.elements[1] = compiled_91program_91lst_731245_731875;
c_7314178.elements[2] = ((closureN)self_736106)->elements[2];
c_7314178.elements[3] = ((closureN)self_736106)->elements[3];
c_7314178.elements[4] = ((closureN)self_736106)->elements[4];
c_7314178.elements[5] = ((closureN)self_736106)->elements[5];
c_7314178.elements[6] = ((closureN)self_736106)->elements[6];
c_7314178.elements[7] = ((closureN)self_736106)->elements[7];
c_7314178.elements[8] = ((closureN)self_736106)->elements[8];
c_7314178.elements[9] = ((closureN)self_736106)->elements[9];


pair_type local_7315763; 
return_direct_with_clo1(data,(closure)&c_7314178,__lambda_1334,  set_cell_as_expr(&local_7315763, ((closureN)self_736106)->elements[1]));; 
}

static void __lambda_1334(void *data, object self_736107, int argc, object *args) /* object self_736107, object compiled_91program_731246_731876 */
 {
 object compiled_91program_731246_731876 = args[0];
  
closureN_type c_7314180;
object e_7315739 [10];
c_7314180.hdr.mark = gc_color_red;
 c_7314180.hdr.grayed = 0;
c_7314180.tag = closureN_tag;
 c_7314180.fn = (function_type)__lambda_987;
c_7314180.num_args = 1;
c_7314180.num_elements = 10;
c_7314180.elements = (object *)e_7315739;
c_7314180.elements[0] = ((closureN)self_736107)->elements[0];
c_7314180.elements[1] = compiled_91program_731246_731876;
c_7314180.elements[2] = ((closureN)self_736107)->elements[1];
c_7314180.elements[3] = ((closureN)self_736107)->elements[2];
c_7314180.elements[4] = ((closureN)self_736107)->elements[3];
c_7314180.elements[5] = ((closureN)self_736107)->elements[4];
c_7314180.elements[6] = ((closureN)self_736107)->elements[5];
c_7314180.elements[7] = ((closureN)self_736107)->elements[6];
c_7314180.elements[8] = ((closureN)self_736107)->elements[7];
c_7314180.elements[9] = ((closureN)self_736107)->elements[8];


closureN_type c_7315740;
object e_7315759 [2];
c_7315740.hdr.mark = gc_color_red;
 c_7315740.hdr.grayed = 0;
c_7315740.tag = closureN_tag;
 c_7315740.fn = (function_type)__lambda_1230;
c_7315740.num_args = 1;
c_7315740.num_elements = 2;
c_7315740.elements = (object *)e_7315759;
c_7315740.elements[0] = ((closureN)self_736107)->elements[1];
c_7315740.elements[1] = ((closureN)self_736107)->elements[9];

return_direct_with_clo1(data,(closure)&c_7314180,__lambda_987,  &c_7315740);; 
}

static void __lambda_1230(void *data, object self_736108, int argc, object *args) /* object self_736108, object k_733981, object expr_731247_731877 */
 {
 object k_733981 = args[0]; object expr_731247_731877 = args[1];
  
closureN_type c_7315742;
object e_7315757 [2];
c_7315742.hdr.mark = gc_color_red;
 c_7315742.hdr.grayed = 0;
c_7315742.tag = closureN_tag;
 c_7315742.fn = (function_type)__lambda_1231;
c_7315742.num_args = 1;
c_7315742.num_elements = 2;
c_7315742.elements = (object *)e_7315757;
c_7315742.elements[0] = ((closureN)self_736108)->elements[0];
c_7315742.elements[1] = k_733981;

return_direct_with_clo3(data,  __glo_c_91compile_91program_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91program_scheme_cyclone_cgen)->fn),  &c_7315742, expr_731247_731877, ((closureN)self_736108)->elements[1]);; 
}

static void __lambda_1231(void *data, object self_736109, int argc, object *args) /* object self_736109, object r_733983 */
 {
 object r_733983 = args[0];
  
closureN_type c_7315744;
object e_7315750 [2];
c_7315744.hdr.mark = gc_color_red;
 c_7315744.hdr.grayed = 0;
c_7315744.tag = closureN_tag;
 c_7315744.fn = (function_type)__lambda_1232;
c_7315744.num_args = 1;
c_7315744.num_elements = 2;
c_7315744.elements = (object *)e_7315750;
c_7315744.elements[0] = ((closureN)self_736109)->elements[0];
c_7315744.elements[1] = ((closureN)self_736109)->elements[1];


pair_type local_7315753; 


return_direct_with_clo1(data,(closure)&c_7315744,__lambda_1232,  set_pair_as_expr(&local_7315753, r_733983, car(((closureN)self_736109)->elements[0])));; 
}

static void __lambda_1232(void *data, object self_736110, int argc, object *args) /* object self_736110, object r_733982 */
 {
 object r_733982 = args[0];
  

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

static void __lambda_987(void *data, object self_736111, int argc, object *args) /* object self_736111, object r_733980 */
 {
 object r_733980 = args[0];
  
closureN_type c_7314182;
object e_7315737 [9];
c_7314182.hdr.mark = gc_color_red;
 c_7314182.hdr.grayed = 0;
c_7314182.tag = closureN_tag;
 c_7314182.fn = (function_type)__lambda_988;
c_7314182.num_args = 1;
c_7314182.num_elements = 9;
c_7314182.elements = (object *)e_7315737;
c_7314182.elements[0] = ((closureN)self_736111)->elements[0];
c_7314182.elements[1] = ((closureN)self_736111)->elements[1];
c_7314182.elements[2] = ((closureN)self_736111)->elements[2];
c_7314182.elements[3] = ((closureN)self_736111)->elements[3];
c_7314182.elements[4] = ((closureN)self_736111)->elements[5];
c_7314182.elements[5] = ((closureN)self_736111)->elements[6];
c_7314182.elements[6] = ((closureN)self_736111)->elements[7];
c_7314182.elements[7] = ((closureN)self_736111)->elements[8];
c_7314182.elements[8] = ((closureN)self_736111)->elements[9];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314182, r_733980, ((closureN)self_736111)->elements[4]);; 
}

static void __lambda_988(void *data, object self_736112, int argc, object *args) /* object self_736112, object r_733639 */
 {

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



return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_7314184, car(((closureN)self_736112)->elements[2]));; 
}

static void __lambda_989(void *data, object self_736113, int argc, object *args) /* object self_736113, object r_733979 */
 {
 object r_733979 = args[0];
  
closureN_type c_7314186;
object e_7315731 [8];
c_7314186.hdr.mark = gc_color_red;
 c_7314186.hdr.grayed = 0;
c_7314186.tag = closureN_tag;
 c_7314186.fn = (function_type)__lambda_990;
c_7314186.num_args = 1;
c_7314186.num_elements = 8;
c_7314186.elements = (object *)e_7315731;
c_7314186.elements[0] = ((closureN)self_736113)->elements[0];
c_7314186.elements[1] = ((closureN)self_736113)->elements[1];
c_7314186.elements[2] = ((closureN)self_736113)->elements[2];
c_7314186.elements[3] = ((closureN)self_736113)->elements[3];
c_7314186.elements[4] = ((closureN)self_736113)->elements[4];
c_7314186.elements[5] = ((closureN)self_736113)->elements[5];
c_7314186.elements[6] = ((closureN)self_736113)->elements[6];
c_7314186.elements[7] = ((closureN)self_736113)->elements[7];


make_utf8_string_with_len(c_7315732, "", 0, 0);
return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  &c_7314186, primitive_string_91append, &c_7315732, r_733979);; 
}

static void __lambda_990(void *data, object self_736114, int argc, object *args) /* object self_736114, object r_733978 */
 {
 object r_733978 = args[0];
  
closureN_type c_7314188;
object e_7315727 [8];
c_7314188.hdr.mark = gc_color_red;
 c_7314188.hdr.grayed = 0;
c_7314188.tag = closureN_tag;
 c_7314188.fn = (function_type)__lambda_991;
c_7314188.num_args = 1;
c_7314188.num_elements = 8;
c_7314188.elements = (object *)e_7315727;
c_7314188.elements[0] = ((closureN)self_736114)->elements[0];
c_7314188.elements[1] = ((closureN)self_736114)->elements[1];
c_7314188.elements[2] = ((closureN)self_736114)->elements[2];
c_7314188.elements[3] = ((closureN)self_736114)->elements[3];
c_7314188.elements[4] = ((closureN)self_736114)->elements[4];
c_7314188.elements[5] = ((closureN)self_736114)->elements[5];
c_7314188.elements[6] = ((closureN)self_736114)->elements[6];
c_7314188.elements[7] = ((closureN)self_736114)->elements[7];



return_direct_with_clo1(data,(closure)&c_7314188,__lambda_991,  Cyc_set_cell(data, ((closureN)self_736114)->elements[1], r_733978));; 
}

static void __lambda_991(void *data, object self_736115, int argc, object *args) /* object self_736115, object r_733640 */
 {

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

return_direct_with_clo2(data,  __glo_emit_91c_91arity_91macros_scheme_cyclone_cgen, (((closure)  __glo_emit_91c_91arity_91macros_scheme_cyclone_cgen)->fn),  &c_7314190, obj_int2obj(0));; 
}

static void __lambda_992(void *data, object self_736116, int argc, object *args) /* object self_736116, object r_733641 */
 {

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


mclosure0(c_7315705, (function_type)__lambda_1229);c_7315705.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314192,__lambda_993,  &c_7315705);; 
}

static void __lambda_1229(void *data, object self_736117, int argc, object *args) /* object self_736117, object k_733971, object h_731248_731878 */
 {
 object k_733971 = args[0]; object h_731248_731878 = args[1];
  object r_733972;
    
if( (boolean_f != Cyc_is_string(h_731248_731878)) ){ 
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, h_731248_731878), obj_int2obj(0))) ){ 
  
  
  r_733972 = equalp(Cyc_string_ref(data, h_731248_731878, obj_int2obj(0)), obj_char2obj(60));
} else { 
  r_733972 = boolean_f;}
;
} else { 
  r_733972 = boolean_f;}
;if( (boolean_f != r_733972) ){ 
  
make_utf8_string_with_len(c_7315721, "#include ", 9, 9);

make_utf8_string_with_len(c_7315722, "", 0, 0);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  k_733971, &c_7315721, h_731248_731878, &c_7315722);
} else { 
  
make_utf8_string_with_len(c_7315724, "#include \"", 10, 10);

make_utf8_string_with_len(c_7315725, "\"", 1, 1);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  k_733971, &c_7315724, h_731248_731878, &c_7315725);}
;; 
}

static void __lambda_993(void *data, object self_736118, int argc, object *args) /* object self_736118, object r_733970 */
 {
 object r_733970 = args[0];
  
closureN_type c_7314194;
object e_7315702 [7];
c_7314194.hdr.mark = gc_color_red;
 c_7314194.hdr.grayed = 0;
c_7314194.tag = closureN_tag;
 c_7314194.fn = (function_type)__lambda_994;
c_7314194.num_args = 1;
c_7314194.num_elements = 7;
c_7314194.elements = (object *)e_7315702;
c_7314194.elements[0] = ((closureN)self_736118)->elements[1];
c_7314194.elements[1] = ((closureN)self_736118)->elements[2];
c_7314194.elements[2] = ((closureN)self_736118)->elements[3];
c_7314194.elements[3] = ((closureN)self_736118)->elements[4];
c_7314194.elements[4] = ((closureN)self_736118)->elements[5];
c_7314194.elements[5] = ((closureN)self_736118)->elements[6];
c_7314194.elements[6] = ((closureN)self_736118)->elements[7];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314194, r_733970, ((closureN)self_736118)->elements[0]);; 
}

static void __lambda_994(void *data, object self_736119, int argc, object *args) /* object self_736119, object r_733642 */
 {

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


make_utf8_string_with_len(c_7315701, "#include \"cyclone/types.h\"", 26, 26);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314196, &c_7315701);; 
}

static void __lambda_995(void *data, object self_736120, int argc, object *args) /* object self_736120, object r_733643 */
 {

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


mclosure0(c_7315683, (function_type)__lambda_1225);c_7315683.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314198,__lambda_996,  &c_7315683);; 
}

static void __lambda_1225(void *data, object self_736121, int argc, object *args) /* object self_736121, object k_733965, object global_731255_731879 */
 {
 object k_733965 = args[0]; object global_731255_731879 = args[1];
  
closureN_type c_7315685;
object e_7315698 [2];
c_7315685.hdr.mark = gc_color_red;
 c_7315685.hdr.grayed = 0;
c_7315685.tag = closureN_tag;
 c_7315685.fn = (function_type)__lambda_1226;
c_7315685.num_args = 1;
c_7315685.num_elements = 2;
c_7315685.elements = (object *)e_7315698;
c_7315685.elements[0] = global_731255_731879;
c_7315685.elements[1] = k_733965;


make_utf8_string_with_len(c_7315699, "object ", 7, 7);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315685, &c_7315699);; 
}

static void __lambda_1226(void *data, object self_736122, int argc, object *args) /* object self_736122, object r_733966_735141 */
 {

  
closureN_type c_7315687;
object e_7315694 [1];
c_7315687.hdr.mark = gc_color_red;
 c_7315687.hdr.grayed = 0;
c_7315687.tag = closureN_tag;
 c_7315687.fn = (function_type)__lambda_1227;
c_7315687.num_args = 1;
c_7315687.num_elements = 1;
c_7315687.elements = (object *)e_7315694;
c_7315687.elements[0] = ((closureN)self_736122)->elements[1];



return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7315687, Cyc_car(data, ((closureN)self_736122)->elements[0]));; 
}

static void __lambda_1227(void *data, object self_736123, int argc, object *args) /* object self_736123, object r_733968_735142 */
 {
 object r_733968_735142 = args[0];
  
closureN_type c_7315689;
object e_7315693 [1];
c_7315689.hdr.mark = gc_color_red;
 c_7315689.hdr.grayed = 0;
c_7315689.tag = closureN_tag;
 c_7315689.fn = (function_type)__lambda_1228;
c_7315689.num_args = 1;
c_7315689.num_elements = 1;
c_7315689.elements = (object *)e_7315693;
c_7315689.elements[0] = ((closureN)self_736123)->elements[0];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315689, r_733968_735142);; 
}

static void __lambda_1228(void *data, object self_736124, int argc, object *args) /* object self_736124, object r_733967_735143_735144 */
 {

  
make_utf8_string_with_len(c_7315692, " = NULL;\n", 9, 9);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_736124)->elements[0], &c_7315692);; 
}

static void __lambda_996(void *data, object self_736125, int argc, object *args) /* object self_736125, object r_733964 */
 {
 object r_733964 = args[0];
  
closureN_type c_7314200;
object e_7315681 [7];
c_7314200.hdr.mark = gc_color_red;
 c_7314200.hdr.grayed = 0;
c_7314200.tag = closureN_tag;
 c_7314200.fn = (function_type)__lambda_997;
c_7314200.num_args = 1;
c_7314200.num_elements = 7;
c_7314200.elements = (object *)e_7315681;
c_7314200.elements[0] = ((closureN)self_736125)->elements[0];
c_7314200.elements[1] = ((closureN)self_736125)->elements[1];
c_7314200.elements[2] = ((closureN)self_736125)->elements[2];
c_7314200.elements[3] = ((closureN)self_736125)->elements[3];
c_7314200.elements[4] = ((closureN)self_736125)->elements[4];
c_7314200.elements[5] = ((closureN)self_736125)->elements[5];
c_7314200.elements[6] = ((closureN)self_736125)->elements[6];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314200, r_733964, __glo__85globals_85_scheme_cyclone_cgen);; 
}

static void __lambda_997(void *data, object self_736126, int argc, object *args) /* object self_736126, object r_733644 */
 {

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


closureN_type c_7315646;
object e_7315680 [1];
c_7315646.hdr.mark = gc_color_red;
 c_7315646.hdr.grayed = 0;
c_7315646.tag = closureN_tag;
 c_7315646.fn = (function_type)__lambda_1217;
c_7315646.num_args = 1;
c_7315646.num_elements = 1;
c_7315646.elements = (object *)e_7315680;
c_7315646.elements[0] = ((closureN)self_736126)->elements[1];

return_direct_with_clo1(data,(closure)&c_7314202,__lambda_998,  &c_7315646);; 
}

static void __lambda_1217(void *data, object self_736127, int argc, object *args) /* object self_736127, object k_733956, object global_731256_731880 */
 {
 object k_733956 = args[0]; object global_731256_731880 = args[1];
  
closureN_type c_7315648;
object e_7315678 [3];
c_7315648.hdr.mark = gc_color_red;
 c_7315648.hdr.grayed = 0;
c_7315648.tag = closureN_tag;
 c_7315648.fn = (function_type)__lambda_1218;
c_7315648.num_args = 1;
c_7315648.num_elements = 3;
c_7315648.elements = (object *)e_7315678;
c_7315648.elements[0] = global_731256_731880;
c_7315648.elements[1] = ((closureN)self_736127)->elements[0];
c_7315648.elements[2] = k_733956;


make_utf8_string_with_len(c_7315679, "object ", 7, 7);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315648, &c_7315679);; 
}

static void __lambda_1218(void *data, object self_736128, int argc, object *args) /* object self_736128, object r_733957_735122 */
 {

  
closureN_type c_7315650;
object e_7315676 [3];
c_7315650.hdr.mark = gc_color_red;
 c_7315650.hdr.grayed = 0;
c_7315650.tag = closureN_tag;
 c_7315650.fn = (function_type)__lambda_1219;
c_7315650.num_args = 1;
c_7315650.num_elements = 3;
c_7315650.elements = (object *)e_7315676;
c_7315650.elements[0] = ((closureN)self_736128)->elements[0];
c_7315650.elements[1] = ((closureN)self_736128)->elements[1];
c_7315650.elements[2] = ((closureN)self_736128)->elements[2];

return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7315650, ((closureN)self_736128)->elements[0]);; 
}

static void __lambda_1219(void *data, object self_736129, int argc, object *args) /* object self_736129, object r_733963_735123 */
 {
 object r_733963_735123 = args[0];
  
closureN_type c_7315652;
object e_7315675 [3];
c_7315652.hdr.mark = gc_color_red;
 c_7315652.hdr.grayed = 0;
c_7315652.tag = closureN_tag;
 c_7315652.fn = (function_type)__lambda_1220;
c_7315652.num_args = 1;
c_7315652.num_elements = 3;
c_7315652.elements = (object *)e_7315675;
c_7315652.elements[0] = ((closureN)self_736129)->elements[0];
c_7315652.elements[1] = ((closureN)self_736129)->elements[1];
c_7315652.elements[2] = ((closureN)self_736129)->elements[2];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315652, r_733963_735123);; 
}

static void __lambda_1220(void *data, object self_736130, int argc, object *args) /* object self_736130, object r_733958_735124_735129 */
 {

  
closureN_type c_7315654;
object e_7315673 [3];
c_7315654.hdr.mark = gc_color_red;
 c_7315654.hdr.grayed = 0;
c_7315654.tag = closureN_tag;
 c_7315654.fn = (function_type)__lambda_1221;
c_7315654.num_args = 1;
c_7315654.num_elements = 3;
c_7315654.elements = (object *)e_7315673;
c_7315654.elements[0] = ((closureN)self_736130)->elements[0];
c_7315654.elements[1] = ((closureN)self_736130)->elements[1];
c_7315654.elements[2] = ((closureN)self_736130)->elements[2];


make_utf8_string_with_len(c_7315674, " = NULL;\n", 9, 9);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315654, &c_7315674);; 
}

static void __lambda_1221(void *data, object self_736131, int argc, object *args) /* object self_736131, object r_733959_735125_735130_735134 */
 {

  
closureN_type c_7315656;
object e_7315670 [1];
c_7315656.hdr.mark = gc_color_red;
 c_7315656.hdr.grayed = 0;
c_7315656.tag = closureN_tag;
 c_7315656.fn = (function_type)__lambda_1222;
c_7315656.num_args = 1;
c_7315656.num_elements = 1;
c_7315656.elements = (object *)e_7315670;
c_7315656.elements[0] = ((closureN)self_736131)->elements[2];

return_direct_with_clo4(data,  __glo_mangle_91exported_91ident_scheme_cyclone_cgen, (((closure)  __glo_mangle_91exported_91ident_scheme_cyclone_cgen)->fn),  &c_7315656, ((closureN)self_736131)->elements[1], ((closureN)self_736131)->elements[0], boolean_f);; 
}

static void __lambda_1222(void *data, object self_736132, int argc, object *args) /* object self_736132, object extern_731257_731881_735126_735131_735135 */
 {
 object extern_731257_731881_735126_735131_735135 = args[0];
  if( (boolean_f != extern_731257_731881_735126_735131_735135) ){ 
  
closureN_type c_7315658;
object e_7315666 [2];
c_7315658.hdr.mark = gc_color_red;
 c_7315658.hdr.grayed = 0;
c_7315658.tag = closureN_tag;
 c_7315658.fn = (function_type)__lambda_1223;
c_7315658.num_args = 1;
c_7315658.num_elements = 2;
c_7315658.elements = (object *)e_7315666;
c_7315658.elements[0] = extern_731257_731881_735126_735131_735135;
c_7315658.elements[1] = ((closureN)self_736132)->elements[0];


make_utf8_string_with_len(c_7315667, "extern object ", 14, 14);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315658, &c_7315667);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736132)->elements[0], (((closure)  ((closureN)self_736132)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1223(void *data, object self_736133, int argc, object *args) /* object self_736133, object r_733961_735127_735132_735136_735138 */
 {

  
closureN_type c_7315660;
object e_7315664 [1];
c_7315660.hdr.mark = gc_color_red;
 c_7315660.hdr.grayed = 0;
c_7315660.tag = closureN_tag;
 c_7315660.fn = (function_type)__lambda_1224;
c_7315660.num_args = 1;
c_7315660.num_elements = 1;
c_7315660.elements = (object *)e_7315664;
c_7315660.elements[0] = ((closureN)self_736133)->elements[1];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315660, ((closureN)self_736133)->elements[0]);; 
}

static void __lambda_1224(void *data, object self_736134, int argc, object *args) /* object self_736134, object r_733962_735128_735133_735137_735139_735140 */
 {

  
make_utf8_string_with_len(c_7315663, ";\n", 2, 2);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_736134)->elements[0], &c_7315663);; 
}

static void __lambda_998(void *data, object self_736135, int argc, object *args) /* object self_736135, object r_733955 */
 {
 object r_733955 = args[0];
  
closureN_type c_7314204;
object e_7315643 [7];
c_7314204.hdr.mark = gc_color_red;
 c_7314204.hdr.grayed = 0;
c_7314204.tag = closureN_tag;
 c_7314204.fn = (function_type)__lambda_999;
c_7314204.num_args = 1;
c_7314204.num_elements = 7;
c_7314204.elements = (object *)e_7315643;
c_7314204.elements[0] = ((closureN)self_736135)->elements[0];
c_7314204.elements[1] = ((closureN)self_736135)->elements[1];
c_7314204.elements[2] = ((closureN)self_736135)->elements[2];
c_7314204.elements[3] = ((closureN)self_736135)->elements[3];
c_7314204.elements[4] = ((closureN)self_736135)->elements[4];
c_7314204.elements[5] = ((closureN)self_736135)->elements[5];
c_7314204.elements[6] = ((closureN)self_736135)->elements[6];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314204, r_733955, ((closureN)self_736135)->elements[4]);; 
}

static void __lambda_999(void *data, object self_736136, int argc, object *args) /* object self_736136, object r_733645 */
 {

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


mclosure0(c_7315628, (function_type)__lambda_1213);c_7315628.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314206,__lambda_1000,  &c_7315628);; 
}

static void __lambda_1213(void *data, object self_736137, int argc, object *args) /* object self_736137, object k_733951, object global_731261_731882 */
 {
 object k_733951 = args[0]; object global_731261_731882 = args[1];
  
closureN_type c_7315630;
object e_7315641 [2];
c_7315630.hdr.mark = gc_color_red;
 c_7315630.hdr.grayed = 0;
c_7315630.tag = closureN_tag;
 c_7315630.fn = (function_type)__lambda_1214;
c_7315630.num_args = 1;
c_7315630.num_elements = 2;
c_7315630.elements = (object *)e_7315641;
c_7315630.elements[0] = global_731261_731882;
c_7315630.elements[1] = k_733951;


make_utf8_string_with_len(c_7315642, "extern object ", 14, 14);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315630, &c_7315642);; 
}

static void __lambda_1214(void *data, object self_736138, int argc, object *args) /* object self_736138, object r_733952_735118 */
 {

  
closureN_type c_7315632;
object e_7315639 [1];
c_7315632.hdr.mark = gc_color_red;
 c_7315632.hdr.grayed = 0;
c_7315632.tag = closureN_tag;
 c_7315632.fn = (function_type)__lambda_1215;
c_7315632.num_args = 1;
c_7315632.num_elements = 1;
c_7315632.elements = (object *)e_7315639;
c_7315632.elements[0] = ((closureN)self_736138)->elements[1];

return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7315632, ((closureN)self_736138)->elements[0]);; 
}

static void __lambda_1215(void *data, object self_736139, int argc, object *args) /* object self_736139, object r_733954_735119 */
 {
 object r_733954_735119 = args[0];
  
closureN_type c_7315634;
object e_7315638 [1];
c_7315634.hdr.mark = gc_color_red;
 c_7315634.hdr.grayed = 0;
c_7315634.tag = closureN_tag;
 c_7315634.fn = (function_type)__lambda_1216;
c_7315634.num_args = 1;
c_7315634.num_elements = 1;
c_7315634.elements = (object *)e_7315638;
c_7315634.elements[0] = ((closureN)self_736139)->elements[0];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315634, r_733954_735119);; 
}

static void __lambda_1216(void *data, object self_736140, int argc, object *args) /* object self_736140, object r_733953_735120_735121 */
 {

  
make_utf8_string_with_len(c_7315637, ";\n", 2, 2);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_736140)->elements[0], &c_7315637);; 
}

static void __lambda_1000(void *data, object self_736141, int argc, object *args) /* object self_736141, object r_733949 */
 {
 object r_733949 = args[0];
  
closureN_type c_7314208;
object e_7315625 [8];
c_7314208.hdr.mark = gc_color_red;
 c_7314208.hdr.grayed = 0;
c_7314208.tag = closureN_tag;
 c_7314208.fn = (function_type)__lambda_1001;
c_7314208.num_args = 1;
c_7314208.num_elements = 8;
c_7314208.elements = (object *)e_7315625;
c_7314208.elements[0] = ((closureN)self_736141)->elements[0];
c_7314208.elements[1] = ((closureN)self_736141)->elements[1];
c_7314208.elements[2] = ((closureN)self_736141)->elements[2];
c_7314208.elements[3] = ((closureN)self_736141)->elements[3];
c_7314208.elements[4] = ((closureN)self_736141)->elements[4];
c_7314208.elements[5] = ((closureN)self_736141)->elements[5];
c_7314208.elements[6] = r_733949;
c_7314208.elements[7] = ((closureN)self_736141)->elements[6];

return_direct_with_clo2(data,  __glo_lib_117idb_117ids_scheme_cyclone_libraries, (((closure)  __glo_lib_117idb_117ids_scheme_cyclone_libraries)->fn),  &c_7314208, ((closureN)self_736141)->elements[1]);; 
}

static void __lambda_1001(void *data, object self_736142, int argc, object *args) /* object self_736142, object r_733950 */
 {
 object r_733950 = args[0];
  
closureN_type c_7314210;
object e_7315623 [7];
c_7314210.hdr.mark = gc_color_red;
 c_7314210.hdr.grayed = 0;
c_7314210.tag = closureN_tag;
 c_7314210.fn = (function_type)__lambda_1002;
c_7314210.num_args = 1;
c_7314210.num_elements = 7;
c_7314210.elements = (object *)e_7315623;
c_7314210.elements[0] = ((closureN)self_736142)->elements[0];
c_7314210.elements[1] = ((closureN)self_736142)->elements[1];
c_7314210.elements[2] = ((closureN)self_736142)->elements[2];
c_7314210.elements[3] = ((closureN)self_736142)->elements[3];
c_7314210.elements[4] = ((closureN)self_736142)->elements[4];
c_7314210.elements[5] = ((closureN)self_736142)->elements[5];
c_7314210.elements[6] = ((closureN)self_736142)->elements[7];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314210, ((closureN)self_736142)->elements[6], r_733950);; 
}

static void __lambda_1002(void *data, object self_736143, int argc, object *args) /* object self_736143, object r_733646 */
 {

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


make_utf8_string_with_len(c_7315622, "#include \"cyclone/runtime.h\"", 28, 28);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314212, &c_7315622);; 
}

static void __lambda_1003(void *data, object self_736144, int argc, object *args) /* object self_736144, object r_733647 */
 {

  
closureN_type c_7314214;
object e_7314219 [1];
c_7314214.hdr.mark = gc_color_red;
 c_7314214.hdr.grayed = 0;
c_7314214.tag = closureN_tag;
 c_7314214.fn = (function_type)__lambda_1004;
c_7314214.num_args = 0;
c_7314214.num_elements = 1;
c_7314214.elements = (object *)e_7314219;
c_7314214.elements[0] = ((closureN)self_736144)->elements[5];


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

return_direct_with_clo1(data,(closure)&c_7314214,__lambda_1004,  &c_7314220);; 
}

static void __lambda_1005(void *data, object self_736145, int argc, object *args) /* object self_736145, object r_733648 */
 {

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


mclosure0(c_7315612, (function_type)__lambda_1211);c_7315612.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314222,__lambda_1006,  &c_7315612);; 
}

static void __lambda_1211(void *data, object self_736146, int argc, object *args) /* object self_736146, object k_733946, object sym_731262_731883 */
 {
 object k_733946 = args[0]; object sym_731262_731883 = args[1];
  
closureN_type c_7315614;
object e_7315619 [1];
c_7315614.hdr.mark = gc_color_red;
 c_7315614.hdr.grayed = 0;
c_7315614.tag = closureN_tag;
 c_7315614.fn = (function_type)__lambda_1212;
c_7315614.num_args = 1;
c_7315614.num_elements = 1;
c_7315614.elements = (object *)e_7315619;
c_7315614.elements[0] = k_733946;

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7315614, sym_731262_731883);; 
}

static void __lambda_1212(void *data, object self_736147, int argc, object *args) /* object self_736147, object r_733947 */
 {
 object r_733947 = args[0];
  
make_utf8_string_with_len(c_7315617, "defsymbol(", 10, 10);

make_utf8_string_with_len(c_7315618, ");", 2, 2);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736147)->elements[0], &c_7315617, r_733947, &c_7315618);; 
}

static void __lambda_1006(void *data, object self_736148, int argc, object *args) /* object self_736148, object r_733945 */
 {
 object r_733945 = args[0];
  
closureN_type c_7314224;
object e_7315610 [7];
c_7314224.hdr.mark = gc_color_red;
 c_7314224.hdr.grayed = 0;
c_7314224.tag = closureN_tag;
 c_7314224.fn = (function_type)__lambda_1007;
c_7314224.num_args = 1;
c_7314224.num_elements = 7;
c_7314224.elements = (object *)e_7315610;
c_7314224.elements[0] = ((closureN)self_736148)->elements[0];
c_7314224.elements[1] = ((closureN)self_736148)->elements[1];
c_7314224.elements[2] = ((closureN)self_736148)->elements[2];
c_7314224.elements[3] = ((closureN)self_736148)->elements[3];
c_7314224.elements[4] = ((closureN)self_736148)->elements[4];
c_7314224.elements[5] = ((closureN)self_736148)->elements[5];
c_7314224.elements[6] = ((closureN)self_736148)->elements[6];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314224, r_733945, __glo__85symbols_85_scheme_cyclone_cgen);; 
}

static void __lambda_1007(void *data, object self_736149, int argc, object *args) /* object self_736149, object r_733649 */
 {

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


mclosure0(c_7315527, (function_type)__lambda_1205);c_7315527.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314226,__lambda_1008,  &c_7315527);; 
}

static void __lambda_1205(void *data, object self_736150, int argc, object *args) /* object self_736150, object k_733924, object l_731263_731884 */
 {
 object k_733924 = args[0]; object l_731263_731884 = args[1];
    
  
if( (boolean_f != equalp(quote_precompiled_91lambda, Cyc_caadr(data, l_731263_731884))) ){ 
  
closureN_type c_7315533;
object e_7315543 [2];
c_7315533.hdr.mark = gc_color_red;
 c_7315533.hdr.grayed = 0;
c_7315533.tag = closureN_tag;
 c_7315533.fn = (function_type)__lambda_1206;
c_7315533.num_args = 1;
c_7315533.num_elements = 2;
c_7315533.elements = (object *)e_7315543;
c_7315533.elements[0] = k_733924;
c_7315533.elements[1] = l_731263_731884;




object c_7315546 = Cyc_number2string2(data,(closure)&c_7315533,1,Cyc_car(data, l_731263_731884));
return_closcall1(data,(closure)&c_7315533,  c_7315546);
} else { 
    
  
if( (boolean_f != equalp(quote_precompiled_91inline_91lambda, Cyc_caadr(data, l_731263_731884))) ){ 
  
closureN_type c_7315554;
object e_7315562 [2];
c_7315554.hdr.mark = gc_color_red;
 c_7315554.hdr.grayed = 0;
c_7315554.tag = closureN_tag;
 c_7315554.fn = (function_type)__lambda_1207;
c_7315554.num_args = 1;
c_7315554.num_elements = 2;
c_7315554.elements = (object *)e_7315562;
c_7315554.elements[0] = k_733924;
c_7315554.elements[1] = l_731263_731884;




object c_7315565 = Cyc_number2string2(data,(closure)&c_7315554,1,Cyc_car(data, l_731263_731884));
return_closcall1(data,(closure)&c_7315554,  c_7315565);
} else { 
  
closureN_type c_7315569;
object e_7315605 [2];
c_7315569.hdr.mark = gc_color_red;
 c_7315569.hdr.grayed = 0;
c_7315569.tag = closureN_tag;
 c_7315569.fn = (function_type)__lambda_1208;
c_7315569.num_args = 1;
c_7315569.num_elements = 2;
c_7315569.elements = (object *)e_7315605;
c_7315569.elements[0] = k_733924;
c_7315569.elements[1] = l_731263_731884;





return_direct_with_clo1(data,(closure)&c_7315569,__lambda_1208,  memberp(data, Cyc_car(data, l_731263_731884), __glo_inline_91lambdas_scheme_cyclone_cgen));}
;}
;; 
}

static void __lambda_1208(void *data, object self_736153, int argc, object *args) /* object self_736153, object r_733933 */
 {
 object r_733933 = args[0];
  if( (boolean_f != r_733933) ){ 
  
closureN_type c_7315571;
object e_7315580 [2];
c_7315571.hdr.mark = gc_color_red;
 c_7315571.hdr.grayed = 0;
c_7315571.tag = closureN_tag;
 c_7315571.fn = (function_type)__lambda_1209;
c_7315571.num_args = 1;
c_7315571.num_elements = 2;
c_7315571.elements = (object *)e_7315580;
c_7315571.elements[0] = ((closureN)self_736153)->elements[0];
c_7315571.elements[1] = ((closureN)self_736153)->elements[1];




object c_7315583 = Cyc_number2string2(data,(closure)&c_7315571,1,Cyc_car(data, ((closureN)self_736153)->elements[1]));
return_closcall1(data,(closure)&c_7315571,  c_7315583);
} else { 
  
closureN_type c_7315588;
object e_7315598 [2];
c_7315588.hdr.mark = gc_color_red;
 c_7315588.hdr.grayed = 0;
c_7315588.tag = closureN_tag;
 c_7315588.fn = (function_type)__lambda_1210;
c_7315588.num_args = 1;
c_7315588.num_elements = 2;
c_7315588.elements = (object *)e_7315598;
c_7315588.elements[0] = ((closureN)self_736153)->elements[0];
c_7315588.elements[1] = ((closureN)self_736153)->elements[1];




object c_7315601 = Cyc_number2string2(data,(closure)&c_7315588,1,Cyc_car(data, ((closureN)self_736153)->elements[1]));
return_closcall1(data,(closure)&c_7315588,  c_7315601);}
;; 
}

static void __lambda_1210(void *data, object self_736155, int argc, object *args) /* object self_736155, object r_733937 */
 {
 object r_733937 = args[0];
  
make_utf8_string_with_len(c_7315591, "static void __lambda_", 21, 21);

make_utf8_string_with_len(c_7315592, "(void *data, object clo, int argc, object *args) ;", 50, 50);

make_utf8_string_with_len(c_7315593, "/*", 2, 2);



make_utf8_string_with_len(c_7315597, "*/", 2, 2);
return_direct_with_clo7(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736155)->elements[0], &c_7315591, r_733937, &c_7315592, &c_7315593, Cyc_cdadr(data, ((closureN)self_736155)->elements[1]), &c_7315597);; 
}

static void __lambda_1209(void *data, object self_736154, int argc, object *args) /* object self_736154, object r_733934 */
 {
 object r_733934 = args[0];
  
make_utf8_string_with_len(c_7315574, "static object __lambda_", 23, 23);

make_utf8_string_with_len(c_7315575, "(void *data, ", 13, 13);



make_utf8_string_with_len(c_7315579, ") ;", 3, 3);
return_direct_with_clo6(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736154)->elements[0], &c_7315574, r_733934, &c_7315575, Cyc_cdadr(data, ((closureN)self_736154)->elements[1]), &c_7315579);; 
}

static void __lambda_1207(void *data, object self_736152, int argc, object *args) /* object self_736152, object r_733930 */
 {
 object r_733930 = args[0];
  
make_utf8_string_with_len(c_7315557, "static object __lambda_", 23, 23);



make_utf8_string_with_len(c_7315561, " ;", 2, 2);
return_direct_with_clo5(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736152)->elements[0], &c_7315557, r_733930, Cyc_cadadr(data, ((closureN)self_736152)->elements[1]), &c_7315561);; 
}

static void __lambda_1206(void *data, object self_736151, int argc, object *args) /* object self_736151, object r_733926 */
 {
 object r_733926 = args[0];
  
make_utf8_string_with_len(c_7315536, "static void __lambda_", 21, 21);

make_utf8_string_with_len(c_7315537, "(void *data, object clo, int argc, object *args) ;", 50, 50);

make_utf8_string_with_len(c_7315538, "/*", 2, 2);



make_utf8_string_with_len(c_7315542, "*/", 2, 2);
return_direct_with_clo7(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736151)->elements[0], &c_7315536, r_733926, &c_7315537, &c_7315538, Cyc_cadadr(data, ((closureN)self_736151)->elements[1]), &c_7315542);; 
}

static void __lambda_1008(void *data, object self_736156, int argc, object *args) /* object self_736156, object r_733923 */
 {
 object r_733923 = args[0];
  
closureN_type c_7314228;
object e_7315525 [7];
c_7314228.hdr.mark = gc_color_red;
 c_7314228.hdr.grayed = 0;
c_7314228.tag = closureN_tag;
 c_7314228.fn = (function_type)__lambda_1009;
c_7314228.num_args = 1;
c_7314228.num_elements = 7;
c_7314228.elements = (object *)e_7315525;
c_7314228.elements[0] = ((closureN)self_736156)->elements[0];
c_7314228.elements[1] = ((closureN)self_736156)->elements[1];
c_7314228.elements[2] = ((closureN)self_736156)->elements[2];
c_7314228.elements[3] = ((closureN)self_736156)->elements[3];
c_7314228.elements[4] = ((closureN)self_736156)->elements[4];
c_7314228.elements[5] = ((closureN)self_736156)->elements[5];
c_7314228.elements[6] = ((closureN)self_736156)->elements[6];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314228, r_733923, __glo_lambdas_scheme_cyclone_cgen);; 
}

static void __lambda_1009(void *data, object self_736157, int argc, object *args) /* object self_736157, object r_733650 */
 {

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


make_utf8_string_with_len(c_7315524, "", 0, 0);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314230, &c_7315524);; 
}

static void __lambda_1010(void *data, object self_736158, int argc, object *args) /* object self_736158, object r_733651 */
 {

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


mclosure0(c_7315383, (function_type)__lambda_1184);c_7315383.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314232,__lambda_1011,  &c_7315383);; 
}

static void __lambda_1184(void *data, object self_736159, int argc, object *args) /* object self_736159, object k_733893, object l_731274_731885 */
 {
 object k_733893 = args[0]; object l_731274_731885 = args[1];
  
closureN_type c_7315385;
object e_7315520 [2];
c_7315385.hdr.mark = gc_color_red;
 c_7315385.hdr.grayed = 0;
c_7315385.tag = closureN_tag;
 c_7315385.fn = (function_type)__lambda_1185;
c_7315385.num_args = 1;
c_7315385.num_elements = 2;
c_7315385.elements = (object *)e_7315520;
c_7315385.elements[0] = k_733893;
c_7315385.elements[1] = l_731274_731885;



return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_7315385, Cyc_caddr(data, l_731274_731885));; 
}

static void __lambda_1185(void *data, object self_736160, int argc, object *args) /* object self_736160, object r_733895 */
 {
 object r_733895 = args[0];
  if( (boolean_f != r_733895) ){ 
  
closureN_type c_7315387;
object e_7315514 [2];
c_7315387.hdr.mark = gc_color_red;
 c_7315387.hdr.grayed = 0;
c_7315387.tag = closureN_tag;
 c_7315387.fn = (function_type)__lambda_1186;
c_7315387.num_args = 1;
c_7315387.num_elements = 2;
c_7315387.elements = (object *)e_7315514;
c_7315387.elements[0] = ((closureN)self_736160)->elements[0];
c_7315387.elements[1] = ((closureN)self_736160)->elements[1];



return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7315387, Cyc_caddr(data, ((closureN)self_736160)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736160)->elements[0], (((closure)  ((closureN)self_736160)->elements[0])->fn),  Cyc_VOID);}
;; 
}

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


closureN_type c_7315394;
object e_7315513 [1];
c_7315394.hdr.mark = gc_color_red;
 c_7315394.hdr.grayed = 0;
c_7315394.tag = closureN_tag;
 c_7315394.fn = (function_type)__lambda_1188;
c_7315394.num_args = 1;
c_7315394.num_elements = 1;
c_7315394.elements = (object *)e_7315513;
c_7315394.elements[0] = ((closureN)self_736161)->elements[1];

return_direct_with_clo1(data,(closure)&c_7315389,__lambda_1187,  &c_7315394);; 
}

static void __lambda_1188(void *data, object self_736162, int argc, object *args) /* object self_736162, object k_733898, object fnc_731276_731887 */
 {
 object k_733898 = args[0]; object fnc_731276_731887 = args[1];
  
closureN_type c_7315396;
object e_7315412 [1];
c_7315396.hdr.mark = gc_color_red;
 c_7315396.hdr.grayed = 0;
c_7315396.tag = closureN_tag;
 c_7315396.fn = (function_type)__lambda_1189;
c_7315396.num_args = 0;
c_7315396.num_elements = 1;
c_7315396.elements = (object *)e_7315412;
c_7315396.elements[0] = fnc_731276_731887;


closureN_type c_7315413;
object e_7315512 [3];
c_7315413.hdr.mark = gc_color_red;
 c_7315413.hdr.grayed = 0;
c_7315413.tag = closureN_tag;
 c_7315413.fn = (function_type)__lambda_1192;
c_7315413.num_args = 1;
c_7315413.num_elements = 3;
c_7315413.elements = (object *)e_7315512;
c_7315413.elements[0] = fnc_731276_731887;
c_7315413.elements[1] = k_733898;
c_7315413.elements[2] = ((closureN)self_736162)->elements[0];

return_direct_with_clo1(data,(closure)&c_7315396,__lambda_1189,  &c_7315413);; 
}

static void __lambda_1192(void *data, object self_736163, int argc, object *args) /* object self_736163, object r_733899 */
 {
 object r_733899 = args[0];
  if( (boolean_f != r_733899) ){ 
  
closureN_type c_7315415;
object e_7315504 [3];
c_7315415.hdr.mark = gc_color_red;
 c_7315415.hdr.grayed = 0;
c_7315415.tag = closureN_tag;
 c_7315415.fn = (function_type)__lambda_1193;
c_7315415.num_args = 1;
c_7315415.num_elements = 3;
c_7315415.elements = (object *)e_7315504;
c_7315415.elements[0] = ((closureN)self_736163)->elements[0];
c_7315415.elements[1] = ((closureN)self_736163)->elements[1];
c_7315415.elements[2] = ((closureN)self_736163)->elements[2];




make_utf8_string_with_len(c_7315508, "object", 6, 6);

make_utf8_string_with_len(c_7315509, "", 0, 0);
return_direct_with_clo4(data,  __glo_string_91replace_91all_scheme_cyclone_util, (((closure)  __glo_string_91replace_91all_scheme_cyclone_util)->fn),  &c_7315415, Cyc_cdadr(data, ((closureN)self_736163)->elements[2]), &c_7315508, &c_7315509);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736163)->elements[1], (((closure)  ((closureN)self_736163)->elements[1])->fn),  Cyc_VOID);}
;; 
}

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

return_direct_with_clo3(data,  __glo_string_91split_scheme_cyclone_util, (((closure)  __glo_string_91split_scheme_cyclone_util)->fn),  &c_7315417, r_733919, obj_char2obj(44));; 
}

static void __lambda_1194(void *data, object self_736165, int argc, object *args) /* object self_736165, object r_733918 */
 {
 object r_733918 = args[0];
  
closureN_type c_7315419;
object e_7315500 [3];
c_7315419.hdr.mark = gc_color_red;
 c_7315419.hdr.grayed = 0;
c_7315419.tag = closureN_tag;
 c_7315419.fn = (function_type)__lambda_1195;
c_7315419.num_args = 1;
c_7315419.num_elements = 3;
c_7315419.elements = (object *)e_7315500;
c_7315419.elements[0] = ((closureN)self_736165)->elements[0];
c_7315419.elements[1] = ((closureN)self_736165)->elements[1];
c_7315419.elements[2] = ((closureN)self_736165)->elements[2];



return_direct_with_clo3(data,  __glo_string_91join_scheme_cyclone_util, (((closure)  __glo_string_91join_scheme_cyclone_util)->fn),  &c_7315419, Cyc_cdr(data, r_733918), obj_char2obj(44));; 
}

static void __lambda_1195(void *data, object self_736166, int argc, object *args) /* object self_736166, object args_91str_731284_731889 */
 {
 object args_91str_731284_731889 = args[0];
  
closureN_type c_7315421;
object e_7315494 [4];
c_7315421.hdr.mark = gc_color_red;
 c_7315421.hdr.grayed = 0;
c_7315421.tag = closureN_tag;
 c_7315421.fn = (function_type)__lambda_1196;
c_7315421.num_args = 1;
c_7315421.num_elements = 4;
c_7315421.elements = (object *)e_7315494;
c_7315421.elements[0] = args_91str_731284_731889;
c_7315421.elements[1] = ((closureN)self_736166)->elements[0];
c_7315421.elements[2] = ((closureN)self_736166)->elements[1];
c_7315421.elements[3] = ((closureN)self_736166)->elements[2];




make_utf8_string_with_len(c_7315498, "object", 6, 6);

make_utf8_string_with_len(c_7315499, "", 0, 0);
return_direct_with_clo4(data,  __glo_string_91replace_91all_scheme_cyclone_util, (((closure)  __glo_string_91replace_91all_scheme_cyclone_util)->fn),  &c_7315421, Cyc_cdadr(data, ((closureN)self_736166)->elements[2]), &c_7315498, &c_7315499);; 
}

static void __lambda_1196(void *data, object self_736167, int argc, object *args) /* object self_736167, object r_733916 */
 {
 object r_733916 = args[0];
  
closureN_type c_7315423;
object e_7315493 [4];
c_7315423.hdr.mark = gc_color_red;
 c_7315423.hdr.grayed = 0;
c_7315423.tag = closureN_tag;
 c_7315423.fn = (function_type)__lambda_1197;
c_7315423.num_args = 1;
c_7315423.num_elements = 4;
c_7315423.elements = (object *)e_7315493;
c_7315423.elements[0] = ((closureN)self_736167)->elements[0];
c_7315423.elements[1] = ((closureN)self_736167)->elements[1];
c_7315423.elements[2] = ((closureN)self_736167)->elements[2];
c_7315423.elements[3] = ((closureN)self_736167)->elements[3];

return_direct_with_clo3(data,  __glo_string_91split_scheme_cyclone_util, (((closure)  __glo_string_91split_scheme_cyclone_util)->fn),  &c_7315423, r_733916, obj_char2obj(44));; 
}

static void __lambda_1197(void *data, object self_736168, int argc, object *args) /* object self_736168, object r_733915 */
 {
 object r_733915 = args[0];
  
closureN_type c_7315425;
object e_7315490 [4];
c_7315425.hdr.mark = gc_color_red;
 c_7315425.hdr.grayed = 0;
c_7315425.tag = closureN_tag;
 c_7315425.fn = (function_type)__lambda_1198;
c_7315425.num_args = 1;
c_7315425.num_elements = 4;
c_7315425.elements = (object *)e_7315490;
c_7315425.elements[0] = ((closureN)self_736168)->elements[0];
c_7315425.elements[1] = ((closureN)self_736168)->elements[1];
c_7315425.elements[2] = ((closureN)self_736168)->elements[2];
c_7315425.elements[3] = ((closureN)self_736168)->elements[3];



return_direct_with_clo3(data,  __glo_string_91join_scheme_cyclone_util, (((closure)  __glo_string_91join_scheme_cyclone_util)->fn),  &c_7315425, Cyc_cdr(data, r_733915), obj_char2obj(59));; 
}

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




object c_7315486 = Cyc_number2string2(data,(closure)&c_7315427,1,Cyc_car(data, ((closureN)self_736169)->elements[3]));
return_closcall1(data,(closure)&c_7315427,  c_7315486);; 
}

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

return_direct_with_clo2(data,  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations)->fn),  &c_7315429, ((closureN)self_736170)->elements[1]);; 
}

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



return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7315431, Cyc_car(data, r_733912));; 
}

static void __lambda_1201(void *data, object self_736172, int argc, object *args) /* object self_736172, object r_733904 */
 {
 object r_733904 = args[0];
  
closureN_type c_7315433;
object e_7315471 [6];
c_7315433.hdr.mark = gc_color_red;
 c_7315433.hdr.grayed = 0;
c_7315433.tag = closureN_tag;
 c_7315433.fn = (function_type)__lambda_1202;
c_7315433.num_args = 1;
c_7315433.num_elements = 6;
c_7315433.elements = (object *)e_7315471;
c_7315433.elements[0] = ((closureN)self_736172)->elements[0];
c_7315433.elements[1] = ((closureN)self_736172)->elements[1];
c_7315433.elements[2] = ((closureN)self_736172)->elements[2];
c_7315433.elements[3] = ((closureN)self_736172)->elements[3];
c_7315433.elements[4] = r_733904;
c_7315433.elements[5] = ((closureN)self_736172)->elements[4];




object c_7315474 = Cyc_number2string2(data,(closure)&c_7315433,1,Cyc_car(data, ((closureN)self_736172)->elements[2]));
return_closcall1(data,(closure)&c_7315433,  c_7315474);; 
}

static void __lambda_1202(void *data, object self_736173, int argc, object *args) /* object self_736173, object r_733905 */
 {
 object r_733905 = args[0];
  
closureN_type c_7315435;
object e_7315448 [1];
c_7315435.hdr.mark = gc_color_red;
 c_7315435.hdr.grayed = 0;
c_7315435.tag = closureN_tag;
 c_7315435.fn = (function_type)__lambda_1203;
c_7315435.num_args = 0;
c_7315435.num_elements = 1;
c_7315435.elements = (object *)e_7315448;
c_7315435.elements[0] = ((closureN)self_736173)->elements[0];


closureN_type c_7315449;
object e_7315470 [6];
c_7315449.hdr.mark = gc_color_red;
 c_7315449.hdr.grayed = 0;
c_7315449.tag = closureN_tag;
 c_7315449.fn = (function_type)__lambda_1204;
c_7315449.num_args = 1;
c_7315449.num_elements = 6;
c_7315449.elements = (object *)e_7315470;
c_7315449.elements[0] = ((closureN)self_736173)->elements[1];
c_7315449.elements[1] = ((closureN)self_736173)->elements[2];
c_7315449.elements[2] = ((closureN)self_736173)->elements[3];
c_7315449.elements[3] = ((closureN)self_736173)->elements[4];
c_7315449.elements[4] = r_733905;
c_7315449.elements[5] = ((closureN)self_736173)->elements[5];

return_direct_with_clo1(data,(closure)&c_7315435,__lambda_1203,  &c_7315449);; 
}

static void __lambda_1204(void *data, object self_736174, int argc, object *args) /* object self_736174, object r_733906 */
 {
 object r_733906 = args[0];
  
make_utf8_string_with_len(c_7315452, "static void __lambda_gc_ret_", 28, 28);

make_utf8_string_with_len(c_7315454, "(void *data, int argc,", 22, 22);



make_utf8_string_with_len(c_7315458, ")", 1, 1);

make_utf8_string_with_len(c_7315459, "{", 1, 1);

make_utf8_string_with_len(c_7315461, "\nobject obj = ", 14, 14);

make_utf8_string_with_len(c_7315462, "((closure1)", 11, 11);

make_utf8_string_with_len(c_7315464, ")->element;\n", 12, 12);

make_utf8_string_with_len(c_7315465, "__lambda_", 9, 9);

make_utf8_string_with_len(c_7315467, "(data, argc, obj", 16, 16);

make_utf8_string_with_len(c_7315468, ");", 2, 2);

make_utf8_string_with_len(c_7315469, "}", 1, 1);
return_direct_with_clo18(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736174)->elements[0], &c_7315452, ((closureN)self_736174)->elements[2], &c_7315454, Cyc_cdadr(data, ((closureN)self_736174)->elements[1]), &c_7315458, &c_7315459, ((closureN)self_736174)->elements[5], &c_7315461, &c_7315462, ((closureN)self_736174)->elements[3], &c_7315464, &c_7315465, ((closureN)self_736174)->elements[4], &c_7315467, r_733906, &c_7315468, &c_7315469);; 
}

static void __lambda_1203(void *data, object self_736175, int argc, object *args) /* object self_736175, object k_733907 */
 {
 object k_733907 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, ((closureN)self_736175)->elements[0]), obj_int2obj(0))) ){ 
  
make_utf8_string_with_len(c_7315445, ",", 1, 1);

object c_7315444 = Cyc_string_append(data,  k_733907,2,&c_7315445, ((closureN)self_736175)->elements[0]);
return_direct_with_clo1(data,  k_733907, (((closure)  k_733907)->fn),  c_7315444);
} else { 
  return_direct_with_clo1(data,  k_733907, (((closure)  k_733907)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_1189(void *data, object self_736176, int argc, object *args) /* object self_736176, object k_733920 */
 {
 object k_733920 = args[0];
  if( (boolean_f != __glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen) ){ 
  
closureN_type c_7315398;
object e_7315409 [2];
c_7315398.hdr.mark = gc_color_red;
 c_7315398.hdr.grayed = 0;
c_7315398.tag = closureN_tag;
 c_7315398.fn = (function_type)__lambda_1190;
c_7315398.num_args = 1;
c_7315398.num_elements = 2;
c_7315398.elements = (object *)e_7315409;
c_7315398.elements[0] = ((closureN)self_736176)->elements[0];
c_7315398.elements[1] = k_733920;

return_direct_with_clo2(data,  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations)->fn),  &c_7315398, ((closureN)self_736176)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_733920, (((closure)  k_733920)->fn),  boolean_f);}
;; 
}

static void __lambda_1190(void *data, object self_736177, int argc, object *args) /* object self_736177, object r_733921 */
 {
 object r_733921 = args[0];
  if( (boolean_f != r_733921) ){ 
  
closureN_type c_7315400;
object e_7315405 [1];
c_7315400.hdr.mark = gc_color_red;
 c_7315400.hdr.grayed = 0;
c_7315400.tag = closureN_tag;
 c_7315400.fn = (function_type)__lambda_1191;
c_7315400.num_args = 1;
c_7315400.num_elements = 1;
c_7315400.elements = (object *)e_7315405;
c_7315400.elements[0] = ((closureN)self_736177)->elements[1];

return_direct_with_clo2(data,  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations)->fn),  &c_7315400, ((closureN)self_736177)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736177)->elements[1], (((closure)  ((closureN)self_736177)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_1191(void *data, object self_736178, int argc, object *args) /* object self_736178, object r_733922 */
 {
 object r_733922 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_736178)->elements[0], (((closure)  ((closureN)self_736178)->elements[0])->fn),  equalp(r_733922, obj_int2obj(1)));; 
}

static void __lambda_1187(void *data, object self_736179, int argc, object *args) /* object self_736179, object r_733897 */
 {
 object r_733897 = args[0];
  return_direct_with_clo3(data,  __glo_with_91fnc_scheme_cyclone_cps_91optimizations, (((closure)  __glo_with_91fnc_scheme_cyclone_cps_91optimizations)->fn),  ((closureN)self_736179)->elements[0], ((closureN)self_736179)->elements[1], r_733897);; 
}

static void __lambda_1011(void *data, object self_736180, int argc, object *args) /* object self_736180, object r_733892 */
 {
 object r_733892 = args[0];
  
closureN_type c_7314234;
object e_7315381 [7];
c_7314234.hdr.mark = gc_color_red;
 c_7314234.hdr.grayed = 0;
c_7314234.tag = closureN_tag;
 c_7314234.fn = (function_type)__lambda_1012;
c_7314234.num_args = 1;
c_7314234.num_elements = 7;
c_7314234.elements = (object *)e_7315381;
c_7314234.elements[0] = ((closureN)self_736180)->elements[0];
c_7314234.elements[1] = ((closureN)self_736180)->elements[1];
c_7314234.elements[2] = ((closureN)self_736180)->elements[2];
c_7314234.elements[3] = ((closureN)self_736180)->elements[3];
c_7314234.elements[4] = ((closureN)self_736180)->elements[4];
c_7314234.elements[5] = ((closureN)self_736180)->elements[5];
c_7314234.elements[6] = ((closureN)self_736180)->elements[6];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314234, r_733892, __glo_lambdas_scheme_cyclone_cgen);; 
}

static void __lambda_1012(void *data, object self_736181, int argc, object *args) /* object self_736181, object r_733652 */
 {

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


mclosure0(c_7315225, (function_type)__lambda_1169);c_7315225.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314236,__lambda_1013,  &c_7315225);; 
}

static void __lambda_1169(void *data, object self_736182, int argc, object *args) /* object self_736182, object k_733852, object l_731289_731891 */
 {
 object k_733852 = args[0]; object l_731289_731891 = args[1];
    
  
if( (boolean_f != equalp(quote_precompiled_91lambda, Cyc_caadr(data, l_731289_731891))) ){ 
  
closureN_type c_7315231;
object e_7315296 [2];
c_7315231.hdr.mark = gc_color_red;
 c_7315231.hdr.grayed = 0;
c_7315231.tag = closureN_tag;
 c_7315231.fn = (function_type)__lambda_1170;
c_7315231.num_args = 1;
c_7315231.num_elements = 2;
c_7315231.elements = (object *)e_7315296;
c_7315231.elements[0] = k_733852;
c_7315231.elements[1] = l_731289_731891;




make_utf8_string_with_len(c_7315299, " ", 1, 1);

make_utf8_string_with_len(c_7315300, "", 0, 0);
return_direct_with_clo4(data,  __glo_string_91replace_91all_scheme_cyclone_util, (((closure)  __glo_string_91replace_91all_scheme_cyclone_util)->fn),  &c_7315231, Cyc_cadadr(data, l_731289_731891), &c_7315299, &c_7315300);
} else { 
    
  
if( (boolean_f != equalp(quote_precompiled_91inline_91lambda, Cyc_caadr(data, l_731289_731891))) ){ 
  
closureN_type c_7315306;
object e_7315320 [2];
c_7315306.hdr.mark = gc_color_red;
 c_7315306.hdr.grayed = 0;
c_7315306.tag = closureN_tag;
 c_7315306.fn = (function_type)__lambda_1176;
c_7315306.num_args = 1;
c_7315306.num_elements = 2;
c_7315306.elements = (object *)e_7315320;
c_7315306.elements[0] = k_733852;
c_7315306.elements[1] = l_731289_731891;




object c_7315323 = Cyc_number2string2(data,(closure)&c_7315306,1,Cyc_car(data, l_731289_731891));
return_closcall1(data,(closure)&c_7315306,  c_7315323);
} else { 
  
closureN_type c_7315327;
object e_7315376 [2];
c_7315327.hdr.mark = gc_color_red;
 c_7315327.hdr.grayed = 0;
c_7315327.tag = closureN_tag;
 c_7315327.fn = (function_type)__lambda_1177;
c_7315327.num_args = 1;
c_7315327.num_elements = 2;
c_7315327.elements = (object *)e_7315376;
c_7315327.elements[0] = k_733852;
c_7315327.elements[1] = l_731289_731891;





return_direct_with_clo1(data,(closure)&c_7315327,__lambda_1177,  memberp(data, Cyc_car(data, l_731289_731891), __glo_inline_91lambdas_scheme_cyclone_cgen));}
;}
;; 
}

static void __lambda_1177(void *data, object self_736190, int argc, object *args) /* object self_736190, object r_733876 */
 {
 object r_733876 = args[0];
  if( (boolean_f != r_733876) ){ 
  
closureN_type c_7315329;
object e_7315345 [2];
c_7315329.hdr.mark = gc_color_red;
 c_7315329.hdr.grayed = 0;
c_7315329.tag = closureN_tag;
 c_7315329.fn = (function_type)__lambda_1178;
c_7315329.num_args = 1;
c_7315329.num_elements = 2;
c_7315329.elements = (object *)e_7315345;
c_7315329.elements[0] = ((closureN)self_736190)->elements[0];
c_7315329.elements[1] = ((closureN)self_736190)->elements[1];




object c_7315348 = Cyc_number2string2(data,(closure)&c_7315329,1,Cyc_car(data, ((closureN)self_736190)->elements[1]));
return_closcall1(data,(closure)&c_7315329,  c_7315348);
} else { 
  
closureN_type c_7315353;
object e_7315369 [2];
c_7315353.hdr.mark = gc_color_red;
 c_7315353.hdr.grayed = 0;
c_7315353.tag = closureN_tag;
 c_7315353.fn = (function_type)__lambda_1181;
c_7315353.num_args = 1;
c_7315353.num_elements = 2;
c_7315353.elements = (object *)e_7315369;
c_7315353.elements[0] = ((closureN)self_736190)->elements[0];
c_7315353.elements[1] = ((closureN)self_736190)->elements[1];




object c_7315372 = Cyc_number2string2(data,(closure)&c_7315353,1,Cyc_car(data, ((closureN)self_736190)->elements[1]));
return_closcall1(data,(closure)&c_7315353,  c_7315372);}
;; 
}

static void __lambda_1181(void *data, object self_736194, int argc, object *args) /* object self_736194, object r_733885 */
 {
 object r_733885 = args[0];
  
closureN_type c_7315355;
object e_7315364 [2];
c_7315355.hdr.mark = gc_color_red;
 c_7315355.hdr.grayed = 0;
c_7315355.tag = closureN_tag;
 c_7315355.fn = (function_type)__lambda_1182;
c_7315355.num_args = 1;
c_7315355.num_elements = 2;
c_7315355.elements = (object *)e_7315364;
c_7315355.elements[0] = ((closureN)self_736194)->elements[0];
c_7315355.elements[1] = ((closureN)self_736194)->elements[1];


make_utf8_string_with_len(c_7315368, "__lambda_", 9, 9);

object c_7315367 = Cyc_string_append(data,(closure)&c_7315355,2,&c_7315368, r_733885);
return_closcall1(data,(closure)&c_7315355,  c_7315367);; 
}

static void __lambda_1182(void *data, object self_736195, int argc, object *args) /* object self_736195, object r_733884 */
 {
 object r_733884 = args[0];
  


closureN_type c_7315360;
object e_7315363 [1];
c_7315360.hdr.mark = gc_color_red;
 c_7315360.hdr.grayed = 0;
c_7315360.tag = closureN_tag;
 c_7315360.fn = (function_type)__lambda_1183;
c_7315360.num_args = 1;
c_7315360.num_elements = 1;
c_7315360.elements = (object *)e_7315363;
c_7315360.elements[0] = ((closureN)self_736195)->elements[0];

return_closcall2(data,  Cyc_caadr(data, ((closureN)self_736195)->elements[1]),  &c_7315360, r_733884);; 
}

static void __lambda_1183(void *data, object self_736196, int argc, object *args) /* object self_736196, object r_733882 */
 {
 object r_733882 = args[0];
  return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  ((closureN)self_736196)->elements[0], r_733882);; 
}

static void __lambda_1178(void *data, object self_736191, int argc, object *args) /* object self_736191, object r_733880 */
 {
 object r_733880 = args[0];
  
closureN_type c_7315331;
object e_7315340 [2];
c_7315331.hdr.mark = gc_color_red;
 c_7315331.hdr.grayed = 0;
c_7315331.tag = closureN_tag;
 c_7315331.fn = (function_type)__lambda_1179;
c_7315331.num_args = 1;
c_7315331.num_elements = 2;
c_7315331.elements = (object *)e_7315340;
c_7315331.elements[0] = ((closureN)self_736191)->elements[0];
c_7315331.elements[1] = ((closureN)self_736191)->elements[1];


make_utf8_string_with_len(c_7315344, "__lambda_", 9, 9);

object c_7315343 = Cyc_string_append(data,(closure)&c_7315331,2,&c_7315344, r_733880);
return_closcall1(data,(closure)&c_7315331,  c_7315343);; 
}

static void __lambda_1179(void *data, object self_736192, int argc, object *args) /* object self_736192, object r_733879 */
 {
 object r_733879 = args[0];
  


closureN_type c_7315336;
object e_7315339 [1];
c_7315336.hdr.mark = gc_color_red;
 c_7315336.hdr.grayed = 0;
c_7315336.tag = closureN_tag;
 c_7315336.fn = (function_type)__lambda_1180;
c_7315336.num_args = 1;
c_7315336.num_elements = 1;
c_7315336.elements = (object *)e_7315339;
c_7315336.elements[0] = ((closureN)self_736192)->elements[0];

return_closcall2(data,  Cyc_caadr(data, ((closureN)self_736192)->elements[1]),  &c_7315336, r_733879);; 
}

static void __lambda_1180(void *data, object self_736193, int argc, object *args) /* object self_736193, object r_733877 */
 {
 object r_733877 = args[0];
  return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  ((closureN)self_736193)->elements[0], r_733877);; 
}

static void __lambda_1176(void *data, object self_736189, int argc, object *args) /* object self_736189, object r_733871 */
 {
 object r_733871 = args[0];
  
make_utf8_string_with_len(c_7315309, "static object __lambda_", 23, 23);



make_utf8_string_with_len(c_7315313, " {", 2, 2);





make_utf8_string_with_len(c_7315319, " }", 2, 2);
return_direct_with_clo7(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736189)->elements[0], &c_7315309, r_733871, Cyc_cadadr(data, ((closureN)self_736189)->elements[1]), &c_7315313, Cyc_car(data, Cyc_cddadr(data, ((closureN)self_736189)->elements[1])), &c_7315319);; 
}

static void __lambda_1170(void *data, object self_736183, int argc, object *args) /* object self_736183, object r_733868 */
 {
 object r_733868 = args[0];
  
closureN_type c_7315233;
object e_7315292 [2];
c_7315233.hdr.mark = gc_color_red;
 c_7315233.hdr.grayed = 0;
c_7315233.tag = closureN_tag;
 c_7315233.fn = (function_type)__lambda_1171;
c_7315233.num_args = 1;
c_7315233.num_elements = 2;
c_7315233.elements = (object *)e_7315292;
c_7315233.elements[0] = ((closureN)self_736183)->elements[0];
c_7315233.elements[1] = ((closureN)self_736183)->elements[1];


object c_7315295 = Cyc_substring(data,(closure)&c_7315233,r_733868, obj_int2obj(0), obj_int2obj(35));
return_closcall1(data,(closure)&c_7315233,  c_7315295);; 
}

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


make_utf8_string_with_len(c_7315289, "(void *data, int argc, closure _, object k", 42, 42);

make_utf8_string_with_len(c_7315290, " ", 1, 1);

make_utf8_string_with_len(c_7315291, "", 0, 0);
return_direct_with_clo4(data,  __glo_string_91replace_91all_scheme_cyclone_util, (((closure)  __glo_string_91replace_91all_scheme_cyclone_util)->fn),  &c_7315235, &c_7315289, &c_7315290, &c_7315291);; 
}

static void __lambda_1172(void *data, object self_736185, int argc, object *args) /* object self_736185, object r_733867 */
 {
 object r_733867 = args[0];
    
if( (boolean_f != equalp(((closureN)self_736185)->elements[2], r_733867)) ){ 
  
closureN_type c_7315240;
object e_7315259 [2];
c_7315240.hdr.mark = gc_color_red;
 c_7315240.hdr.grayed = 0;
c_7315240.tag = closureN_tag;
 c_7315240.fn = (function_type)__lambda_1173;
c_7315240.num_args = 1;
c_7315240.num_elements = 2;
c_7315240.elements = (object *)e_7315259;
c_7315240.elements[0] = ((closureN)self_736185)->elements[0];
c_7315240.elements[1] = ((closureN)self_736185)->elements[1];




object c_7315262 = Cyc_number2string2(data,(closure)&c_7315240,1,Cyc_car(data, ((closureN)self_736185)->elements[1]));
return_closcall1(data,(closure)&c_7315240,  c_7315262);
} else { 
  
closureN_type c_7315267;
object e_7315281 [2];
c_7315267.hdr.mark = gc_color_red;
 c_7315267.hdr.grayed = 0;
c_7315267.tag = closureN_tag;
 c_7315267.fn = (function_type)__lambda_1175;
c_7315267.num_args = 1;
c_7315267.num_elements = 2;
c_7315267.elements = (object *)e_7315281;
c_7315267.elements[0] = ((closureN)self_736185)->elements[0];
c_7315267.elements[1] = ((closureN)self_736185)->elements[1];




object c_7315284 = Cyc_number2string2(data,(closure)&c_7315267,1,Cyc_car(data, ((closureN)self_736185)->elements[1]));
return_closcall1(data,(closure)&c_7315267,  c_7315284);}
;; 
}

static void __lambda_1175(void *data, object self_736188, int argc, object *args) /* object self_736188, object r_733861 */
 {
 object r_733861 = args[0];
  
make_utf8_string_with_len(c_7315270, "static void __lambda_", 21, 21);



make_utf8_string_with_len(c_7315274, " {", 2, 2);





make_utf8_string_with_len(c_7315280, " }", 2, 2);
return_direct_with_clo7(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736188)->elements[0], &c_7315270, r_733861, Cyc_cadadr(data, ((closureN)self_736188)->elements[1]), &c_7315274, Cyc_car(data, Cyc_cddadr(data, ((closureN)self_736188)->elements[1])), &c_7315280);; 
}

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



return_direct_with_clo2(data,  __glo_c_117old_91c_91args_91_125new_91decls_91from_91args_scheme_cyclone_cgen, (((closure)  __glo_c_117old_91c_91args_91_125new_91decls_91from_91args_scheme_cyclone_cgen)->fn),  &c_7315242, Cyc_cadadr(data, ((closureN)self_736186)->elements[1]));; 
}

static void __lambda_1174(void *data, object self_736187, int argc, object *args) /* object self_736187, object r_733856 */
 {
 object r_733856 = args[0];
  
make_utf8_string_with_len(c_7315245, "static void __lambda_", 21, 21);

make_utf8_string_with_len(c_7315247, "(void *data, object _, int argc, object *args)", 46, 46);

make_utf8_string_with_len(c_7315248, " {", 2, 2);





make_utf8_string_with_len(c_7315254, " }", 2, 2);
return_direct_with_clo8(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736187)->elements[0], &c_7315245, ((closureN)self_736187)->elements[2], &c_7315247, &c_7315248, r_733856, Cyc_car(data, Cyc_cddadr(data, ((closureN)self_736187)->elements[1])), &c_7315254);; 
}

static void __lambda_1013(void *data, object self_736197, int argc, object *args) /* object self_736197, object r_733851 */
 {
 object r_733851 = args[0];
  
closureN_type c_7314238;
object e_7315223 [7];
c_7314238.hdr.mark = gc_color_red;
 c_7314238.hdr.grayed = 0;
c_7314238.tag = closureN_tag;
 c_7314238.fn = (function_type)__lambda_1014;
c_7314238.num_args = 1;
c_7314238.num_elements = 7;
c_7314238.elements = (object *)e_7315223;
c_7314238.elements[0] = ((closureN)self_736197)->elements[0];
c_7314238.elements[1] = ((closureN)self_736197)->elements[1];
c_7314238.elements[2] = ((closureN)self_736197)->elements[2];
c_7314238.elements[3] = ((closureN)self_736197)->elements[3];
c_7314238.elements[4] = ((closureN)self_736197)->elements[4];
c_7314238.elements[5] = ((closureN)self_736197)->elements[5];
c_7314238.elements[6] = ((closureN)self_736197)->elements[6];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314238, r_733851, __glo_lambdas_scheme_cyclone_cgen);; 
}

static void __lambda_1014(void *data, object self_736198, int argc, object *args) /* object self_736198, object r_733653 */
 {

  
closureN_type c_7314240;
object e_7314507 [2];
c_7314240.hdr.mark = gc_color_red;
 c_7314240.hdr.grayed = 0;
c_7314240.tag = closureN_tag;
 c_7314240.fn = (function_type)__lambda_1015;
c_7314240.num_args = 0;
c_7314240.num_elements = 2;
c_7314240.elements = (object *)e_7314507;
c_7314240.elements[0] = ((closureN)self_736198)->elements[3];
c_7314240.elements[1] = ((closureN)self_736198)->elements[5];


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

return_direct_with_clo1(data,(closure)&c_7314240,__lambda_1015,  &c_7314508);; 
}

static void __lambda_1049(void *data, object self_736199, int argc, object *args) /* object self_736199, object r_733654 */
 {

  
closureN_type c_7314510;
object e_7314542 [3];
c_7314510.hdr.mark = gc_color_red;
 c_7314510.hdr.grayed = 0;
c_7314510.tag = closureN_tag;
 c_7314510.fn = (function_type)__lambda_1050;
c_7314510.num_args = 0;
c_7314510.num_elements = 3;
c_7314510.elements = (object *)e_7314542;
c_7314510.elements[0] = ((closureN)self_736199)->elements[3];
c_7314510.elements[1] = ((closureN)self_736199)->elements[5];
c_7314510.elements[2] = ((closureN)self_736199)->elements[6];


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

return_direct_with_clo1(data,(closure)&c_7314510,__lambda_1050,  &c_7314543);; 
}

static void __lambda_1057(void *data, object self_736200, int argc, object *args) /* object self_736200, object r_733655 */
 {

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


make_utf8_string_with_len(c_7315220, "Cyc_set_globals_changed((gc_thread_data *)data);", 48, 48);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314545, &c_7315220);; 
}

static void __lambda_1058(void *data, object self_736201, int argc, object *args) /* object self_736201, object r_733656 */
 {

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


mclosure0(c_7315202, (function_type)__lambda_1166);c_7315202.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314547,__lambda_1059,  &c_7315202);; 
}

static void __lambda_1166(void *data, object self_736202, int argc, object *args) /* object self_736202, object k_733788, object sym_731333_731906 */
 {
 object k_733788 = args[0]; object sym_731333_731906 = args[1];
  
closureN_type c_7315204;
object e_7315218 [2];
c_7315204.hdr.mark = gc_color_red;
 c_7315204.hdr.grayed = 0;
c_7315204.tag = closureN_tag;
 c_7315204.fn = (function_type)__lambda_1167;
c_7315204.num_args = 1;
c_7315204.num_elements = 2;
c_7315204.elements = (object *)e_7315218;
c_7315204.elements[0] = k_733788;
c_7315204.elements[1] = sym_731333_731906;

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7315204, sym_731333_731906);; 
}

static void __lambda_1167(void *data, object self_736203, int argc, object *args) /* object self_736203, object r_733789 */
 {
 object r_733789 = args[0];
  
closureN_type c_7315206;
object e_7315213 [2];
c_7315206.hdr.mark = gc_color_red;
 c_7315206.hdr.grayed = 0;
c_7315206.tag = closureN_tag;
 c_7315206.fn = (function_type)__lambda_1168;
c_7315206.num_args = 1;
c_7315206.num_elements = 2;
c_7315206.elements = (object *)e_7315213;
c_7315206.elements[0] = ((closureN)self_736203)->elements[0];
c_7315206.elements[1] = r_733789;


object c_7315216 = Cyc_symbol2string(data,(closure)&c_7315206,((closureN)self_736203)->elements[1]);
return_closcall1(data,(closure)&c_7315206,  c_7315216);; 
}

static void __lambda_1168(void *data, object self_736204, int argc, object *args) /* object self_736204, object r_733790 */
 {
 object r_733790 = args[0];
  
make_utf8_string_with_len(c_7315209, "  quote_", 8, 8);

make_utf8_string_with_len(c_7315211, " = find_or_add_symbol(\"", 23, 23);

make_utf8_string_with_len(c_7315212, "\");", 3, 3);
return_direct_with_clo6(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736204)->elements[0], &c_7315209, ((closureN)self_736204)->elements[1], &c_7315211, r_733790, &c_7315212);; 
}

static void __lambda_1059(void *data, object self_736205, int argc, object *args) /* object self_736205, object r_733787 */
 {
 object r_733787 = args[0];
  
closureN_type c_7314549;
object e_7315200 [7];
c_7314549.hdr.mark = gc_color_red;
 c_7314549.hdr.grayed = 0;
c_7314549.tag = closureN_tag;
 c_7314549.fn = (function_type)__lambda_1060;
c_7314549.num_args = 1;
c_7314549.num_elements = 7;
c_7314549.elements = (object *)e_7315200;
c_7314549.elements[0] = ((closureN)self_736205)->elements[0];
c_7314549.elements[1] = ((closureN)self_736205)->elements[1];
c_7314549.elements[2] = ((closureN)self_736205)->elements[2];
c_7314549.elements[3] = ((closureN)self_736205)->elements[3];
c_7314549.elements[4] = ((closureN)self_736205)->elements[4];
c_7314549.elements[5] = ((closureN)self_736205)->elements[5];
c_7314549.elements[6] = ((closureN)self_736205)->elements[6];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314549, r_733787, __glo__85symbols_85_scheme_cyclone_cgen);; 
}

static void __lambda_1060(void *data, object self_736206, int argc, object *args) /* object self_736206, object r_733657 */
 {

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


mclosure0(c_7315176, (function_type)__lambda_1161);c_7315176.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314551,__lambda_1061,  &c_7315176);; 
}

static void __lambda_1161(void *data, object self_736207, int argc, object *args) /* object self_736207, object k_733781, object global_731334_731907 */
 {
 object k_733781 = args[0]; object global_731334_731907 = args[1];
  
closureN_type c_7315178;
object e_7315197 [1];
c_7315178.hdr.mark = gc_color_red;
 c_7315178.hdr.grayed = 0;
c_7315178.tag = closureN_tag;
 c_7315178.fn = (function_type)__lambda_1162;
c_7315178.num_args = 1;
c_7315178.num_elements = 1;
c_7315178.elements = (object *)e_7315197;
c_7315178.elements[0] = k_733781;



return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7315178, Cyc_car(data, global_731334_731907));; 
}

static void __lambda_1162(void *data, object self_736208, int argc, object *args) /* object self_736208, object mglo_731335_731908 */
 {
 object mglo_731335_731908 = args[0];
  
closureN_type c_7315180;
object e_7315191 [2];
c_7315180.hdr.mark = gc_color_red;
 c_7315180.hdr.grayed = 0;
c_7315180.tag = closureN_tag;
 c_7315180.fn = (function_type)__lambda_1163;
c_7315180.num_args = 1;
c_7315180.num_elements = 2;
c_7315180.elements = (object *)e_7315191;
c_7315180.elements[0] = ((closureN)self_736208)->elements[0];
c_7315180.elements[1] = mglo_731335_731908;


make_utf8_string_with_len(c_7315195, "\n  add_global(\"", 15, 15);

make_utf8_string_with_len(c_7315196, "\", (object *) &", 15, 15);

object c_7315194 = Cyc_string_append(data,(closure)&c_7315180,3,&c_7315195, mglo_731335_731908, &c_7315196);
return_closcall1(data,(closure)&c_7315180,  c_7315194);; 
}

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

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315182, r_733785);; 
}

static void __lambda_1164(void *data, object self_736210, int argc, object *args) /* object self_736210, object r_733783_735115 */
 {

  
closureN_type c_7315184;
object e_7315188 [1];
c_7315184.hdr.mark = gc_color_red;
 c_7315184.hdr.grayed = 0;
c_7315184.tag = closureN_tag;
 c_7315184.fn = (function_type)__lambda_1165;
c_7315184.num_args = 1;
c_7315184.num_elements = 1;
c_7315184.elements = (object *)e_7315188;
c_7315184.elements[0] = ((closureN)self_736210)->elements[0];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315184, ((closureN)self_736210)->elements[1]);; 
}

static void __lambda_1165(void *data, object self_736211, int argc, object *args) /* object self_736211, object r_733784_735116_735117 */
 {

  
make_utf8_string_with_len(c_7315187, ");", 2, 2);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_736211)->elements[0], &c_7315187);; 
}

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

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314553, r_733780, __glo__85globals_85_scheme_cyclone_cgen);; 
}

static void __lambda_1062(void *data, object self_736213, int argc, object *args) /* object self_736213, object r_733658 */
 {

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


make_utf8_string_with_len(c_7315173, "", 0, 0);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314555, &c_7315173);; 
}

static void __lambda_1063(void *data, object self_736214, int argc, object *args) /* object self_736214, object r_733659 */
 {

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


make_utf8_string_with_len(c_7315171, "  ", 2, 2);
return_direct_with_clo1(data,(closure)&c_7314557,__lambda_1064,  &c_7315171);; 
}

static void __lambda_1064(void *data, object self_736215, int argc, object *args) /* object self_736215, object prefix_731338_731909 */
 {
 object prefix_731338_731909 = args[0];
  
closureN_type c_7314559;
object e_7315124 [7];
c_7314559.hdr.mark = gc_color_red;
 c_7314559.hdr.grayed = 0;
c_7314559.tag = closureN_tag;
 c_7314559.fn = (function_type)__lambda_1065;
c_7314559.num_args = 1;
c_7314559.num_elements = 7;
c_7314559.elements = (object *)e_7315124;
c_7314559.elements[0] = ((closureN)self_736215)->elements[0];
c_7314559.elements[1] = ((closureN)self_736215)->elements[1];
c_7314559.elements[2] = ((closureN)self_736215)->elements[2];
c_7314559.elements[3] = ((closureN)self_736215)->elements[3];
c_7314559.elements[4] = ((closureN)self_736215)->elements[4];
c_7314559.elements[5] = ((closureN)self_736215)->elements[5];
c_7314559.elements[6] = ((closureN)self_736215)->elements[6];


closureN_type c_7315125;
object e_7315169 [1];
c_7315125.hdr.mark = gc_color_red;
 c_7315125.hdr.grayed = 0;
c_7315125.tag = closureN_tag;
 c_7315125.fn = (function_type)__lambda_1152;
c_7315125.num_args = 1;
c_7315125.num_elements = 1;
c_7315125.elements = (object *)e_7315169;
c_7315125.elements[0] = prefix_731338_731909;

return_direct_with_clo1(data,(closure)&c_7314559,__lambda_1065,  &c_7315125);; 
}

static void __lambda_1152(void *data, object self_736216, int argc, object *args) /* object self_736216, object k_733767, object global_731343_731911 */
 {
 object k_733767 = args[0]; object global_731343_731911 = args[1];
  
closureN_type c_7315127;
object e_7315162 [3];
c_7315127.hdr.mark = gc_color_red;
 c_7315127.hdr.grayed = 0;
c_7315127.tag = closureN_tag;
 c_7315127.fn = (function_type)__lambda_1153;
c_7315127.num_args = 1;
c_7315127.num_elements = 3;
c_7315127.elements = (object *)e_7315162;
c_7315127.elements[0] = global_731343_731911;
c_7315127.elements[1] = k_733767;
c_7315127.elements[2] = ((closureN)self_736216)->elements[0];






make_utf8_string_with_len(c_7315168, " \n", 2, 2);
return_direct_with_clo4(data,  __glo_c_117allocs_91_125str2_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str2_scheme_cyclone_cgen)->fn),  &c_7315127, Cyc_cadr(data, Cyc_caddr(data, global_731343_731911)), ((closureN)self_736216)->elements[0], &c_7315168);; 
}

static void __lambda_1153(void *data, object self_736217, int argc, object *args) /* object self_736217, object r_733777_735084 */
 {
 object r_733777_735084 = args[0];
  
closureN_type c_7315129;
object e_7315161 [3];
c_7315129.hdr.mark = gc_color_red;
 c_7315129.hdr.grayed = 0;
c_7315129.tag = closureN_tag;
 c_7315129.fn = (function_type)__lambda_1154;
c_7315129.num_args = 1;
c_7315129.num_elements = 3;
c_7315129.elements = (object *)e_7315161;
c_7315129.elements[0] = ((closureN)self_736217)->elements[0];
c_7315129.elements[1] = ((closureN)self_736217)->elements[1];
c_7315129.elements[2] = ((closureN)self_736217)->elements[2];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315129, r_733777_735084);; 
}

static void __lambda_1154(void *data, object self_736218, int argc, object *args) /* object self_736218, object r_733768_735085_735092 */
 {

  
closureN_type c_7315131;
object e_7315159 [2];
c_7315131.hdr.mark = gc_color_red;
 c_7315131.hdr.grayed = 0;
c_7315131.tag = closureN_tag;
 c_7315131.fn = (function_type)__lambda_1155;
c_7315131.num_args = 1;
c_7315131.num_elements = 2;
c_7315131.elements = (object *)e_7315159;
c_7315131.elements[0] = ((closureN)self_736218)->elements[0];
c_7315131.elements[1] = ((closureN)self_736218)->elements[1];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315131, ((closureN)self_736218)->elements[2]);; 
}

static void __lambda_1155(void *data, object self_736219, int argc, object *args) /* object self_736219, object r_733769_735086_735093_735099 */
 {

  
closureN_type c_7315133;
object e_7315155 [2];
c_7315133.hdr.mark = gc_color_red;
 c_7315133.hdr.grayed = 0;
c_7315133.tag = closureN_tag;
 c_7315133.fn = (function_type)__lambda_1156;
c_7315133.num_args = 1;
c_7315133.num_elements = 2;
c_7315133.elements = (object *)e_7315155;
c_7315133.elements[0] = ((closureN)self_736219)->elements[0];
c_7315133.elements[1] = ((closureN)self_736219)->elements[1];



return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7315133, Cyc_car(data, ((closureN)self_736219)->elements[0]));; 
}

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

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315135, r_733775_735087_735094_735100);; 
}

static void __lambda_1157(void *data, object self_736221, int argc, object *args) /* object self_736221, object r_733770_735088_735095_735101_735105 */
 {

  
closureN_type c_7315137;
object e_7315152 [2];
c_7315137.hdr.mark = gc_color_red;
 c_7315137.hdr.grayed = 0;
c_7315137.tag = closureN_tag;
 c_7315137.fn = (function_type)__lambda_1158;
c_7315137.num_args = 1;
c_7315137.num_elements = 2;
c_7315137.elements = (object *)e_7315152;
c_7315137.elements[0] = ((closureN)self_736221)->elements[0];
c_7315137.elements[1] = ((closureN)self_736221)->elements[1];


make_utf8_string_with_len(c_7315153, " = ", 3, 3);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315137, &c_7315153);; 
}

static void __lambda_1158(void *data, object self_736222, int argc, object *args) /* object self_736222, object r_733771_735089_735096_735102_735106_735109 */
 {

  
closureN_type c_7315139;
object e_7315146 [1];
c_7315139.hdr.mark = gc_color_red;
 c_7315139.hdr.grayed = 0;
c_7315139.tag = closureN_tag;
 c_7315139.fn = (function_type)__lambda_1159;
c_7315139.num_args = 1;
c_7315139.num_elements = 1;
c_7315139.elements = (object *)e_7315146;
c_7315139.elements[0] = ((closureN)self_736222)->elements[1];





return_direct_with_clo1(data,(closure)&c_7315139,__lambda_1159,  Cyc_car(data, Cyc_caddr(data, ((closureN)self_736222)->elements[0])));; 
}

static void __lambda_1159(void *data, object self_736223, int argc, object *args) /* object self_736223, object r_733773_735090_735097_735103_735107_735110_735112 */
 {
 object r_733773_735090_735097_735103_735107_735110_735112 = args[0];
  
closureN_type c_7315141;
object e_7315145 [1];
c_7315141.hdr.mark = gc_color_red;
 c_7315141.hdr.grayed = 0;
c_7315141.tag = closureN_tag;
 c_7315141.fn = (function_type)__lambda_1160;
c_7315141.num_args = 1;
c_7315141.num_elements = 1;
c_7315141.elements = (object *)e_7315145;
c_7315141.elements[0] = ((closureN)self_736223)->elements[0];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_7315141, r_733773_735090_735097_735103_735107_735110_735112);; 
}

static void __lambda_1160(void *data, object self_736224, int argc, object *args) /* object self_736224, object r_733772_735091_735098_735104_735108_735111_735113_735114 */
 {

  
make_utf8_string_with_len(c_7315144, "; ", 2, 2);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  ((closureN)self_736224)->elements[0], &c_7315144);; 
}

static void __lambda_1065(void *data, object self_736225, int argc, object *args) /* object self_736225, object emit_91global_731341_731910 */
 {
 object emit_91global_731341_731910 = args[0];
  
closureN_type c_7314561;
object e_7315123 [8];
c_7314561.hdr.mark = gc_color_red;
 c_7314561.hdr.grayed = 0;
c_7314561.tag = closureN_tag;
 c_7314561.fn = (function_type)__lambda_1066;
c_7314561.num_args = 1;
c_7314561.num_elements = 8;
c_7314561.elements = (object *)e_7315123;
c_7314561.elements[0] = ((closureN)self_736225)->elements[0];
c_7314561.elements[1] = emit_91global_731341_731910;
c_7314561.elements[2] = ((closureN)self_736225)->elements[1];
c_7314561.elements[3] = ((closureN)self_736225)->elements[2];
c_7314561.elements[4] = ((closureN)self_736225)->elements[3];
c_7314561.elements[5] = ((closureN)self_736225)->elements[4];
c_7314561.elements[6] = ((closureN)self_736225)->elements[5];
c_7314561.elements[7] = ((closureN)self_736225)->elements[6];

return_direct_with_clo3(data,  __glo_filter_scheme_cyclone_util, (((closure)  __glo_filter_scheme_cyclone_util)->fn),  &c_7314561, __glo_global_91lambda_127_scheme_cyclone_cgen, __glo__85globals_85_scheme_cyclone_cgen);; 
}

static void __lambda_1066(void *data, object self_736226, int argc, object *args) /* object self_736226, object r_733766 */
 {
 object r_733766 = args[0];
  
closureN_type c_7314563;
object e_7315121 [8];
c_7314563.hdr.mark = gc_color_red;
 c_7314563.hdr.grayed = 0;
c_7314563.tag = closureN_tag;
 c_7314563.fn = (function_type)__lambda_1067;
c_7314563.num_args = 1;
c_7314563.num_elements = 8;
c_7314563.elements = (object *)e_7315121;
c_7314563.elements[0] = ((closureN)self_736226)->elements[0];
c_7314563.elements[1] = ((closureN)self_736226)->elements[1];
c_7314563.elements[2] = ((closureN)self_736226)->elements[2];
c_7314563.elements[3] = ((closureN)self_736226)->elements[3];
c_7314563.elements[4] = ((closureN)self_736226)->elements[4];
c_7314563.elements[5] = ((closureN)self_736226)->elements[5];
c_7314563.elements[6] = ((closureN)self_736226)->elements[6];
c_7314563.elements[7] = ((closureN)self_736226)->elements[7];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314563, ((closureN)self_736226)->elements[1], r_733766);; 
}

static void __lambda_1067(void *data, object self_736227, int argc, object *args) /* object self_736227, object r_733763 */
 {

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

return_direct_with_clo3(data,  __glo_filter_scheme_cyclone_util, (((closure)  __glo_filter_scheme_cyclone_util)->fn),  &c_7314565, __glo_global_91not_91lambda_127_scheme_cyclone_cgen, __glo__85globals_85_scheme_cyclone_cgen);; 
}

static void __lambda_1068(void *data, object self_736228, int argc, object *args) /* object self_736228, object r_733765 */
 {
 object r_733765 = args[0];
  
closureN_type c_7314567;
object e_7315118 [7];
c_7314567.hdr.mark = gc_color_red;
 c_7314567.hdr.grayed = 0;
c_7314567.tag = closureN_tag;
 c_7314567.fn = (function_type)__lambda_1069;
c_7314567.num_args = 1;
c_7314567.num_elements = 7;
c_7314567.elements = (object *)e_7315118;
c_7314567.elements[0] = ((closureN)self_736228)->elements[0];
c_7314567.elements[1] = ((closureN)self_736228)->elements[2];
c_7314567.elements[2] = ((closureN)self_736228)->elements[3];
c_7314567.elements[3] = ((closureN)self_736228)->elements[4];
c_7314567.elements[4] = ((closureN)self_736228)->elements[5];
c_7314567.elements[5] = ((closureN)self_736228)->elements[6];
c_7314567.elements[6] = ((closureN)self_736228)->elements[7];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314567, ((closureN)self_736228)->elements[1], r_733765);; 
}

static void __lambda_1069(void *data, object self_736229, int argc, object *args) /* object self_736229, object r_733764 */
 {

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


make_utf8_string_with_len(c_7315117, "", 0, 0);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314569, &c_7315117);; 
}

static void __lambda_1070(void *data, object self_736230, int argc, object *args) /* object self_736230, object r_733660 */
 {

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

return_direct_with_clo2(data,(closure)&c_7314571,__lambda_1071,  NULL, boolean_f);; 
}

static void __lambda_1071(void *data, object self_736231, int argc, object *args) /* object self_736231, object pairs_731344_731912, object head_91pair_731345_731913 */
 {
 object pairs_731344_731912 = args[0]; object head_91pair_731345_731913 = args[1];
  
closureN_type c_7314573;
object e_7315111 [8];
c_7314573.hdr.mark = gc_color_red;
 c_7314573.hdr.grayed = 0;
c_7314573.tag = closureN_tag;
 c_7314573.fn = (function_type)__lambda_1333;
c_7314573.num_args = 1;
c_7314573.num_elements = 8;
c_7314573.elements = (object *)e_7315111;
c_7314573.elements[0] = ((closureN)self_736231)->elements[0];
c_7314573.elements[1] = head_91pair_731345_731913;
c_7314573.elements[2] = ((closureN)self_736231)->elements[1];
c_7314573.elements[3] = ((closureN)self_736231)->elements[2];
c_7314573.elements[4] = ((closureN)self_736231)->elements[3];
c_7314573.elements[5] = ((closureN)self_736231)->elements[4];
c_7314573.elements[6] = ((closureN)self_736231)->elements[5];
c_7314573.elements[7] = ((closureN)self_736231)->elements[6];


pair_type local_7315114; 
return_direct_with_clo1(data,(closure)&c_7314573,__lambda_1333,  set_cell_as_expr(&local_7315114, pairs_731344_731912));; 
}

static void __lambda_1333(void *data, object self_736232, int argc, object *args) /* object self_736232, object pairs_731344_731912 */
 {
 object pairs_731344_731912 = args[0];
  
closureN_type c_7314575;
object e_7315106 [8];
c_7314575.hdr.mark = gc_color_red;
 c_7314575.hdr.grayed = 0;
c_7314575.tag = closureN_tag;
 c_7314575.fn = (function_type)__lambda_1332;
c_7314575.num_args = 1;
c_7314575.num_elements = 8;
c_7314575.elements = (object *)e_7315106;
c_7314575.elements[0] = ((closureN)self_736232)->elements[0];
c_7314575.elements[1] = ((closureN)self_736232)->elements[2];
c_7314575.elements[2] = ((closureN)self_736232)->elements[3];
c_7314575.elements[3] = ((closureN)self_736232)->elements[4];
c_7314575.elements[4] = ((closureN)self_736232)->elements[5];
c_7314575.elements[5] = pairs_731344_731912;
c_7314575.elements[6] = ((closureN)self_736232)->elements[6];
c_7314575.elements[7] = ((closureN)self_736232)->elements[7];


pair_type local_7315109; 
return_direct_with_clo1(data,(closure)&c_7314575,__lambda_1332,  set_cell_as_expr(&local_7315109, ((closureN)self_736232)->elements[1]));; 
}

static void __lambda_1332(void *data, object self_736233, int argc, object *args) /* object self_736233, object head_91pair_731345_731913 */
 {
 object head_91pair_731345_731913 = args[0];
  
closureN_type c_7314577;
object e_7314640 [3];
c_7314577.hdr.mark = gc_color_red;
 c_7314577.hdr.grayed = 0;
c_7314577.tag = closureN_tag;
 c_7314577.fn = (function_type)__lambda_1072;
c_7314577.num_args = 0;
c_7314577.num_elements = 3;
c_7314577.elements = (object *)e_7314640;
c_7314577.elements[0] = ((closureN)self_736233)->elements[3];
c_7314577.elements[1] = ((closureN)self_736233)->elements[5];
c_7314577.elements[2] = ((closureN)self_736233)->elements[6];


closureN_type c_7314641;
object e_7315105 [9];
c_7314641.hdr.mark = gc_color_red;
 c_7314641.hdr.grayed = 0;
c_7314641.tag = closureN_tag;
 c_7314641.fn = (function_type)__lambda_1083;
c_7314641.num_args = 1;
c_7314641.num_elements = 9;
c_7314641.elements = (object *)e_7315105;
c_7314641.elements[0] = ((closureN)self_736233)->elements[0];
c_7314641.elements[1] = head_91pair_731345_731913;
c_7314641.elements[2] = ((closureN)self_736233)->elements[1];
c_7314641.elements[3] = ((closureN)self_736233)->elements[2];
c_7314641.elements[4] = ((closureN)self_736233)->elements[3];
c_7314641.elements[5] = ((closureN)self_736233)->elements[4];
c_7314641.elements[6] = ((closureN)self_736233)->elements[5];
c_7314641.elements[7] = ((closureN)self_736233)->elements[6];
c_7314641.elements[8] = ((closureN)self_736233)->elements[7];

return_direct_with_clo1(data,(closure)&c_7314577,__lambda_1072,  &c_7314641);; 
}

static void __lambda_1083(void *data, object self_736234, int argc, object *args) /* object self_736234, object r_733692 */
 {

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


closureN_type c_7315041;
object e_7315104 [1];
c_7315041.hdr.mark = gc_color_red;
 c_7315041.hdr.grayed = 0;
c_7315041.tag = closureN_tag;
 c_7315041.fn = (function_type)__lambda_1141;
c_7315041.num_args = 1;
c_7315041.num_elements = 1;
c_7315041.elements = (object *)e_7315104;
c_7315041.elements[0] = ((closureN)self_736234)->elements[6];

return_direct_with_clo1(data,(closure)&c_7314643,__lambda_1084,  &c_7315041);; 
}

static void __lambda_1141(void *data, object self_736235, int argc, object *args) /* object self_736235, object k_733736, object g_731349_731917 */
 {
 object k_733736 = args[0]; object g_731349_731917 = args[1];
  
closureN_type c_7315043;
object e_7315103 [3];
c_7315043.hdr.mark = gc_color_red;
 c_7315043.hdr.grayed = 0;
c_7315043.tag = closureN_tag;
 c_7315043.fn = (function_type)__lambda_1142;
c_7315043.num_args = 1;
c_7315043.num_elements = 3;
c_7315043.elements = (object *)e_7315103;
c_7315043.elements[0] = g_731349_731917;
c_7315043.elements[1] = k_733736;
c_7315043.elements[2] = ((closureN)self_736235)->elements[0];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7315043, quote_cvar);; 
}

static void __lambda_1142(void *data, object self_736236, int argc, object *args) /* object self_736236, object r_733748 */
 {
 object r_733748 = args[0];
  
closureN_type c_7315045;
object e_7315102 [3];
c_7315045.hdr.mark = gc_color_red;
 c_7315045.hdr.grayed = 0;
c_7315045.tag = closureN_tag;
 c_7315045.fn = (function_type)__lambda_1143;
c_7315045.num_args = 1;
c_7315045.num_elements = 3;
c_7315045.elements = (object *)e_7315102;
c_7315045.elements[0] = ((closureN)self_736236)->elements[0];
c_7315045.elements[1] = ((closureN)self_736236)->elements[1];
c_7315045.elements[2] = ((closureN)self_736236)->elements[2];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7315045, r_733748);; 
}

static void __lambda_1143(void *data, object self_736237, int argc, object *args) /* object self_736237, object r_733737 */
 {
 object r_733737 = args[0];
  
closureN_type c_7315047;
object e_7315101 [4];
c_7315047.hdr.mark = gc_color_red;
 c_7315047.hdr.grayed = 0;
c_7315047.tag = closureN_tag;
 c_7315047.fn = (function_type)__lambda_1144;
c_7315047.num_args = 1;
c_7315047.num_elements = 4;
c_7315047.elements = (object *)e_7315101;
c_7315047.elements[0] = ((closureN)self_736237)->elements[0];
c_7315047.elements[1] = ((closureN)self_736237)->elements[1];
c_7315047.elements[2] = ((closureN)self_736237)->elements[2];
c_7315047.elements[3] = r_733737;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7315047, quote_pair);; 
}

static void __lambda_1144(void *data, object self_736238, int argc, object *args) /* object self_736238, object r_733746 */
 {
 object r_733746 = args[0];
  
closureN_type c_7315049;
object e_7315100 [4];
c_7315049.hdr.mark = gc_color_red;
 c_7315049.hdr.grayed = 0;
c_7315049.tag = closureN_tag;
 c_7315049.fn = (function_type)__lambda_1145;
c_7315049.num_args = 1;
c_7315049.num_elements = 4;
c_7315049.elements = (object *)e_7315100;
c_7315049.elements[0] = ((closureN)self_736238)->elements[0];
c_7315049.elements[1] = ((closureN)self_736238)->elements[1];
c_7315049.elements[2] = ((closureN)self_736238)->elements[2];
c_7315049.elements[3] = ((closureN)self_736238)->elements[3];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7315049, r_733746);; 
}

static void __lambda_1145(void *data, object self_736239, int argc, object *args) /* object self_736239, object r_733738 */
 {
 object r_733738 = args[0];
  
closureN_type c_7315051;
object e_7315098 [3];
c_7315051.hdr.mark = gc_color_red;
 c_7315051.hdr.grayed = 0;
c_7315051.tag = closureN_tag;
 c_7315051.fn = (function_type)__lambda_1146;
c_7315051.num_args = 2;
c_7315051.num_elements = 3;
c_7315051.elements = (object *)e_7315098;
c_7315051.elements[0] = ((closureN)self_736239)->elements[0];
c_7315051.elements[1] = ((closureN)self_736239)->elements[1];
c_7315051.elements[2] = ((closureN)self_736239)->elements[2];

return_direct_with_clo2(data,(closure)&c_7315051,__lambda_1146,  ((closureN)self_736239)->elements[3], r_733738);; 
}

static void __lambda_1146(void *data, object self_736240, int argc, object *args) /* object self_736240, object cvar_91sym_731350_731918, object pair_91sym_731351_731919 */
 {
 object cvar_91sym_731350_731918 = args[0]; object pair_91sym_731351_731919 = args[1];
  
closureN_type c_7315053;
object e_7315094 [5];
c_7315053.hdr.mark = gc_color_red;
 c_7315053.hdr.grayed = 0;
c_7315053.tag = closureN_tag;
 c_7315053.fn = (function_type)__lambda_1147;
c_7315053.num_args = 1;
c_7315053.num_elements = 5;
c_7315053.elements = (object *)e_7315094;
c_7315053.elements[0] = cvar_91sym_731350_731918;
c_7315053.elements[1] = ((closureN)self_736240)->elements[0];
c_7315053.elements[2] = ((closureN)self_736240)->elements[1];
c_7315053.elements[3] = pair_91sym_731351_731919;
c_7315053.elements[4] = ((closureN)self_736240)->elements[2];



return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7315053, Cyc_car(data, ((closureN)self_736240)->elements[0]));; 
}

static void __lambda_1147(void *data, object self_736241, int argc, object *args) /* object self_736241, object r_733744 */
 {
 object r_733744 = args[0];
  
closureN_type c_7315055;
object e_7315089 [5];
c_7315055.hdr.mark = gc_color_red;
 c_7315055.hdr.grayed = 0;
c_7315055.tag = closureN_tag;
 c_7315055.fn = (function_type)__lambda_1148;
c_7315055.num_args = 1;
c_7315055.num_elements = 5;
c_7315055.elements = (object *)e_7315089;
c_7315055.elements[0] = ((closureN)self_736241)->elements[0];
c_7315055.elements[1] = ((closureN)self_736241)->elements[1];
c_7315055.elements[2] = ((closureN)self_736241)->elements[2];
c_7315055.elements[3] = ((closureN)self_736241)->elements[3];
c_7315055.elements[4] = ((closureN)self_736241)->elements[4];


make_utf8_string_with_len(c_7315090, "  make_cvar(", 12, 12);

make_utf8_string_with_len(c_7315092, ", (object *)&", 13, 13);

make_utf8_string_with_len(c_7315093, ");", 2, 2);
return_direct_with_clo6(data,  __glo_emits_85_scheme_cyclone_cgen, (((closure)  __glo_emits_85_scheme_cyclone_cgen)->fn),  &c_7315055, &c_7315090, ((closureN)self_736241)->elements[0], &c_7315092, r_733744, &c_7315093);; 
}

static void __lambda_1148(void *data, object self_736242, int argc, object *args) /* object self_736242, object r_733739 */
 {

  
closureN_type c_7315057;
object e_7315082 [4];
c_7315057.hdr.mark = gc_color_red;
 c_7315057.hdr.grayed = 0;
c_7315057.tag = closureN_tag;
 c_7315057.fn = (function_type)__lambda_1149;
c_7315057.num_args = 1;
c_7315057.num_elements = 4;
c_7315057.elements = (object *)e_7315082;
c_7315057.elements[0] = ((closureN)self_736242)->elements[0];
c_7315057.elements[1] = ((closureN)self_736242)->elements[2];
c_7315057.elements[2] = ((closureN)self_736242)->elements[3];
c_7315057.elements[3] = ((closureN)self_736242)->elements[4];




object c_7315085 = Cyc_symbol2string(data,(closure)&c_7315057,Cyc_car(data, ((closureN)self_736242)->elements[1]));
return_closcall1(data,(closure)&c_7315057,  c_7315085);; 
}

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


make_utf8_string_with_len(c_7315076, "make_pair(", 10, 10);

make_utf8_string_with_len(c_7315078, ", find_or_add_symbol(\"", 22, 22);

make_utf8_string_with_len(c_7315079, "\"), &", 5, 5);

make_utf8_string_with_len(c_7315081, ");\n", 3, 3);
return_direct_with_clo8(data,  __glo_emits_85_scheme_cyclone_cgen, (((closure)  __glo_emits_85_scheme_cyclone_cgen)->fn),  &c_7315059, &c_7315076, ((closureN)self_736243)->elements[2], &c_7315078, r_733742, &c_7315079, ((closureN)self_736243)->elements[0], &c_7315081);; 
}

static void __lambda_1150(void *data, object self_736244, int argc, object *args) /* object self_736244, object r_733740 */
 {

  
closureN_type c_7315061;
object e_7315067 [2];
c_7315061.hdr.mark = gc_color_red;
 c_7315061.hdr.grayed = 0;
c_7315061.tag = closureN_tag;
 c_7315061.fn = (function_type)__lambda_1151;
c_7315061.num_args = 1;
c_7315061.num_elements = 2;
c_7315061.elements = (object *)e_7315067;
c_7315061.elements[0] = ((closureN)self_736244)->elements[0];
c_7315061.elements[1] = ((closureN)self_736244)->elements[2];


pair_type local_7315070; 


return_direct_with_clo1(data,(closure)&c_7315061,__lambda_1151,  set_pair_as_expr(&local_7315070, ((closureN)self_736244)->elements[1], car(((closureN)self_736244)->elements[2])));; 
}

static void __lambda_1151(void *data, object self_736245, int argc, object *args) /* object self_736245, object r_733741 */
 {
 object r_733741 = args[0];
  

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

static void __lambda_1084(void *data, object self_736246, int argc, object *args) /* object self_736246, object r_733735 */
 {
 object r_733735 = args[0];
  
closureN_type c_7314645;
object e_7315039 [9];
c_7314645.hdr.mark = gc_color_red;
 c_7314645.hdr.grayed = 0;
c_7314645.tag = closureN_tag;
 c_7314645.fn = (function_type)__lambda_1085;
c_7314645.num_args = 1;
c_7314645.num_elements = 9;
c_7314645.elements = (object *)e_7315039;
c_7314645.elements[0] = ((closureN)self_736246)->elements[0];
c_7314645.elements[1] = ((closureN)self_736246)->elements[1];
c_7314645.elements[2] = ((closureN)self_736246)->elements[2];
c_7314645.elements[3] = ((closureN)self_736246)->elements[3];
c_7314645.elements[4] = ((closureN)self_736246)->elements[4];
c_7314645.elements[5] = ((closureN)self_736246)->elements[5];
c_7314645.elements[6] = ((closureN)self_736246)->elements[6];
c_7314645.elements[7] = ((closureN)self_736246)->elements[7];
c_7314645.elements[8] = ((closureN)self_736246)->elements[8];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314645, r_733735, __glo__85globals_85_scheme_cyclone_cgen);; 
}

static void __lambda_1085(void *data, object self_736247, int argc, object *args) /* object self_736247, object r_733693 */
 {

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


closureN_type c_7315017;
object e_7315038 [1];
c_7315017.hdr.mark = gc_color_red;
 c_7315017.hdr.grayed = 0;
c_7315017.tag = closureN_tag;
 c_7315017.fn = (function_type)__lambda_1137;
c_7315017.num_args = 1;
c_7315017.num_elements = 1;
c_7315017.elements = (object *)e_7315038;
c_7315017.elements[0] = ((closureN)self_736247)->elements[2];

return_direct_with_clo1(data,(closure)&c_7314647,__lambda_1086,  &c_7315017);; 
}

static void __lambda_1137(void *data, object self_736248, int argc, object *args) /* object self_736248, object k_733731, object g_731352_731920 */
 {
 object k_733731 = args[0]; object g_731352_731920 = args[1];
  
closureN_type c_7315019;
object e_7315036 [3];
c_7315019.hdr.mark = gc_color_red;
 c_7315019.hdr.grayed = 0;
c_7315019.tag = closureN_tag;
 c_7315019.fn = (function_type)__lambda_1138;
c_7315019.num_args = 1;
c_7315019.num_elements = 3;
c_7315019.elements = (object *)e_7315036;
c_7315019.elements[0] = g_731352_731920;
c_7315019.elements[1] = ((closureN)self_736248)->elements[0];
c_7315019.elements[2] = k_733731;

return_direct_with_clo3(data,  __glo_lib_117idb_117lookup_scheme_cyclone_libraries, (((closure)  __glo_lib_117idb_117lookup_scheme_cyclone_libraries)->fn),  &c_7315019, ((closureN)self_736248)->elements[0], g_731352_731920);; 
}

static void __lambda_1138(void *data, object self_736249, int argc, object *args) /* object self_736249, object idb_91entry_731353_731921 */
 {
 object idb_91entry_731353_731921 = args[0];
  if( (boolean_f != idb_91entry_731353_731921) ){ 
  
closureN_type c_7315021;
object e_7315032 [3];
c_7315021.hdr.mark = gc_color_red;
 c_7315021.hdr.grayed = 0;
c_7315021.tag = closureN_tag;
 c_7315021.fn = (function_type)__lambda_1139;
c_7315021.num_args = 1;
c_7315021.num_elements = 3;
c_7315021.elements = (object *)e_7315032;
c_7315021.elements[0] = ((closureN)self_736249)->elements[0];
c_7315021.elements[1] = ((closureN)self_736249)->elements[1];
c_7315021.elements[2] = ((closureN)self_736249)->elements[2];

return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7315021, ((closureN)self_736249)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736249)->elements[2], (((closure)  ((closureN)self_736249)->elements[2])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_1139(void *data, object self_736250, int argc, object *args) /* object self_736250, object r_733733 */
 {
 object r_733733 = args[0];
  
closureN_type c_7315023;
object e_7315029 [2];
c_7315023.hdr.mark = gc_color_red;
 c_7315023.hdr.grayed = 0;
c_7315023.tag = closureN_tag;
 c_7315023.fn = (function_type)__lambda_1140;
c_7315023.num_args = 1;
c_7315023.num_elements = 2;
c_7315023.elements = (object *)e_7315029;
c_7315023.elements[0] = ((closureN)self_736250)->elements[2];
c_7315023.elements[1] = r_733733;

return_direct_with_clo4(data,  __glo_mangle_91exported_91ident_scheme_cyclone_cgen, (((closure)  __glo_mangle_91exported_91ident_scheme_cyclone_cgen)->fn),  &c_7315023, ((closureN)self_736250)->elements[1], ((closureN)self_736250)->elements[0], boolean_f);; 
}

static void __lambda_1140(void *data, object self_736251, int argc, object *args) /* object self_736251, object r_733734 */
 {
 object r_733734 = args[0];
  
make_utf8_string_with_len(c_7315027, " = ", 3, 3);

make_utf8_string_with_len(c_7315028, ";\n", 2, 2);
return_direct_with_clo5(data,  __glo_emits_85_scheme_cyclone_cgen, (((closure)  __glo_emits_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736251)->elements[0], ((closureN)self_736251)->elements[1], &c_7315027, r_733734, &c_7315028);; 
}

static void __lambda_1086(void *data, object self_736252, int argc, object *args) /* object self_736252, object r_733730 */
 {
 object r_733730 = args[0];
  
closureN_type c_7314649;
object e_7315014 [8];
c_7314649.hdr.mark = gc_color_red;
 c_7314649.hdr.grayed = 0;
c_7314649.tag = closureN_tag;
 c_7314649.fn = (function_type)__lambda_1087;
c_7314649.num_args = 1;
c_7314649.num_elements = 8;
c_7314649.elements = (object *)e_7315014;
c_7314649.elements[0] = ((closureN)self_736252)->elements[0];
c_7314649.elements[1] = ((closureN)self_736252)->elements[1];
c_7314649.elements[2] = ((closureN)self_736252)->elements[2];
c_7314649.elements[3] = ((closureN)self_736252)->elements[3];
c_7314649.elements[4] = ((closureN)self_736252)->elements[4];
c_7314649.elements[5] = ((closureN)self_736252)->elements[5];
c_7314649.elements[6] = ((closureN)self_736252)->elements[6];
c_7314649.elements[7] = ((closureN)self_736252)->elements[7];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314649, r_733730, ((closureN)self_736252)->elements[4]);; 
}

static void __lambda_1087(void *data, object self_736253, int argc, object *args) /* object self_736253, object r_733694 */
 {

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


mclosure0(c_7315008, (function_type)__lambda_1135);c_7315008.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314651,__lambda_1088,  &c_7315008);; 
}

static void __lambda_1135(void *data, object self_736254, int argc, object *args) /* object self_736254, object k_733727, object _191_731370_731930 */
 {
 object k_733727 = args[0];
  
closureN_type c_7315010;
object e_7315013 [1];
c_7315010.hdr.mark = gc_color_red;
 c_7315010.hdr.grayed = 0;
c_7315010.tag = closureN_tag;
 c_7315010.fn = (function_type)__lambda_1136;
c_7315010.num_args = 1;
c_7315010.num_elements = 1;
c_7315010.elements = (object *)e_7315013;
c_7315010.elements[0] = k_733727;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7315010, quote_c);; 
}

static void __lambda_1136(void *data, object self_736255, int argc, object *args) /* object self_736255, object r_733728 */
 {
 object r_733728 = args[0];
  return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  ((closureN)self_736255)->elements[0], r_733728);; 
}

static void __lambda_1088(void *data, object self_736256, int argc, object *args) /* object self_736256, object r_733726 */
 {
 object r_733726 = args[0];
  
closureN_type c_7314653;
object e_7315003 [8];
c_7314653.hdr.mark = gc_color_red;
 c_7314653.hdr.grayed = 0;
c_7314653.tag = closureN_tag;
 c_7314653.fn = (function_type)__lambda_1089;
c_7314653.num_args = 1;
c_7314653.num_elements = 8;
c_7314653.elements = (object *)e_7315003;
c_7314653.elements[0] = ((closureN)self_736256)->elements[0];
c_7314653.elements[1] = ((closureN)self_736256)->elements[1];
c_7314653.elements[2] = ((closureN)self_736256)->elements[2];
c_7314653.elements[3] = ((closureN)self_736256)->elements[3];
c_7314653.elements[4] = ((closureN)self_736256)->elements[4];
c_7314653.elements[5] = ((closureN)self_736256)->elements[5];
c_7314653.elements[6] = ((closureN)self_736256)->elements[6];
c_7314653.elements[7] = ((closureN)self_736256)->elements[7];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314653, r_733726, car(((closureN)self_736256)->elements[5]));; 
}

static void __lambda_1089(void *data, object self_736257, int argc, object *args) /* object self_736257, object r_733698 */
 {
 object r_733698 = args[0];
  
closureN_type c_7314655;
object e_7314999 [7];
c_7314655.hdr.mark = gc_color_red;
 c_7314655.hdr.grayed = 0;
c_7314655.tag = closureN_tag;
 c_7314655.fn = (function_type)__lambda_1090;
c_7314655.num_args = 3;
c_7314655.num_elements = 7;
c_7314655.elements = (object *)e_7314999;
c_7314655.elements[0] = ((closureN)self_736257)->elements[0];
c_7314655.elements[1] = ((closureN)self_736257)->elements[1];
c_7314655.elements[2] = ((closureN)self_736257)->elements[2];
c_7314655.elements[3] = ((closureN)self_736257)->elements[3];
c_7314655.elements[4] = ((closureN)self_736257)->elements[4];
c_7314655.elements[5] = ((closureN)self_736257)->elements[6];
c_7314655.elements[6] = ((closureN)self_736257)->elements[7];



return_direct_with_clo3(data,(closure)&c_7314655,__lambda_1090,  NULL, car(((closureN)self_736257)->elements[5]), r_733698);; 
}

static void __lambda_1090(void *data, object self_736258, int argc, object *args) /* object self_736258, object code_731355_731922, object ps_731356_731923, object cs_731357_731924 */
 {
 object code_731355_731922 = args[0]; object ps_731356_731923 = args[1]; object cs_731357_731924 = args[2];
  
closureN_type c_7314657;
object e_7314998 [10];
c_7314657.hdr.mark = gc_color_red;
 c_7314657.hdr.grayed = 0;
c_7314657.tag = closureN_tag;
 c_7314657.fn = (function_type)__lambda_1091;
c_7314657.num_args = 1;
c_7314657.num_elements = 10;
c_7314657.elements = (object *)e_7314998;
c_7314657.elements[0] = code_731355_731922;
c_7314657.elements[1] = ((closureN)self_736258)->elements[0];
c_7314657.elements[2] = cs_731357_731924;
c_7314657.elements[3] = ((closureN)self_736258)->elements[1];
c_7314657.elements[4] = ((closureN)self_736258)->elements[2];
c_7314657.elements[5] = ((closureN)self_736258)->elements[3];
c_7314657.elements[6] = ((closureN)self_736258)->elements[4];
c_7314657.elements[7] = ((closureN)self_736258)->elements[5];
c_7314657.elements[8] = ps_731356_731923;
c_7314657.elements[9] = ((closureN)self_736258)->elements[6];

return_direct_with_clo1(data,(closure)&c_7314657,__lambda_1091,  boolean_f);; 
}

static void __lambda_1091(void *data, object self_736259, int argc, object *args) /* object self_736259, object loop_731358_731925 */
 {
 object loop_731358_731925 = args[0];
  
closureN_type c_7314659;
object e_7314994 [10];
c_7314659.hdr.mark = gc_color_red;
 c_7314659.hdr.grayed = 0;
c_7314659.tag = closureN_tag;
 c_7314659.fn = (function_type)__lambda_1331;
c_7314659.num_args = 1;
c_7314659.num_elements = 10;
c_7314659.elements = (object *)e_7314994;
c_7314659.elements[0] = ((closureN)self_736259)->elements[0];
c_7314659.elements[1] = ((closureN)self_736259)->elements[1];
c_7314659.elements[2] = ((closureN)self_736259)->elements[2];
c_7314659.elements[3] = ((closureN)self_736259)->elements[3];
c_7314659.elements[4] = ((closureN)self_736259)->elements[4];
c_7314659.elements[5] = ((closureN)self_736259)->elements[5];
c_7314659.elements[6] = ((closureN)self_736259)->elements[6];
c_7314659.elements[7] = ((closureN)self_736259)->elements[7];
c_7314659.elements[8] = ((closureN)self_736259)->elements[8];
c_7314659.elements[9] = ((closureN)self_736259)->elements[9];


pair_type local_7314997; 
return_direct_with_clo1(data,(closure)&c_7314659,__lambda_1331,  set_cell_as_expr(&local_7314997, loop_731358_731925));; 
}

static void __lambda_1331(void *data, object self_736260, int argc, object *args) /* object self_736260, object loop_731358_731925 */
 {
 object loop_731358_731925 = args[0];
  
closureN_type c_7314661;
object e_7314881 [11];
c_7314661.hdr.mark = gc_color_red;
 c_7314661.hdr.grayed = 0;
c_7314661.tag = closureN_tag;
 c_7314661.fn = (function_type)__lambda_1092;
c_7314661.num_args = 1;
c_7314661.num_elements = 11;
c_7314661.elements = (object *)e_7314881;
c_7314661.elements[0] = ((closureN)self_736260)->elements[0];
c_7314661.elements[1] = ((closureN)self_736260)->elements[1];
c_7314661.elements[2] = ((closureN)self_736260)->elements[2];
c_7314661.elements[3] = ((closureN)self_736260)->elements[3];
c_7314661.elements[4] = ((closureN)self_736260)->elements[4];
c_7314661.elements[5] = ((closureN)self_736260)->elements[5];
c_7314661.elements[6] = ((closureN)self_736260)->elements[6];
c_7314661.elements[7] = loop_731358_731925;
c_7314661.elements[8] = ((closureN)self_736260)->elements[7];
c_7314661.elements[9] = ((closureN)self_736260)->elements[8];
c_7314661.elements[10] = ((closureN)self_736260)->elements[9];


closureN_type c_7314882;
object e_7314993 [2];
c_7314882.hdr.mark = gc_color_red;
 c_7314882.hdr.grayed = 0;
c_7314882.tag = closureN_tag;
 c_7314882.fn = (function_type)__lambda_1126;
c_7314882.num_args = 3;
c_7314882.num_elements = 2;
c_7314882.elements = (object *)e_7314993;
c_7314882.elements[0] = ((closureN)self_736260)->elements[3];
c_7314882.elements[1] = loop_731358_731925;

return_direct_with_clo1(data,(closure)&c_7314661,__lambda_1092,  &c_7314882);; 
}

static void __lambda_1126(void *data, object self_736261, int argc, object *args) /* object self_736261, object k_733701, object code_731359_731926, object ps_731360_731927, object cs_731361_731928 */
 {
 object k_733701 = args[0]; object code_731359_731926 = args[1]; object ps_731360_731927 = args[2]; object cs_731361_731928 = args[3];
    
if( (boolean_f != Cyc_is_null(ps_731360_731927)) ){ 
  
closureN_type c_7314886;
object e_7314890 [2];
c_7314886.hdr.mark = gc_color_red;
 c_7314886.hdr.grayed = 0;
c_7314886.tag = closureN_tag;
 c_7314886.fn = (function_type)__lambda_1127;
c_7314886.num_args = 1;
c_7314886.num_elements = 2;
c_7314886.elements = (object *)e_7314890;
c_7314886.elements[0] = code_731359_731926;
c_7314886.elements[1] = k_733701;


mclosure0(c_7314891, (function_type)__lambda_1128);c_7314891.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314886,__lambda_1127,  &c_7314891);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ps_731360_731927))) ){ 
  
closureN_type c_7314898;
object e_7314910 [2];
c_7314898.hdr.mark = gc_color_red;
 c_7314898.hdr.grayed = 0;
c_7314898.tag = closureN_tag;
 c_7314898.fn = (function_type)__lambda_1129;
c_7314898.num_args = 0;
c_7314898.num_elements = 2;
c_7314898.elements = (object *)e_7314910;
c_7314898.elements[0] = cs_731361_731928;
c_7314898.elements[1] = ((closureN)self_736261)->elements[0];


closureN_type c_7314911;
object e_7314942 [5];
c_7314911.hdr.mark = gc_color_red;
 c_7314911.hdr.grayed = 0;
c_7314911.tag = closureN_tag;
 c_7314911.fn = (function_type)__lambda_1130;
c_7314911.num_args = 1;
c_7314911.num_elements = 5;
c_7314911.elements = (object *)e_7314942;
c_7314911.elements[0] = code_731359_731926;
c_7314911.elements[1] = cs_731361_731928;
c_7314911.elements[2] = k_733701;
c_7314911.elements[3] = ((closureN)self_736261)->elements[1];
c_7314911.elements[4] = ps_731360_731927;

return_direct_with_clo1(data,(closure)&c_7314898,__lambda_1129,  &c_7314911);
} else { 
  
closureN_type c_7314944;
object e_7314956 [2];
c_7314944.hdr.mark = gc_color_red;
 c_7314944.hdr.grayed = 0;
c_7314944.tag = closureN_tag;
 c_7314944.fn = (function_type)__lambda_1132;
c_7314944.num_args = 0;
c_7314944.num_elements = 2;
c_7314944.elements = (object *)e_7314956;
c_7314944.elements[0] = cs_731361_731928;
c_7314944.elements[1] = ((closureN)self_736261)->elements[0];


closureN_type c_7314957;
object e_7314992 [5];
c_7314957.hdr.mark = gc_color_red;
 c_7314957.hdr.grayed = 0;
c_7314957.tag = closureN_tag;
 c_7314957.fn = (function_type)__lambda_1133;
c_7314957.num_args = 1;
c_7314957.num_elements = 5;
c_7314957.elements = (object *)e_7314992;
c_7314957.elements[0] = code_731359_731926;
c_7314957.elements[1] = cs_731361_731928;
c_7314957.elements[2] = k_733701;
c_7314957.elements[3] = ((closureN)self_736261)->elements[1];
c_7314957.elements[4] = ps_731360_731927;

return_direct_with_clo1(data,(closure)&c_7314944,__lambda_1132,  &c_7314957);}
;}
;; 
}

static void __lambda_1133(void *data, object self_736267, int argc, object *args) /* object self_736267, object r_733715 */
 {

  
closureN_type c_7314959;
object e_7314975 [5];
c_7314959.hdr.mark = gc_color_red;
 c_7314959.hdr.grayed = 0;
c_7314959.tag = closureN_tag;
 c_7314959.fn = (function_type)__lambda_1134;
c_7314959.num_args = 1;
c_7314959.num_elements = 5;
c_7314959.elements = (object *)e_7314975;
c_7314959.elements[0] = ((closureN)self_736267)->elements[0];
c_7314959.elements[1] = ((closureN)self_736267)->elements[1];
c_7314959.elements[2] = ((closureN)self_736267)->elements[2];
c_7314959.elements[3] = ((closureN)self_736267)->elements[3];
c_7314959.elements[4] = ((closureN)self_736267)->elements[4];


make_utf8_string_with_len(c_7314979, "make_pair(", 10, 10);



make_utf8_string_with_len(c_7314983, ", &", 3, 3);



make_utf8_string_with_len(c_7314987, ", &", 3, 3);



make_utf8_string_with_len(c_7314991, ");\n", 3, 3);

object c_7314978 = Cyc_string_append(data,(closure)&c_7314959,7,&c_7314979, Cyc_car(data, ((closureN)self_736267)->elements[1]), &c_7314983, Cyc_car(data, ((closureN)self_736267)->elements[4]), &c_7314987, Cyc_cadr(data, ((closureN)self_736267)->elements[1]), &c_7314991);
return_closcall1(data,(closure)&c_7314959,  c_7314978);; 
}

static void __lambda_1134(void *data, object self_736268, int argc, object *args) /* object self_736268, object r_733719 */
 {
 object r_733719 = args[0];
  


pair_type local_7314967; 




return_closcall4(data,  car(((closureN)self_736268)->elements[3]),  ((closureN)self_736268)->elements[2], set_pair_as_expr(&local_7314967, r_733719, ((closureN)self_736268)->elements[0]), Cyc_cdr(data, ((closureN)self_736268)->elements[4]), Cyc_cdr(data, ((closureN)self_736268)->elements[1]));; 
}

static void __lambda_1132(void *data, object self_736269, int argc, object *args) /* object self_736269, object k_733723 */
 {
 object k_733723 = args[0];
    
if( (boolean_f != car(((closureN)self_736269)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_733723,__lambda_1133,  Cyc_VOID);
} else { 
  



return_direct_with_clo1(data,  k_733723,__lambda_1133,  Cyc_set_cell(data, ((closureN)self_736269)->elements[1], Cyc_car(data, ((closureN)self_736269)->elements[0])));}
;; 
}

static void __lambda_1130(void *data, object self_736264, int argc, object *args) /* object self_736264, object r_733706 */
 {

  
closureN_type c_7314913;
object e_7314929 [5];
c_7314913.hdr.mark = gc_color_red;
 c_7314913.hdr.grayed = 0;
c_7314913.tag = closureN_tag;
 c_7314913.fn = (function_type)__lambda_1131;
c_7314913.num_args = 1;
c_7314913.num_elements = 5;
c_7314913.elements = (object *)e_7314929;
c_7314913.elements[0] = ((closureN)self_736264)->elements[0];
c_7314913.elements[1] = ((closureN)self_736264)->elements[1];
c_7314913.elements[2] = ((closureN)self_736264)->elements[2];
c_7314913.elements[3] = ((closureN)self_736264)->elements[3];
c_7314913.elements[4] = ((closureN)self_736264)->elements[4];


make_utf8_string_with_len(c_7314933, "make_pair(", 10, 10);



make_utf8_string_with_len(c_7314937, ", &", 3, 3);



make_utf8_string_with_len(c_7314941, ",Cyc_global_variables);\n", 24, 24);

object c_7314932 = Cyc_string_append(data,(closure)&c_7314913,5,&c_7314933, Cyc_car(data, ((closureN)self_736264)->elements[1]), &c_7314937, Cyc_car(data, ((closureN)self_736264)->elements[4]), &c_7314941);
return_closcall1(data,(closure)&c_7314913,  c_7314932);; 
}

static void __lambda_1131(void *data, object self_736265, int argc, object *args) /* object self_736265, object r_733710 */
 {
 object r_733710 = args[0];
  


pair_type local_7314921; 




return_closcall4(data,  car(((closureN)self_736265)->elements[3]),  ((closureN)self_736265)->elements[2], set_pair_as_expr(&local_7314921, r_733710, ((closureN)self_736265)->elements[0]), Cyc_cdr(data, ((closureN)self_736265)->elements[4]), Cyc_cdr(data, ((closureN)self_736265)->elements[1]));; 
}

static void __lambda_1129(void *data, object self_736266, int argc, object *args) /* object self_736266, object k_733713 */
 {
 object k_733713 = args[0];
    
if( (boolean_f != car(((closureN)self_736266)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_733713,__lambda_1130,  Cyc_VOID);
} else { 
  



return_direct_with_clo1(data,  k_733713,__lambda_1130,  Cyc_set_cell(data, ((closureN)self_736266)->elements[1], Cyc_car(data, ((closureN)self_736266)->elements[0])));}
;; 
}

static void __lambda_1128(void *data, object self_736262, int argc, object *args) /* object self_736262, object k_733704, object str_731365_731929 */
 {
 object k_733704 = args[0]; object str_731365_731929 = args[1];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  k_733704, str_731365_731929);; 
}

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

static void __lambda_1092(void *data, object self_736270, int argc, object *args) /* object self_736270, object r_733700 */
 {
 object r_733700 = args[0];
  
closureN_type c_7314663;
object e_7314877 [11];
c_7314663.hdr.mark = gc_color_red;
 c_7314663.hdr.grayed = 0;
c_7314663.tag = closureN_tag;
 c_7314663.fn = (function_type)__lambda_1093;
c_7314663.num_args = 1;
c_7314663.num_elements = 11;
c_7314663.elements = (object *)e_7314877;
c_7314663.elements[0] = ((closureN)self_736270)->elements[0];
c_7314663.elements[1] = ((closureN)self_736270)->elements[1];
c_7314663.elements[2] = ((closureN)self_736270)->elements[2];
c_7314663.elements[3] = ((closureN)self_736270)->elements[3];
c_7314663.elements[4] = ((closureN)self_736270)->elements[4];
c_7314663.elements[5] = ((closureN)self_736270)->elements[5];
c_7314663.elements[6] = ((closureN)self_736270)->elements[6];
c_7314663.elements[7] = ((closureN)self_736270)->elements[7];
c_7314663.elements[8] = ((closureN)self_736270)->elements[8];
c_7314663.elements[9] = ((closureN)self_736270)->elements[9];
c_7314663.elements[10] = ((closureN)self_736270)->elements[10];



return_direct_with_clo1(data,(closure)&c_7314663,__lambda_1093,  Cyc_set_cell(data, ((closureN)self_736270)->elements[7], r_733700));; 
}

static void __lambda_1093(void *data, object self_736271, int argc, object *args) /* object self_736271, object r_733699 */
 {

  


closureN_type c_7314668;
object e_7314873 [7];
c_7314668.hdr.mark = gc_color_red;
 c_7314668.hdr.grayed = 0;
c_7314668.tag = closureN_tag;
 c_7314668.fn = (function_type)__lambda_1094;
c_7314668.num_args = 1;
c_7314668.num_elements = 7;
c_7314668.elements = (object *)e_7314873;
c_7314668.elements[0] = ((closureN)self_736271)->elements[1];
c_7314668.elements[1] = ((closureN)self_736271)->elements[3];
c_7314668.elements[2] = ((closureN)self_736271)->elements[4];
c_7314668.elements[3] = ((closureN)self_736271)->elements[5];
c_7314668.elements[4] = ((closureN)self_736271)->elements[6];
c_7314668.elements[5] = ((closureN)self_736271)->elements[8];
c_7314668.elements[6] = ((closureN)self_736271)->elements[10];

return_closcall4(data,  car(((closureN)self_736271)->elements[7]),  &c_7314668, ((closureN)self_736271)->elements[0], ((closureN)self_736271)->elements[9], ((closureN)self_736271)->elements[2]);; 
}

static void __lambda_1094(void *data, object self_736272, int argc, object *args) /* object self_736272, object r_733695 */
 {

  
closureN_type c_7314670;
object e_7314681 [1];
c_7314670.hdr.mark = gc_color_red;
 c_7314670.hdr.grayed = 0;
c_7314670.tag = closureN_tag;
 c_7314670.fn = (function_type)__lambda_1095;
c_7314670.num_args = 0;
c_7314670.num_elements = 1;
c_7314670.elements = (object *)e_7314681;
c_7314670.elements[0] = ((closureN)self_736272)->elements[1];


closureN_type c_7314682;
object e_7314872 [6];
c_7314682.hdr.mark = gc_color_red;
 c_7314682.hdr.grayed = 0;
c_7314682.tag = closureN_tag;
 c_7314682.fn = (function_type)__lambda_1096;
c_7314682.num_args = 1;
c_7314682.num_elements = 6;
c_7314682.elements = (object *)e_7314872;
c_7314682.elements[0] = ((closureN)self_736272)->elements[0];
c_7314682.elements[1] = ((closureN)self_736272)->elements[2];
c_7314682.elements[2] = ((closureN)self_736272)->elements[3];
c_7314682.elements[3] = ((closureN)self_736272)->elements[4];
c_7314682.elements[4] = ((closureN)self_736272)->elements[5];
c_7314682.elements[5] = ((closureN)self_736272)->elements[6];

return_direct_with_clo1(data,(closure)&c_7314670,__lambda_1095,  &c_7314682);; 
}

static void __lambda_1096(void *data, object self_736273, int argc, object *args) /* object self_736273, object r_733661 */
 {

  
closureN_type c_7314684;
object e_7314860 [5];
c_7314684.hdr.mark = gc_color_red;
 c_7314684.hdr.grayed = 0;
c_7314684.tag = closureN_tag;
 c_7314684.fn = (function_type)__lambda_1097;
c_7314684.num_args = 0;
c_7314684.num_elements = 5;
c_7314684.elements = (object *)e_7314860;
c_7314684.elements[0] = ((closureN)self_736273)->elements[0];
c_7314684.elements[1] = ((closureN)self_736273)->elements[2];
c_7314684.elements[2] = ((closureN)self_736273)->elements[3];
c_7314684.elements[3] = ((closureN)self_736273)->elements[4];
c_7314684.elements[4] = ((closureN)self_736273)->elements[5];


closureN_type c_7314861;
object e_7314871 [2];
c_7314861.hdr.mark = gc_color_red;
 c_7314861.hdr.grayed = 0;
c_7314861.tag = closureN_tag;
 c_7314861.fn = (function_type)__lambda_1124;
c_7314861.num_args = 1;
c_7314861.num_elements = 2;
c_7314861.elements = (object *)e_7314871;
c_7314861.elements[0] = ((closureN)self_736273)->elements[1];
c_7314861.elements[1] = ((closureN)self_736273)->elements[4];

return_direct_with_clo1(data,(closure)&c_7314684,__lambda_1097,  &c_7314861);; 
}

static void __lambda_1124(void *data, object self_736274, int argc, object *args) /* object self_736274, object r_733662 */
 {

  
closureN_type c_7314863;
object e_7314869 [2];
c_7314863.hdr.mark = gc_color_red;
 c_7314863.hdr.grayed = 0;
c_7314863.tag = closureN_tag;
 c_7314863.fn = (function_type)__lambda_1125;
c_7314863.num_args = 1;
c_7314863.num_elements = 2;
c_7314863.elements = (object *)e_7314869;
c_7314863.elements[0] = ((closureN)self_736274)->elements[0];
c_7314863.elements[1] = ((closureN)self_736274)->elements[1];


make_utf8_string_with_len(c_7314870, "}", 1, 1);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314863, &c_7314870);; 
}

static void __lambda_1125(void *data, object self_736275, int argc, object *args) /* object self_736275, object r_733663 */
 {

  if( (boolean_f != ((closureN)self_736275)->elements[1]) ){ 
  return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  ((closureN)self_736275)->elements[0], __glo__85c_91main_91function_85_scheme_cyclone_cgen);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736275)->elements[0], (((closure)  ((closureN)self_736275)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_1097(void *data, object self_736276, int argc, object *args) /* object self_736276, object k_733664 */
 {
 object k_733664 = args[0];
  if( (boolean_f != ((closureN)self_736276)->elements[3]) ){ 
  
closureN_type c_7314687;
object e_7314798 [3];
c_7314687.hdr.mark = gc_color_red;
 c_7314687.hdr.grayed = 0;
c_7314687.tag = closureN_tag;
 c_7314687.fn = (function_type)__lambda_1098;
c_7314687.num_args = 2;
c_7314687.num_elements = 3;
c_7314687.elements = (object *)e_7314798;
c_7314687.elements[0] = ((closureN)self_736276)->elements[0];
c_7314687.elements[1] = k_733664;
c_7314687.elements[2] = ((closureN)self_736276)->elements[4];


make_utf8_string_with_len(c_7314799, "c_done", 6, 6);

make_utf8_string_with_len(c_7314800, "c_done", 6, 6);
return_direct_with_clo2(data,(closure)&c_7314687,__lambda_1098,  &c_7314799, &c_7314800);
} else { 
  
closureN_type c_7314802;
object e_7314858 [3];
c_7314802.hdr.mark = gc_color_red;
 c_7314802.hdr.grayed = 0;
c_7314802.tag = closureN_tag;
 c_7314802.fn = (function_type)__lambda_1113;
c_7314802.num_args = 1;
c_7314802.num_elements = 3;
c_7314802.elements = (object *)e_7314858;
c_7314802.elements[0] = k_733664;
c_7314802.elements[1] = ((closureN)self_736276)->elements[1];
c_7314802.elements[2] = ((closureN)self_736276)->elements[2];


make_utf8_string_with_len(c_7314859, "object buf[1]; buf[0] = ((closure1_type *)clo)->element;", 56, 56);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314802, &c_7314859);}
;; 
}

static void __lambda_1113(void *data, object self_736294, int argc, object *args) /* object self_736294, object r_733679 */
 {

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

return_direct_with_clo2(data,  __glo_lib_117name_91_125symbol_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125symbol_scheme_cyclone_libraries)->fn),  &c_7314804, ((closureN)self_736294)->elements[1]);; 
}

static void __lambda_1114(void *data, object self_736295, int argc, object *args) /* object self_736295, object r_733690 */
 {
 object r_733690 = args[0];
  
closureN_type c_7314806;
object e_7314855 [3];
c_7314806.hdr.mark = gc_color_red;
 c_7314806.hdr.grayed = 0;
c_7314806.tag = closureN_tag;
 c_7314806.fn = (function_type)__lambda_1115;
c_7314806.num_args = 1;
c_7314806.num_elements = 3;
c_7314806.elements = (object *)e_7314855;
c_7314806.elements[0] = ((closureN)self_736295)->elements[0];
c_7314806.elements[1] = ((closureN)self_736295)->elements[1];
c_7314806.elements[2] = ((closureN)self_736295)->elements[2];

return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7314806, r_733690);; 
}

static void __lambda_1115(void *data, object self_736296, int argc, object *args) /* object self_736296, object r_733689 */
 {
 object r_733689 = args[0];
  
closureN_type c_7314808;
object e_7314852 [3];
c_7314808.hdr.mark = gc_color_red;
 c_7314808.hdr.grayed = 0;
c_7314808.tag = closureN_tag;
 c_7314808.fn = (function_type)__lambda_1116;
c_7314808.num_args = 1;
c_7314808.num_elements = 3;
c_7314808.elements = (object *)e_7314852;
c_7314808.elements[0] = ((closureN)self_736296)->elements[0];
c_7314808.elements[1] = ((closureN)self_736296)->elements[1];
c_7314808.elements[2] = ((closureN)self_736296)->elements[2];


make_utf8_string_with_len(c_7314853, "(((closure)", 11, 11);

make_utf8_string_with_len(c_7314854, ")->fn)(data, buf[0], 1, buf);", 29, 29);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  &c_7314808, &c_7314853, r_733689, &c_7314854);; 
}

static void __lambda_1116(void *data, object self_736297, int argc, object *args) /* object self_736297, object r_733680 */
 {

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


make_utf8_string_with_len(c_7314851, "}", 1, 1);
return_direct_with_clo2(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  &c_7314810, &c_7314851);; 
}

static void __lambda_1117(void *data, object self_736298, int argc, object *args) /* object self_736298, object r_733681 */
 {

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

return_direct_with_clo2(data,  __glo_lib_117name_91_125string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125string_scheme_cyclone_libraries)->fn),  &c_7314812, ((closureN)self_736298)->elements[1]);; 
}

static void __lambda_1118(void *data, object self_736299, int argc, object *args) /* object self_736299, object r_733688 */
 {
 object r_733688 = args[0];
  
closureN_type c_7314814;
object e_7314845 [3];
c_7314814.hdr.mark = gc_color_red;
 c_7314814.hdr.grayed = 0;
c_7314814.tag = closureN_tag;
 c_7314814.fn = (function_type)__lambda_1119;
c_7314814.num_args = 1;
c_7314814.num_elements = 3;
c_7314814.elements = (object *)e_7314845;
c_7314814.elements[0] = ((closureN)self_736299)->elements[0];
c_7314814.elements[1] = ((closureN)self_736299)->elements[1];
c_7314814.elements[2] = ((closureN)self_736299)->elements[2];


make_utf8_string_with_len(c_7314846, "void c_", 7, 7);

make_utf8_string_with_len(c_7314847, "_entry_pt(void *data, object cont, int argc, object value){ ", 60, 60);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  &c_7314814, &c_7314846, r_733688, &c_7314847);; 
}

static void __lambda_1119(void *data, object self_736300, int argc, object *args) /* object self_736300, object r_733682 */
 {

  
closureN_type c_7314816;
object e_7314843 [3];
c_7314816.hdr.mark = gc_color_red;
 c_7314816.hdr.grayed = 0;
c_7314816.tag = closureN_tag;
 c_7314816.fn = (function_type)__lambda_1120;
c_7314816.num_args = 1;
c_7314816.num_elements = 3;
c_7314816.elements = (object *)e_7314843;
c_7314816.elements[0] = ((closureN)self_736300)->elements[0];
c_7314816.elements[1] = ((closureN)self_736300)->elements[1];
c_7314816.elements[2] = ((closureN)self_736300)->elements[2];

return_direct_with_clo2(data,  __glo_lib_117name_91_125unique_91string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125unique_91string_scheme_cyclone_libraries)->fn),  &c_7314816, ((closureN)self_736300)->elements[1]);; 
}

static void __lambda_1120(void *data, object self_736301, int argc, object *args) /* object self_736301, object r_733687 */
 {
 object r_733687 = args[0];
  
closureN_type c_7314818;
object e_7314840 [3];
c_7314818.hdr.mark = gc_color_red;
 c_7314818.hdr.grayed = 0;
c_7314818.tag = closureN_tag;
 c_7314818.fn = (function_type)__lambda_1121;
c_7314818.num_args = 1;
c_7314818.num_elements = 3;
c_7314818.elements = (object *)e_7314840;
c_7314818.elements[0] = ((closureN)self_736301)->elements[0];
c_7314818.elements[1] = ((closureN)self_736301)->elements[1];
c_7314818.elements[2] = ((closureN)self_736301)->elements[2];


make_utf8_string_with_len(c_7314841, "  register_library(\"", 20, 20);

make_utf8_string_with_len(c_7314842, "\");", 3, 3);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  &c_7314818, &c_7314841, r_733687, &c_7314842);; 
}

static void __lambda_1121(void *data, object self_736302, int argc, object *args) /* object self_736302, object r_733683 */
 {

    
if( (boolean_f != Cyc_is_null(((closureN)self_736302)->elements[2])) ){ 
  
closureN_type c_7314823;
object e_7314828 [1];
c_7314823.hdr.mark = gc_color_red;
 c_7314823.hdr.grayed = 0;
c_7314823.tag = closureN_tag;
 c_7314823.fn = (function_type)__lambda_1122;
c_7314823.num_args = 1;
c_7314823.num_elements = 1;
c_7314823.elements = (object *)e_7314828;
c_7314823.elements[0] = ((closureN)self_736302)->elements[0];

return_direct_with_clo2(data,  __glo_lib_117name_91_125string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125string_scheme_cyclone_libraries)->fn),  &c_7314823, ((closureN)self_736302)->elements[1]);
} else { 
  
closureN_type c_7314831;
object e_7314838 [1];
c_7314831.hdr.mark = gc_color_red;
 c_7314831.hdr.grayed = 0;
c_7314831.tag = closureN_tag;
 c_7314831.fn = (function_type)__lambda_1123;
c_7314831.num_args = 1;
c_7314831.num_elements = 1;
c_7314831.elements = (object *)e_7314838;
c_7314831.elements[0] = ((closureN)self_736302)->elements[0];

return_direct_with_clo2(data,  __glo_lib_117name_91_125string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125string_scheme_cyclone_libraries)->fn),  &c_7314831, ((closureN)self_736302)->elements[1]);}
;; 
}

static void __lambda_1123(void *data, object self_736304, int argc, object *args) /* object self_736304, object r_733686 */
 {
 object r_733686 = args[0];
  
make_utf8_string_with_len(c_7314834, "  mclosure1(clo, c_", 19, 19);

make_utf8_string_with_len(c_7314835, "_entry_pt_first_lambda, ((closure1_type *)cont)->element);\n", 59, 59);

make_utf8_string_with_len(c_7314836, "  object buf[1]; buf[0] = cont;\n", 32, 32);

make_utf8_string_with_len(c_7314837, "  GC(data, (closure)&clo, buf, 1);\n", 35, 35);
return_direct_with_clo6(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736304)->elements[0], &c_7314834, r_733686, &c_7314835, &c_7314836, &c_7314837);; 
}

static void __lambda_1122(void *data, object self_736303, int argc, object *args) /* object self_736303, object r_733685 */
 {
 object r_733685 = args[0];
  
make_utf8_string_with_len(c_7314826, "  c_", 4, 4);

make_utf8_string_with_len(c_7314827, "_entry_pt_first_lambda(data, cont, argc, value);", 48, 48);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736303)->elements[0], &c_7314826, r_733685, &c_7314827);; 
}

static void __lambda_1098(void *data, object self_736277, int argc, object *args) /* object self_736277, object this_91clo_731374_731931, object prev_91clo_731375_731932 */
 {
 object this_91clo_731374_731931 = args[0]; object prev_91clo_731375_731932 = args[1];
  
closureN_type c_7314689;
object e_7314794 [4];
c_7314689.hdr.mark = gc_color_red;
 c_7314689.hdr.grayed = 0;
c_7314689.tag = closureN_tag;
 c_7314689.fn = (function_type)__lambda_1330;
c_7314689.num_args = 1;
c_7314689.num_elements = 4;
c_7314689.elements = (object *)e_7314794;
c_7314689.elements[0] = ((closureN)self_736277)->elements[0];
c_7314689.elements[1] = ((closureN)self_736277)->elements[1];
c_7314689.elements[2] = prev_91clo_731375_731932;
c_7314689.elements[3] = ((closureN)self_736277)->elements[2];


pair_type local_7314797; 
return_direct_with_clo1(data,(closure)&c_7314689,__lambda_1330,  set_cell_as_expr(&local_7314797, this_91clo_731374_731931));; 
}

static void __lambda_1330(void *data, object self_736278, int argc, object *args) /* object self_736278, object this_91clo_731374_731931 */
 {
 object this_91clo_731374_731931 = args[0];
  
closureN_type c_7314691;
object e_7314789 [4];
c_7314691.hdr.mark = gc_color_red;
 c_7314691.hdr.grayed = 0;
c_7314691.tag = closureN_tag;
 c_7314691.fn = (function_type)__lambda_1329;
c_7314691.num_args = 1;
c_7314691.num_elements = 4;
c_7314691.elements = (object *)e_7314789;
c_7314691.elements[0] = ((closureN)self_736278)->elements[0];
c_7314691.elements[1] = ((closureN)self_736278)->elements[1];
c_7314691.elements[2] = ((closureN)self_736278)->elements[3];
c_7314691.elements[3] = this_91clo_731374_731931;


pair_type local_7314792; 
return_direct_with_clo1(data,(closure)&c_7314691,__lambda_1329,  set_cell_as_expr(&local_7314792, ((closureN)self_736278)->elements[2]));; 
}

static void __lambda_1329(void *data, object self_736279, int argc, object *args) /* object self_736279, object prev_91clo_731375_731932 */
 {
 object prev_91clo_731375_731932 = args[0];
  
closureN_type c_7314693;
object e_7314780 [5];
c_7314693.hdr.mark = gc_color_red;
 c_7314693.hdr.grayed = 0;
c_7314693.tag = closureN_tag;
 c_7314693.fn = (function_type)__lambda_1099;
c_7314693.num_args = 1;
c_7314693.num_elements = 5;
c_7314693.elements = (object *)e_7314780;
c_7314693.elements[0] = ((closureN)self_736279)->elements[0];
c_7314693.elements[1] = ((closureN)self_736279)->elements[1];
c_7314693.elements[2] = prev_91clo_731375_731932;
c_7314693.elements[3] = ((closureN)self_736279)->elements[2];
c_7314693.elements[4] = ((closureN)self_736279)->elements[3];


make_utf8_string_with_len(c_7314781, "mclosure1(", 10, 10);



make_utf8_string_with_len(c_7314785, ", c_entry_pt_first_lambda, &", 28, 28);



make_utf8_string_with_len(c_7314788, ");", 2, 2);
return_direct_with_clo6(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  &c_7314693, &c_7314781, car(((closureN)self_736279)->elements[3]), &c_7314785, car(prev_91clo_731375_731932), &c_7314788);; 
}

static void __lambda_1099(void *data, object self_736280, int argc, object *args) /* object self_736280, object r_733665 */
 {

  
closureN_type c_7314695;
object e_7314738 [4];
c_7314695.hdr.mark = gc_color_red;
 c_7314695.hdr.grayed = 0;
c_7314695.tag = closureN_tag;
 c_7314695.fn = (function_type)__lambda_1100;
c_7314695.num_args = 1;
c_7314695.num_elements = 4;
c_7314695.elements = (object *)e_7314738;
c_7314695.elements[0] = ((closureN)self_736280)->elements[0];
c_7314695.elements[1] = ((closureN)self_736280)->elements[1];
c_7314695.elements[2] = ((closureN)self_736280)->elements[3];
c_7314695.elements[3] = ((closureN)self_736280)->elements[4];


closureN_type c_7314739;
object e_7314779 [2];
c_7314739.hdr.mark = gc_color_red;
 c_7314739.hdr.grayed = 0;
c_7314739.tag = closureN_tag;
 c_7314739.fn = (function_type)__lambda_1107;
c_7314739.num_args = 1;
c_7314739.num_elements = 2;
c_7314739.elements = (object *)e_7314779;
c_7314739.elements[0] = ((closureN)self_736280)->elements[2];
c_7314739.elements[1] = ((closureN)self_736280)->elements[4];

return_direct_with_clo1(data,(closure)&c_7314695,__lambda_1100,  &c_7314739);; 
}

static void __lambda_1107(void *data, object self_736281, int argc, object *args) /* object self_736281, object k_733673, object lib_91name_731376_731933 */
 {
 object k_733673 = args[0]; object lib_91name_731376_731933 = args[1];
  
closureN_type c_7314741;
object e_7314772 [4];
c_7314741.hdr.mark = gc_color_red;
 c_7314741.hdr.grayed = 0;
c_7314741.tag = closureN_tag;
 c_7314741.fn = (function_type)__lambda_1108;
c_7314741.num_args = 1;
c_7314741.num_elements = 4;
c_7314741.elements = (object *)e_7314772;
c_7314741.elements[0] = k_733673;
c_7314741.elements[1] = lib_91name_731376_731933;
c_7314741.elements[2] = ((closureN)self_736281)->elements[0];
c_7314741.elements[3] = ((closureN)self_736281)->elements[1];





return_direct_with_clo1(data,(closure)&c_7314741,__lambda_1108,  Cyc_set_cell(data, ((closureN)self_736281)->elements[0], car(((closureN)self_736281)->elements[1])));; 
}

static void __lambda_1108(void *data, object self_736282, int argc, object *args) /* object self_736282, object r_733674 */
 {

  
closureN_type c_7314743;
object e_7314770 [4];
c_7314743.hdr.mark = gc_color_red;
 c_7314743.hdr.grayed = 0;
c_7314743.tag = closureN_tag;
 c_7314743.fn = (function_type)__lambda_1109;
c_7314743.num_args = 1;
c_7314743.num_elements = 4;
c_7314743.elements = (object *)e_7314770;
c_7314743.elements[0] = ((closureN)self_736282)->elements[0];
c_7314743.elements[1] = ((closureN)self_736282)->elements[1];
c_7314743.elements[2] = ((closureN)self_736282)->elements[2];
c_7314743.elements[3] = ((closureN)self_736282)->elements[3];


make_utf8_string_with_len(c_7314771, "c", 1, 1);
return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7314743, &c_7314771);; 
}

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

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7314745, r_733678);; 
}

static void __lambda_1110(void *data, object self_736284, int argc, object *args) /* object self_736284, object r_733677 */
 {
 object r_733677 = args[0];
  
closureN_type c_7314747;
object e_7314765 [4];
c_7314747.hdr.mark = gc_color_red;
 c_7314747.hdr.grayed = 0;
c_7314747.tag = closureN_tag;
 c_7314747.fn = (function_type)__lambda_1111;
c_7314747.num_args = 1;
c_7314747.num_elements = 4;
c_7314747.elements = (object *)e_7314765;
c_7314747.elements[0] = ((closureN)self_736284)->elements[0];
c_7314747.elements[1] = ((closureN)self_736284)->elements[1];
c_7314747.elements[2] = ((closureN)self_736284)->elements[2];
c_7314747.elements[3] = ((closureN)self_736284)->elements[3];



return_direct_with_clo1(data,(closure)&c_7314747,__lambda_1111,  Cyc_set_cell(data, ((closureN)self_736284)->elements[3], r_733677));; 
}

static void __lambda_1111(void *data, object self_736285, int argc, object *args) /* object self_736285, object r_733675 */
 {

  
closureN_type c_7314749;
object e_7314763 [3];
c_7314749.hdr.mark = gc_color_red;
 c_7314749.hdr.grayed = 0;
c_7314749.tag = closureN_tag;
 c_7314749.fn = (function_type)__lambda_1112;
c_7314749.num_args = 1;
c_7314749.num_elements = 3;
c_7314749.elements = (object *)e_7314763;
c_7314749.elements[0] = ((closureN)self_736285)->elements[0];
c_7314749.elements[1] = ((closureN)self_736285)->elements[2];
c_7314749.elements[2] = ((closureN)self_736285)->elements[3];

return_direct_with_clo2(data,  __glo_lib_117name_91_125string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125string_scheme_cyclone_libraries)->fn),  &c_7314749, ((closureN)self_736285)->elements[1]);; 
}

static void __lambda_1112(void *data, object self_736286, int argc, object *args) /* object self_736286, object r_733676 */
 {
 object r_733676 = args[0];
  
make_utf8_string_with_len(c_7314752, "mclosure1(", 10, 10);



make_utf8_string_with_len(c_7314756, ", c_", 4, 4);

make_utf8_string_with_len(c_7314757, "_entry_pt", 9, 9);

make_utf8_string_with_len(c_7314758, ", &", 3, 3);



make_utf8_string_with_len(c_7314762, ");", 2, 2);
return_direct_with_clo9(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736286)->elements[0], &c_7314752, car(((closureN)self_736286)->elements[2]), &c_7314756, r_733676, &c_7314757, &c_7314758, car(((closureN)self_736286)->elements[1]), &c_7314762);; 
}

static void __lambda_1100(void *data, object self_736287, int argc, object *args) /* object self_736287, object r_733671 */
 {
 object r_733671 = args[0];
  
closureN_type c_7314697;
object e_7314736 [4];
c_7314697.hdr.mark = gc_color_red;
 c_7314697.hdr.grayed = 0;
c_7314697.tag = closureN_tag;
 c_7314697.fn = (function_type)__lambda_1101;
c_7314697.num_args = 1;
c_7314697.num_elements = 4;
c_7314697.elements = (object *)e_7314736;
c_7314697.elements[0] = ((closureN)self_736287)->elements[0];
c_7314697.elements[1] = ((closureN)self_736287)->elements[1];
c_7314697.elements[2] = r_733671;
c_7314697.elements[3] = ((closureN)self_736287)->elements[3];

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_7314697, ((closureN)self_736287)->elements[2]);; 
}

static void __lambda_1101(void *data, object self_736288, int argc, object *args) /* object self_736288, object r_733672 */
 {
 object r_733672 = args[0];
  
closureN_type c_7314699;
object e_7314734 [3];
c_7314699.hdr.mark = gc_color_red;
 c_7314699.hdr.grayed = 0;
c_7314699.tag = closureN_tag;
 c_7314699.fn = (function_type)__lambda_1102;
c_7314699.num_args = 1;
c_7314699.num_elements = 3;
c_7314699.elements = (object *)e_7314734;
c_7314699.elements[0] = ((closureN)self_736288)->elements[0];
c_7314699.elements[1] = ((closureN)self_736288)->elements[1];
c_7314699.elements[2] = ((closureN)self_736288)->elements[3];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314699, ((closureN)self_736288)->elements[2], r_733672);; 
}

static void __lambda_1102(void *data, object self_736289, int argc, object *args) /* object self_736289, object r_733666 */
 {

  
closureN_type c_7314701;
object e_7314719 [2];
c_7314701.hdr.mark = gc_color_red;
 c_7314701.hdr.grayed = 0;
c_7314701.tag = closureN_tag;
 c_7314701.fn = (function_type)__lambda_1103;
c_7314701.num_args = 1;
c_7314701.num_elements = 2;
c_7314701.elements = (object *)e_7314719;
c_7314701.elements[0] = ((closureN)self_736289)->elements[0];
c_7314701.elements[1] = ((closureN)self_736289)->elements[1];


make_utf8_string_with_len(c_7314720, " object buf[1]; buf[0] = &", 26, 26);



make_utf8_string_with_len(c_7314724, "; ", 2, 2);

make_utf8_string_with_len(c_7314725, "(", 1, 1);



make_utf8_string_with_len(c_7314729, ".fn)(data, &", 12, 12);



make_utf8_string_with_len(c_7314733, ", 1, buf);", 10, 10);
return_direct_with_clo9(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  &c_7314701, &c_7314720, car(((closureN)self_736289)->elements[2]), &c_7314724, &c_7314725, car(((closureN)self_736289)->elements[2]), &c_7314729, car(((closureN)self_736289)->elements[2]), &c_7314733);; 
}

static void __lambda_1103(void *data, object self_736290, int argc, object *args) /* object self_736290, object r_733667 */
 {

  
closureN_type c_7314703;
object e_7314717 [2];
c_7314703.hdr.mark = gc_color_red;
 c_7314703.hdr.grayed = 0;
c_7314703.tag = closureN_tag;
 c_7314703.fn = (function_type)__lambda_1104;
c_7314703.num_args = 1;
c_7314703.num_elements = 2;
c_7314703.elements = (object *)e_7314717;
c_7314703.elements[0] = ((closureN)self_736290)->elements[0];
c_7314703.elements[1] = ((closureN)self_736290)->elements[1];


make_utf8_string_with_len(c_7314718, "}", 1, 1);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314703, &c_7314718);; 
}

static void __lambda_1104(void *data, object self_736291, int argc, object *args) /* object self_736291, object r_733668 */
 {

  
closureN_type c_7314705;
object e_7314715 [2];
c_7314705.hdr.mark = gc_color_red;
 c_7314705.hdr.grayed = 0;
c_7314705.tag = closureN_tag;
 c_7314705.fn = (function_type)__lambda_1105;
c_7314705.num_args = 1;
c_7314705.num_elements = 2;
c_7314705.elements = (object *)e_7314715;
c_7314705.elements[0] = ((closureN)self_736291)->elements[0];
c_7314705.elements[1] = ((closureN)self_736291)->elements[1];


make_utf8_string_with_len(c_7314716, "static void c_entry_pt_first_lambda(void *data, object clo, int argc, object *args) {", 85, 85);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314705, &c_7314716);; 
}

static void __lambda_1105(void *data, object self_736292, int argc, object *args) /* object self_736292, object r_733669 */
 {

  
closureN_type c_7314707;
object e_7314711 [1];
c_7314707.hdr.mark = gc_color_red;
 c_7314707.hdr.grayed = 0;
c_7314707.tag = closureN_tag;
 c_7314707.fn = (function_type)__lambda_1106;
c_7314707.num_args = 1;
c_7314707.num_elements = 1;
c_7314707.elements = (object *)e_7314711;
c_7314707.elements[0] = ((closureN)self_736292)->elements[1];



return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314707, car(((closureN)self_736292)->elements[0]));; 
}

static void __lambda_1106(void *data, object self_736293, int argc, object *args) /* object self_736293, object r_733670 */
 {

  
make_utf8_string_with_len(c_7314710, ";", 1, 1);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  ((closureN)self_736293)->elements[0], &c_7314710);; 
}

static void __lambda_1095(void *data, object self_736305, int argc, object *args) /* object self_736305, object k_733696 */
 {
 object k_733696 = args[0];
    
if( (boolean_f != car(((closureN)self_736305)->elements[0])) ){ 
  
make_utf8_string_with_len(c_7314675, "Cyc_global_variables = &", 24, 24);



make_utf8_string_with_len(c_7314679, ";", 1, 1);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  k_733696, &c_7314675, car(((closureN)self_736305)->elements[0]), &c_7314679);
} else { 
  return_direct_with_clo1(data,  k_733696, (((closure)  k_733696)->fn),  Cyc_VOID);}
;; 
}

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

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7314581, quote_pair);}
;; 
}

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

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7314583, r_733760);; 
}

static void __lambda_1074(void *data, object self_736308, int argc, object *args) /* object self_736308, object r_733751 */
 {
 object r_733751 = args[0];
  
closureN_type c_7314585;
object e_7314637 [4];
c_7314585.hdr.mark = gc_color_red;
 c_7314585.hdr.grayed = 0;
c_7314585.tag = closureN_tag;
 c_7314585.fn = (function_type)__lambda_1075;
c_7314585.num_args = 1;
c_7314585.num_elements = 4;
c_7314585.elements = (object *)e_7314637;
c_7314585.elements[0] = ((closureN)self_736308)->elements[0];
c_7314585.elements[1] = ((closureN)self_736308)->elements[1];
c_7314585.elements[2] = ((closureN)self_736308)->elements[2];
c_7314585.elements[3] = r_733751;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7314585, quote_clo);; 
}

static void __lambda_1075(void *data, object self_736309, int argc, object *args) /* object self_736309, object r_733758 */
 {
 object r_733758 = args[0];
  
closureN_type c_7314587;
object e_7314636 [4];
c_7314587.hdr.mark = gc_color_red;
 c_7314587.hdr.grayed = 0;
c_7314587.tag = closureN_tag;
 c_7314587.fn = (function_type)__lambda_1076;
c_7314587.num_args = 1;
c_7314587.num_elements = 4;
c_7314587.elements = (object *)e_7314636;
c_7314587.elements[0] = ((closureN)self_736309)->elements[0];
c_7314587.elements[1] = ((closureN)self_736309)->elements[1];
c_7314587.elements[2] = ((closureN)self_736309)->elements[2];
c_7314587.elements[3] = ((closureN)self_736309)->elements[3];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7314587, r_733758);; 
}

static void __lambda_1076(void *data, object self_736310, int argc, object *args) /* object self_736310, object r_733752 */
 {
 object r_733752 = args[0];
  
closureN_type c_7314589;
object e_7314634 [4];
c_7314589.hdr.mark = gc_color_red;
 c_7314589.hdr.grayed = 0;
c_7314589.tag = closureN_tag;
 c_7314589.fn = (function_type)__lambda_1077;
c_7314589.num_args = 1;
c_7314589.num_elements = 4;
c_7314589.elements = (object *)e_7314634;
c_7314589.elements[0] = ((closureN)self_736310)->elements[0];
c_7314589.elements[1] = ((closureN)self_736310)->elements[2];
c_7314589.elements[2] = ((closureN)self_736310)->elements[3];
c_7314589.elements[3] = r_733752;

return_direct_with_clo2(data,  __glo_lib_117name_91_125string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125string_scheme_cyclone_libraries)->fn),  &c_7314589, ((closureN)self_736310)->elements[1]);; 
}

static void __lambda_1077(void *data, object self_736311, int argc, object *args) /* object self_736311, object r_733757 */
 {
 object r_733757 = args[0];
  
closureN_type c_7314591;
object e_7314628 [4];
c_7314591.hdr.mark = gc_color_red;
 c_7314591.hdr.grayed = 0;
c_7314591.tag = closureN_tag;
 c_7314591.fn = (function_type)__lambda_1078;
c_7314591.num_args = 1;
c_7314591.num_elements = 4;
c_7314591.elements = (object *)e_7314628;
c_7314591.elements[0] = ((closureN)self_736311)->elements[0];
c_7314591.elements[1] = ((closureN)self_736311)->elements[1];
c_7314591.elements[2] = ((closureN)self_736311)->elements[2];
c_7314591.elements[3] = ((closureN)self_736311)->elements[3];


make_utf8_string_with_len(c_7314632, "c_", 2, 2);

make_utf8_string_with_len(c_7314633, "_inlinable_lambdas", 18, 18);

object c_7314631 = Cyc_string_append(data,(closure)&c_7314591,3,&c_7314632, r_733757, &c_7314633);
return_closcall1(data,(closure)&c_7314591,  c_7314631);; 
}

static void __lambda_1078(void *data, object self_736312, int argc, object *args) /* object self_736312, object r_733753 */
 {
 object r_733753 = args[0];
  
closureN_type c_7314593;
object e_7314625 [2];
c_7314593.hdr.mark = gc_color_red;
 c_7314593.hdr.grayed = 0;
c_7314593.tag = closureN_tag;
 c_7314593.fn = (function_type)__lambda_1079;
c_7314593.num_args = 3;
c_7314593.num_elements = 2;
c_7314593.elements = (object *)e_7314625;
c_7314593.elements[0] = ((closureN)self_736312)->elements[0];
c_7314593.elements[1] = ((closureN)self_736312)->elements[1];

return_direct_with_clo3(data,(closure)&c_7314593,__lambda_1079,  ((closureN)self_736312)->elements[2], ((closureN)self_736312)->elements[3], r_733753);; 
}

static void __lambda_1079(void *data, object self_736313, int argc, object *args) /* object self_736313, object pair_91sym_731346_731914, object clo_91sym_731347_731915, object fnc_731348_731916 */
 {
 object pair_91sym_731346_731914 = args[0]; object clo_91sym_731347_731915 = args[1]; object fnc_731348_731916 = args[2];
  
closureN_type c_7314595;
object e_7314621 [5];
c_7314595.hdr.mark = gc_color_red;
 c_7314595.hdr.grayed = 0;
c_7314595.tag = closureN_tag;
 c_7314595.fn = (function_type)__lambda_1080;
c_7314595.num_args = 1;
c_7314595.num_elements = 5;
c_7314595.elements = (object *)e_7314621;
c_7314595.elements[0] = clo_91sym_731347_731915;
c_7314595.elements[1] = fnc_731348_731916;
c_7314595.elements[2] = ((closureN)self_736313)->elements[0];
c_7314595.elements[3] = pair_91sym_731346_731914;
c_7314595.elements[4] = ((closureN)self_736313)->elements[1];


make_utf8_string_with_len(c_7314622, "  mclosure0(", 12, 12);

make_utf8_string_with_len(c_7314623, ", ", 2, 2);

make_utf8_string_with_len(c_7314624, "); ", 3, 3);
return_direct_with_clo6(data,  __glo_emits_85_scheme_cyclone_cgen, (((closure)  __glo_emits_85_scheme_cyclone_cgen)->fn),  &c_7314595, &c_7314622, clo_91sym_731347_731915, &c_7314623, fnc_731348_731916, &c_7314624);; 
}

static void __lambda_1080(void *data, object self_736314, int argc, object *args) /* object self_736314, object r_733754 */
 {

  
closureN_type c_7314597;
object e_7314613 [3];
c_7314597.hdr.mark = gc_color_red;
 c_7314597.hdr.grayed = 0;
c_7314597.tag = closureN_tag;
 c_7314597.fn = (function_type)__lambda_1081;
c_7314597.num_args = 1;
c_7314597.num_elements = 3;
c_7314597.elements = (object *)e_7314613;
c_7314597.elements[0] = ((closureN)self_736314)->elements[2];
c_7314597.elements[1] = ((closureN)self_736314)->elements[3];
c_7314597.elements[2] = ((closureN)self_736314)->elements[4];


make_utf8_string_with_len(c_7314614, "make_pair(", 10, 10);

make_utf8_string_with_len(c_7314616, ", find_or_add_symbol(\"", 22, 22);

make_utf8_string_with_len(c_7314618, "\"), &", 5, 5);

make_utf8_string_with_len(c_7314620, ");\n", 3, 3);
return_direct_with_clo8(data,  __glo_emits_85_scheme_cyclone_cgen, (((closure)  __glo_emits_85_scheme_cyclone_cgen)->fn),  &c_7314597, &c_7314614, ((closureN)self_736314)->elements[3], &c_7314616, ((closureN)self_736314)->elements[1], &c_7314618, ((closureN)self_736314)->elements[0], &c_7314620);; 
}

static void __lambda_1081(void *data, object self_736315, int argc, object *args) /* object self_736315, object r_733755 */
 {

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


pair_type local_7314608; 


return_direct_with_clo1(data,(closure)&c_7314599,__lambda_1082,  set_pair_as_expr(&local_7314608, ((closureN)self_736315)->elements[1], car(((closureN)self_736315)->elements[2])));; 
}

static void __lambda_1082(void *data, object self_736316, int argc, object *args) /* object self_736316, object r_733756 */
 {
 object r_733756 = args[0];
  

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

static void __lambda_1050(void *data, object self_736317, int argc, object *args) /* object self_736317, object k_733791 */
 {
 object k_733791 = args[0];
  if( (boolean_f != ((closureN)self_736317)->elements[1]) ){ 
  
closureN_type c_7314513;
object e_7314532 [2];
c_7314513.hdr.mark = gc_color_red;
 c_7314513.hdr.grayed = 0;
c_7314513.tag = closureN_tag;
 c_7314513.fn = (function_type)__lambda_1051;
c_7314513.num_args = 1;
c_7314513.num_elements = 2;
c_7314513.elements = (object *)e_7314532;
c_7314513.elements[0] = k_733791;
c_7314513.elements[1] = ((closureN)self_736317)->elements[2];


make_utf8_string_with_len(c_7314533, "static void c_entry_pt_first_lambda(void *data, object clo, int argc, object *args);", 84, 84);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_7314513, &c_7314533);
} else { 
  
closureN_type c_7314535;
object e_7314540 [1];
c_7314535.hdr.mark = gc_color_red;
 c_7314535.hdr.grayed = 0;
c_7314535.tag = closureN_tag;
 c_7314535.fn = (function_type)__lambda_1056;
c_7314535.num_args = 1;
c_7314535.num_elements = 1;
c_7314535.elements = (object *)e_7314540;
c_7314535.elements[0] = k_733791;

return_direct_with_clo2(data,  __glo_lib_117name_91_125string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125string_scheme_cyclone_libraries)->fn),  &c_7314535, ((closureN)self_736317)->elements[0]);}
;; 
}

static void __lambda_1056(void *data, object self_736323, int argc, object *args) /* object self_736323, object r_733797 */
 {
 object r_733797 = args[0];
  
make_utf8_string_with_len(c_7314538, "void c_", 7, 7);

make_utf8_string_with_len(c_7314539, "_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ ", 72, 72);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736323)->elements[0], &c_7314538, r_733797, &c_7314539);; 
}

static void __lambda_1051(void *data, object self_736318, int argc, object *args) /* object self_736318, object r_733792 */
 {

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


mclosure0(c_7314524, (function_type)__lambda_1054);c_7314524.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314515,__lambda_1052,  &c_7314524);; 
}

static void __lambda_1054(void *data, object self_736319, int argc, object *args) /* object self_736319, object k_733795, object lib_91name_731331_731905 */
 {
 object k_733795 = args[0]; object lib_91name_731331_731905 = args[1];
  
closureN_type c_7314526;
object e_7314531 [1];
c_7314526.hdr.mark = gc_color_red;
 c_7314526.hdr.grayed = 0;
c_7314526.tag = closureN_tag;
 c_7314526.fn = (function_type)__lambda_1055;
c_7314526.num_args = 1;
c_7314526.num_elements = 1;
c_7314526.elements = (object *)e_7314531;
c_7314526.elements[0] = k_733795;

return_direct_with_clo2(data,  __glo_lib_117name_91_125string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125string_scheme_cyclone_libraries)->fn),  &c_7314526, lib_91name_731331_731905);; 
}

static void __lambda_1055(void *data, object self_736320, int argc, object *args) /* object self_736320, object r_733796 */
 {
 object r_733796 = args[0];
  
make_utf8_string_with_len(c_7314529, "extern void c_", 14, 14);

make_utf8_string_with_len(c_7314530, "_entry_pt(void *data, object clo, int argc, object* args);", 58, 58);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736320)->elements[0], &c_7314529, r_733796, &c_7314530);; 
}

static void __lambda_1052(void *data, object self_736321, int argc, object *args) /* object self_736321, object r_733794 */
 {
 object r_733794 = args[0];
  
closureN_type c_7314517;
object e_7314521 [1];
c_7314517.hdr.mark = gc_color_red;
 c_7314517.hdr.grayed = 0;
c_7314517.tag = closureN_tag;
 c_7314517.fn = (function_type)__lambda_1053;
c_7314517.num_args = 1;
c_7314517.num_elements = 1;
c_7314517.elements = (object *)e_7314521;
c_7314517.elements[0] = ((closureN)self_736321)->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_7314517, r_733794, ((closureN)self_736321)->elements[1]);; 
}

static void __lambda_1053(void *data, object self_736322, int argc, object *args) /* object self_736322, object r_733793 */
 {

  
make_utf8_string_with_len(c_7314520, "static void c_entry_pt(void *data, object clo, int argc, object *args) { ", 73, 73);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  ((closureN)self_736322)->elements[0], &c_7314520);; 
}

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

return_direct_with_clo2(data,  __glo_lib_117name_91_125string_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125string_scheme_cyclone_libraries)->fn),  &c_7314244, ((closureN)self_736324)->elements[0]);}
;; 
}

static void __lambda_1016(void *data, object self_736325, int argc, object *args) /* object self_736325, object r_733850 */
 {
 object r_733850 = args[0];
  
closureN_type c_7314246;
object e_7314502 [1];
c_7314246.hdr.mark = gc_color_red;
 c_7314246.hdr.grayed = 0;
c_7314246.tag = closureN_tag;
 c_7314246.fn = (function_type)__lambda_1017;
c_7314246.num_args = 1;
c_7314246.num_elements = 1;
c_7314246.elements = (object *)e_7314502;
c_7314246.elements[0] = ((closureN)self_736325)->elements[0];


make_utf8_string_with_len(c_7314503, "void c_", 7, 7);

make_utf8_string_with_len(c_7314504, "_inlinable_lambdas(void *data, object clo, int argc, object *args){ ", 68, 68);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  &c_7314246, &c_7314503, r_733850, &c_7314504);; 
}

static void __lambda_1017(void *data, object self_736326, int argc, object *args) /* object self_736326, object r_733799 */
 {

  
closureN_type c_7314248;
object e_7314501 [1];
c_7314248.hdr.mark = gc_color_red;
 c_7314248.hdr.grayed = 0;
c_7314248.tag = closureN_tag;
 c_7314248.fn = (function_type)__lambda_1018;
c_7314248.num_args = 2;
c_7314248.num_elements = 1;
c_7314248.elements = (object *)e_7314501;
c_7314248.elements[0] = ((closureN)self_736326)->elements[0];

return_direct_with_clo2(data,(closure)&c_7314248,__lambda_1018,  NULL, boolean_f);; 
}

static void __lambda_1018(void *data, object self_736327, int argc, object *args) /* object self_736327, object pairs_731307_731892, object head_91pair_731308_731893 */
 {
 object pairs_731307_731892 = args[0]; object head_91pair_731308_731893 = args[1];
  
closureN_type c_7314250;
object e_7314497 [2];
c_7314250.hdr.mark = gc_color_red;
 c_7314250.hdr.grayed = 0;
c_7314250.tag = closureN_tag;
 c_7314250.fn = (function_type)__lambda_1328;
c_7314250.num_args = 1;
c_7314250.num_elements = 2;
c_7314250.elements = (object *)e_7314497;
c_7314250.elements[0] = head_91pair_731308_731893;
c_7314250.elements[1] = ((closureN)self_736327)->elements[0];


pair_type local_7314500; 
return_direct_with_clo1(data,(closure)&c_7314250,__lambda_1328,  set_cell_as_expr(&local_7314500, pairs_731307_731892));; 
}

static void __lambda_1328(void *data, object self_736328, int argc, object *args) /* object self_736328, object pairs_731307_731892 */
 {
 object pairs_731307_731892 = args[0];
  
closureN_type c_7314252;
object e_7314492 [2];
c_7314252.hdr.mark = gc_color_red;
 c_7314252.hdr.grayed = 0;
c_7314252.tag = closureN_tag;
 c_7314252.fn = (function_type)__lambda_1327;
c_7314252.num_args = 1;
c_7314252.num_elements = 2;
c_7314252.elements = (object *)e_7314492;
c_7314252.elements[0] = ((closureN)self_736328)->elements[1];
c_7314252.elements[1] = pairs_731307_731892;


pair_type local_7314495; 
return_direct_with_clo1(data,(closure)&c_7314252,__lambda_1327,  set_cell_as_expr(&local_7314495, ((closureN)self_736328)->elements[0]));; 
}

static void __lambda_1327(void *data, object self_736329, int argc, object *args) /* object self_736329, object head_91pair_731308_731893 */
 {
 object head_91pair_731308_731893 = args[0];
  
closureN_type c_7314254;
object e_7314441 [3];
c_7314254.hdr.mark = gc_color_red;
 c_7314254.hdr.grayed = 0;
c_7314254.tag = closureN_tag;
 c_7314254.fn = (function_type)__lambda_1019;
c_7314254.num_args = 1;
c_7314254.num_elements = 3;
c_7314254.elements = (object *)e_7314441;
c_7314254.elements[0] = head_91pair_731308_731893;
c_7314254.elements[1] = ((closureN)self_736329)->elements[0];
c_7314254.elements[2] = ((closureN)self_736329)->elements[1];


closureN_type c_7314442;
object e_7314491 [1];
c_7314442.hdr.mark = gc_color_red;
 c_7314442.hdr.grayed = 0;
c_7314442.tag = closureN_tag;
 c_7314442.fn = (function_type)__lambda_1042;
c_7314442.num_args = 1;
c_7314442.num_elements = 1;
c_7314442.elements = (object *)e_7314491;
c_7314442.elements[0] = ((closureN)self_736329)->elements[1];

return_direct_with_clo1(data,(closure)&c_7314254,__lambda_1019,  &c_7314442);; 
}

static void __lambda_1042(void *data, object self_736330, int argc, object *args) /* object self_736330, object k_733840, object g_731309_731894 */
 {
 object k_733840 = args[0]; object g_731309_731894 = args[1];
  
closureN_type c_7314444;
object e_7314490 [3];
c_7314444.hdr.mark = gc_color_red;
 c_7314444.hdr.grayed = 0;
c_7314444.tag = closureN_tag;
 c_7314444.fn = (function_type)__lambda_1043;
c_7314444.num_args = 1;
c_7314444.num_elements = 3;
c_7314444.elements = (object *)e_7314490;
c_7314444.elements[0] = g_731309_731894;
c_7314444.elements[1] = k_733840;
c_7314444.elements[2] = ((closureN)self_736330)->elements[0];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7314444, quote_pair);; 
}

static void __lambda_1043(void *data, object self_736331, int argc, object *args) /* object self_736331, object r_733848 */
 {
 object r_733848 = args[0];
  
closureN_type c_7314446;
object e_7314489 [3];
c_7314446.hdr.mark = gc_color_red;
 c_7314446.hdr.grayed = 0;
c_7314446.tag = closureN_tag;
 c_7314446.fn = (function_type)__lambda_1044;
c_7314446.num_args = 1;
c_7314446.num_elements = 3;
c_7314446.elements = (object *)e_7314489;
c_7314446.elements[0] = ((closureN)self_736331)->elements[0];
c_7314446.elements[1] = ((closureN)self_736331)->elements[1];
c_7314446.elements[2] = ((closureN)self_736331)->elements[2];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7314446, r_733848);; 
}

static void __lambda_1044(void *data, object self_736332, int argc, object *args) /* object self_736332, object pair_91sym_731310_731895 */
 {
 object pair_91sym_731310_731895 = args[0];
  
closureN_type c_7314448;
object e_7314482 [4];
c_7314448.hdr.mark = gc_color_red;
 c_7314448.hdr.grayed = 0;
c_7314448.tag = closureN_tag;
 c_7314448.fn = (function_type)__lambda_1045;
c_7314448.num_args = 1;
c_7314448.num_elements = 4;
c_7314448.elements = (object *)e_7314482;
c_7314448.elements[0] = ((closureN)self_736332)->elements[0];
c_7314448.elements[1] = ((closureN)self_736332)->elements[1];
c_7314448.elements[2] = pair_91sym_731310_731895;
c_7314448.elements[3] = ((closureN)self_736332)->elements[2];




object c_7314485 = Cyc_symbol2string(data,(closure)&c_7314448,Cyc_car(data, ((closureN)self_736332)->elements[0]));
return_closcall1(data,(closure)&c_7314448,  c_7314485);; 
}

static void __lambda_1045(void *data, object self_736333, int argc, object *args) /* object self_736333, object r_733844 */
 {
 object r_733844 = args[0];
  
closureN_type c_7314450;
object e_7314475 [4];
c_7314450.hdr.mark = gc_color_red;
 c_7314450.hdr.grayed = 0;
c_7314450.tag = closureN_tag;
 c_7314450.fn = (function_type)__lambda_1046;
c_7314450.num_args = 1;
c_7314450.num_elements = 4;
c_7314450.elements = (object *)e_7314475;
c_7314450.elements[0] = ((closureN)self_736333)->elements[1];
c_7314450.elements[1] = ((closureN)self_736333)->elements[2];
c_7314450.elements[2] = ((closureN)self_736333)->elements[3];
c_7314450.elements[3] = r_733844;




object c_7314478 = Cyc_symbol2string(data,(closure)&c_7314450,Cyc_cdr(data, ((closureN)self_736333)->elements[0]));
return_closcall1(data,(closure)&c_7314450,  c_7314478);; 
}

static void __lambda_1046(void *data, object self_736334, int argc, object *args) /* object self_736334, object r_733845 */
 {
 object r_733845 = args[0];
  
closureN_type c_7314452;
object e_7314468 [3];
c_7314452.hdr.mark = gc_color_red;
 c_7314452.hdr.grayed = 0;
c_7314452.tag = closureN_tag;
 c_7314452.fn = (function_type)__lambda_1047;
c_7314452.num_args = 1;
c_7314452.num_elements = 3;
c_7314452.elements = (object *)e_7314468;
c_7314452.elements[0] = ((closureN)self_736334)->elements[0];
c_7314452.elements[1] = ((closureN)self_736334)->elements[1];
c_7314452.elements[2] = ((closureN)self_736334)->elements[2];


make_utf8_string_with_len(c_7314469, "make_pair(", 10, 10);

make_utf8_string_with_len(c_7314471, ", find_or_add_symbol(\"", 22, 22);

make_utf8_string_with_len(c_7314473, "\"), find_or_add_symbol(\"", 24, 24);

make_utf8_string_with_len(c_7314474, "\"));\n", 5, 5);
return_direct_with_clo8(data,  __glo_emits_85_scheme_cyclone_cgen, (((closure)  __glo_emits_85_scheme_cyclone_cgen)->fn),  &c_7314452, &c_7314469, ((closureN)self_736334)->elements[1], &c_7314471, ((closureN)self_736334)->elements[3], &c_7314473, r_733845, &c_7314474);; 
}

static void __lambda_1047(void *data, object self_736335, int argc, object *args) /* object self_736335, object r_733842 */
 {

  
closureN_type c_7314454;
object e_7314460 [2];
c_7314454.hdr.mark = gc_color_red;
 c_7314454.hdr.grayed = 0;
c_7314454.tag = closureN_tag;
 c_7314454.fn = (function_type)__lambda_1048;
c_7314454.num_args = 1;
c_7314454.num_elements = 2;
c_7314454.elements = (object *)e_7314460;
c_7314454.elements[0] = ((closureN)self_736335)->elements[0];
c_7314454.elements[1] = ((closureN)self_736335)->elements[2];


pair_type local_7314463; 


return_direct_with_clo1(data,(closure)&c_7314454,__lambda_1048,  set_pair_as_expr(&local_7314463, ((closureN)self_736335)->elements[1], car(((closureN)self_736335)->elements[2])));; 
}

static void __lambda_1048(void *data, object self_736336, int argc, object *args) /* object self_736336, object r_733843 */
 {
 object r_733843 = args[0];
  

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

static void __lambda_1019(void *data, object self_736337, int argc, object *args) /* object self_736337, object r_733839 */
 {
 object r_733839 = args[0];
  
closureN_type c_7314256;
object e_7314440 [3];
c_7314256.hdr.mark = gc_color_red;
 c_7314256.hdr.grayed = 0;
c_7314256.tag = closureN_tag;
 c_7314256.fn = (function_type)__lambda_1020;
c_7314256.num_args = 1;
c_7314256.num_elements = 3;
c_7314256.elements = (object *)e_7314440;
c_7314256.elements[0] = ((closureN)self_736337)->elements[0];
c_7314256.elements[1] = ((closureN)self_736337)->elements[1];
c_7314256.elements[2] = ((closureN)self_736337)->elements[2];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_7314256, r_733839, __glo__85global_91inlines_85_scheme_cyclone_cgen);; 
}

static void __lambda_1020(void *data, object self_736338, int argc, object *args) /* object self_736338, object r_733801 */
 {

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


mclosure0(c_7314434, (function_type)__lambda_1040);c_7314434.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314258,__lambda_1021,  &c_7314434);; 
}

static void __lambda_1040(void *data, object self_736339, int argc, object *args) /* object self_736339, object k_733836, object _191_731327_731904 */
 {
 object k_733836 = args[0];
  
closureN_type c_7314436;
object e_7314439 [1];
c_7314436.hdr.mark = gc_color_red;
 c_7314436.hdr.grayed = 0;
c_7314436.tag = closureN_tag;
 c_7314436.fn = (function_type)__lambda_1041;
c_7314436.num_args = 1;
c_7314436.num_elements = 1;
c_7314436.elements = (object *)e_7314439;
c_7314436.elements[0] = k_733836;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7314436, quote_c);; 
}

static void __lambda_1041(void *data, object self_736340, int argc, object *args) /* object self_736340, object r_733837 */
 {
 object r_733837 = args[0];
  return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  ((closureN)self_736340)->elements[0], r_733837);; 
}

static void __lambda_1021(void *data, object self_736341, int argc, object *args) /* object self_736341, object r_733835 */
 {
 object r_733835 = args[0];
  
closureN_type c_7314260;
object e_7314429 [3];
c_7314260.hdr.mark = gc_color_red;
 c_7314260.hdr.grayed = 0;
c_7314260.tag = closureN_tag;
 c_7314260.fn = (function_type)__lambda_1022;
c_7314260.num_args = 1;
c_7314260.num_elements = 3;
c_7314260.elements = (object *)e_7314429;
c_7314260.elements[0] = ((closureN)self_736341)->elements[0];
c_7314260.elements[1] = ((closureN)self_736341)->elements[1];
c_7314260.elements[2] = ((closureN)self_736341)->elements[2];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314260, r_733835, car(((closureN)self_736341)->elements[2]));; 
}

static void __lambda_1022(void *data, object self_736342, int argc, object *args) /* object self_736342, object r_733807 */
 {
 object r_733807 = args[0];
  
closureN_type c_7314262;
object e_7314425 [2];
c_7314262.hdr.mark = gc_color_red;
 c_7314262.hdr.grayed = 0;
c_7314262.tag = closureN_tag;
 c_7314262.fn = (function_type)__lambda_1023;
c_7314262.num_args = 3;
c_7314262.num_elements = 2;
c_7314262.elements = (object *)e_7314425;
c_7314262.elements[0] = ((closureN)self_736342)->elements[0];
c_7314262.elements[1] = ((closureN)self_736342)->elements[1];



return_direct_with_clo3(data,(closure)&c_7314262,__lambda_1023,  NULL, car(((closureN)self_736342)->elements[2]), r_733807);; 
}

static void __lambda_1023(void *data, object self_736343, int argc, object *args) /* object self_736343, object code_731312_731896, object ps_731313_731897, object cs_731314_731898 */
 {
 object code_731312_731896 = args[0]; object ps_731313_731897 = args[1]; object cs_731314_731898 = args[2];
  
closureN_type c_7314264;
object e_7314424 [5];
c_7314264.hdr.mark = gc_color_red;
 c_7314264.hdr.grayed = 0;
c_7314264.tag = closureN_tag;
 c_7314264.fn = (function_type)__lambda_1024;
c_7314264.num_args = 1;
c_7314264.num_elements = 5;
c_7314264.elements = (object *)e_7314424;
c_7314264.elements[0] = code_731312_731896;
c_7314264.elements[1] = cs_731314_731898;
c_7314264.elements[2] = ((closureN)self_736343)->elements[0];
c_7314264.elements[3] = ((closureN)self_736343)->elements[1];
c_7314264.elements[4] = ps_731313_731897;

return_direct_with_clo1(data,(closure)&c_7314264,__lambda_1024,  boolean_f);; 
}

static void __lambda_1024(void *data, object self_736344, int argc, object *args) /* object self_736344, object loop_731315_731899 */
 {
 object loop_731315_731899 = args[0];
  
closureN_type c_7314266;
object e_7314420 [5];
c_7314266.hdr.mark = gc_color_red;
 c_7314266.hdr.grayed = 0;
c_7314266.tag = closureN_tag;
 c_7314266.fn = (function_type)__lambda_1326;
c_7314266.num_args = 1;
c_7314266.num_elements = 5;
c_7314266.elements = (object *)e_7314420;
c_7314266.elements[0] = ((closureN)self_736344)->elements[0];
c_7314266.elements[1] = ((closureN)self_736344)->elements[1];
c_7314266.elements[2] = ((closureN)self_736344)->elements[2];
c_7314266.elements[3] = ((closureN)self_736344)->elements[3];
c_7314266.elements[4] = ((closureN)self_736344)->elements[4];


pair_type local_7314423; 
return_direct_with_clo1(data,(closure)&c_7314266,__lambda_1326,  set_cell_as_expr(&local_7314423, loop_731315_731899));; 
}

static void __lambda_1326(void *data, object self_736345, int argc, object *args) /* object self_736345, object loop_731315_731899 */
 {
 object loop_731315_731899 = args[0];
  
closureN_type c_7314268;
object e_7314307 [6];
c_7314268.hdr.mark = gc_color_red;
 c_7314268.hdr.grayed = 0;
c_7314268.tag = closureN_tag;
 c_7314268.fn = (function_type)__lambda_1025;
c_7314268.num_args = 1;
c_7314268.num_elements = 6;
c_7314268.elements = (object *)e_7314307;
c_7314268.elements[0] = ((closureN)self_736345)->elements[0];
c_7314268.elements[1] = ((closureN)self_736345)->elements[1];
c_7314268.elements[2] = ((closureN)self_736345)->elements[2];
c_7314268.elements[3] = ((closureN)self_736345)->elements[3];
c_7314268.elements[4] = loop_731315_731899;
c_7314268.elements[5] = ((closureN)self_736345)->elements[4];


closureN_type c_7314308;
object e_7314419 [2];
c_7314308.hdr.mark = gc_color_red;
 c_7314308.hdr.grayed = 0;
c_7314308.tag = closureN_tag;
 c_7314308.fn = (function_type)__lambda_1031;
c_7314308.num_args = 3;
c_7314308.num_elements = 2;
c_7314308.elements = (object *)e_7314419;
c_7314308.elements[0] = ((closureN)self_736345)->elements[2];
c_7314308.elements[1] = loop_731315_731899;

return_direct_with_clo1(data,(closure)&c_7314268,__lambda_1025,  &c_7314308);; 
}

static void __lambda_1031(void *data, object self_736346, int argc, object *args) /* object self_736346, object k_733810, object code_731316_731900, object ps_731317_731901, object cs_731318_731902 */
 {
 object k_733810 = args[0]; object code_731316_731900 = args[1]; object ps_731317_731901 = args[2]; object cs_731318_731902 = args[3];
    
if( (boolean_f != Cyc_is_null(ps_731317_731901)) ){ 
  
closureN_type c_7314312;
object e_7314316 [2];
c_7314312.hdr.mark = gc_color_red;
 c_7314312.hdr.grayed = 0;
c_7314312.tag = closureN_tag;
 c_7314312.fn = (function_type)__lambda_1032;
c_7314312.num_args = 1;
c_7314312.num_elements = 2;
c_7314312.elements = (object *)e_7314316;
c_7314312.elements[0] = code_731316_731900;
c_7314312.elements[1] = k_733810;


mclosure0(c_7314317, (function_type)__lambda_1033);c_7314317.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7314312,__lambda_1032,  &c_7314317);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ps_731317_731901))) ){ 
  
closureN_type c_7314324;
object e_7314336 [2];
c_7314324.hdr.mark = gc_color_red;
 c_7314324.hdr.grayed = 0;
c_7314324.tag = closureN_tag;
 c_7314324.fn = (function_type)__lambda_1034;
c_7314324.num_args = 0;
c_7314324.num_elements = 2;
c_7314324.elements = (object *)e_7314336;
c_7314324.elements[0] = cs_731318_731902;
c_7314324.elements[1] = ((closureN)self_736346)->elements[0];


closureN_type c_7314337;
object e_7314368 [5];
c_7314337.hdr.mark = gc_color_red;
 c_7314337.hdr.grayed = 0;
c_7314337.tag = closureN_tag;
 c_7314337.fn = (function_type)__lambda_1035;
c_7314337.num_args = 1;
c_7314337.num_elements = 5;
c_7314337.elements = (object *)e_7314368;
c_7314337.elements[0] = code_731316_731900;
c_7314337.elements[1] = cs_731318_731902;
c_7314337.elements[2] = k_733810;
c_7314337.elements[3] = ((closureN)self_736346)->elements[1];
c_7314337.elements[4] = ps_731317_731901;

return_direct_with_clo1(data,(closure)&c_7314324,__lambda_1034,  &c_7314337);
} else { 
  
closureN_type c_7314370;
object e_7314382 [2];
c_7314370.hdr.mark = gc_color_red;
 c_7314370.hdr.grayed = 0;
c_7314370.tag = closureN_tag;
 c_7314370.fn = (function_type)__lambda_1037;
c_7314370.num_args = 0;
c_7314370.num_elements = 2;
c_7314370.elements = (object *)e_7314382;
c_7314370.elements[0] = cs_731318_731902;
c_7314370.elements[1] = ((closureN)self_736346)->elements[0];


closureN_type c_7314383;
object e_7314418 [5];
c_7314383.hdr.mark = gc_color_red;
 c_7314383.hdr.grayed = 0;
c_7314383.tag = closureN_tag;
 c_7314383.fn = (function_type)__lambda_1038;
c_7314383.num_args = 1;
c_7314383.num_elements = 5;
c_7314383.elements = (object *)e_7314418;
c_7314383.elements[0] = code_731316_731900;
c_7314383.elements[1] = cs_731318_731902;
c_7314383.elements[2] = k_733810;
c_7314383.elements[3] = ((closureN)self_736346)->elements[1];
c_7314383.elements[4] = ps_731317_731901;

return_direct_with_clo1(data,(closure)&c_7314370,__lambda_1037,  &c_7314383);}
;}
;; 
}

static void __lambda_1038(void *data, object self_736352, int argc, object *args) /* object self_736352, object r_733824 */
 {

  
closureN_type c_7314385;
object e_7314401 [5];
c_7314385.hdr.mark = gc_color_red;
 c_7314385.hdr.grayed = 0;
c_7314385.tag = closureN_tag;
 c_7314385.fn = (function_type)__lambda_1039;
c_7314385.num_args = 1;
c_7314385.num_elements = 5;
c_7314385.elements = (object *)e_7314401;
c_7314385.elements[0] = ((closureN)self_736352)->elements[0];
c_7314385.elements[1] = ((closureN)self_736352)->elements[1];
c_7314385.elements[2] = ((closureN)self_736352)->elements[2];
c_7314385.elements[3] = ((closureN)self_736352)->elements[3];
c_7314385.elements[4] = ((closureN)self_736352)->elements[4];


make_utf8_string_with_len(c_7314405, "make_pair(", 10, 10);



make_utf8_string_with_len(c_7314409, ", &", 3, 3);



make_utf8_string_with_len(c_7314413, ", &", 3, 3);



make_utf8_string_with_len(c_7314417, ");\n", 3, 3);

object c_7314404 = Cyc_string_append(data,(closure)&c_7314385,7,&c_7314405, Cyc_car(data, ((closureN)self_736352)->elements[1]), &c_7314409, Cyc_car(data, ((closureN)self_736352)->elements[4]), &c_7314413, Cyc_cadr(data, ((closureN)self_736352)->elements[1]), &c_7314417);
return_closcall1(data,(closure)&c_7314385,  c_7314404);; 
}

static void __lambda_1039(void *data, object self_736353, int argc, object *args) /* object self_736353, object r_733828 */
 {
 object r_733828 = args[0];
  


pair_type local_7314393; 




return_closcall4(data,  car(((closureN)self_736353)->elements[3]),  ((closureN)self_736353)->elements[2], set_pair_as_expr(&local_7314393, r_733828, ((closureN)self_736353)->elements[0]), Cyc_cdr(data, ((closureN)self_736353)->elements[4]), Cyc_cdr(data, ((closureN)self_736353)->elements[1]));; 
}

static void __lambda_1037(void *data, object self_736354, int argc, object *args) /* object self_736354, object k_733832 */
 {
 object k_733832 = args[0];
    
if( (boolean_f != car(((closureN)self_736354)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_733832,__lambda_1038,  Cyc_VOID);
} else { 
  



return_direct_with_clo1(data,  k_733832,__lambda_1038,  Cyc_set_cell(data, ((closureN)self_736354)->elements[1], Cyc_car(data, ((closureN)self_736354)->elements[0])));}
;; 
}

static void __lambda_1035(void *data, object self_736349, int argc, object *args) /* object self_736349, object r_733815 */
 {

  
closureN_type c_7314339;
object e_7314355 [5];
c_7314339.hdr.mark = gc_color_red;
 c_7314339.hdr.grayed = 0;
c_7314339.tag = closureN_tag;
 c_7314339.fn = (function_type)__lambda_1036;
c_7314339.num_args = 1;
c_7314339.num_elements = 5;
c_7314339.elements = (object *)e_7314355;
c_7314339.elements[0] = ((closureN)self_736349)->elements[0];
c_7314339.elements[1] = ((closureN)self_736349)->elements[1];
c_7314339.elements[2] = ((closureN)self_736349)->elements[2];
c_7314339.elements[3] = ((closureN)self_736349)->elements[3];
c_7314339.elements[4] = ((closureN)self_736349)->elements[4];


make_utf8_string_with_len(c_7314359, "make_pair(", 10, 10);



make_utf8_string_with_len(c_7314363, ", &", 3, 3);



make_utf8_string_with_len(c_7314367, ", NULL);\n", 9, 9);

object c_7314358 = Cyc_string_append(data,(closure)&c_7314339,5,&c_7314359, Cyc_car(data, ((closureN)self_736349)->elements[1]), &c_7314363, Cyc_car(data, ((closureN)self_736349)->elements[4]), &c_7314367);
return_closcall1(data,(closure)&c_7314339,  c_7314358);; 
}

static void __lambda_1036(void *data, object self_736350, int argc, object *args) /* object self_736350, object r_733819 */
 {
 object r_733819 = args[0];
  


pair_type local_7314347; 




return_closcall4(data,  car(((closureN)self_736350)->elements[3]),  ((closureN)self_736350)->elements[2], set_pair_as_expr(&local_7314347, r_733819, ((closureN)self_736350)->elements[0]), Cyc_cdr(data, ((closureN)self_736350)->elements[4]), Cyc_cdr(data, ((closureN)self_736350)->elements[1]));; 
}

static void __lambda_1034(void *data, object self_736351, int argc, object *args) /* object self_736351, object k_733822 */
 {
 object k_733822 = args[0];
    
if( (boolean_f != car(((closureN)self_736351)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_733822,__lambda_1035,  Cyc_VOID);
} else { 
  



return_direct_with_clo1(data,  k_733822,__lambda_1035,  Cyc_set_cell(data, ((closureN)self_736351)->elements[1], Cyc_car(data, ((closureN)self_736351)->elements[0])));}
;; 
}

static void __lambda_1033(void *data, object self_736347, int argc, object *args) /* object self_736347, object k_733813, object str_731322_731903 */
 {
 object k_733813 = args[0]; object str_731322_731903 = args[1];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  k_733813, str_731322_731903);; 
}

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

static void __lambda_1025(void *data, object self_736355, int argc, object *args) /* object self_736355, object r_733809 */
 {
 object r_733809 = args[0];
  
closureN_type c_7314270;
object e_7314303 [6];
c_7314270.hdr.mark = gc_color_red;
 c_7314270.hdr.grayed = 0;
c_7314270.tag = closureN_tag;
 c_7314270.fn = (function_type)__lambda_1026;
c_7314270.num_args = 1;
c_7314270.num_elements = 6;
c_7314270.elements = (object *)e_7314303;
c_7314270.elements[0] = ((closureN)self_736355)->elements[0];
c_7314270.elements[1] = ((closureN)self_736355)->elements[1];
c_7314270.elements[2] = ((closureN)self_736355)->elements[2];
c_7314270.elements[3] = ((closureN)self_736355)->elements[3];
c_7314270.elements[4] = ((closureN)self_736355)->elements[4];
c_7314270.elements[5] = ((closureN)self_736355)->elements[5];



return_direct_with_clo1(data,(closure)&c_7314270,__lambda_1026,  Cyc_set_cell(data, ((closureN)self_736355)->elements[4], r_733809));; 
}

static void __lambda_1026(void *data, object self_736356, int argc, object *args) /* object self_736356, object r_733808 */
 {

  


closureN_type c_7314275;
object e_7314299 [2];
c_7314275.hdr.mark = gc_color_red;
 c_7314275.hdr.grayed = 0;
c_7314275.tag = closureN_tag;
 c_7314275.fn = (function_type)__lambda_1027;
c_7314275.num_args = 1;
c_7314275.num_elements = 2;
c_7314275.elements = (object *)e_7314299;
c_7314275.elements[0] = ((closureN)self_736356)->elements[2];
c_7314275.elements[1] = ((closureN)self_736356)->elements[3];

return_closcall4(data,  car(((closureN)self_736356)->elements[4]),  &c_7314275, ((closureN)self_736356)->elements[0], ((closureN)self_736356)->elements[5], ((closureN)self_736356)->elements[1]);; 
}

static void __lambda_1027(void *data, object self_736357, int argc, object *args) /* object self_736357, object r_733802 */
 {

  
closureN_type c_7314277;
object e_7314297 [2];
c_7314277.hdr.mark = gc_color_red;
 c_7314277.hdr.grayed = 0;
c_7314277.tag = closureN_tag;
 c_7314277.fn = (function_type)__lambda_1028;
c_7314277.num_args = 1;
c_7314277.num_elements = 2;
c_7314277.elements = (object *)e_7314297;
c_7314277.elements[0] = ((closureN)self_736357)->elements[0];
c_7314277.elements[1] = ((closureN)self_736357)->elements[1];


make_utf8_string_with_len(c_7314298, "object buf[1]; object cont = args[0];", 37, 37);
return_direct_with_clo2(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  &c_7314277, &c_7314298);; 
}

static void __lambda_1028(void *data, object self_736358, int argc, object *args) /* object self_736358, object r_733803 */
 {

  
closureN_type c_7314279;
object e_7314291 [1];
c_7314279.hdr.mark = gc_color_red;
 c_7314279.hdr.grayed = 0;
c_7314279.tag = closureN_tag;
 c_7314279.fn = (function_type)__lambda_1029;
c_7314279.num_args = 0;
c_7314279.num_elements = 1;
c_7314279.elements = (object *)e_7314291;
c_7314279.elements[0] = ((closureN)self_736358)->elements[0];


closureN_type c_7314292;
object e_7314296 [1];
c_7314292.hdr.mark = gc_color_red;
 c_7314292.hdr.grayed = 0;
c_7314292.tag = closureN_tag;
 c_7314292.fn = (function_type)__lambda_1030;
c_7314292.num_args = 1;
c_7314292.num_elements = 1;
c_7314292.elements = (object *)e_7314296;
c_7314292.elements[0] = ((closureN)self_736358)->elements[1];

return_direct_with_clo1(data,(closure)&c_7314279,__lambda_1029,  &c_7314292);; 
}

static void __lambda_1030(void *data, object self_736359, int argc, object *args) /* object self_736359, object r_733804 */
 {

  
make_utf8_string_with_len(c_7314295, " } ", 3, 3);
return_direct_with_clo2(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  ((closureN)self_736359)->elements[0], &c_7314295);; 
}

static void __lambda_1029(void *data, object self_736360, int argc, object *args) /* object self_736360, object k_733805 */
 {
 object k_733805 = args[0];
    
if( (boolean_f != car(((closureN)self_736360)->elements[0])) ){ 
  
make_utf8_string_with_len(c_7314284, "buf[0] = &", 10, 10);



make_utf8_string_with_len(c_7314288, "; (((closure)cont)->fn)(data, cont, 1, buf);", 44, 44);
return_direct_with_clo4(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  k_733805, &c_7314284, car(((closureN)self_736360)->elements[0]), &c_7314288);
} else { 
  
make_utf8_string_with_len(c_7314290, "buf[0] = NULL; (((closure)cont)->fn)(data, cont, 1, buf);", 57, 57);
return_direct_with_clo2(data,  __glo_emit_85_scheme_cyclone_cgen, (((closure)  __glo_emit_85_scheme_cyclone_cgen)->fn),  k_733805, &c_7314290);}
;; 
}

static void __lambda_1004(void *data, object self_736361, int argc, object *args) /* object self_736361, object k_733948 */
 {
 object k_733948 = args[0];
  if( (boolean_f != ((closureN)self_736361)->elements[0]) ){ 
  
make_utf8_string_with_len(c_7314217, "#include \"cyclone/runtime-main.h\"", 33, 33);
return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  k_733948, &c_7314217);
} else { 
  return_direct_with_clo1(data,  k_733948, (((closure)  k_733948)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_965(void *data, object _, int argc, object *args) /* closure _,object k_733609, object import_91db_731197_731852, object ident_731198_731853, object error_127_731199_731854 */
 {
object k_733609 = args[0]; object import_91db_731197_731852 = args[1]; object ident_731198_731853 = args[2]; object error_127_731199_731854 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:mangle-exported-ident");

closureN_type c_7314090;
object e_7314143 [3];
c_7314090.hdr.mark = gc_color_red;
 c_7314090.hdr.grayed = 0;
c_7314090.tag = closureN_tag;
 c_7314090.fn = (function_type)__lambda_966;
c_7314090.num_args = 1;
c_7314090.num_elements = 3;
c_7314090.elements = (object *)e_7314143;
c_7314090.elements[0] = error_127_731199_731854;
c_7314090.elements[1] = ident_731198_731853;
c_7314090.elements[2] = k_733609;

return_direct_with_clo3(data,  __glo_lib_117idb_117lookup_scheme_cyclone_libraries, (((closure)  __glo_lib_117idb_117lookup_scheme_cyclone_libraries)->fn),  &c_7314090, import_91db_731197_731852, ident_731198_731853);; 
}

static void __lambda_966(void *data, object self_736073, int argc, object *args) /* object self_736073, object idb_91entry_731200_731855 */
 {
 object idb_91entry_731200_731855 = args[0];
  if( (boolean_f != idb_91entry_731200_731855) ){ 
  
closureN_type c_7314092;
object e_7314112 [2];
c_7314092.hdr.mark = gc_color_red;
 c_7314092.hdr.grayed = 0;
c_7314092.tag = closureN_tag;
 c_7314092.fn = (function_type)__lambda_967;
c_7314092.num_args = 1;
c_7314092.num_elements = 2;
c_7314092.elements = (object *)e_7314112;
c_7314092.elements[0] = idb_91entry_731200_731855;
c_7314092.elements[1] = ((closureN)self_736073)->elements[2];


complex_num_type local_7314115; 
return_direct_with_clo1(data,(closure)&c_7314092,__lambda_967,  ((inline_function_type)
                   ((closure)__glo_lib_117idb_117entry_91_125library_91name_191_191inline_191_191_scheme_cyclone_libraries)->fn)(data,&local_7314115, idb_91entry_731200_731855));
} else { 
  if( (boolean_f != ((closureN)self_736073)->elements[0]) ){ 
  
pair_type local_7314121; 

pair_type local_7314124; 

pair_type local_7314127; 

pair_type local_7314130; 

pair_type local_7314133; 

pair_type local_7314136; 

pair_type local_7314139; 
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_736073)->elements[2], set_pair_as_expr(&local_7314121, quote_Unable, set_pair_as_expr(&local_7314124, quote_to, set_pair_as_expr(&local_7314127, quote_find, set_pair_as_expr(&local_7314130, quote_a, set_pair_as_expr(&local_7314133, quote_library, set_pair_as_expr(&local_7314136, quote_importing, set_pair_as_expr(&local_7314139, ((closureN)self_736073)->elements[1], NULL))))))));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736073)->elements[2], (((closure)  ((closureN)self_736073)->elements[2])->fn),  boolean_f);}
;}
;; 
}

static void __lambda_967(void *data, object self_736074, int argc, object *args) /* object self_736074, object r_733614 */
 {
 object r_733614 = args[0];
  
closureN_type c_7314094;
object e_7314111 [2];
c_7314094.hdr.mark = gc_color_red;
 c_7314094.hdr.grayed = 0;
c_7314094.tag = closureN_tag;
 c_7314094.fn = (function_type)__lambda_968;
c_7314094.num_args = 1;
c_7314094.num_elements = 2;
c_7314094.elements = (object *)e_7314111;
c_7314094.elements[0] = ((closureN)self_736074)->elements[0];
c_7314094.elements[1] = ((closureN)self_736074)->elements[1];

return_direct_with_clo2(data,  __glo_import_91_125string_scheme_cyclone_cgen, (((closure)  __glo_import_91_125string_scheme_cyclone_cgen)->fn),  &c_7314094, r_733614);; 
}

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

return_direct_with_clo2(data,  __glo_lib_117idb_117entry_91_125library_91id_scheme_cyclone_libraries, (((closure)  __glo_lib_117idb_117entry_91_125library_91id_scheme_cyclone_libraries)->fn),  &c_7314096, ((closureN)self_736075)->elements[0]);; 
}

static void __lambda_969(void *data, object self_736076, int argc, object *args) /* object self_736076, object r_733613 */
 {
 object r_733613 = args[0];
  
closureN_type c_7314098;
object e_7314108 [2];
c_7314098.hdr.mark = gc_color_red;
 c_7314098.hdr.grayed = 0;
c_7314098.tag = closureN_tag;
 c_7314098.fn = (function_type)__lambda_970;
c_7314098.num_args = 1;
c_7314098.num_elements = 2;
c_7314098.elements = (object *)e_7314108;
c_7314098.elements[0] = ((closureN)self_736076)->elements[0];
c_7314098.elements[1] = ((closureN)self_736076)->elements[1];

return_direct_with_clo2(data,  __glo_mangle_91global_scheme_cyclone_util, (((closure)  __glo_mangle_91global_scheme_cyclone_util)->fn),  &c_7314098, r_733613);; 
}

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

return_direct_with_clo2(data,(closure)&c_7314100,__lambda_971,  ((closureN)self_736077)->elements[1], r_733612);; 
}

static void __lambda_971(void *data, object self_736078, int argc, object *args) /* object self_736078, object suffix_731208_731856, object prefix_731209_731857 */
 {
 object suffix_731208_731856 = args[0]; object prefix_731209_731857 = args[1];
  
object c_7314105 = Cyc_string_append(data,  ((closureN)self_736078)->elements[0],2,prefix_731209_731857, suffix_731208_731856);
return_direct_with_clo1(data,  ((closureN)self_736078)->elements[0], (((closure)  ((closureN)self_736078)->elements[0])->fn),  c_7314105);; 
}

static void __lambda_960(void *data, object _, int argc, object *args) /* closure _,object k_733602, object import_731194_731849 */
 {
object k_733602 = args[0]; object import_731194_731849 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:import->string");

closureN_type c_7314067;
object e_7314076 [2];
c_7314067.hdr.mark = gc_color_red;
 c_7314067.hdr.grayed = 0;
c_7314067.tag = closureN_tag;
 c_7314067.fn = (function_type)__lambda_961;
c_7314067.num_args = 1;
c_7314067.num_elements = 2;
c_7314067.elements = (object *)e_7314076;
c_7314067.elements[0] = import_731194_731849;
c_7314067.elements[1] = k_733602;


mclosure0(c_7314077, (function_type)__lambda_963);c_7314077.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7314067,__lambda_961,  &c_7314077);; 
}

static void __lambda_963(void *data, object self_736069, int argc, object *args) /* object self_736069, object k_733605, object id_731195_731850, object s_731196_731851 */
 {
 object k_733605 = args[0]; object id_731195_731850 = args[1]; object s_731196_731851 = args[2];
  
closureN_type c_7314079;
object e_7314087 [2];
c_7314079.hdr.mark = gc_color_red;
 c_7314079.hdr.grayed = 0;
c_7314079.tag = closureN_tag;
 c_7314079.fn = (function_type)__lambda_964;
c_7314079.num_args = 1;
c_7314079.num_elements = 2;
c_7314079.elements = (object *)e_7314087;
c_7314079.elements[0] = k_733605;
c_7314079.elements[1] = s_731196_731851;

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7314079, id_731195_731850);; 
}

static void __lambda_964(void *data, object self_736070, int argc, object *args) /* object self_736070, object r_733606 */
 {
 object r_733606 = args[0];
  
make_utf8_string_with_len(c_7314085, "_", 1, 1);

object c_7314084 = Cyc_string_append(data,  ((closureN)self_736070)->elements[0],3,&c_7314085, r_733606, ((closureN)self_736070)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_736070)->elements[0], (((closure)  ((closureN)self_736070)->elements[0])->fn),  c_7314084);; 
}

static void __lambda_961(void *data, object self_736071, int argc, object *args) /* object self_736071, object r_733603 */
 {
 object r_733603 = args[0];
  
closureN_type c_7314069;
object e_7314074 [2];
c_7314069.hdr.mark = gc_color_red;
 c_7314069.hdr.grayed = 0;
c_7314069.tag = closureN_tag;
 c_7314069.fn = (function_type)__lambda_962;
c_7314069.num_args = 1;
c_7314069.num_elements = 2;
c_7314069.elements = (object *)e_7314074;
c_7314069.elements[0] = ((closureN)self_736071)->elements[1];
c_7314069.elements[1] = r_733603;

return_direct_with_clo2(data,  __glo_lib_117list_91_125import_91set_scheme_cyclone_libraries, (((closure)  __glo_lib_117list_91_125import_91set_scheme_cyclone_libraries)->fn),  &c_7314069, ((closureN)self_736071)->elements[0]);; 
}

static void __lambda_962(void *data, object self_736072, int argc, object *args) /* object self_736072, object r_733604 */
 {
 object r_733604 = args[0];
  
make_utf8_string_with_len(c_7314073, "", 0, 0);
return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_736072)->elements[0], ((closureN)self_736072)->elements[1], &c_7314073, r_733604);; 
}

static void __lambda_958(void *data, object _, int argc, object *args) /* closure _,object k_733595, object exp_731188_731846 */
 {
object k_733595 = args[0]; object exp_731188_731846 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:ast:lambda-varargs?");

closureN_type c_7314053;
object e_7314064 [1];
c_7314053.hdr.mark = gc_color_red;
 c_7314053.hdr.grayed = 0;
c_7314053.tag = closureN_tag;
 c_7314053.fn = (function_type)__lambda_959;
c_7314053.num_args = 1;
c_7314053.num_elements = 1;
c_7314053.elements = (object *)e_7314064;
c_7314053.elements[0] = k_733595;

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms)->fn),  &c_7314053, exp_731188_731846);; 
}

static void __lambda_959(void *data, object self_736068, int argc, object *args) /* object self_736068, object type_731189_731847 */
 {
 object type_731189_731847 = args[0];
    
if( (boolean_f != equalp(type_731189_731847, quote_args_117varargs)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_736068)->elements[0], (((closure)  ((closureN)self_736068)->elements[0])->fn),  equalp(type_731189_731847, quote_args_117varargs));
} else { 
  

return_direct_with_clo1(data,  ((closureN)self_736068)->elements[0], (((closure)  ((closureN)self_736068)->elements[0])->fn),  equalp(type_731189_731847, quote_args_117fixed_91with_91varargs));}
;; 
}

static void __lambda_953(void *data, object _, int argc, object *args) /* closure _,object k_733586, object exp_731187_731845 */
 {
object k_733586 = args[0]; object exp_731187_731845 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:ast:lambda-varargs-var");

closureN_type c_7314027;
object e_7314050 [2];
c_7314027.hdr.mark = gc_color_red;
 c_7314027.hdr.grayed = 0;
c_7314027.tag = closureN_tag;
 c_7314027.fn = (function_type)__lambda_954;
c_7314027.num_args = 1;
c_7314027.num_elements = 2;
c_7314027.elements = (object *)e_7314050;
c_7314027.elements[0] = exp_731187_731845;
c_7314027.elements[1] = k_733586;

return_direct_with_clo2(data,  __glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen, (((closure)  __glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen)->fn),  &c_7314027, exp_731187_731845);; 
}

static void __lambda_954(void *data, object self_736064, int argc, object *args) /* object self_736064, object r_733587 */
 {
 object r_733587 = args[0];
  if( (boolean_f != r_733587) ){ 
  
closureN_type c_7314029;
object e_7314046 [2];
c_7314029.hdr.mark = gc_color_red;
 c_7314029.hdr.grayed = 0;
c_7314029.tag = closureN_tag;
 c_7314029.fn = (function_type)__lambda_955;
c_7314029.num_args = 1;
c_7314029.num_elements = 2;
c_7314029.elements = (object *)e_7314046;
c_7314029.elements[0] = ((closureN)self_736064)->elements[0];
c_7314029.elements[1] = ((closureN)self_736064)->elements[1];

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms)->fn),  &c_7314029, ((closureN)self_736064)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736064)->elements[1], (((closure)  ((closureN)self_736064)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_955(void *data, object self_736065, int argc, object *args) /* object self_736065, object r_733591 */
 {
 object r_733591 = args[0];
    
if( (boolean_f != equalp(r_733591, quote_args_117varargs)) ){ 
  return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  ((closureN)self_736065)->elements[1], ((closureN)self_736065)->elements[0]);
} else { 
  
closureN_type c_7314036;
object e_7314044 [1];
c_7314036.hdr.mark = gc_color_red;
 c_7314036.hdr.grayed = 0;
c_7314036.tag = closureN_tag;
 c_7314036.fn = (function_type)__lambda_956;
c_7314036.num_args = 1;
c_7314036.num_elements = 1;
c_7314036.elements = (object *)e_7314044;
c_7314036.elements[0] = ((closureN)self_736065)->elements[1];

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_7314036, ((closureN)self_736065)->elements[0]);}
;; 
}

static void __lambda_956(void *data, object self_736066, int argc, object *args) /* object self_736066, object r_733590 */
 {
 object r_733590 = args[0];
  
closureN_type c_7314038;
object e_7314043 [1];
c_7314038.hdr.mark = gc_color_red;
 c_7314038.hdr.grayed = 0;
c_7314038.tag = closureN_tag;
 c_7314038.fn = (function_type)__lambda_957;
c_7314038.num_args = 1;
c_7314038.num_elements = 1;
c_7314038.elements = (object *)e_7314043;
c_7314038.elements[0] = ((closureN)self_736066)->elements[0];

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_7314038, r_733590);; 
}

static void __lambda_957(void *data, object self_736067, int argc, object *args) /* object self_736067, object r_733589 */
 {
 object r_733589 = args[0];
  

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

static void __lambda_861(void *data, object _, int argc, object *args) /* closure _,object k_733473, object exp_731097_731813, object trace_731098_731814, object cps_127_731099_731815 */
 {
object k_733473 = args[0]; object exp_731097_731813 = args[1]; object trace_731098_731814 = args[2]; object cps_127_731099_731815 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-lambda");

closureN_type c_7313405;
object e_7314023 [4];
c_7313405.hdr.mark = gc_color_red;
 c_7313405.hdr.grayed = 0;
c_7313405.tag = closureN_tag;
 c_7313405.fn = (function_type)__lambda_862;
c_7313405.num_args = 1;
c_7313405.num_elements = 4;
c_7313405.elements = (object *)e_7314023;
c_7313405.elements[0] = cps_127_731099_731815;
c_7313405.elements[1] = exp_731097_731813;
c_7313405.elements[2] = k_733473;
c_7313405.elements[3] = trace_731098_731814;


make_utf8_string_with_len(c_7314024, "", 0, 0);
return_direct_with_clo1(data,(closure)&c_7313405,__lambda_862,  &c_7314024);; 
}

static void __lambda_862(void *data, object self_735969, int argc, object *args) /* object self_735969, object preamble_731102_731816 */
 {
 object preamble_731102_731816 = args[0];
  
closureN_type c_7313407;
object e_7314019 [4];
c_7313407.hdr.mark = gc_color_red;
 c_7313407.hdr.grayed = 0;
c_7313407.tag = closureN_tag;
 c_7313407.fn = (function_type)__lambda_1325;
c_7313407.num_args = 1;
c_7313407.num_elements = 4;
c_7313407.elements = (object *)e_7314019;
c_7313407.elements[0] = ((closureN)self_735969)->elements[0];
c_7313407.elements[1] = ((closureN)self_735969)->elements[1];
c_7313407.elements[2] = ((closureN)self_735969)->elements[2];
c_7313407.elements[3] = ((closureN)self_735969)->elements[3];


pair_type local_7314022; 
return_direct_with_clo1(data,(closure)&c_7313407,__lambda_1325,  set_cell_as_expr(&local_7314022, preamble_731102_731816));; 
}

static void __lambda_1325(void *data, object self_735970, int argc, object *args) /* object self_735970, object preamble_731102_731816 */
 {
 object preamble_731102_731816 = args[0];
  
closureN_type c_7313409;
object e_7314000 [5];
c_7313409.hdr.mark = gc_color_red;
 c_7313409.hdr.grayed = 0;
c_7313409.tag = closureN_tag;
 c_7313409.fn = (function_type)__lambda_863;
c_7313409.num_args = 1;
c_7313409.num_elements = 5;
c_7313409.elements = (object *)e_7314000;
c_7313409.elements[0] = ((closureN)self_735970)->elements[0];
c_7313409.elements[1] = ((closureN)self_735970)->elements[1];
c_7313409.elements[2] = ((closureN)self_735970)->elements[2];
c_7313409.elements[3] = preamble_731102_731816;
c_7313409.elements[4] = ((closureN)self_735970)->elements[3];


closureN_type c_7314001;
object e_7314018 [1];
c_7314001.hdr.mark = gc_color_red;
 c_7314001.hdr.grayed = 0;
c_7314001.tag = closureN_tag;
 c_7314001.fn = (function_type)__lambda_951;
c_7314001.num_args = 1;
c_7314001.num_elements = 1;
c_7314001.elements = (object *)e_7314018;
c_7314001.elements[0] = preamble_731102_731816;

return_direct_with_clo1(data,(closure)&c_7313409,__lambda_863,  &c_7314001);; 
}

static void __lambda_951(void *data, object self_735971, int argc, object *args) /* object self_735971, object k_733580, object s_731186_731844 */
 {
 object k_733580 = args[0]; object s_731186_731844 = args[1];
  
closureN_type c_7314003;
object e_7314009 [2];
c_7314003.hdr.mark = gc_color_red;
 c_7314003.hdr.grayed = 0;
c_7314003.tag = closureN_tag;
 c_7314003.fn = (function_type)__lambda_952;
c_7314003.num_args = 1;
c_7314003.num_elements = 2;
c_7314003.elements = (object *)e_7314009;
c_7314003.elements[0] = k_733580;
c_7314003.elements[1] = ((closureN)self_735971)->elements[0];




make_utf8_string_with_len(c_7314016, "  ", 2, 2);

make_utf8_string_with_len(c_7314017, "\n", 1, 1);

object c_7314012 = Cyc_string_append(data,(closure)&c_7314003,4,car(((closureN)self_735971)->elements[0]), &c_7314016, s_731186_731844, &c_7314017);
return_closcall1(data,(closure)&c_7314003,  c_7314012);; 
}

static void __lambda_952(void *data, object self_735972, int argc, object *args) /* object self_735972, object r_733581 */
 {
 object r_733581 = args[0];
  

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

static void __lambda_863(void *data, object self_735973, int argc, object *args) /* object self_735973, object append_91preamble_731105_731817 */
 {
 object append_91preamble_731105_731817 = args[0];
  
closureN_type c_7313411;
object e_7313423 [2];
c_7313411.hdr.mark = gc_color_red;
 c_7313411.hdr.grayed = 0;
c_7313411.tag = closureN_tag;
 c_7313411.fn = (function_type)__lambda_864;
c_7313411.num_args = 0;
c_7313411.num_elements = 2;
c_7313411.elements = (object *)e_7313423;
c_7313411.elements[0] = ((closureN)self_735973)->elements[0];
c_7313411.elements[1] = ((closureN)self_735973)->elements[1];


closureN_type c_7313424;
object e_7313999 [6];
c_7313424.hdr.mark = gc_color_red;
 c_7313424.hdr.grayed = 0;
c_7313424.tag = closureN_tag;
 c_7313424.fn = (function_type)__lambda_866;
c_7313424.num_args = 1;
c_7313424.num_elements = 6;
c_7313424.elements = (object *)e_7313999;
c_7313424.elements[0] = append_91preamble_731105_731817;
c_7313424.elements[1] = ((closureN)self_735973)->elements[0];
c_7313424.elements[2] = ((closureN)self_735973)->elements[1];
c_7313424.elements[3] = ((closureN)self_735973)->elements[2];
c_7313424.elements[4] = ((closureN)self_735973)->elements[3];
c_7313424.elements[5] = ((closureN)self_735973)->elements[4];

return_direct_with_clo1(data,(closure)&c_7313411,__lambda_864,  &c_7313424);; 
}

static void __lambda_866(void *data, object self_735974, int argc, object *args) /* object self_735974, object r_733576 */
 {
 object r_733576 = args[0];
  
closureN_type c_7313426;
object e_7313997 [7];
c_7313426.hdr.mark = gc_color_red;
 c_7313426.hdr.grayed = 0;
c_7313426.tag = closureN_tag;
 c_7313426.fn = (function_type)__lambda_867;
c_7313426.num_args = 1;
c_7313426.num_elements = 7;
c_7313426.elements = (object *)e_7313997;
c_7313426.elements[0] = ((closureN)self_735974)->elements[0];
c_7313426.elements[1] = ((closureN)self_735974)->elements[1];
c_7313426.elements[2] = ((closureN)self_735974)->elements[2];
c_7313426.elements[3] = ((closureN)self_735974)->elements[3];
c_7313426.elements[4] = ((closureN)self_735974)->elements[4];
c_7313426.elements[5] = r_733576;
c_7313426.elements[6] = ((closureN)self_735974)->elements[5];

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms)->fn),  &c_7313426, ((closureN)self_735974)->elements[2]);; 
}

static void __lambda_867(void *data, object self_735975, int argc, object *args) /* object self_735975, object r_733577 */
 {
 object r_733577 = args[0];
  
closureN_type c_7313428;
object e_7313995 [6];
c_7313428.hdr.mark = gc_color_red;
 c_7313428.hdr.grayed = 0;
c_7313428.tag = closureN_tag;
 c_7313428.fn = (function_type)__lambda_868;
c_7313428.num_args = 1;
c_7313428.num_elements = 6;
c_7313428.elements = (object *)e_7313995;
c_7313428.elements[0] = ((closureN)self_735975)->elements[0];
c_7313428.elements[1] = ((closureN)self_735975)->elements[1];
c_7313428.elements[2] = ((closureN)self_735975)->elements[2];
c_7313428.elements[3] = ((closureN)self_735975)->elements[3];
c_7313428.elements[4] = ((closureN)self_735975)->elements[4];
c_7313428.elements[5] = ((closureN)self_735975)->elements[6];

return_direct_with_clo3(data,  __glo_c_91compile_91formals_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91formals_scheme_cyclone_cgen)->fn),  &c_7313428, ((closureN)self_735975)->elements[5], r_733577);; 
}

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


closureN_type c_7313467;
object e_7313994 [7];
c_7313467.hdr.mark = gc_color_red;
 c_7313467.hdr.grayed = 0;
c_7313467.tag = closureN_tag;
 c_7313467.fn = (function_type)__lambda_875;
c_7313467.num_args = 1;
c_7313467.num_elements = 7;
c_7313467.elements = (object *)e_7313994;
c_7313467.elements[0] = ((closureN)self_735976)->elements[0];
c_7313467.elements[1] = ((closureN)self_735976)->elements[1];
c_7313467.elements[2] = ((closureN)self_735976)->elements[2];
c_7313467.elements[3] = formals_731109_731818;
c_7313467.elements[4] = ((closureN)self_735976)->elements[3];
c_7313467.elements[5] = ((closureN)self_735976)->elements[4];
c_7313467.elements[6] = ((closureN)self_735976)->elements[5];

return_direct_with_clo1(data,(closure)&c_7313430,__lambda_869,  &c_7313467);; 
}

static void __lambda_875(void *data, object self_735977, int argc, object *args) /* object self_735977, object tmp_91ident_731112_731819 */
 {
 object tmp_91ident_731112_731819 = args[0];
  object return_91type_731115_731820;
  if( (boolean_f != ((closureN)self_735977)->elements[1]) ){ 
  object c_7313471;
 alloc_string(data,c_7313471, 4, 4);
char tmp_7313472[] = "void";
memcpy(((string_type *)c_7313471)->str, tmp_7313472,4);
((string_type *)c_7313471)->str[4] = '\0';
  return_91type_731115_731820 = c_7313471;
} else { 
  object c_7313474;
 alloc_string(data,c_7313474, 6, 6);
char tmp_7313475[] = "object";
memcpy(((string_type *)c_7313474)->str, tmp_7313475,6);
((string_type *)c_7313474)->str[6] = '\0';
  return_91type_731115_731820 = c_7313474;}
;
closureN_type c_7313477;
object e_7313483 [1];
c_7313477.hdr.mark = gc_color_red;
 c_7313477.hdr.grayed = 0;
c_7313477.tag = closureN_tag;
 c_7313477.fn = (function_type)__lambda_876;
c_7313477.num_args = 0;
c_7313477.num_elements = 1;
c_7313477.elements = (object *)e_7313483;
c_7313477.elements[0] = ((closureN)self_735977)->elements[1];


closureN_type c_7313484;
object e_7313993 [9];
c_7313484.hdr.mark = gc_color_red;
 c_7313484.hdr.grayed = 0;
c_7313484.tag = closureN_tag;
 c_7313484.fn = (function_type)__lambda_877;
c_7313484.num_args = 1;
c_7313484.num_elements = 9;
c_7313484.elements = (object *)e_7313993;
c_7313484.elements[0] = ((closureN)self_735977)->elements[0];
c_7313484.elements[1] = ((closureN)self_735977)->elements[1];
c_7313484.elements[2] = ((closureN)self_735977)->elements[2];
c_7313484.elements[3] = ((closureN)self_735977)->elements[3];
c_7313484.elements[4] = ((closureN)self_735977)->elements[4];
c_7313484.elements[5] = ((closureN)self_735977)->elements[5];
c_7313484.elements[6] = return_91type_731115_731820;
c_7313484.elements[7] = tmp_91ident_731112_731819;
c_7313484.elements[8] = ((closureN)self_735977)->elements[6];

return_direct_with_clo1(data,(closure)&c_7313477,__lambda_876,  &c_7313484);; 
}

static void __lambda_877(void *data, object self_735978, int argc, object *args) /* object self_735978, object arg_91argc_731118_731821 */
 {
 object arg_91argc_731118_731821 = args[0];
  
closureN_type c_7313486;
object e_7313492 [1];
c_7313486.hdr.mark = gc_color_red;
 c_7313486.hdr.grayed = 0;
c_7313486.tag = closureN_tag;
 c_7313486.fn = (function_type)__lambda_878;
c_7313486.num_args = 0;
c_7313486.num_elements = 1;
c_7313486.elements = (object *)e_7313492;
c_7313486.elements[0] = ((closureN)self_735978)->elements[1];


closureN_type c_7313493;
object e_7313992 [10];
c_7313493.hdr.mark = gc_color_red;
 c_7313493.hdr.grayed = 0;
c_7313493.tag = closureN_tag;
 c_7313493.fn = (function_type)__lambda_879;
c_7313493.num_args = 1;
c_7313493.num_elements = 10;
c_7313493.elements = (object *)e_7313992;
c_7313493.elements[0] = ((closureN)self_735978)->elements[0];
c_7313493.elements[1] = arg_91argc_731118_731821;
c_7313493.elements[2] = ((closureN)self_735978)->elements[1];
c_7313493.elements[3] = ((closureN)self_735978)->elements[2];
c_7313493.elements[4] = ((closureN)self_735978)->elements[3];
c_7313493.elements[5] = ((closureN)self_735978)->elements[4];
c_7313493.elements[6] = ((closureN)self_735978)->elements[5];
c_7313493.elements[7] = ((closureN)self_735978)->elements[6];
c_7313493.elements[8] = ((closureN)self_735978)->elements[7];
c_7313493.elements[9] = ((closureN)self_735978)->elements[8];

return_direct_with_clo1(data,(closure)&c_7313486,__lambda_878,  &c_7313493);; 
}

static void __lambda_879(void *data, object self_735979, int argc, object *args) /* object self_735979, object arg_91closure_731121_731822 */
 {
 object arg_91closure_731121_731822 = args[0];
  
closureN_type c_7313495;
object e_7313514 [1];
c_7313495.hdr.mark = gc_color_red;
 c_7313495.hdr.grayed = 0;
c_7313495.tag = closureN_tag;
 c_7313495.fn = (function_type)__lambda_880;
c_7313495.num_args = 0;
c_7313495.num_elements = 1;
c_7313495.elements = (object *)e_7313514;
c_7313495.elements[0] = ((closureN)self_735979)->elements[8];


closureN_type c_7313515;
object e_7313991 [10];
c_7313515.hdr.mark = gc_color_red;
 c_7313515.hdr.grayed = 0;
c_7313515.tag = closureN_tag;
 c_7313515.fn = (function_type)__lambda_882;
c_7313515.num_args = 1;
c_7313515.num_elements = 10;
c_7313515.elements = (object *)e_7313991;
c_7313515.elements[0] = ((closureN)self_735979)->elements[0];
c_7313515.elements[1] = ((closureN)self_735979)->elements[1];
c_7313515.elements[2] = arg_91closure_731121_731822;
c_7313515.elements[3] = ((closureN)self_735979)->elements[2];
c_7313515.elements[4] = ((closureN)self_735979)->elements[3];
c_7313515.elements[5] = ((closureN)self_735979)->elements[4];
c_7313515.elements[6] = ((closureN)self_735979)->elements[5];
c_7313515.elements[7] = ((closureN)self_735979)->elements[6];
c_7313515.elements[8] = ((closureN)self_735979)->elements[7];
c_7313515.elements[9] = ((closureN)self_735979)->elements[9];

return_direct_with_clo1(data,(closure)&c_7313495,__lambda_880,  &c_7313515);; 
}

static void __lambda_882(void *data, object self_735980, int argc, object *args) /* object self_735980, object has_91closure_127_731124_731823 */
 {
 object has_91closure_127_731124_731823 = args[0];
  
closureN_type c_7313517;
object e_7313989 [11];
c_7313517.hdr.mark = gc_color_red;
 c_7313517.hdr.grayed = 0;
c_7313517.tag = closureN_tag;
 c_7313517.fn = (function_type)__lambda_883;
c_7313517.num_args = 1;
c_7313517.num_elements = 11;
c_7313517.elements = (object *)e_7313989;
c_7313517.elements[0] = ((closureN)self_735980)->elements[0];
c_7313517.elements[1] = ((closureN)self_735980)->elements[1];
c_7313517.elements[2] = ((closureN)self_735980)->elements[2];
c_7313517.elements[3] = ((closureN)self_735980)->elements[3];
c_7313517.elements[4] = ((closureN)self_735980)->elements[4];
c_7313517.elements[5] = ((closureN)self_735980)->elements[5];
c_7313517.elements[6] = has_91closure_127_731124_731823;
c_7313517.elements[7] = ((closureN)self_735980)->elements[6];
c_7313517.elements[8] = ((closureN)self_735980)->elements[7];
c_7313517.elements[9] = ((closureN)self_735980)->elements[8];
c_7313517.elements[10] = ((closureN)self_735980)->elements[9];

return_direct_with_clo3(data,  __glo_string_91split_scheme_cyclone_util, (((closure)  __glo_string_91split_scheme_cyclone_util)->fn),  &c_7313517, ((closureN)self_735980)->elements[5], obj_char2obj(44));; 
}

static void __lambda_883(void *data, object self_735981, int argc, object *args) /* object self_735981, object lis_731184_731843 */
 {
 object lis_731184_731843 = args[0];
  
closureN_type c_7313519;
object e_7313530 [2];
c_7313519.hdr.mark = gc_color_red;
 c_7313519.hdr.grayed = 0;
c_7313519.tag = closureN_tag;
 c_7313519.fn = (function_type)__lambda_884;
c_7313519.num_args = 0;
c_7313519.num_elements = 2;
c_7313519.elements = (object *)e_7313530;
c_7313519.elements[0] = ((closureN)self_735981)->elements[5];
c_7313519.elements[1] = lis_731184_731843;


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

return_direct_with_clo1(data,(closure)&c_7313519,__lambda_884,  &c_7313531);; 
}

static void __lambda_885(void *data, object self_735982, int argc, object *args) /* object self_735982, object formals_91as_91list_731127_731824 */
 {
 object formals_91as_91list_731127_731824 = args[0];
  
closureN_type c_7313533;
object e_7313550 [2];
c_7313533.hdr.mark = gc_color_red;
 c_7313533.hdr.grayed = 0;
c_7313533.tag = closureN_tag;
 c_7313533.fn = (function_type)__lambda_886;
c_7313533.num_args = 0;
c_7313533.num_elements = 2;
c_7313533.elements = (object *)e_7313550;
c_7313533.elements[0] = formals_91as_91list_731127_731824;
c_7313533.elements[1] = ((closureN)self_735982)->elements[6];


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

return_direct_with_clo1(data,(closure)&c_7313533,__lambda_886,  &c_7313551);; 
}

static void __lambda_889(void *data, object self_735983, int argc, object *args) /* object self_735983, object closure_91name_731130_731825 */
 {
 object closure_91name_731130_731825 = args[0];
  
closureN_type c_7313553;
object e_7313985 [13];
c_7313553.hdr.mark = gc_color_red;
 c_7313553.hdr.grayed = 0;
c_7313553.tag = closureN_tag;
 c_7313553.fn = (function_type)__lambda_890;
c_7313553.num_args = 1;
c_7313553.num_elements = 13;
c_7313553.elements = (object *)e_7313985;
c_7313553.elements[0] = ((closureN)self_735983)->elements[0];
c_7313553.elements[1] = ((closureN)self_735983)->elements[1];
c_7313553.elements[2] = ((closureN)self_735983)->elements[2];
c_7313553.elements[3] = closure_91name_731130_731825;
c_7313553.elements[4] = ((closureN)self_735983)->elements[3];
c_7313553.elements[5] = ((closureN)self_735983)->elements[4];
c_7313553.elements[6] = ((closureN)self_735983)->elements[5];
c_7313553.elements[7] = ((closureN)self_735983)->elements[6];
c_7313553.elements[8] = ((closureN)self_735983)->elements[7];
c_7313553.elements[9] = ((closureN)self_735983)->elements[8];
c_7313553.elements[10] = ((closureN)self_735983)->elements[9];
c_7313553.elements[11] = ((closureN)self_735983)->elements[10];
c_7313553.elements[12] = ((closureN)self_735983)->elements[11];

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7313553, ((closureN)self_735983)->elements[4]);; 
}

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

return_direct_with_clo1(data,  __glo_adb_117make_91fnc_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117make_91fnc_scheme_cyclone_cps_91optimizations)->fn),  &c_7313555);; 
}

static void __lambda_891(void *data, object self_735985, int argc, object *args) /* object self_735985, object r_733552 */
 {
 object r_733552 = args[0];
  
closureN_type c_7313557;
object e_7313982 [13];
c_7313557.hdr.mark = gc_color_red;
 c_7313557.hdr.grayed = 0;
c_7313557.tag = closureN_tag;
 c_7313557.fn = (function_type)__lambda_892;
c_7313557.num_args = 1;
c_7313557.num_elements = 13;
c_7313557.elements = (object *)e_7313982;
c_7313557.elements[0] = ((closureN)self_735985)->elements[0];
c_7313557.elements[1] = ((closureN)self_735985)->elements[1];
c_7313557.elements[2] = ((closureN)self_735985)->elements[2];
c_7313557.elements[3] = ((closureN)self_735985)->elements[3];
c_7313557.elements[4] = ((closureN)self_735985)->elements[4];
c_7313557.elements[5] = ((closureN)self_735985)->elements[5];
c_7313557.elements[6] = ((closureN)self_735985)->elements[6];
c_7313557.elements[7] = ((closureN)self_735985)->elements[7];
c_7313557.elements[8] = ((closureN)self_735985)->elements[8];
c_7313557.elements[9] = ((closureN)self_735985)->elements[9];
c_7313557.elements[10] = ((closureN)self_735985)->elements[10];
c_7313557.elements[11] = ((closureN)self_735985)->elements[12];
c_7313557.elements[12] = ((closureN)self_735985)->elements[13];

return_direct_with_clo3(data,  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations)->fn),  &c_7313557, ((closureN)self_735985)->elements[11], r_733552);; 
}

static void __lambda_892(void *data, object self_735986, int argc, object *args) /* object self_735986, object r_733550 */
 {
 object r_733550 = args[0];
  
closureN_type c_7313559;
object e_7313981 [13];
c_7313559.hdr.mark = gc_color_red;
 c_7313559.hdr.grayed = 0;
c_7313559.tag = closureN_tag;
 c_7313559.fn = (function_type)__lambda_893;
c_7313559.num_args = 1;
c_7313559.num_elements = 13;
c_7313559.elements = (object *)e_7313981;
c_7313559.elements[0] = ((closureN)self_735986)->elements[0];
c_7313559.elements[1] = ((closureN)self_735986)->elements[1];
c_7313559.elements[2] = ((closureN)self_735986)->elements[2];
c_7313559.elements[3] = ((closureN)self_735986)->elements[3];
c_7313559.elements[4] = ((closureN)self_735986)->elements[4];
c_7313559.elements[5] = ((closureN)self_735986)->elements[5];
c_7313559.elements[6] = ((closureN)self_735986)->elements[6];
c_7313559.elements[7] = ((closureN)self_735986)->elements[7];
c_7313559.elements[8] = ((closureN)self_735986)->elements[8];
c_7313559.elements[9] = ((closureN)self_735986)->elements[9];
c_7313559.elements[10] = ((closureN)self_735986)->elements[10];
c_7313559.elements[11] = ((closureN)self_735986)->elements[11];
c_7313559.elements[12] = ((closureN)self_735986)->elements[12];

return_direct_with_clo2(data,  __glo_adbf_117calls_91self_127_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117calls_91self_127_scheme_cyclone_cps_91optimizations)->fn),  &c_7313559, r_733550);; 
}

static void __lambda_893(void *data, object self_735987, int argc, object *args) /* object self_735987, object tmp_731171_731173_731840 */
 {
 object tmp_731171_731173_731840 = args[0];
  
closureN_type c_7313561;
object e_7313585 [3];
c_7313561.hdr.mark = gc_color_red;
 c_7313561.hdr.grayed = 0;
c_7313561.tag = closureN_tag;
 c_7313561.fn = (function_type)__lambda_894;
c_7313561.num_args = 0;
c_7313561.num_elements = 3;
c_7313561.elements = (object *)e_7313585;
c_7313561.elements[0] = ((closureN)self_735987)->elements[8];
c_7313561.elements[1] = tmp_731171_731173_731840;
c_7313561.elements[2] = ((closureN)self_735987)->elements[12];


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

return_direct_with_clo1(data,(closure)&c_7313561,__lambda_894,  &c_7313586);; 
}

static void __lambda_896(void *data, object self_735988, int argc, object *args) /* object self_735988, object has_91loop_127_731133_731826 */
 {
 object has_91loop_127_731133_731826 = args[0];
  
closureN_type c_7313588;
object e_7313604 [3];
c_7313588.hdr.mark = gc_color_red;
 c_7313588.hdr.grayed = 0;
c_7313588.tag = closureN_tag;
 c_7313588.fn = (function_type)__lambda_897;
c_7313588.num_args = 0;
c_7313588.num_elements = 3;
c_7313588.elements = (object *)e_7313604;
c_7313588.elements[0] = ((closureN)self_735988)->elements[2];
c_7313588.elements[1] = ((closureN)self_735988)->elements[6];
c_7313588.elements[2] = ((closureN)self_735988)->elements[8];


closureN_type c_7313605;
object e_7313979 [13];
c_7313605.hdr.mark = gc_color_red;
 c_7313605.hdr.grayed = 0;
c_7313605.tag = closureN_tag;
 c_7313605.fn = (function_type)__lambda_898;
c_7313605.num_args = 1;
c_7313605.num_elements = 13;
c_7313605.elements = (object *)e_7313979;
c_7313605.elements[0] = ((closureN)self_735988)->elements[0];
c_7313605.elements[1] = ((closureN)self_735988)->elements[1];
c_7313605.elements[2] = ((closureN)self_735988)->elements[3];
c_7313605.elements[3] = ((closureN)self_735988)->elements[4];
c_7313605.elements[4] = ((closureN)self_735988)->elements[5];
c_7313605.elements[5] = ((closureN)self_735988)->elements[6];
c_7313605.elements[6] = ((closureN)self_735988)->elements[7];
c_7313605.elements[7] = ((closureN)self_735988)->elements[8];
c_7313605.elements[8] = has_91loop_127_731133_731826;
c_7313605.elements[9] = ((closureN)self_735988)->elements[9];
c_7313605.elements[10] = ((closureN)self_735988)->elements[10];
c_7313605.elements[11] = ((closureN)self_735988)->elements[11];
c_7313605.elements[12] = ((closureN)self_735988)->elements[12];

return_direct_with_clo1(data,(closure)&c_7313588,__lambda_897,  &c_7313605);; 
}

static void __lambda_898(void *data, object self_735989, int argc, object *args) /* object self_735989, object r_733540 */
 {
 object r_733540 = args[0];
  
closureN_type c_7313607;
object e_7313974 [12];
c_7313607.hdr.mark = gc_color_red;
 c_7313607.hdr.grayed = 0;
c_7313607.tag = closureN_tag;
 c_7313607.fn = (function_type)__lambda_899;
c_7313607.num_args = 1;
c_7313607.num_elements = 12;
c_7313607.elements = (object *)e_7313974;
c_7313607.elements[0] = ((closureN)self_735989)->elements[0];
c_7313607.elements[1] = ((closureN)self_735989)->elements[1];
c_7313607.elements[2] = ((closureN)self_735989)->elements[2];
c_7313607.elements[3] = ((closureN)self_735989)->elements[3];
c_7313607.elements[4] = ((closureN)self_735989)->elements[4];
c_7313607.elements[5] = ((closureN)self_735989)->elements[6];
c_7313607.elements[6] = ((closureN)self_735989)->elements[7];
c_7313607.elements[7] = ((closureN)self_735989)->elements[8];
c_7313607.elements[8] = ((closureN)self_735989)->elements[9];
c_7313607.elements[9] = ((closureN)self_735989)->elements[10];
c_7313607.elements[10] = ((closureN)self_735989)->elements[11];
c_7313607.elements[11] = ((closureN)self_735989)->elements[12];


object c_7313977 = Cyc_string_append(data,(closure)&c_7313607,2,r_733540, ((closureN)self_735989)->elements[5]);
return_closcall1(data,(closure)&c_7313607,  c_7313977);; 
}

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


closureN_type c_7313630;
object e_7313973 [11];
c_7313630.hdr.mark = gc_color_red;
 c_7313630.hdr.grayed = 0;
c_7313630.tag = closureN_tag;
 c_7313630.fn = (function_type)__lambda_901;
c_7313630.num_args = 1;
c_7313630.num_elements = 11;
c_7313630.elements = (object *)e_7313973;
c_7313630.elements[0] = ((closureN)self_735990)->elements[0];
c_7313630.elements[1] = ((closureN)self_735990)->elements[3];
c_7313630.elements[2] = ((closureN)self_735990)->elements[4];
c_7313630.elements[3] = formals_85_731136_731827;
c_7313630.elements[4] = ((closureN)self_735990)->elements[5];
c_7313630.elements[5] = ((closureN)self_735990)->elements[6];
c_7313630.elements[6] = ((closureN)self_735990)->elements[7];
c_7313630.elements[7] = ((closureN)self_735990)->elements[8];
c_7313630.elements[8] = ((closureN)self_735990)->elements[9];
c_7313630.elements[9] = ((closureN)self_735990)->elements[10];
c_7313630.elements[10] = ((closureN)self_735990)->elements[11];

return_direct_with_clo1(data,(closure)&c_7313609,__lambda_900,  &c_7313630);; 
}

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


closureN_type c_7313787;
object e_7313972 [11];
c_7313787.hdr.mark = gc_color_red;
 c_7313787.hdr.grayed = 0;
c_7313787.tag = closureN_tag;
 c_7313787.fn = (function_type)__lambda_923;
c_7313787.num_args = 1;
c_7313787.num_elements = 11;
c_7313787.elements = (object *)e_7313972;
c_7313787.elements[0] = ((closureN)self_735991)->elements[0];
c_7313787.elements[1] = c_91formals_731139_731828;
c_7313787.elements[2] = ((closureN)self_735991)->elements[1];
c_7313787.elements[3] = ((closureN)self_735991)->elements[2];
c_7313787.elements[4] = ((closureN)self_735991)->elements[3];
c_7313787.elements[5] = ((closureN)self_735991)->elements[5];
c_7313787.elements[6] = ((closureN)self_735991)->elements[6];
c_7313787.elements[7] = ((closureN)self_735991)->elements[7];
c_7313787.elements[8] = ((closureN)self_735991)->elements[8];
c_7313787.elements[9] = ((closureN)self_735991)->elements[9];
c_7313787.elements[10] = ((closureN)self_735991)->elements[10];

return_direct_with_clo1(data,(closure)&c_7313632,__lambda_902,  &c_7313787);; 
}

static void __lambda_923(void *data, object self_735992, int argc, object *args) /* object self_735992, object c_91arg_91unpacking_731142_731829 */
 {
 object c_91arg_91unpacking_731142_731829 = args[0];
  
closureN_type c_7313789;
object e_7313970 [12];
c_7313789.hdr.mark = gc_color_red;
 c_7313789.hdr.grayed = 0;
c_7313789.tag = closureN_tag;
 c_7313789.fn = (function_type)__lambda_924;
c_7313789.num_args = 1;
c_7313789.num_elements = 12;
c_7313789.elements = (object *)e_7313970;
c_7313789.elements[0] = ((closureN)self_735992)->elements[0];
c_7313789.elements[1] = c_91arg_91unpacking_731142_731829;
c_7313789.elements[2] = ((closureN)self_735992)->elements[1];
c_7313789.elements[3] = ((closureN)self_735992)->elements[2];
c_7313789.elements[4] = ((closureN)self_735992)->elements[3];
c_7313789.elements[5] = ((closureN)self_735992)->elements[4];
c_7313789.elements[6] = ((closureN)self_735992)->elements[5];
c_7313789.elements[7] = ((closureN)self_735992)->elements[6];
c_7313789.elements[8] = ((closureN)self_735992)->elements[7];
c_7313789.elements[9] = ((closureN)self_735992)->elements[8];
c_7313789.elements[10] = ((closureN)self_735992)->elements[9];
c_7313789.elements[11] = ((closureN)self_735992)->elements[10];

return_direct_with_clo2(data,  __glo_lambda_91_125env_scheme_cyclone_cgen, (((closure)  __glo_lambda_91_125env_scheme_cyclone_cgen)->fn),  &c_7313789, ((closureN)self_735992)->elements[3]);; 
}

static void __lambda_924(void *data, object self_735993, int argc, object *args) /* object self_735993, object env_91closure_731145_731830 */
 {
 object env_91closure_731145_731830 = args[0];
  
closureN_type c_7313791;
object e_7313968 [13];
c_7313791.hdr.mark = gc_color_red;
 c_7313791.hdr.grayed = 0;
c_7313791.tag = closureN_tag;
 c_7313791.fn = (function_type)__lambda_925;
c_7313791.num_args = 1;
c_7313791.num_elements = 13;
c_7313791.elements = (object *)e_7313968;
c_7313791.elements[0] = ((closureN)self_735993)->elements[0];
c_7313791.elements[1] = ((closureN)self_735993)->elements[1];
c_7313791.elements[2] = ((closureN)self_735993)->elements[2];
c_7313791.elements[3] = ((closureN)self_735993)->elements[3];
c_7313791.elements[4] = env_91closure_731145_731830;
c_7313791.elements[5] = ((closureN)self_735993)->elements[4];
c_7313791.elements[6] = ((closureN)self_735993)->elements[5];
c_7313791.elements[7] = ((closureN)self_735993)->elements[6];
c_7313791.elements[8] = ((closureN)self_735993)->elements[7];
c_7313791.elements[9] = ((closureN)self_735993)->elements[8];
c_7313791.elements[10] = ((closureN)self_735993)->elements[9];
c_7313791.elements[11] = ((closureN)self_735993)->elements[10];
c_7313791.elements[12] = ((closureN)self_735993)->elements[11];

return_direct_with_clo2(data,  __glo_ast_117lambda_91body_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91body_scheme_cyclone_ast)->fn),  &c_7313791, ((closureN)self_735993)->elements[4]);; 
}

static void __lambda_925(void *data, object self_735994, int argc, object *args) /* object self_735994, object r_733517 */
 {
 object r_733517 = args[0];
  
closureN_type c_7313793;
object e_7313966 [13];
c_7313793.hdr.mark = gc_color_red;
 c_7313793.hdr.grayed = 0;
c_7313793.tag = closureN_tag;
 c_7313793.fn = (function_type)__lambda_926;
c_7313793.num_args = 1;
c_7313793.num_elements = 13;
c_7313793.elements = (object *)e_7313966;
c_7313793.elements[0] = ((closureN)self_735994)->elements[0];
c_7313793.elements[1] = ((closureN)self_735994)->elements[1];
c_7313793.elements[2] = ((closureN)self_735994)->elements[2];
c_7313793.elements[3] = ((closureN)self_735994)->elements[3];
c_7313793.elements[4] = ((closureN)self_735994)->elements[5];
c_7313793.elements[5] = ((closureN)self_735994)->elements[6];
c_7313793.elements[6] = ((closureN)self_735994)->elements[7];
c_7313793.elements[7] = ((closureN)self_735994)->elements[8];
c_7313793.elements[8] = ((closureN)self_735994)->elements[9];
c_7313793.elements[9] = ((closureN)self_735994)->elements[10];
c_7313793.elements[10] = r_733517;
c_7313793.elements[11] = ((closureN)self_735994)->elements[11];
c_7313793.elements[12] = ((closureN)self_735994)->elements[12];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7313793, ((closureN)self_735994)->elements[4]);; 
}

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

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7313795, ((closureN)self_735995)->elements[4]);; 
}

static void __lambda_927(void *data, object self_735996, int argc, object *args) /* object self_735996, object r_733516 */
 {
 object r_733516 = args[0];
  
closureN_type c_7313797;
object e_7313956 [10];
c_7313797.hdr.mark = gc_color_red;
 c_7313797.hdr.grayed = 0;
c_7313797.tag = closureN_tag;
 c_7313797.fn = (function_type)__lambda_928;
c_7313797.num_args = 1;
c_7313797.num_elements = 10;
c_7313797.elements = (object *)e_7313956;
c_7313797.elements[0] = ((closureN)self_735996)->elements[1];
c_7313797.elements[1] = ((closureN)self_735996)->elements[2];
c_7313797.elements[2] = ((closureN)self_735996)->elements[4];
c_7313797.elements[3] = ((closureN)self_735996)->elements[5];
c_7313797.elements[4] = ((closureN)self_735996)->elements[6];
c_7313797.elements[5] = ((closureN)self_735996)->elements[7];
c_7313797.elements[6] = ((closureN)self_735996)->elements[8];
c_7313797.elements[7] = ((closureN)self_735996)->elements[9];
c_7313797.elements[8] = ((closureN)self_735996)->elements[12];
c_7313797.elements[9] = ((closureN)self_735996)->elements[13];



return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  &c_7313797, Cyc_car(data, ((closureN)self_735996)->elements[11]), ((closureN)self_735996)->elements[0], ((closureN)self_735996)->elements[10], r_733516, ((closureN)self_735996)->elements[13], ((closureN)self_735996)->elements[3]);; 
}

static void __lambda_928(void *data, object self_735997, int argc, object *args) /* object self_735997, object body_731148_731831 */
 {
 object body_731148_731831 = args[0];
  
closureN_type c_7313799;
object e_7313806 [2];
c_7313799.hdr.mark = gc_color_red;
 c_7313799.hdr.grayed = 0;
c_7313799.tag = closureN_tag;
 c_7313799.fn = (function_type)__lambda_929;
c_7313799.num_args = 1;
c_7313799.num_elements = 2;
c_7313799.elements = (object *)e_7313806;
c_7313799.elements[0] = ((closureN)self_735997)->elements[3];
c_7313799.elements[1] = ((closureN)self_735997)->elements[6];


closureN_type c_7313807;
object e_7313955 [9];
c_7313807.hdr.mark = gc_color_red;
 c_7313807.hdr.grayed = 0;
c_7313807.tag = closureN_tag;
 c_7313807.fn = (function_type)__lambda_930;
c_7313807.num_args = 1;
c_7313807.num_elements = 9;
c_7313807.elements = (object *)e_7313955;
c_7313807.elements[0] = body_731148_731831;
c_7313807.elements[1] = ((closureN)self_735997)->elements[0];
c_7313807.elements[2] = ((closureN)self_735997)->elements[1];
c_7313807.elements[3] = ((closureN)self_735997)->elements[2];
c_7313807.elements[4] = ((closureN)self_735997)->elements[4];
c_7313807.elements[5] = ((closureN)self_735997)->elements[5];
c_7313807.elements[6] = ((closureN)self_735997)->elements[7];
c_7313807.elements[7] = ((closureN)self_735997)->elements[8];
c_7313807.elements[8] = ((closureN)self_735997)->elements[9];

return_direct_with_clo1(data,(closure)&c_7313799,__lambda_929,  &c_7313807);; 
}

static void __lambda_930(void *data, object self_735998, int argc, object *args) /* object self_735998, object k_733490, object name_731150_731832 */
 {
 object k_733490 = args[0]; object name_731150_731832 = args[1];
  
closureN_type c_7313809;
object e_7313880 [2];
c_7313809.hdr.mark = gc_color_red;
 c_7313809.hdr.grayed = 0;
c_7313809.tag = closureN_tag;
 c_7313809.fn = (function_type)__lambda_931;
c_7313809.num_args = 0;
c_7313809.num_elements = 2;
c_7313809.elements = (object *)e_7313880;
c_7313809.elements[0] = ((closureN)self_735998)->elements[3];
c_7313809.elements[1] = ((closureN)self_735998)->elements[4];


closureN_type c_7313881;
object e_7313954 [10];
c_7313881.hdr.mark = gc_color_red;
 c_7313881.hdr.grayed = 0;
c_7313881.tag = closureN_tag;
 c_7313881.fn = (function_type)__lambda_940;
c_7313881.num_args = 1;
c_7313881.num_elements = 10;
c_7313881.elements = (object *)e_7313954;
c_7313881.elements[0] = ((closureN)self_735998)->elements[0];
c_7313881.elements[1] = ((closureN)self_735998)->elements[1];
c_7313881.elements[2] = ((closureN)self_735998)->elements[2];
c_7313881.elements[3] = ((closureN)self_735998)->elements[4];
c_7313881.elements[4] = ((closureN)self_735998)->elements[5];
c_7313881.elements[5] = k_733490;
c_7313881.elements[6] = name_731150_731832;
c_7313881.elements[7] = ((closureN)self_735998)->elements[6];
c_7313881.elements[8] = ((closureN)self_735998)->elements[7];
c_7313881.elements[9] = ((closureN)self_735998)->elements[8];

return_direct_with_clo1(data,(closure)&c_7313809,__lambda_931,  &c_7313881);; 
}

static void __lambda_940(void *data, object self_735999, int argc, object *args) /* object self_735999, object r_733491 */
 {
 object r_733491 = args[0];
  
closureN_type c_7313883;
object e_7313910 [3];
c_7313883.hdr.mark = gc_color_red;
 c_7313883.hdr.grayed = 0;
c_7313883.tag = closureN_tag;
 c_7313883.fn = (function_type)__lambda_941;
c_7313883.num_args = 0;
c_7313883.num_elements = 3;
c_7313883.elements = (object *)e_7313910;
c_7313883.elements[0] = ((closureN)self_735999)->elements[3];
c_7313883.elements[1] = ((closureN)self_735999)->elements[4];
c_7313883.elements[2] = ((closureN)self_735999)->elements[9];


closureN_type c_7313911;
object e_7313953 [9];
c_7313911.hdr.mark = gc_color_red;
 c_7313911.hdr.grayed = 0;
c_7313911.tag = closureN_tag;
 c_7313911.fn = (function_type)__lambda_945;
c_7313911.num_args = 1;
c_7313911.num_elements = 9;
c_7313911.elements = (object *)e_7313953;
c_7313911.elements[0] = ((closureN)self_735999)->elements[0];
c_7313911.elements[1] = ((closureN)self_735999)->elements[1];
c_7313911.elements[2] = ((closureN)self_735999)->elements[2];
c_7313911.elements[3] = ((closureN)self_735999)->elements[4];
c_7313911.elements[4] = ((closureN)self_735999)->elements[5];
c_7313911.elements[5] = ((closureN)self_735999)->elements[6];
c_7313911.elements[6] = ((closureN)self_735999)->elements[7];
c_7313911.elements[7] = r_733491;
c_7313911.elements[8] = ((closureN)self_735999)->elements[8];

return_direct_with_clo1(data,(closure)&c_7313883,__lambda_941,  &c_7313911);; 
}

static void __lambda_945(void *data, object self_736000, int argc, object *args) /* object self_736000, object r_733497 */
 {
 object r_733497 = args[0];
  
closureN_type c_7313913;
object e_7313952 [9];
c_7313913.hdr.mark = gc_color_red;
 c_7313913.hdr.grayed = 0;
c_7313913.tag = closureN_tag;
 c_7313913.fn = (function_type)__lambda_946;
c_7313913.num_args = 1;
c_7313913.num_elements = 9;
c_7313913.elements = (object *)e_7313952;
c_7313913.elements[0] = ((closureN)self_736000)->elements[0];
c_7313913.elements[1] = ((closureN)self_736000)->elements[1];
c_7313913.elements[2] = ((closureN)self_736000)->elements[2];
c_7313913.elements[3] = ((closureN)self_736000)->elements[3];
c_7313913.elements[4] = ((closureN)self_736000)->elements[4];
c_7313913.elements[5] = ((closureN)self_736000)->elements[5];
c_7313913.elements[6] = ((closureN)self_736000)->elements[6];
c_7313913.elements[7] = ((closureN)self_736000)->elements[7];
c_7313913.elements[8] = ((closureN)self_736000)->elements[8];

return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  &c_7313913, r_733497);; 
}

static void __lambda_946(void *data, object self_736001, int argc, object *args) /* object self_736001, object r_733496 */
 {
 object r_733496 = args[0];
  
closureN_type c_7313915;
object e_7313950 [8];
c_7313915.hdr.mark = gc_color_red;
 c_7313915.hdr.grayed = 0;
c_7313915.tag = closureN_tag;
 c_7313915.fn = (function_type)__lambda_947;
c_7313915.num_args = 1;
c_7313915.num_elements = 8;
c_7313915.elements = (object *)e_7313950;
c_7313915.elements[0] = ((closureN)self_736001)->elements[1];
c_7313915.elements[1] = ((closureN)self_736001)->elements[2];
c_7313915.elements[2] = ((closureN)self_736001)->elements[3];
c_7313915.elements[3] = ((closureN)self_736001)->elements[4];
c_7313915.elements[4] = ((closureN)self_736001)->elements[5];
c_7313915.elements[5] = ((closureN)self_736001)->elements[6];
c_7313915.elements[6] = ((closureN)self_736001)->elements[7];
c_7313915.elements[7] = ((closureN)self_736001)->elements[8];

return_direct_with_clo3(data,  __glo_c_117append_scheme_cyclone_cgen, (((closure)  __glo_c_117append_scheme_cyclone_cgen)->fn),  &c_7313915, r_733496, ((closureN)self_736001)->elements[0]);; 
}

static void __lambda_947(void *data, object self_736002, int argc, object *args) /* object self_736002, object r_733495 */
 {
 object r_733495 = args[0];
  
closureN_type c_7313917;
object e_7313948 [8];
c_7313917.hdr.mark = gc_color_red;
 c_7313917.hdr.grayed = 0;
c_7313917.tag = closureN_tag;
 c_7313917.fn = (function_type)__lambda_948;
c_7313917.num_args = 1;
c_7313917.num_elements = 8;
c_7313917.elements = (object *)e_7313948;
c_7313917.elements[0] = ((closureN)self_736002)->elements[0];
c_7313917.elements[1] = ((closureN)self_736002)->elements[1];
c_7313917.elements[2] = ((closureN)self_736002)->elements[2];
c_7313917.elements[3] = ((closureN)self_736002)->elements[3];
c_7313917.elements[4] = ((closureN)self_736002)->elements[4];
c_7313917.elements[5] = ((closureN)self_736002)->elements[5];
c_7313917.elements[6] = ((closureN)self_736002)->elements[6];
c_7313917.elements[7] = ((closureN)self_736002)->elements[7];


make_utf8_string_with_len(c_7313949, "  ", 2, 2);
return_direct_with_clo3(data,  __glo_c_117serialize_scheme_cyclone_cgen, (((closure)  __glo_c_117serialize_scheme_cyclone_cgen)->fn),  &c_7313917, r_733495, &c_7313949);; 
}

static void __lambda_948(void *data, object self_736003, int argc, object *args) /* object self_736003, object r_733492 */
 {
 object r_733492 = args[0];
  
closureN_type c_7313919;
object e_7313925 [1];
c_7313919.hdr.mark = gc_color_red;
 c_7313919.hdr.grayed = 0;
c_7313919.tag = closureN_tag;
 c_7313919.fn = (function_type)__lambda_949;
c_7313919.num_args = 0;
c_7313919.num_elements = 1;
c_7313919.elements = (object *)e_7313925;
c_7313919.elements[0] = ((closureN)self_736003)->elements[2];


closureN_type c_7313926;
object e_7313947 [8];
c_7313926.hdr.mark = gc_color_red;
 c_7313926.hdr.grayed = 0;
c_7313926.tag = closureN_tag;
 c_7313926.fn = (function_type)__lambda_950;
c_7313926.num_args = 1;
c_7313926.num_elements = 8;
c_7313926.elements = (object *)e_7313947;
c_7313926.elements[0] = ((closureN)self_736003)->elements[0];
c_7313926.elements[1] = ((closureN)self_736003)->elements[1];
c_7313926.elements[2] = ((closureN)self_736003)->elements[3];
c_7313926.elements[3] = ((closureN)self_736003)->elements[4];
c_7313926.elements[4] = ((closureN)self_736003)->elements[5];
c_7313926.elements[5] = ((closureN)self_736003)->elements[6];
c_7313926.elements[6] = r_733492;
c_7313926.elements[7] = ((closureN)self_736003)->elements[7];

return_direct_with_clo1(data,(closure)&c_7313919,__lambda_949,  &c_7313926);; 
}

static void __lambda_950(void *data, object self_736004, int argc, object *args) /* object self_736004, object r_733493 */
 {
 object r_733493 = args[0];
  
make_utf8_string_with_len(c_7313932, "static ", 7, 7);

make_utf8_string_with_len(c_7313934, " ", 1, 1);

make_utf8_string_with_len(c_7313937, " {\n", 3, 3);

make_utf8_string_with_len(c_7313939, "\n", 1, 1);



make_utf8_string_with_len(c_7313945, "; \n", 3, 3);

make_utf8_string_with_len(c_7313946, "}\n", 2, 2);

object c_7313931 = Cyc_string_append(data,  ((closureN)self_736004)->elements[2],14,&c_7313932, ((closureN)self_736004)->elements[7], &c_7313934, ((closureN)self_736004)->elements[3], ((closureN)self_736004)->elements[1], &c_7313937, ((closureN)self_736004)->elements[0], &c_7313939, car(((closureN)self_736004)->elements[4]), ((closureN)self_736004)->elements[5], ((closureN)self_736004)->elements[6], &c_7313945, r_733493, &c_7313946);
return_direct_with_clo1(data,  ((closureN)self_736004)->elements[2], (((closure)  ((closureN)self_736004)->elements[2])->fn),  c_7313931);; 
}

static void __lambda_949(void *data, object self_736005, int argc, object *args) /* object self_736005, object k_733494 */
 {
 object k_733494 = args[0];
  if( (boolean_f != ((closureN)self_736005)->elements[0]) ){ 
  
make_utf8_string_with_len(c_7313922, "}\n", 2, 2);
return_direct_with_clo1(data,  k_733494,__lambda_950,  &c_7313922);
} else { 
  
make_utf8_string_with_len(c_7313924, "", 0, 0);
return_direct_with_clo1(data,  k_733494,__lambda_950,  &c_7313924);}
;; 
}

static void __lambda_941(void *data, object self_736006, int argc, object *args) /* object self_736006, object k_733498 */
 {
 object k_733498 = args[0];
  if( (boolean_f != ((closureN)self_736006)->elements[0]) ){ 
  if( (boolean_f != ((closureN)self_736006)->elements[1]) ){ 
  
make_utf8_string_with_len(c_7313887, "\n while(1) {\n", 13, 13);
return_direct_with_clo1(data,  k_733498, (((closure)  k_733498)->fn),  &c_7313887);
} else { 
  
make_utf8_string_with_len(c_7313889, "", 0, 0);
return_direct_with_clo1(data,  k_733498, (((closure)  k_733498)->fn),  &c_7313889);}
;
} else { 
  
closureN_type c_7313891;
object e_7313908 [2];
c_7313891.hdr.mark = gc_color_red;
 c_7313891.hdr.grayed = 0;
c_7313891.tag = closureN_tag;
 c_7313891.fn = (function_type)__lambda_942;
c_7313891.num_args = 1;
c_7313891.num_elements = 2;
c_7313891.elements = (object *)e_7313908;
c_7313891.elements[0] = ((closureN)self_736006)->elements[1];
c_7313891.elements[1] = k_733498;

return_direct_with_clo2(data,  __glo_st_117_91_125code_scheme_cyclone_cgen, (((closure)  __glo_st_117_91_125code_scheme_cyclone_cgen)->fn),  &c_7313891, ((closureN)self_736006)->elements[2]);}
;; 
}

static void __lambda_942(void *data, object self_736007, int argc, object *args) /* object self_736007, object r_733499 */
 {
 object r_733499 = args[0];
  
closureN_type c_7313893;
object e_7313899 [1];
c_7313893.hdr.mark = gc_color_red;
 c_7313893.hdr.grayed = 0;
c_7313893.tag = closureN_tag;
 c_7313893.fn = (function_type)__lambda_943;
c_7313893.num_args = 0;
c_7313893.num_elements = 1;
c_7313893.elements = (object *)e_7313899;
c_7313893.elements[0] = ((closureN)self_736007)->elements[0];


closureN_type c_7313900;
object e_7313907 [2];
c_7313900.hdr.mark = gc_color_red;
 c_7313900.hdr.grayed = 0;
c_7313900.tag = closureN_tag;
 c_7313900.fn = (function_type)__lambda_944;
c_7313900.num_args = 1;
c_7313900.num_elements = 2;
c_7313900.elements = (object *)e_7313907;
c_7313900.elements[0] = ((closureN)self_736007)->elements[1];
c_7313900.elements[1] = r_733499;

return_direct_with_clo1(data,(closure)&c_7313893,__lambda_943,  &c_7313900);; 
}

static void __lambda_944(void *data, object self_736008, int argc, object *args) /* object self_736008, object r_733500 */
 {
 object r_733500 = args[0];
  
object c_7313905 = Cyc_string_append(data,  ((closureN)self_736008)->elements[0],2,((closureN)self_736008)->elements[1], r_733500);
return_direct_with_clo1(data,  ((closureN)self_736008)->elements[0], (((closure)  ((closureN)self_736008)->elements[0])->fn),  c_7313905);; 
}

static void __lambda_943(void *data, object self_736009, int argc, object *args) /* object self_736009, object k_733501 */
 {
 object k_733501 = args[0];
  if( (boolean_f != ((closureN)self_736009)->elements[0]) ){ 
  
make_utf8_string_with_len(c_7313896, "\n while(1) {\n", 13, 13);
return_direct_with_clo1(data,  k_733501,__lambda_944,  &c_7313896);
} else { 
  
make_utf8_string_with_len(c_7313898, "", 0, 0);
return_direct_with_clo1(data,  k_733501,__lambda_944,  &c_7313898);}
;; 
}

static void __lambda_931(void *data, object self_736010, int argc, object *args) /* object self_736010, object k_733502 */
 {
 object k_733502 = args[0];
  
closureN_type c_7313811;
object e_7313878 [3];
c_7313811.hdr.mark = gc_color_red;
 c_7313811.hdr.grayed = 0;
c_7313811.tag = closureN_tag;
 c_7313811.fn = (function_type)__lambda_932;
c_7313811.num_args = 1;
c_7313811.num_elements = 3;
c_7313811.elements = (object *)e_7313878;
c_7313811.elements[0] = ((closureN)self_736010)->elements[0];
c_7313811.elements[1] = ((closureN)self_736010)->elements[1];
c_7313811.elements[2] = k_733502;

return_direct_with_clo2(data,  __glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen, (((closure)  __glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen)->fn),  &c_7313811, ((closureN)self_736010)->elements[0]);; 
}

static void __lambda_932(void *data, object self_736011, int argc, object *args) /* object self_736011, object r_733503 */
 {
 object r_733503 = args[0];
  if( (boolean_f != r_733503) ){ 
  
closureN_type c_7313813;
object e_7313873 [3];
c_7313813.hdr.mark = gc_color_red;
 c_7313813.hdr.grayed = 0;
c_7313813.tag = closureN_tag;
 c_7313813.fn = (function_type)__lambda_933;
c_7313813.num_args = 1;
c_7313813.num_elements = 3;
c_7313813.elements = (object *)e_7313873;
c_7313813.elements[0] = ((closureN)self_736011)->elements[0];
c_7313813.elements[1] = ((closureN)self_736011)->elements[1];
c_7313813.elements[2] = ((closureN)self_736011)->elements[2];

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_7313813, ((closureN)self_736011)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_7313877, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_736011)->elements[2], (((closure)  ((closureN)self_736011)->elements[2])->fn),  &c_7313877);}
;; 
}

static void __lambda_933(void *data, object self_736012, int argc, object *args) /* object self_736012, object r_733513 */
 {
 object r_733513 = args[0];
  
closureN_type c_7313815;
object e_7313819 [1];
c_7313815.hdr.mark = gc_color_red;
 c_7313815.hdr.grayed = 0;
c_7313815.tag = closureN_tag;
 c_7313815.fn = (function_type)__lambda_934;
c_7313815.num_args = 0;
c_7313815.num_elements = 1;
c_7313815.elements = (object *)e_7313819;
c_7313815.elements[0] = ((closureN)self_736012)->elements[1];


closureN_type c_7313820;
object e_7313872 [3];
c_7313820.hdr.mark = gc_color_red;
 c_7313820.hdr.grayed = 0;
c_7313820.tag = closureN_tag;
 c_7313820.fn = (function_type)__lambda_935;
c_7313820.num_args = 1;
c_7313820.num_elements = 3;
c_7313820.elements = (object *)e_7313872;
c_7313820.elements[0] = ((closureN)self_736012)->elements[0];
c_7313820.elements[1] = ((closureN)self_736012)->elements[2];
c_7313820.elements[2] = r_733513;

return_direct_with_clo1(data,(closure)&c_7313815,__lambda_934,  &c_7313820);; 
}

static void __lambda_935(void *data, object self_736013, int argc, object *args) /* object self_736013, object r_733510 */
 {
 object r_733510 = args[0];
  
closureN_type c_7313822;
object e_7313870 [3];
c_7313822.hdr.mark = gc_color_red;
 c_7313822.hdr.grayed = 0;
c_7313822.tag = closureN_tag;
 c_7313822.fn = (function_type)__lambda_936;
c_7313822.num_args = 1;
c_7313822.num_elements = 3;
c_7313822.elements = (object *)e_7313870;
c_7313822.elements[0] = ((closureN)self_736013)->elements[1];
c_7313822.elements[1] = r_733510;
c_7313822.elements[2] = ((closureN)self_736013)->elements[2];

return_direct_with_clo2(data,  __glo_ast_117lambda_91varargs_91var_scheme_cyclone_cgen, (((closure)  __glo_ast_117lambda_91varargs_91var_scheme_cyclone_cgen)->fn),  &c_7313822, ((closureN)self_736013)->elements[0]);; 
}

static void __lambda_936(void *data, object self_736014, int argc, object *args) /* object self_736014, object r_733508 */
 {
 object r_733508 = args[0];
  
closureN_type c_7313824;
object e_7313869 [3];
c_7313824.hdr.mark = gc_color_red;
 c_7313824.hdr.grayed = 0;
c_7313824.tag = closureN_tag;
 c_7313824.fn = (function_type)__lambda_937;
c_7313824.num_args = 1;
c_7313824.num_elements = 3;
c_7313824.elements = (object *)e_7313869;
c_7313824.elements[0] = ((closureN)self_736014)->elements[0];
c_7313824.elements[1] = ((closureN)self_736014)->elements[1];
c_7313824.elements[2] = ((closureN)self_736014)->elements[2];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7313824, r_733508);; 
}

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


complex_num_type local_7313861; 

complex_num_type local_7313864; 



object c_7313858 = Cyc_number2string2(data,(closure)&c_7313826,1,Cyc_fast_sub(data,&local_7313861, Cyc_fast_sub(data,&local_7313864, Cyc_length(data, ((closureN)self_736015)->elements[2]), obj_int2obj(1)), ((closureN)self_736015)->elements[1]));
return_closcall1(data,(closure)&c_7313826,  c_7313858);; 
}

static void __lambda_938(void *data, object self_736016, int argc, object *args) /* object self_736016, object r_733506 */
 {
 object r_733506 = args[0];
  
closureN_type c_7313828;
object e_7313841 [3];
c_7313828.hdr.mark = gc_color_red;
 c_7313828.hdr.grayed = 0;
c_7313828.tag = closureN_tag;
 c_7313828.fn = (function_type)__lambda_939;
c_7313828.num_args = 1;
c_7313828.num_elements = 3;
c_7313828.elements = (object *)e_7313841;
c_7313828.elements[0] = ((closureN)self_736016)->elements[0];
c_7313828.elements[1] = ((closureN)self_736016)->elements[1];
c_7313828.elements[2] = r_733506;


complex_num_type local_7313847; 

complex_num_type local_7313850; 



object c_7313844 = Cyc_number2string2(data,(closure)&c_7313828,1,Cyc_fast_sub(data,&local_7313847, Cyc_fast_sub(data,&local_7313850, Cyc_length(data, ((closureN)self_736016)->elements[3]), obj_int2obj(1)), ((closureN)self_736016)->elements[2]));
return_closcall1(data,(closure)&c_7313828,  c_7313844);; 
}

static void __lambda_939(void *data, object self_736017, int argc, object *args) /* object self_736017, object r_733507 */
 {
 object r_733507 = args[0];
  
make_utf8_string_with_len(c_7313834, "load_varargs(", 13, 13);

make_utf8_string_with_len(c_7313836, ", args", 6, 6);

make_utf8_string_with_len(c_7313837, ", ", 2, 2);

make_utf8_string_with_len(c_7313839, ", argc - ", 9, 9);

make_utf8_string_with_len(c_7313840, ");\n", 3, 3);

object c_7313833 = Cyc_string_append(data,  ((closureN)self_736017)->elements[0],8,&c_7313834, ((closureN)self_736017)->elements[1], &c_7313836, &c_7313837, ((closureN)self_736017)->elements[2], &c_7313839, r_733507, &c_7313840);
return_direct_with_clo1(data,  ((closureN)self_736017)->elements[0], (((closure)  ((closureN)self_736017)->elements[0])->fn),  c_7313833);; 
}

static void __lambda_934(void *data, object self_736018, int argc, object *args) /* object self_736018, object k_733511 */
 {
 object k_733511 = args[0];
  if( (boolean_f != ((closureN)self_736018)->elements[0]) ){ 
  return_direct_with_clo1(data,  k_733511,__lambda_935,  obj_int2obj(1));
} else { 
  return_direct_with_clo1(data,  k_733511,__lambda_935,  obj_int2obj(0));}
;; 
}

static void __lambda_929(void *data, object self_736019, int argc, object *args) /* object self_736019, object r_733489 */
 {
 object r_733489 = args[0];
  
pair_type local_7313804; 
return_direct_with_clo1(data,  ((closureN)self_736019)->elements[1], (((closure)  ((closureN)self_736019)->elements[1])->fn),  set_pair_as_expr(&local_7313804, r_733489, ((closureN)self_736019)->elements[0]));; 
}

static void __lambda_902(void *data, object self_736020, int argc, object *args) /* object self_736020, object k_733518 */
 {
 object k_733518 = args[0];
  if( (boolean_f != ((closureN)self_736020)->elements[0]) ){ 
  
closureN_type c_7313635;
object e_7313782 [4];
c_7313635.hdr.mark = gc_color_red;
 c_7313635.hdr.grayed = 0;
c_7313635.tag = closureN_tag;
 c_7313635.fn = (function_type)__lambda_903;
c_7313635.num_args = 1;
c_7313635.num_elements = 4;
c_7313635.elements = (object *)e_7313782;
c_7313635.elements[0] = ((closureN)self_736020)->elements[1];
c_7313635.elements[1] = ((closureN)self_736020)->elements[2];
c_7313635.elements[2] = ((closureN)self_736020)->elements[3];
c_7313635.elements[3] = k_733518;

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_7313635, ((closureN)self_736020)->elements[1]);
} else { 
  
make_utf8_string_with_len(c_7313785, "", 0, 0);
return_direct_with_clo1(data,  k_733518, (((closure)  k_733518)->fn),  &c_7313785);}
;; 
}

static void __lambda_903(void *data, object self_736021, int argc, object *args) /* object self_736021, object r_733519 */
 {
 object r_733519 = args[0];
  
closureN_type c_7313637;
object e_7313779 [3];
c_7313637.hdr.mark = gc_color_red;
 c_7313637.hdr.grayed = 0;
c_7313637.tag = closureN_tag;
 c_7313637.fn = (function_type)__lambda_904;
c_7313637.num_args = 4;
c_7313637.num_elements = 3;
c_7313637.elements = (object *)e_7313779;
c_7313637.elements[0] = ((closureN)self_736021)->elements[0];
c_7313637.elements[1] = ((closureN)self_736021)->elements[2];
c_7313637.elements[2] = ((closureN)self_736021)->elements[3];


make_utf8_string_with_len(c_7313780, "", 0, 0);
return_direct_with_clo4(data,(closure)&c_7313637,__lambda_904,  obj_int2obj(0), &c_7313780, r_733519, ((closureN)self_736021)->elements[1]);; 
}

static void __lambda_904(void *data, object self_736022, int argc, object *args) /* object self_736022, object i_731159_731834, object cstr_731160_731835, object scm_91args_731161_731836, object args_731162_731837 */
 {
 object i_731159_731834 = args[0]; object cstr_731160_731835 = args[1]; object scm_91args_731161_731836 = args[2]; object args_731162_731837 = args[3];
  
closureN_type c_7313639;
object e_7313775 [6];
c_7313639.hdr.mark = gc_color_red;
 c_7313639.hdr.grayed = 0;
c_7313639.tag = closureN_tag;
 c_7313639.fn = (function_type)__lambda_1324;
c_7313639.num_args = 1;
c_7313639.num_elements = 6;
c_7313639.elements = (object *)e_7313775;
c_7313639.elements[0] = args_731162_731837;
c_7313639.elements[1] = cstr_731160_731835;
c_7313639.elements[2] = ((closureN)self_736022)->elements[0];
c_7313639.elements[3] = ((closureN)self_736022)->elements[1];
c_7313639.elements[4] = ((closureN)self_736022)->elements[2];
c_7313639.elements[5] = scm_91args_731161_731836;


pair_type local_7313778; 
return_direct_with_clo1(data,(closure)&c_7313639,__lambda_1324,  set_cell_as_expr(&local_7313778, i_731159_731834));; 
}

static void __lambda_1324(void *data, object self_736023, int argc, object *args) /* object self_736023, object i_731159_731834 */
 {
 object i_731159_731834 = args[0];
  
closureN_type c_7313641;
object e_7313770 [6];
c_7313641.hdr.mark = gc_color_red;
 c_7313641.hdr.grayed = 0;
c_7313641.tag = closureN_tag;
 c_7313641.fn = (function_type)__lambda_1323;
c_7313641.num_args = 1;
c_7313641.num_elements = 6;
c_7313641.elements = (object *)e_7313770;
c_7313641.elements[0] = ((closureN)self_736023)->elements[0];
c_7313641.elements[1] = ((closureN)self_736023)->elements[2];
c_7313641.elements[2] = ((closureN)self_736023)->elements[3];
c_7313641.elements[3] = i_731159_731834;
c_7313641.elements[4] = ((closureN)self_736023)->elements[4];
c_7313641.elements[5] = ((closureN)self_736023)->elements[5];


pair_type local_7313773; 
return_direct_with_clo1(data,(closure)&c_7313641,__lambda_1323,  set_cell_as_expr(&local_7313773, ((closureN)self_736023)->elements[1]));; 
}

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


pair_type local_7313768; 
return_direct_with_clo1(data,(closure)&c_7313643,__lambda_1322,  set_cell_as_expr(&local_7313768, ((closureN)self_736024)->elements[0]));; 
}

static void __lambda_1322(void *data, object self_736025, int argc, object *args) /* object self_736025, object args_731162_731837 */
 {
 object args_731162_731837 = args[0];
  
closureN_type c_7313645;
object e_7313668 [2];
c_7313645.hdr.mark = gc_color_red;
 c_7313645.hdr.grayed = 0;
c_7313645.tag = closureN_tag;
 c_7313645.fn = (function_type)__lambda_905;
c_7313645.num_args = 0;
c_7313645.num_elements = 2;
c_7313645.elements = (object *)e_7313668;
c_7313645.elements[0] = args_731162_731837;
c_7313645.elements[1] = ((closureN)self_736025)->elements[1];


closureN_type c_7313669;
object e_7313764 [6];
c_7313669.hdr.mark = gc_color_red;
 c_7313669.hdr.grayed = 0;
c_7313669.tag = closureN_tag;
 c_7313669.fn = (function_type)__lambda_909;
c_7313669.num_args = 1;
c_7313669.num_elements = 6;
c_7313669.elements = (object *)e_7313764;
c_7313669.elements[0] = args_731162_731837;
c_7313669.elements[1] = ((closureN)self_736025)->elements[0];
c_7313669.elements[2] = ((closureN)self_736025)->elements[2];
c_7313669.elements[3] = ((closureN)self_736025)->elements[3];
c_7313669.elements[4] = ((closureN)self_736025)->elements[4];
c_7313669.elements[5] = ((closureN)self_736025)->elements[5];

return_direct_with_clo1(data,(closure)&c_7313645,__lambda_905,  &c_7313669);; 
}

static void __lambda_909(void *data, object self_736026, int argc, object *args) /* object self_736026, object r_733520 */
 {

  
closureN_type c_7313671;
object e_7313710 [5];
c_7313671.hdr.mark = gc_color_red;
 c_7313671.hdr.grayed = 0;
c_7313671.tag = closureN_tag;
 c_7313671.fn = (function_type)__lambda_910;
c_7313671.num_args = 1;
c_7313671.num_elements = 5;
c_7313671.elements = (object *)e_7313710;
c_7313671.elements[0] = ((closureN)self_736026)->elements[0];
c_7313671.elements[1] = ((closureN)self_736026)->elements[1];
c_7313671.elements[2] = ((closureN)self_736026)->elements[2];
c_7313671.elements[3] = ((closureN)self_736026)->elements[4];
c_7313671.elements[4] = ((closureN)self_736026)->elements[5];


closureN_type c_7313711;
object e_7313763 [2];
c_7313711.hdr.mark = gc_color_red;
 c_7313711.hdr.grayed = 0;
c_7313711.tag = closureN_tag;
 c_7313711.fn = (function_type)__lambda_916;
c_7313711.num_args = 2;
c_7313711.num_elements = 2;
c_7313711.elements = (object *)e_7313763;
c_7313711.elements[0] = ((closureN)self_736026)->elements[1];
c_7313711.elements[1] = ((closureN)self_736026)->elements[3];

return_direct_with_clo1(data,(closure)&c_7313671,__lambda_910,  &c_7313711);; 
}

static void __lambda_916(void *data, object self_736027, int argc, object *args) /* object self_736027, object k_733527, object scm_91arg_731163_731838, object arg_731164_731839 */
 {
 object k_733527 = args[0]; object scm_91arg_731163_731838 = args[1]; object arg_731164_731839 = args[2];
  
closureN_type c_7313713;
object e_7313746 [4];
c_7313713.hdr.mark = gc_color_red;
 c_7313713.hdr.grayed = 0;
c_7313713.tag = closureN_tag;
 c_7313713.fn = (function_type)__lambda_917;
c_7313713.num_args = 0;
c_7313713.num_elements = 4;
c_7313713.elements = (object *)e_7313746;
c_7313713.elements[0] = arg_731164_731839;
c_7313713.elements[1] = ((closureN)self_736027)->elements[0];
c_7313713.elements[2] = ((closureN)self_736027)->elements[1];
c_7313713.elements[3] = scm_91arg_731163_731838;


closureN_type c_7313747;
object e_7313762 [2];
c_7313747.hdr.mark = gc_color_red;
 c_7313747.hdr.grayed = 0;
c_7313747.tag = closureN_tag;
 c_7313747.fn = (function_type)__lambda_921;
c_7313747.num_args = 1;
c_7313747.num_elements = 2;
c_7313747.elements = (object *)e_7313762;
c_7313747.elements[0] = ((closureN)self_736027)->elements[1];
c_7313747.elements[1] = k_733527;

return_direct_with_clo1(data,(closure)&c_7313713,__lambda_917,  &c_7313747);; 
}

static void __lambda_921(void *data, object self_736028, int argc, object *args) /* object self_736028, object r_733528 */
 {

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


complex_num_type local_7313758; 


return_direct_with_clo1(data,(closure)&c_7313749,__lambda_922,  Cyc_fast_sum(data,&local_7313758, car(((closureN)self_736028)->elements[0]), obj_int2obj(1)));; 
}

static void __lambda_922(void *data, object self_736029, int argc, object *args) /* object self_736029, object r_733529 */
 {
 object r_733529 = args[0];
  

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

static void __lambda_917(void *data, object self_736030, int argc, object *args) /* object self_736030, object k_733530 */
 {
 object k_733530 = args[0];
  
closureN_type c_7313715;
object e_7313744 [4];
c_7313715.hdr.mark = gc_color_red;
 c_7313715.hdr.grayed = 0;
c_7313715.tag = closureN_tag;
 c_7313715.fn = (function_type)__lambda_918;
c_7313715.num_args = 1;
c_7313715.num_elements = 4;
c_7313715.elements = (object *)e_7313744;
c_7313715.elements[0] = ((closureN)self_736030)->elements[0];
c_7313715.elements[1] = ((closureN)self_736030)->elements[1];
c_7313715.elements[2] = ((closureN)self_736030)->elements[2];
c_7313715.elements[3] = k_733530;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_7313715, __glo__85ref_91table_85_scheme_cyclone_cgen, ((closureN)self_736030)->elements[3], boolean_f);; 
}

static void __lambda_918(void *data, object self_736031, int argc, object *args) /* object self_736031, object r_733531 */
 {
 object r_733531 = args[0];
  if( (boolean_f != r_733531) ){ 
  
closureN_type c_7313717;
object e_7313735 [3];
c_7313717.hdr.mark = gc_color_red;
 c_7313717.hdr.grayed = 0;
c_7313717.tag = closureN_tag;
 c_7313717.fn = (function_type)__lambda_919;
c_7313717.num_args = 1;
c_7313717.num_elements = 3;
c_7313717.elements = (object *)e_7313735;
c_7313717.elements[0] = ((closureN)self_736031)->elements[0];
c_7313717.elements[1] = ((closureN)self_736031)->elements[1];
c_7313717.elements[2] = ((closureN)self_736031)->elements[3];




object c_7313738 = Cyc_number2string2(data,(closure)&c_7313717,1,car(((closureN)self_736031)->elements[2]));
return_closcall1(data,(closure)&c_7313717,  c_7313738);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736031)->elements[3], (((closure)  ((closureN)self_736031)->elements[3])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_919(void *data, object self_736032, int argc, object *args) /* object self_736032, object r_733533 */
 {
 object r_733533 = args[0];
  
closureN_type c_7313719;
object e_7313725 [2];
c_7313719.hdr.mark = gc_color_red;
 c_7313719.hdr.grayed = 0;
c_7313719.tag = closureN_tag;
 c_7313719.fn = (function_type)__lambda_920;
c_7313719.num_args = 1;
c_7313719.num_elements = 2;
c_7313719.elements = (object *)e_7313725;
c_7313719.elements[0] = ((closureN)self_736032)->elements[1];
c_7313719.elements[1] = ((closureN)self_736032)->elements[2];




make_utf8_string_with_len(c_7313733, " = args[", 8, 8);

make_utf8_string_with_len(c_7313734, "];", 2, 2);

object c_7313728 = Cyc_string_append(data,(closure)&c_7313719,5,car(((closureN)self_736032)->elements[1]), ((closureN)self_736032)->elements[0], &c_7313733, r_733533, &c_7313734);
return_closcall1(data,(closure)&c_7313719,  c_7313728);; 
}

static void __lambda_920(void *data, object self_736033, int argc, object *args) /* object self_736033, object r_733532 */
 {
 object r_733532 = args[0];
  

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

static void __lambda_910(void *data, object self_736034, int argc, object *args) /* object self_736034, object r_733522 */
 {
 object r_733522 = args[0];
  
closureN_type c_7313673;
object e_7313681 [2];
c_7313673.hdr.mark = gc_color_red;
 c_7313673.hdr.grayed = 0;
c_7313673.tag = closureN_tag;
 c_7313673.fn = (function_type)__lambda_911;
c_7313673.num_args = 0;
c_7313673.num_elements = 2;
c_7313673.elements = (object *)e_7313681;
c_7313673.elements[0] = ((closureN)self_736034)->elements[2];
c_7313673.elements[1] = ((closureN)self_736034)->elements[4];


closureN_type c_7313682;
object e_7313709 [5];
c_7313682.hdr.mark = gc_color_red;
 c_7313682.hdr.grayed = 0;
c_7313682.tag = closureN_tag;
 c_7313682.fn = (function_type)__lambda_912;
c_7313682.num_args = 1;
c_7313682.num_elements = 5;
c_7313682.elements = (object *)e_7313709;
c_7313682.elements[0] = ((closureN)self_736034)->elements[0];
c_7313682.elements[1] = ((closureN)self_736034)->elements[1];
c_7313682.elements[2] = ((closureN)self_736034)->elements[2];
c_7313682.elements[3] = ((closureN)self_736034)->elements[3];
c_7313682.elements[4] = r_733522;

return_direct_with_clo1(data,(closure)&c_7313673,__lambda_911,  &c_7313682);; 
}

static void __lambda_912(void *data, object self_736035, int argc, object *args) /* object self_736035, object r_733523 */
 {
 object r_733523 = args[0];
  
closureN_type c_7313684;
object e_7313696 [2];
c_7313684.hdr.mark = gc_color_red;
 c_7313684.hdr.grayed = 0;
c_7313684.tag = closureN_tag;
 c_7313684.fn = (function_type)__lambda_913;
c_7313684.num_args = 0;
c_7313684.num_elements = 2;
c_7313684.elements = (object *)e_7313696;
c_7313684.elements[0] = ((closureN)self_736035)->elements[0];
c_7313684.elements[1] = ((closureN)self_736035)->elements[2];


closureN_type c_7313697;
object e_7313708 [4];
c_7313697.hdr.mark = gc_color_red;
 c_7313697.hdr.grayed = 0;
c_7313697.tag = closureN_tag;
 c_7313697.fn = (function_type)__lambda_914;
c_7313697.num_args = 1;
c_7313697.num_elements = 4;
c_7313697.elements = (object *)e_7313708;
c_7313697.elements[0] = ((closureN)self_736035)->elements[1];
c_7313697.elements[1] = ((closureN)self_736035)->elements[3];
c_7313697.elements[2] = ((closureN)self_736035)->elements[4];
c_7313697.elements[3] = r_733523;

return_direct_with_clo1(data,(closure)&c_7313684,__lambda_913,  &c_7313697);; 
}

static void __lambda_914(void *data, object self_736036, int argc, object *args) /* object self_736036, object r_733524 */
 {
 object r_733524 = args[0];
  
closureN_type c_7313699;
object e_7313705 [2];
c_7313699.hdr.mark = gc_color_red;
 c_7313699.hdr.grayed = 0;
c_7313699.tag = closureN_tag;
 c_7313699.fn = (function_type)__lambda_915;
c_7313699.num_args = 1;
c_7313699.num_elements = 2;
c_7313699.elements = (object *)e_7313705;
c_7313699.elements[0] = ((closureN)self_736036)->elements[0];
c_7313699.elements[1] = ((closureN)self_736036)->elements[1];

return_direct_with_clo4(data,  __glo_Cyc_91for_91each_91loop_912_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_912_scheme_base)->fn),  &c_7313699, ((closureN)self_736036)->elements[2], ((closureN)self_736036)->elements[3], r_733524);; 
}

static void __lambda_915(void *data, object self_736037, int argc, object *args) /* object self_736037, object r_733521 */
 {

  

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

static void __lambda_913(void *data, object self_736038, int argc, object *args) /* object self_736038, object k_733525 */
 {
 object k_733525 = args[0];
  if( (boolean_f != ((closureN)self_736038)->elements[1]) ){ 
  



return_direct_with_clo1(data,  k_733525,__lambda_914,  Cyc_cdr(data, car(((closureN)self_736038)->elements[0])));
} else { 
  

return_direct_with_clo1(data,  k_733525,__lambda_914,  car(((closureN)self_736038)->elements[0]));}
;; 
}

static void __lambda_911(void *data, object self_736039, int argc, object *args) /* object self_736039, object k_733526 */
 {
 object k_733526 = args[0];
  if( (boolean_f != ((closureN)self_736039)->elements[0]) ){ 
  

return_direct_with_clo1(data,  k_733526,__lambda_912,  Cyc_cdr(data, ((closureN)self_736039)->elements[1]));
} else { 
  return_direct_with_clo1(data,  k_733526,__lambda_912,  ((closureN)self_736039)->elements[1]);}
;; 
}

static void __lambda_905(void *data, object self_736040, int argc, object *args) /* object self_736040, object k_733534 */
 {
 object k_733534 = args[0];
  
closureN_type c_7313647;
object e_7313666 [2];
c_7313647.hdr.mark = gc_color_red;
 c_7313647.hdr.grayed = 0;
c_7313647.tag = closureN_tag;
 c_7313647.fn = (function_type)__lambda_906;
c_7313647.num_args = 1;
c_7313647.num_elements = 2;
c_7313647.elements = (object *)e_7313666;
c_7313647.elements[0] = ((closureN)self_736040)->elements[0];
c_7313647.elements[1] = k_733534;

return_direct_with_clo2(data,  __glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen, (((closure)  __glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen)->fn),  &c_7313647, ((closureN)self_736040)->elements[1]);; 
}

static void __lambda_906(void *data, object self_736041, int argc, object *args) /* object self_736041, object r_733535 */
 {
 object r_733535 = args[0];
  if( (boolean_f != r_733535) ){ 
  
closureN_type c_7313649;
object e_7313660 [2];
c_7313649.hdr.mark = gc_color_red;
 c_7313649.hdr.grayed = 0;
c_7313649.tag = closureN_tag;
 c_7313649.fn = (function_type)__lambda_907;
c_7313649.num_args = 1;
c_7313649.num_elements = 2;
c_7313649.elements = (object *)e_7313660;
c_7313649.elements[0] = ((closureN)self_736041)->elements[0];
c_7313649.elements[1] = ((closureN)self_736041)->elements[1];



return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_7313649, car(((closureN)self_736041)->elements[0]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_736041)->elements[1], (((closure)  ((closureN)self_736041)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_907(void *data, object self_736042, int argc, object *args) /* object self_736042, object r_733538 */
 {
 object r_733538 = args[0];
  
closureN_type c_7313651;
object e_7313657 [2];
c_7313651.hdr.mark = gc_color_red;
 c_7313651.hdr.grayed = 0;
c_7313651.tag = closureN_tag;
 c_7313651.fn = (function_type)__lambda_908;
c_7313651.num_args = 1;
c_7313651.num_elements = 2;
c_7313651.elements = (object *)e_7313657;
c_7313651.elements[0] = ((closureN)self_736042)->elements[0];
c_7313651.elements[1] = ((closureN)self_736042)->elements[1];



return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_7313651, Cyc_cddr(data, r_733538));; 
}

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

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

static void __lambda_900(void *data, object self_736044, int argc, object *args) /* object self_736044, object k_733539 */
 {
 object k_733539 = args[0];
  if( (boolean_f != ((closureN)self_736044)->elements[2]) ){ 
  
make_utf8_string_with_len(c_7313615, "(void *data, object ", 20, 20);

make_utf8_string_with_len(c_7313617, ", int argc, object *args)", 25, 25);

make_utf8_string_with_len(c_7313618, " /* ", 4, 4);

make_utf8_string_with_len(c_7313620, " */\n", 4, 4);

object c_7313614 = Cyc_string_append(data,  k_733539,6,&c_7313615, ((closureN)self_736044)->elements[1], &c_7313617, &c_7313618, ((closureN)self_736044)->elements[3], &c_7313620);
return_direct_with_clo1(data,  k_733539, (((closure)  k_733539)->fn),  c_7313614);
} else { 
  
make_utf8_string_with_len(c_7313625, "(void *data, ", 13, 13);

make_utf8_string_with_len(c_7313628, ")", 1, 1);

object c_7313624 = Cyc_string_append(data,  k_733539,4,&c_7313625, ((closureN)self_736044)->elements[0], ((closureN)self_736044)->elements[3], &c_7313628);
return_direct_with_clo1(data,  k_733539, (((closure)  k_733539)->fn),  c_7313624);}
;; 
}

static void __lambda_897(void *data, object self_736045, int argc, object *args) /* object self_736045, object k_733541 */
 {
 object k_733541 = args[0];
  if( (boolean_f != ((closureN)self_736045)->elements[2]) ){ 
  
make_utf8_string_with_len(c_7313591, "", 0, 0);
return_direct_with_clo1(data,  k_733541, (((closure)  k_733541)->fn),  &c_7313591);
} else { 
    
  make_utf8_string_with_len(c_7313594, "", 0, 0);
if( (boolean_f != equalp(&c_7313594, ((closureN)self_736045)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_733541, (((closure)  k_733541)->fn),  ((closureN)self_736045)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_7313603, ",", 1, 1);

object c_7313601 = Cyc_string_append(data,  k_733541,2,((closureN)self_736045)->elements[0], &c_7313603);
return_direct_with_clo1(data,  k_733541, (((closure)  k_733541)->fn),  c_7313601);}
;}
;; 
}

static void __lambda_894(void *data, object self_736046, int argc, object *args) /* object self_736046, object k_733544 */
 {
 object k_733544 = args[0];
  if( (boolean_f != ((closureN)self_736046)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_733544, (((closure)  k_733544)->fn),  ((closureN)self_736046)->elements[1]);
} else { 
  if( (boolean_f != ((closureN)self_736046)->elements[0]) ){ 
  return_direct_with_clo1(data,  k_733544, (((closure)  k_733544)->fn),  boolean_f);
} else { 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_736046)->elements[2])) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_736046)->elements[2]))) ){ 
  return_direct_with_clo1(data,  k_733544, (((closure)  k_733544)->fn),  boolean_f);
} else { 
  
closureN_type c_7313577;
object e_7313580 [1];
c_7313577.hdr.mark = gc_color_red;
 c_7313577.hdr.grayed = 0;
c_7313577.tag = closureN_tag;
 c_7313577.fn = (function_type)__lambda_895;
c_7313577.num_args = 1;
c_7313577.num_elements = 1;
c_7313577.elements = (object *)e_7313580;
c_7313577.elements[0] = k_733544;



return_direct_with_clo2(data,  __glo_adb_117get_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_scheme_cyclone_cps_91optimizations)->fn),  &c_7313577, Cyc_cdr(data, ((closureN)self_736046)->elements[2]));}
;
} else { 
  return_direct_with_clo1(data,  k_733544, (((closure)  k_733544)->fn),  boolean_f);}
;}
;}
;; 
}

static void __lambda_895(void *data, object self_736047, int argc, object *args) /* object self_736047, object r_733547 */
 {
 object r_733547 = args[0];
  return_direct_with_clo2(data,  __glo_adbv_117direct_91rec_91call_127_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbv_117direct_91rec_91call_127_scheme_cyclone_cps_91optimizations)->fn),  ((closureN)self_736047)->elements[0], r_733547);; 
}

static void __lambda_886(void *data, object self_736048, int argc, object *args) /* object self_736048, object k_733553 */
 {
 object k_733553 = args[0];
  if( (boolean_f != ((closureN)self_736048)->elements[1]) ){ 
  
closureN_type c_7313536;
object e_7313546 [1];
c_7313536.hdr.mark = gc_color_red;
 c_7313536.hdr.grayed = 0;
c_7313536.tag = closureN_tag;
 c_7313536.fn = (function_type)__lambda_887;
c_7313536.num_args = 1;
c_7313536.num_elements = 1;
c_7313536.elements = (object *)e_7313546;
c_7313536.elements[0] = k_733553;

return_direct_with_clo1(data,(closure)&c_7313536,__lambda_887,  ((closureN)self_736048)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_7313549, "_", 1, 1);
return_direct_with_clo1(data,  k_733553, (((closure)  k_733553)->fn),  &c_7313549);}
;; 
}

static void __lambda_887(void *data, object self_736049, int argc, object *args) /* object self_736049, object lis_731179_731841 */
 {
 object lis_731179_731841 = args[0];
  
closureN_type c_7313538;
object e_7313543 [1];
c_7313538.hdr.mark = gc_color_red;
 c_7313538.hdr.grayed = 0;
c_7313538.tag = closureN_tag;
 c_7313538.fn = (function_type)__lambda_888;
c_7313538.num_args = 1;
c_7313538.num_elements = 1;
c_7313538.elements = (object *)e_7313543;
c_7313538.elements[0] = ((closureN)self_736049)->elements[0];



return_direct_with_clo3(data,  __glo_string_91split_scheme_cyclone_util, (((closure)  __glo_string_91split_scheme_cyclone_util)->fn),  &c_7313538, Cyc_car(data, lis_731179_731841), obj_char2obj(32));; 
}

static void __lambda_888(void *data, object self_736050, int argc, object *args) /* object self_736050, object r_733555 */
 {
 object r_733555 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_736050)->elements[0], (((closure)  ((closureN)self_736050)->elements[0])->fn),  Cyc_cadr(data, r_733555));; 
}

static void __lambda_884(void *data, object self_736051, int argc, object *args) /* object self_736051, object k_733558 */
 {
 object k_733558 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_736051)->elements[1])) ){ 
  
pair_type local_7313526; 
return_direct_with_clo1(data,  k_733558,__lambda_885,  set_cell_as_expr(&local_7313526, ((closureN)self_736051)->elements[0]));
} else { 
  return_direct_with_clo1(data,  k_733558,__lambda_885,  ((closureN)self_736051)->elements[1]);}
;; 
}

static void __lambda_880(void *data, object self_736052, int argc, object *args) /* object self_736052, object k_733560 */
 {
 object k_733560 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, ((closureN)self_736052)->elements[0]), obj_int2obj(3))) ){ 
  
closureN_type c_7313502;
object e_7313508 [1];
c_7313502.hdr.mark = gc_color_red;
 c_7313502.hdr.grayed = 0;
c_7313502.tag = closureN_tag;
 c_7313502.fn = (function_type)__lambda_881;
c_7313502.num_args = 1;
c_7313502.num_elements = 1;
c_7313502.elements = (object *)e_7313508;
c_7313502.elements[0] = k_733560;


object c_7313511 = Cyc_substring(data,(closure)&c_7313502,((closureN)self_736052)->elements[0], obj_int2obj(0), obj_int2obj(4));
return_closcall1(data,(closure)&c_7313502,  c_7313511);
} else { 
  return_direct_with_clo1(data,  k_733560, (((closure)  k_733560)->fn),  boolean_f);}
;; 
}

static void __lambda_881(void *data, object self_736053, int argc, object *args) /* object self_736053, object r_733562 */
 {
 object r_733562 = args[0];
  


make_utf8_string_with_len(c_7313507, "self", 4, 4);
return_direct_with_clo1(data,  ((closureN)self_736053)->elements[0], (((closure)  ((closureN)self_736053)->elements[0])->fn),  equalp(&c_7313507, r_733562));; 
}

static void __lambda_878(void *data, object self_736054, int argc, object *args) /* object self_736054, object k_733564 */
 {
 object k_733564 = args[0];
  if( (boolean_f != ((closureN)self_736054)->elements[0]) ){ 
  
make_utf8_string_with_len(c_7313489, "closure _", 9, 9);
return_direct_with_clo1(data,  k_733564,__lambda_879,  &c_7313489);
} else { 
  
make_utf8_string_with_len(c_7313491, "object ptr", 10, 10);
return_direct_with_clo1(data,  k_733564,__lambda_879,  &c_7313491);}
;; 
}

static void __lambda_876(void *data, object self_736055, int argc, object *args) /* object self_736055, object k_733565 */
 {
 object k_733565 = args[0];
  if( (boolean_f != ((closureN)self_736055)->elements[0]) ){ 
  
make_utf8_string_with_len(c_7313480, "int argc, ", 10, 10);
return_direct_with_clo1(data,  k_733565,__lambda_877,  &c_7313480);
} else { 
  
make_utf8_string_with_len(c_7313482, "", 0, 0);
return_direct_with_clo1(data,  k_733565,__lambda_877,  &c_7313482);}
;; 
}

static void __lambda_869(void *data, object self_736056, int argc, object *args) /* object self_736056, object k_733567 */
 {
 object k_733567 = args[0];
  
closureN_type c_7313432;
object e_7313464 [2];
c_7313432.hdr.mark = gc_color_red;
 c_7313432.hdr.grayed = 0;
c_7313432.tag = closureN_tag;
 c_7313432.fn = (function_type)__lambda_870;
c_7313432.num_args = 1;
c_7313432.num_elements = 2;
c_7313432.elements = (object *)e_7313464;
c_7313432.elements[0] = ((closureN)self_736056)->elements[0];
c_7313432.elements[1] = k_733567;

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_7313432, ((closureN)self_736056)->elements[0]);; 
}

static void __lambda_870(void *data, object self_736057, int argc, object *args) /* object self_736057, object r_733575 */
 {
 object r_733575 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, r_733575), obj_int2obj(0))) ){ 
  
closureN_type c_7313438;
object e_7313456 [1];
c_7313438.hdr.mark = gc_color_red;
 c_7313438.hdr.grayed = 0;
c_7313438.tag = closureN_tag;
 c_7313438.fn = (function_type)__lambda_871;
c_7313438.num_args = 0;
c_7313438.num_elements = 1;
c_7313438.elements = (object *)e_7313456;
c_7313438.elements[0] = ((closureN)self_736057)->elements[0];


closureN_type c_7313457;
object e_7313460 [1];
c_7313457.hdr.mark = gc_color_red;
 c_7313457.hdr.grayed = 0;
c_7313457.tag = closureN_tag;
 c_7313457.fn = (function_type)__lambda_874;
c_7313457.num_args = 1;
c_7313457.num_elements = 1;
c_7313457.elements = (object *)e_7313460;
c_7313457.elements[0] = ((closureN)self_736057)->elements[1];

return_direct_with_clo1(data,(closure)&c_7313438,__lambda_871,  &c_7313457);
} else { 
  
make_utf8_string_with_len(c_7313463, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_736057)->elements[1], (((closure)  ((closureN)self_736057)->elements[1])->fn),  &c_7313463);}
;; 
}

static void __lambda_874(void *data, object self_736058, int argc, object *args) /* object self_736058, object r_733569 */
 {
 object r_733569 = args[0];
  return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  ((closureN)self_736058)->elements[0], r_733569);; 
}

static void __lambda_871(void *data, object self_736059, int argc, object *args) /* object self_736059, object k_733570 */
 {
 object k_733570 = args[0];
  
closureN_type c_7313440;
object e_7313454 [2];
c_7313440.hdr.mark = gc_color_red;
 c_7313440.hdr.grayed = 0;
c_7313440.tag = closureN_tag;
 c_7313440.fn = (function_type)__lambda_872;
c_7313440.num_args = 1;
c_7313440.num_elements = 2;
c_7313440.elements = (object *)e_7313454;
c_7313440.elements[0] = ((closureN)self_736059)->elements[0];
c_7313440.elements[1] = k_733570;

return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  &c_7313440, ((closureN)self_736059)->elements[0]);; 
}

static void __lambda_872(void *data, object self_736060, int argc, object *args) /* object self_736060, object r_733573 */
 {
 object r_733573 = args[0];
    
if( (boolean_f != Cyc_is_pair(r_733573)) ){ 
  
closureN_type c_7313444;
object e_7313449 [1];
c_7313444.hdr.mark = gc_color_red;
 c_7313444.hdr.grayed = 0;
c_7313444.tag = closureN_tag;
 c_7313444.fn = (function_type)__lambda_873;
c_7313444.num_args = 1;
c_7313444.num_elements = 1;
c_7313444.elements = (object *)e_7313449;
c_7313444.elements[0] = ((closureN)self_736060)->elements[1];

return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  &c_7313444, ((closureN)self_736060)->elements[0]);
} else { 
  return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  ((closureN)self_736060)->elements[1], ((closureN)self_736060)->elements[0]);}
;; 
}

static void __lambda_873(void *data, object self_736061, int argc, object *args) /* object self_736061, object r_733572 */
 {
 object r_733572 = args[0];
  

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

static void __lambda_864(void *data, object self_736062, int argc, object *args) /* object self_736062, object k_733578 */
 {
 object k_733578 = args[0];
  if( (boolean_f != ((closureN)self_736062)->elements[0]) ){ 
  return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  k_733578, ((closureN)self_736062)->elements[1]);
} else { 
  
closureN_type c_7313416;
object e_7313421 [1];
c_7313416.hdr.mark = gc_color_red;
 c_7313416.hdr.grayed = 0;
c_7313416.tag = closureN_tag;
 c_7313416.fn = (function_type)__lambda_865;
c_7313416.num_args = 1;
c_7313416.num_elements = 1;
c_7313416.elements = (object *)e_7313421;
c_7313416.elements[0] = k_733578;

return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  &c_7313416, ((closureN)self_736062)->elements[1]);}
;; 
}

static void __lambda_865(void *data, object self_736063, int argc, object *args) /* object self_736063, object r_733579 */
 {
 object r_733579 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_736063)->elements[0], (((closure)  ((closureN)self_736063)->elements[0])->fn),  Cyc_cdr(data, r_733579));; 
}

static void __lambda_854(void *data, object _, int argc, object *args) /* closure _,object k_733452, object formals_731080_731811, object type_731081_731812 */
 {
object k_733452 = args[0]; object formals_731080_731811 = args[1]; object type_731081_731812 = args[2];
  object r_733453;
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-formals");
  
if( (boolean_f != Cyc_is_pair(formals_731080_731811)) ){ 
  r_733453 = boolean_f;
} else { 
  
  r_733453 = equalp(type_731081_731812, quote_args_117varargs);}
;if( (boolean_f != r_733453) ){ 
  
closureN_type c_7313337;
object e_7313345 [1];
c_7313337.hdr.mark = gc_color_red;
 c_7313337.hdr.grayed = 0;
c_7313337.tag = closureN_tag;
 c_7313337.fn = (function_type)__lambda_855;
c_7313337.num_args = 1;
c_7313337.num_elements = 1;
c_7313337.elements = (object *)e_7313345;
c_7313337.elements[0] = k_733452;

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7313337, formals_731080_731811);
} else { 
    
if( (boolean_f != Cyc_is_pair(formals_731080_731811)) ){ 
  
closureN_type c_7313349;
object e_7313398 [3];
c_7313349.hdr.mark = gc_color_red;
 c_7313349.hdr.grayed = 0;
c_7313349.tag = closureN_tag;
 c_7313349.fn = (function_type)__lambda_856;
c_7313349.num_args = 1;
c_7313349.num_elements = 3;
c_7313349.elements = (object *)e_7313398;
c_7313349.elements[0] = formals_731080_731811;
c_7313349.elements[1] = k_733452;
c_7313349.elements[2] = type_731081_731812;



return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7313349, Cyc_car(data, formals_731080_731811));
} else { 
  
make_utf8_string_with_len(c_7313402, "", 0, 0);
return_direct_with_clo1(data,  k_733452, (((closure)  k_733452)->fn),  &c_7313402);}
;}
;; 
}

static void __lambda_856(void *data, object self_735964, int argc, object *args) /* object self_735964, object r_733456 */
 {
 object r_733456 = args[0];
  
closureN_type c_7313351;
object e_7313388 [2];
c_7313351.hdr.mark = gc_color_red;
 c_7313351.hdr.grayed = 0;
c_7313351.tag = closureN_tag;
 c_7313351.fn = (function_type)__lambda_857;
c_7313351.num_args = 0;
c_7313351.num_elements = 2;
c_7313351.elements = (object *)e_7313388;
c_7313351.elements[0] = ((closureN)self_735964)->elements[0];
c_7313351.elements[1] = ((closureN)self_735964)->elements[2];


closureN_type c_7313389;
object e_7313397 [2];
c_7313389.hdr.mark = gc_color_red;
 c_7313389.hdr.grayed = 0;
c_7313389.tag = closureN_tag;
 c_7313389.fn = (function_type)__lambda_860;
c_7313389.num_args = 1;
c_7313389.num_elements = 2;
c_7313389.elements = (object *)e_7313397;
c_7313389.elements[0] = ((closureN)self_735964)->elements[1];
c_7313389.elements[1] = r_733456;

return_direct_with_clo1(data,(closure)&c_7313351,__lambda_857,  &c_7313389);; 
}

static void __lambda_860(void *data, object self_735965, int argc, object *args) /* object self_735965, object r_733457 */
 {
 object r_733457 = args[0];
  
make_utf8_string_with_len(c_7313395, "object ", 7, 7);

object c_7313394 = Cyc_string_append(data,  ((closureN)self_735965)->elements[0],3,&c_7313395, ((closureN)self_735965)->elements[1], r_733457);
return_direct_with_clo1(data,  ((closureN)self_735965)->elements[0], (((closure)  ((closureN)self_735965)->elements[0])->fn),  c_7313394);; 
}

static void __lambda_857(void *data, object self_735966, int argc, object *args) /* object self_735966, object k_733458 */
 {
 object k_733458 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_735966)->elements[0]))) ){ 
  
closureN_type c_7313358;
object e_7313365 [1];
c_7313358.hdr.mark = gc_color_red;
 c_7313358.hdr.grayed = 0;
c_7313358.tag = closureN_tag;
 c_7313358.fn = (function_type)__lambda_858;
c_7313358.num_args = 1;
c_7313358.num_elements = 1;
c_7313358.elements = (object *)e_7313365;
c_7313358.elements[0] = k_733458;



return_direct_with_clo3(data,  __glo_c_91compile_91formals_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91formals_scheme_cyclone_cgen)->fn),  &c_7313358, Cyc_cdr(data, ((closureN)self_735966)->elements[0]), ((closureN)self_735966)->elements[1]);
} else { 
    
if( (boolean_f != equalp(quote_args_117fixed, ((closureN)self_735966)->elements[1])) ){ 
  
make_utf8_string_with_len(c_7313374, "", 0, 0);
return_direct_with_clo1(data,  k_733458, (((closure)  k_733458)->fn),  &c_7313374);
} else { 
  
closureN_type c_7313376;
object e_7313384 [1];
c_7313376.hdr.mark = gc_color_red;
 c_7313376.hdr.grayed = 0;
c_7313376.tag = closureN_tag;
 c_7313376.fn = (function_type)__lambda_859;
c_7313376.num_args = 1;
c_7313376.num_elements = 1;
c_7313376.elements = (object *)e_7313384;
c_7313376.elements[0] = k_733458;



return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7313376, Cyc_cdr(data, ((closureN)self_735966)->elements[0]));}
;}
;; 
}

static void __lambda_859(void *data, object self_735968, int argc, object *args) /* object self_735968, object r_733463 */
 {
 object r_733463 = args[0];
  
make_utf8_string_with_len(c_7313382, ", object ", 9, 9);

make_utf8_string_with_len(c_7313383, "_raw, ...", 9, 9);

object c_7313381 = Cyc_string_append(data,  ((closureN)self_735968)->elements[0],3,&c_7313382, r_733463, &c_7313383);
return_direct_with_clo1(data,  ((closureN)self_735968)->elements[0], (((closure)  ((closureN)self_735968)->elements[0])->fn),  c_7313381);; 
}

static void __lambda_858(void *data, object self_735967, int argc, object *args) /* object self_735967, object r_733460 */
 {
 object r_733460 = args[0];
  
make_utf8_string_with_len(c_7313364, ", ", 2, 2);

object c_7313363 = Cyc_string_append(data,  ((closureN)self_735967)->elements[0],2,&c_7313364, r_733460);
return_direct_with_clo1(data,  ((closureN)self_735967)->elements[0], (((closure)  ((closureN)self_735967)->elements[0])->fn),  c_7313363);; 
}

static void __lambda_855(void *data, object self_735963, int argc, object *args) /* object self_735963, object r_733454 */
 {
 object r_733454 = args[0];
  
make_utf8_string_with_len(c_7313343, "object ", 7, 7);

make_utf8_string_with_len(c_7313344, "_raw, ...", 9, 9);

object c_7313342 = Cyc_string_append(data,  ((closureN)self_735963)->elements[0],3,&c_7313343, r_733454, &c_7313344);
return_direct_with_clo1(data,  ((closureN)self_735963)->elements[0], (((closure)  ((closureN)self_735963)->elements[0])->fn),  c_7313342);; 
}

static void __lambda_781(void *data, object _, int argc, object *args) /* closure _,object k_733353, object exp_731005_731779, object append_91preamble_731006_731780, object cont_731007_731781, object ast_91id_731008_731782, object trace_731009_731783, object cps_127_731010_731784 */
 {
object k_733353 = args[0]; object exp_731005_731779 = args[1]; object ast_91id_731008_731782 = args[4]; object trace_731009_731783 = args[5]; object cps_127_731010_731784 = args[6];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-closure");

closureN_type c_7312809;
object e_7313327 [5];
c_7312809.hdr.mark = gc_color_red;
 c_7312809.hdr.grayed = 0;
c_7312809.tag = closureN_tag;
 c_7312809.fn = (function_type)__lambda_782;
c_7312809.num_args = 1;
c_7312809.num_elements = 5;
c_7312809.elements = (object *)e_7313327;
c_7312809.elements[0] = ast_91id_731008_731782;
c_7312809.elements[1] = cps_127_731010_731784;
c_7312809.elements[2] = exp_731005_731779;
c_7312809.elements[3] = k_733353;
c_7312809.elements[4] = trace_731009_731783;

return_direct_with_clo2(data,  __glo_closure_91_125lam_scheme_cyclone_transforms, (((closure)  __glo_closure_91_125lam_scheme_cyclone_transforms)->fn),  &c_7312809, exp_731005_731779);; 
}

static void __lambda_782(void *data, object self_735890, int argc, object *args) /* object self_735890, object r_733448 */
 {
 object r_733448 = args[0];
  
closureN_type c_7312811;
object e_7313323 [6];
c_7312811.hdr.mark = gc_color_red;
 c_7312811.hdr.grayed = 0;
c_7312811.tag = closureN_tag;
 c_7312811.fn = (function_type)__lambda_783;
c_7312811.num_args = 1;
c_7312811.num_elements = 6;
c_7312811.elements = (object *)e_7313323;
c_7312811.elements[0] = ((closureN)self_735890)->elements[0];
c_7312811.elements[1] = ((closureN)self_735890)->elements[1];
c_7312811.elements[2] = ((closureN)self_735890)->elements[2];
c_7312811.elements[3] = ((closureN)self_735890)->elements[3];
c_7312811.elements[4] = r_733448;
c_7312811.elements[5] = ((closureN)self_735890)->elements[4];



return_direct_with_clo1(data,(closure)&c_7312811,__lambda_783,  Cyc_cdr(data, ((closureN)self_735890)->elements[2]));; 
}

static void __lambda_783(void *data, object self_735891, int argc, object *args) /* object self_735891, object r_733449 */
 {
 object r_733449 = args[0];
  
closureN_type c_7312813;
object e_7313321 [5];
c_7312813.hdr.mark = gc_color_red;
 c_7312813.hdr.grayed = 0;
c_7312813.tag = closureN_tag;
 c_7312813.fn = (function_type)__lambda_784;
c_7312813.num_args = 1;
c_7312813.num_elements = 5;
c_7312813.elements = (object *)e_7313321;
c_7312813.elements[0] = ((closureN)self_735891)->elements[0];
c_7312813.elements[1] = ((closureN)self_735891)->elements[1];
c_7312813.elements[2] = ((closureN)self_735891)->elements[2];
c_7312813.elements[3] = ((closureN)self_735891)->elements[3];
c_7312813.elements[4] = ((closureN)self_735891)->elements[5];

return_direct_with_clo3(data,  __glo_find_91closure_91assigned_91var_91index_67_scheme_cyclone_cgen, (((closure)  __glo_find_91closure_91assigned_91var_91index_67_scheme_cyclone_cgen)->fn),  &c_7312813, ((closureN)self_735891)->elements[4], r_733449);; 
}

static void __lambda_784(void *data, object self_735892, int argc, object *args) /* object self_735892, object r_733354 */
 {

  
closureN_type c_7312815;
object e_7313319 [5];
c_7312815.hdr.mark = gc_color_red;
 c_7312815.hdr.grayed = 0;
c_7312815.tag = closureN_tag;
 c_7312815.fn = (function_type)__lambda_785;
c_7312815.num_args = 1;
c_7312815.num_elements = 5;
c_7312815.elements = (object *)e_7313319;
c_7312815.elements[0] = ((closureN)self_735892)->elements[0];
c_7312815.elements[1] = ((closureN)self_735892)->elements[1];
c_7312815.elements[2] = ((closureN)self_735892)->elements[2];
c_7312815.elements[3] = ((closureN)self_735892)->elements[3];
c_7312815.elements[4] = ((closureN)self_735892)->elements[4];

return_direct_with_clo2(data,  __glo_closure_91_125lam_scheme_cyclone_transforms, (((closure)  __glo_closure_91_125lam_scheme_cyclone_transforms)->fn),  &c_7312815, ((closureN)self_735892)->elements[2]);; 
}

static void __lambda_785(void *data, object self_735893, int argc, object *args) /* object self_735893, object lam_731013_731785 */
 {
 object lam_731013_731785 = args[0];
  
closureN_type c_7312817;
object e_7313316 [6];
c_7312817.hdr.mark = gc_color_red;
 c_7312817.hdr.grayed = 0;
c_7312817.tag = closureN_tag;
 c_7312817.fn = (function_type)__lambda_786;
c_7312817.num_args = 1;
c_7312817.num_elements = 6;
c_7312817.elements = (object *)e_7313316;
c_7312817.elements[0] = ((closureN)self_735893)->elements[0];
c_7312817.elements[1] = ((closureN)self_735893)->elements[1];
c_7312817.elements[2] = ((closureN)self_735893)->elements[2];
c_7312817.elements[3] = ((closureN)self_735893)->elements[3];
c_7312817.elements[4] = lam_731013_731785;
c_7312817.elements[5] = ((closureN)self_735893)->elements[4];

return_direct_with_clo3(data,  __glo_alloca_127_scheme_cyclone_cgen, (((closure)  __glo_alloca_127_scheme_cyclone_cgen)->fn),  &c_7312817, ((closureN)self_735893)->elements[0], ((closureN)self_735893)->elements[4]);; 
}

static void __lambda_786(void *data, object self_735894, int argc, object *args) /* object self_735894, object use_91alloca_127_731016_731786 */
 {
 object use_91alloca_127_731016_731786 = args[0];
  
closureN_type c_7312819;
object e_7313283 [6];
c_7312819.hdr.mark = gc_color_red;
 c_7312819.hdr.grayed = 0;
c_7312819.tag = closureN_tag;
 c_7312819.fn = (function_type)__lambda_787;
c_7312819.num_args = 1;
c_7312819.num_elements = 6;
c_7312819.elements = (object *)e_7313283;
c_7312819.elements[0] = ((closureN)self_735894)->elements[1];
c_7312819.elements[1] = ((closureN)self_735894)->elements[2];
c_7312819.elements[2] = ((closureN)self_735894)->elements[3];
c_7312819.elements[3] = ((closureN)self_735894)->elements[4];
c_7312819.elements[4] = ((closureN)self_735894)->elements[5];
c_7312819.elements[5] = use_91alloca_127_731016_731786;


closureN_type c_7313284;
object e_7313315 [1];
c_7313284.hdr.mark = gc_color_red;
 c_7313284.hdr.grayed = 0;
c_7313284.tag = closureN_tag;
 c_7313284.fn = (function_type)__lambda_850;
c_7313284.num_args = 1;
c_7313284.num_elements = 1;
c_7313284.elements = (object *)e_7313315;
c_7313284.elements[0] = ((closureN)self_735894)->elements[0];

return_direct_with_clo1(data,(closure)&c_7312819,__lambda_787,  &c_7313284);; 
}

static void __lambda_850(void *data, object self_735895, int argc, object *args) /* object self_735895, object k_733441, object free_91var_731077_731808 */
 {
 object k_733441 = args[0]; object free_91var_731077_731808 = args[1];
  
closureN_type c_7313286;
object e_7313311 [3];
c_7313286.hdr.mark = gc_color_red;
 c_7313286.hdr.grayed = 0;
c_7313286.tag = closureN_tag;
 c_7313286.fn = (function_type)__lambda_851;
c_7313286.num_args = 1;
c_7313286.num_elements = 3;
c_7313286.elements = (object *)e_7313311;
c_7313286.elements[0] = ((closureN)self_735895)->elements[0];
c_7313286.elements[1] = free_91var_731077_731808;
c_7313286.elements[2] = k_733441;


complex_num_type local_7313314; 
return_direct_with_clo1(data,(closure)&c_7313286,__lambda_851,  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7313314, quote__75closure_91ref, free_91var_731077_731808));; 
}

static void __lambda_851(void *data, object self_735896, int argc, object *args) /* object self_735896, object r_733442 */
 {
 object r_733442 = args[0];
  if( (boolean_f != r_733442) ){ 
  
closureN_type c_7313288;
object e_7313298 [3];
c_7313288.hdr.mark = gc_color_red;
 c_7313288.hdr.grayed = 0;
c_7313288.tag = closureN_tag;
 c_7313288.fn = (function_type)__lambda_852;
c_7313288.num_args = 1;
c_7313288.num_elements = 3;
c_7313288.elements = (object *)e_7313298;
c_7313288.elements[0] = ((closureN)self_735896)->elements[0];
c_7313288.elements[1] = ((closureN)self_735896)->elements[1];
c_7313288.elements[2] = ((closureN)self_735896)->elements[2];


complex_num_type local_7313304; 



object c_7313301 = Cyc_number2string2(data,(closure)&c_7313288,1,Cyc_fast_sub(data,&local_7313304, Cyc_caddr(data, ((closureN)self_735896)->elements[1]), obj_int2obj(1)));
return_closcall1(data,(closure)&c_7313288,  c_7313301);
} else { 
  return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  ((closureN)self_735896)->elements[2], ((closureN)self_735896)->elements[1]);}
;; 
}

static void __lambda_852(void *data, object self_735897, int argc, object *args) /* object self_735897, object r_733444 */
 {
 object r_733444 = args[0];
  
closureN_type c_7313290;
object e_7313294 [2];
c_7313290.hdr.mark = gc_color_red;
 c_7313290.hdr.grayed = 0;
c_7313290.tag = closureN_tag;
 c_7313290.fn = (function_type)__lambda_853;
c_7313290.num_args = 2;
c_7313290.num_elements = 2;
c_7313290.elements = (object *)e_7313294;
c_7313290.elements[0] = ((closureN)self_735897)->elements[0];
c_7313290.elements[1] = ((closureN)self_735897)->elements[2];



return_direct_with_clo2(data,(closure)&c_7313290,__lambda_853,  Cyc_cadr(data, ((closureN)self_735897)->elements[1]), r_733444);; 
}

static void __lambda_853(void *data, object self_735898, int argc, object *args) /* object self_735898, object var_731078_731809, object idx_731079_731810 */
 {
 object var_731078_731809 = args[0]; object idx_731079_731810 = args[1];
  return_direct_with_clo4(data,  __glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen)->fn),  ((closureN)self_735898)->elements[1], ((closureN)self_735898)->elements[0], var_731078_731809, idx_731079_731810);; 
}

static void __lambda_787(void *data, object self_735899, int argc, object *args) /* object self_735899, object r_733439 */
 {
 object r_733439 = args[0];
  
closureN_type c_7312821;
object e_7313281 [6];
c_7312821.hdr.mark = gc_color_red;
 c_7312821.hdr.grayed = 0;
c_7312821.tag = closureN_tag;
 c_7312821.fn = (function_type)__lambda_788;
c_7312821.num_args = 1;
c_7312821.num_elements = 6;
c_7312821.elements = (object *)e_7313281;
c_7312821.elements[0] = ((closureN)self_735899)->elements[0];
c_7312821.elements[1] = ((closureN)self_735899)->elements[2];
c_7312821.elements[2] = ((closureN)self_735899)->elements[3];
c_7312821.elements[3] = r_733439;
c_7312821.elements[4] = ((closureN)self_735899)->elements[4];
c_7312821.elements[5] = ((closureN)self_735899)->elements[5];

return_direct_with_clo2(data,  __glo_closure_91_125fv_scheme_cyclone_transforms, (((closure)  __glo_closure_91_125fv_scheme_cyclone_transforms)->fn),  &c_7312821, ((closureN)self_735899)->elements[1]);; 
}

static void __lambda_788(void *data, object self_735900, int argc, object *args) /* object self_735900, object r_733440 */
 {
 object r_733440 = args[0];
  
closureN_type c_7312823;
object e_7313279 [5];
c_7312823.hdr.mark = gc_color_red;
 c_7312823.hdr.grayed = 0;
c_7312823.tag = closureN_tag;
 c_7312823.fn = (function_type)__lambda_789;
c_7312823.num_args = 1;
c_7312823.num_elements = 5;
c_7312823.elements = (object *)e_7313279;
c_7312823.elements[0] = ((closureN)self_735900)->elements[0];
c_7312823.elements[1] = ((closureN)self_735900)->elements[1];
c_7312823.elements[2] = ((closureN)self_735900)->elements[2];
c_7312823.elements[3] = ((closureN)self_735900)->elements[4];
c_7312823.elements[4] = ((closureN)self_735900)->elements[5];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7312823, ((closureN)self_735900)->elements[3], r_733440);; 
}

static void __lambda_789(void *data, object self_735901, int argc, object *args) /* object self_735901, object free_91vars_731019_731787 */
 {
 object free_91vars_731019_731787 = args[0];
  
closureN_type c_7312825;
object e_7313278 [6];
c_7312825.hdr.mark = gc_color_red;
 c_7312825.hdr.grayed = 0;
c_7312825.tag = closureN_tag;
 c_7312825.fn = (function_type)__lambda_790;
c_7312825.num_args = 1;
c_7312825.num_elements = 6;
c_7312825.elements = (object *)e_7313278;
c_7312825.elements[0] = ((closureN)self_735901)->elements[0];
c_7312825.elements[1] = free_91vars_731019_731787;
c_7312825.elements[2] = ((closureN)self_735901)->elements[1];
c_7312825.elements[3] = ((closureN)self_735901)->elements[2];
c_7312825.elements[4] = ((closureN)self_735901)->elements[3];
c_7312825.elements[5] = ((closureN)self_735901)->elements[4];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7312825, quote_c);; 
}

static void __lambda_790(void *data, object self_735902, int argc, object *args) /* object self_735902, object r_733437 */
 {
 object r_733437 = args[0];
  
closureN_type c_7312827;
object e_7313277 [6];
c_7312827.hdr.mark = gc_color_red;
 c_7312827.hdr.grayed = 0;
c_7312827.tag = closureN_tag;
 c_7312827.fn = (function_type)__lambda_791;
c_7312827.num_args = 1;
c_7312827.num_elements = 6;
c_7312827.elements = (object *)e_7313277;
c_7312827.elements[0] = ((closureN)self_735902)->elements[0];
c_7312827.elements[1] = ((closureN)self_735902)->elements[1];
c_7312827.elements[2] = ((closureN)self_735902)->elements[2];
c_7312827.elements[3] = ((closureN)self_735902)->elements[3];
c_7312827.elements[4] = ((closureN)self_735902)->elements[4];
c_7312827.elements[5] = ((closureN)self_735902)->elements[5];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7312827, r_733437);; 
}

static void __lambda_791(void *data, object self_735903, int argc, object *args) /* object self_735903, object cv_91name_731022_731788 */
 {
 object cv_91name_731022_731788 = args[0];
  
closureN_type c_7312829;
object e_7313273 [7];
c_7312829.hdr.mark = gc_color_red;
 c_7312829.hdr.grayed = 0;
c_7312829.tag = closureN_tag;
 c_7312829.fn = (function_type)__lambda_792;
c_7312829.num_args = 1;
c_7312829.num_elements = 7;
c_7312829.elements = (object *)e_7313273;
c_7312829.elements[0] = ((closureN)self_735903)->elements[0];
c_7312829.elements[1] = cv_91name_731022_731788;
c_7312829.elements[2] = ((closureN)self_735903)->elements[1];
c_7312829.elements[3] = ((closureN)self_735903)->elements[2];
c_7312829.elements[4] = ((closureN)self_735903)->elements[3];
c_7312829.elements[5] = ((closureN)self_735903)->elements[4];
c_7312829.elements[6] = ((closureN)self_735903)->elements[5];

return_direct_with_clo4(data,  __glo_c_91compile_91lambda_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91lambda_scheme_cyclone_cgen)->fn),  &c_7312829, ((closureN)self_735903)->elements[3], ((closureN)self_735903)->elements[4], ((closureN)self_735903)->elements[0]);; 
}

static void __lambda_792(void *data, object self_735904, int argc, object *args) /* object self_735904, object r_733436 */
 {
 object r_733436 = args[0];
  
closureN_type c_7312831;
object e_7313270 [6];
c_7312831.hdr.mark = gc_color_red;
 c_7312831.hdr.grayed = 0;
c_7312831.tag = closureN_tag;
 c_7312831.fn = (function_type)__lambda_793;
c_7312831.num_args = 1;
c_7312831.num_elements = 6;
c_7312831.elements = (object *)e_7313270;
c_7312831.elements[0] = ((closureN)self_735904)->elements[1];
c_7312831.elements[1] = ((closureN)self_735904)->elements[2];
c_7312831.elements[2] = ((closureN)self_735904)->elements[3];
c_7312831.elements[3] = ((closureN)self_735904)->elements[4];
c_7312831.elements[4] = ((closureN)self_735904)->elements[5];
c_7312831.elements[5] = ((closureN)self_735904)->elements[6];

return_direct_with_clo4(data,  __glo_allocate_91lambda_scheme_cyclone_cgen, (((closure)  __glo_allocate_91lambda_scheme_cyclone_cgen)->fn),  &c_7312831, ((closureN)self_735904)->elements[4], r_733436, ((closureN)self_735904)->elements[0]);; 
}

static void __lambda_793(void *data, object self_735905, int argc, object *args) /* object self_735905, object lid_731025_731789 */
 {
 object lid_731025_731789 = args[0];
  
closureN_type c_7312833;
object e_7313268 [7];
c_7312833.hdr.mark = gc_color_red;
 c_7312833.hdr.grayed = 0;
c_7312833.tag = closureN_tag;
 c_7312833.fn = (function_type)__lambda_794;
c_7312833.num_args = 1;
c_7312833.num_elements = 7;
c_7312833.elements = (object *)e_7313268;
c_7312833.elements[0] = ((closureN)self_735905)->elements[0];
c_7312833.elements[1] = ((closureN)self_735905)->elements[1];
c_7312833.elements[2] = ((closureN)self_735905)->elements[2];
c_7312833.elements[3] = ((closureN)self_735905)->elements[3];
c_7312833.elements[4] = lid_731025_731789;
c_7312833.elements[5] = ((closureN)self_735905)->elements[4];
c_7312833.elements[6] = ((closureN)self_735905)->elements[5];

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7312833, ((closureN)self_735905)->elements[3]);; 
}

static void __lambda_794(void *data, object self_735906, int argc, object *args) /* object self_735906, object r_733431 */
 {
 object r_733431 = args[0];
  
closureN_type c_7312835;
object e_7313252 [8];
c_7312835.hdr.mark = gc_color_red;
 c_7312835.hdr.grayed = 0;
c_7312835.tag = closureN_tag;
 c_7312835.fn = (function_type)__lambda_795;
c_7312835.num_args = 1;
c_7312835.num_elements = 8;
c_7312835.elements = (object *)e_7313252;
c_7312835.elements[0] = ((closureN)self_735906)->elements[0];
c_7312835.elements[1] = ((closureN)self_735906)->elements[1];
c_7312835.elements[2] = ((closureN)self_735906)->elements[2];
c_7312835.elements[3] = ((closureN)self_735906)->elements[3];
c_7312835.elements[4] = ((closureN)self_735906)->elements[4];
c_7312835.elements[5] = r_733431;
c_7312835.elements[6] = ((closureN)self_735906)->elements[5];
c_7312835.elements[7] = ((closureN)self_735906)->elements[6];


mclosure0(c_7313253, (function_type)__lambda_847);c_7313253.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7312835,__lambda_795,  &c_7313253);; 
}

static void __lambda_847(void *data, object self_735907, int argc, object *args) /* object self_735907, object k_733433, object fnc_731074_731807 */
 {
 object k_733433 = args[0]; object fnc_731074_731807 = args[1];
  if( (boolean_f != __glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen) ){ 
  
closureN_type c_7313255;
object e_7313266 [2];
c_7313255.hdr.mark = gc_color_red;
 c_7313255.hdr.grayed = 0;
c_7313255.tag = closureN_tag;
 c_7313255.fn = (function_type)__lambda_848;
c_7313255.num_args = 1;
c_7313255.num_elements = 2;
c_7313255.elements = (object *)e_7313266;
c_7313255.elements[0] = fnc_731074_731807;
c_7313255.elements[1] = k_733433;

return_direct_with_clo2(data,  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations)->fn),  &c_7313255, fnc_731074_731807);
} else { 
  return_direct_with_clo1(data,  k_733433, (((closure)  k_733433)->fn),  boolean_f);}
;; 
}

static void __lambda_848(void *data, object self_735908, int argc, object *args) /* object self_735908, object r_733434 */
 {
 object r_733434 = args[0];
  if( (boolean_f != r_733434) ){ 
  
closureN_type c_7313257;
object e_7313262 [1];
c_7313257.hdr.mark = gc_color_red;
 c_7313257.hdr.grayed = 0;
c_7313257.tag = closureN_tag;
 c_7313257.fn = (function_type)__lambda_849;
c_7313257.num_args = 1;
c_7313257.num_elements = 1;
c_7313257.elements = (object *)e_7313262;
c_7313257.elements[0] = ((closureN)self_735908)->elements[1];

return_direct_with_clo2(data,  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations)->fn),  &c_7313257, ((closureN)self_735908)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735908)->elements[1], (((closure)  ((closureN)self_735908)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_849(void *data, object self_735909, int argc, object *args) /* object self_735909, object r_733435 */
 {
 object r_733435 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_735909)->elements[0], (((closure)  ((closureN)self_735909)->elements[0])->fn),  equalp(r_733435, obj_int2obj(1)));; 
}

static void __lambda_795(void *data, object self_735910, int argc, object *args) /* object self_735910, object r_733432 */
 {
 object r_733432 = args[0];
  
closureN_type c_7312837;
object e_7313250 [7];
c_7312837.hdr.mark = gc_color_red;
 c_7312837.hdr.grayed = 0;
c_7312837.tag = closureN_tag;
 c_7312837.fn = (function_type)__lambda_796;
c_7312837.num_args = 1;
c_7312837.num_elements = 7;
c_7312837.elements = (object *)e_7313250;
c_7312837.elements[0] = ((closureN)self_735910)->elements[0];
c_7312837.elements[1] = ((closureN)self_735910)->elements[1];
c_7312837.elements[2] = ((closureN)self_735910)->elements[2];
c_7312837.elements[3] = ((closureN)self_735910)->elements[3];
c_7312837.elements[4] = ((closureN)self_735910)->elements[4];
c_7312837.elements[5] = ((closureN)self_735910)->elements[6];
c_7312837.elements[6] = ((closureN)self_735910)->elements[7];

return_direct_with_clo3(data,  __glo_with_91fnc_scheme_cyclone_cps_91optimizations, (((closure)  __glo_with_91fnc_scheme_cyclone_cps_91optimizations)->fn),  &c_7312837, ((closureN)self_735910)->elements[5], r_733432);; 
}

static void __lambda_796(void *data, object self_735911, int argc, object *args) /* object self_735911, object use_91obj_91instead_91of_91closure_127_731028_731790 */
 {
 object use_91obj_91instead_91of_91closure_127_731028_731790 = args[0];
  
closureN_type c_7312839;
object e_7313249 [8];
c_7312839.hdr.mark = gc_color_red;
 c_7312839.hdr.grayed = 0;
c_7312839.tag = closureN_tag;
 c_7312839.fn = (function_type)__lambda_797;
c_7312839.num_args = 1;
c_7312839.num_elements = 8;
c_7312839.elements = (object *)e_7313249;
c_7312839.elements[0] = ((closureN)self_735911)->elements[0];
c_7312839.elements[1] = ((closureN)self_735911)->elements[1];
c_7312839.elements[2] = ((closureN)self_735911)->elements[2];
c_7312839.elements[3] = ((closureN)self_735911)->elements[3];
c_7312839.elements[4] = ((closureN)self_735911)->elements[4];
c_7312839.elements[5] = ((closureN)self_735911)->elements[5];
c_7312839.elements[6] = ((closureN)self_735911)->elements[6];
c_7312839.elements[7] = use_91obj_91instead_91of_91closure_127_731028_731790;

return_direct_with_clo1(data,  __glo_get_91macros_scheme_eval, (((closure)  __glo_get_91macros_scheme_eval)->fn),  &c_7312839);; 
}

static void __lambda_797(void *data, object self_735912, int argc, object *args) /* object self_735912, object r_733430_735026 */
 {
 object r_733430_735026 = args[0];
  
closureN_type c_7312841;
object e_7313243 [8];
c_7312841.hdr.mark = gc_color_red;
 c_7312841.hdr.grayed = 0;
c_7312841.tag = closureN_tag;
 c_7312841.fn = (function_type)__lambda_798;
c_7312841.num_args = 1;
c_7312841.num_elements = 8;
c_7312841.elements = (object *)e_7313243;
c_7312841.elements[0] = ((closureN)self_735912)->elements[0];
c_7312841.elements[1] = ((closureN)self_735912)->elements[1];
c_7312841.elements[2] = ((closureN)self_735912)->elements[2];
c_7312841.elements[3] = ((closureN)self_735912)->elements[3];
c_7312841.elements[4] = ((closureN)self_735912)->elements[4];
c_7312841.elements[5] = ((closureN)self_735912)->elements[5];
c_7312841.elements[6] = ((closureN)self_735912)->elements[6];
c_7312841.elements[7] = ((closureN)self_735912)->elements[7];





return_direct_with_clo1(data,(closure)&c_7312841,__lambda_798,  assoc(data, Cyc_cdr(data, ((closureN)self_735912)->elements[5]), r_733430_735026));; 
}

static void __lambda_798(void *data, object self_735913, int argc, object *args) /* object self_735913, object macro_127_731031_731791_735027 */
 {
 object macro_127_731031_731791_735027 = args[0];
  object call_95cc_127_731034_731792_735031;
    
  
  object c_7312848;
 alloc_string(data,c_7312848, 15, 15);
char tmp_7312849[] = "scheme/base.sld";
memcpy(((string_type *)c_7312848)->str, tmp_7312849,15);
((string_type *)c_7312848)->str[15] = '\0';
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_735913)->elements[5]), c_7312848)) ){ 
  
  
  call_95cc_127_731034_731792_735031 = equalp(Cyc_cdr(data, ((closureN)self_735913)->elements[5]), quote_call_95cc);
} else { 
  call_95cc_127_731034_731792_735031 = boolean_f;}
;
closureN_type c_7312858;
object e_7312871 [2];
c_7312858.hdr.mark = gc_color_red;
 c_7312858.hdr.grayed = 0;
c_7312858.tag = closureN_tag;
 c_7312858.fn = (function_type)__lambda_799;
c_7312858.num_args = 0;
c_7312858.num_elements = 2;
c_7312858.elements = (object *)e_7312871;
c_7312858.elements[0] = call_95cc_127_731034_731792_735031;
c_7312858.elements[1] = ((closureN)self_735913)->elements[3];


closureN_type c_7312872;
object e_7313242 [9];
c_7312872.hdr.mark = gc_color_red;
 c_7312872.hdr.grayed = 0;
c_7312872.tag = closureN_tag;
 c_7312872.fn = (function_type)__lambda_801;
c_7312872.num_args = 1;
c_7312872.num_elements = 9;
c_7312872.elements = (object *)e_7313242;
c_7312872.elements[0] = call_95cc_127_731034_731792_735031;
c_7312872.elements[1] = ((closureN)self_735913)->elements[0];
c_7312872.elements[2] = ((closureN)self_735913)->elements[1];
c_7312872.elements[3] = ((closureN)self_735913)->elements[2];
c_7312872.elements[4] = ((closureN)self_735913)->elements[3];
c_7312872.elements[5] = ((closureN)self_735913)->elements[4];
c_7312872.elements[6] = macro_127_731031_731791_735027;
c_7312872.elements[7] = ((closureN)self_735913)->elements[6];
c_7312872.elements[8] = ((closureN)self_735913)->elements[7];

return_direct_with_clo1(data,(closure)&c_7312858,__lambda_799,  &c_7312872);; 
}

static void __lambda_801(void *data, object self_735914, int argc, object *args) /* object self_735914, object num_91args_91str_731037_731793_735034 */
 {
 object num_91args_91str_731037_731793_735034 = args[0];
  
closureN_type c_7312874;
object e_7313228 [10];
c_7312874.hdr.mark = gc_color_red;
 c_7312874.hdr.grayed = 0;
c_7312874.tag = closureN_tag;
 c_7312874.fn = (function_type)__lambda_802;
c_7312874.num_args = 1;
c_7312874.num_elements = 10;
c_7312874.elements = (object *)e_7313228;
c_7312874.elements[0] = ((closureN)self_735914)->elements[0];
c_7312874.elements[1] = ((closureN)self_735914)->elements[1];
c_7312874.elements[2] = ((closureN)self_735914)->elements[2];
c_7312874.elements[3] = ((closureN)self_735914)->elements[3];
c_7312874.elements[4] = ((closureN)self_735914)->elements[4];
c_7312874.elements[5] = ((closureN)self_735914)->elements[5];
c_7312874.elements[6] = ((closureN)self_735914)->elements[6];
c_7312874.elements[7] = num_91args_91str_731037_731793_735034;
c_7312874.elements[8] = ((closureN)self_735914)->elements[7];
c_7312874.elements[9] = ((closureN)self_735914)->elements[8];


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

return_direct_with_clo1(data,(closure)&c_7312874,__lambda_802,  &c_7313229);; 
}

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

return_direct_with_clo1(data,  __glo__list_scheme_base, (((closure)  __glo__list_scheme_base)->fn),  &c_7313231);; 
}

static void __lambda_846(void *data, object self_735916, int argc, object *args) /* object self_735916, object r_733421_735081 */
 {
 object r_733421_735081 = args[0];
  
list_2_type local_7313236; 


return_direct_with_clo1(data,  ((closureN)self_735916)->elements[1], (((closure)  ((closureN)self_735916)->elements[1])->fn),  Cyc_fast_list_2(&local_7313236, Cyc_car(data, ((closureN)self_735916)->elements[0]), r_733421_735081));; 
}

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


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

return_direct_with_clo1(data,(closure)&c_7312876,__lambda_803,  &c_7313014);; 
}

static void __lambda_821(void *data, object self_735918, int argc, object *args) /* object self_735918, object k_733390_735054 */
 {
 object k_733390_735054 = args[0];
  
closureN_type c_7313016;
object e_7313032 [2];
c_7313016.hdr.mark = gc_color_red;
 c_7313016.hdr.grayed = 0;
c_7313016.tag = closureN_tag;
 c_7313016.fn = (function_type)__lambda_822;
c_7313016.num_args = 0;
c_7313016.num_elements = 2;
c_7313016.elements = (object *)e_7313032;
c_7313016.elements[0] = ((closureN)self_735918)->elements[1];
c_7313016.elements[1] = ((closureN)self_735918)->elements[5];


closureN_type c_7313033;
object e_7313226 [7];
c_7313033.hdr.mark = gc_color_red;
 c_7313033.hdr.grayed = 0;
c_7313033.tag = closureN_tag;
 c_7313033.fn = (function_type)__lambda_823;
c_7313033.num_args = 1;
c_7313033.num_elements = 7;
c_7313033.elements = (object *)e_7313226;
c_7313033.elements[0] = ((closureN)self_735918)->elements[0];
c_7313033.elements[1] = ((closureN)self_735918)->elements[1];
c_7313033.elements[2] = ((closureN)self_735918)->elements[2];
c_7313033.elements[3] = k_733390_735054;
c_7313033.elements[4] = ((closureN)self_735918)->elements[3];
c_7313033.elements[5] = ((closureN)self_735918)->elements[4];
c_7313033.elements[6] = ((closureN)self_735918)->elements[5];

return_direct_with_clo1(data,(closure)&c_7313016,__lambda_822,  &c_7313033);; 
}

static void __lambda_823(void *data, object self_735919, int argc, object *args) /* object self_735919, object decl_731056_731798_735056 */
 {
 object decl_731056_731798_735056 = args[0];
  
closureN_type c_7313035;
object e_7313225 [8];
c_7313035.hdr.mark = gc_color_red;
 c_7313035.hdr.grayed = 0;
c_7313035.tag = closureN_tag;
 c_7313035.fn = (function_type)__lambda_824;
c_7313035.num_args = 1;
c_7313035.num_elements = 8;
c_7313035.elements = (object *)e_7313225;
c_7313035.elements[0] = ((closureN)self_735919)->elements[0];
c_7313035.elements[1] = ((closureN)self_735919)->elements[1];
c_7313035.elements[2] = decl_731056_731798_735056;
c_7313035.elements[3] = ((closureN)self_735919)->elements[2];
c_7313035.elements[4] = ((closureN)self_735919)->elements[3];
c_7313035.elements[5] = ((closureN)self_735919)->elements[4];
c_7313035.elements[6] = ((closureN)self_735919)->elements[5];
c_7313035.elements[7] = ((closureN)self_735919)->elements[6];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7313035, quote_e);; 
}

static void __lambda_824(void *data, object self_735920, int argc, object *args) /* object self_735920, object r_733416_735057 */
 {
 object r_733416_735057 = args[0];
  
closureN_type c_7313037;
object e_7313224 [8];
c_7313037.hdr.mark = gc_color_red;
 c_7313037.hdr.grayed = 0;
c_7313037.tag = closureN_tag;
 c_7313037.fn = (function_type)__lambda_825;
c_7313037.num_args = 1;
c_7313037.num_elements = 8;
c_7313037.elements = (object *)e_7313224;
c_7313037.elements[0] = ((closureN)self_735920)->elements[0];
c_7313037.elements[1] = ((closureN)self_735920)->elements[1];
c_7313037.elements[2] = ((closureN)self_735920)->elements[2];
c_7313037.elements[3] = ((closureN)self_735920)->elements[3];
c_7313037.elements[4] = ((closureN)self_735920)->elements[4];
c_7313037.elements[5] = ((closureN)self_735920)->elements[5];
c_7313037.elements[6] = ((closureN)self_735920)->elements[6];
c_7313037.elements[7] = ((closureN)self_735920)->elements[7];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7313037, r_733416_735057);; 
}

static void __lambda_825(void *data, object self_735921, int argc, object *args) /* object self_735921, object ev_91name_731059_731799_735058 */
 {
 object ev_91name_731059_731799_735058 = args[0];
  
closureN_type c_7313039;
object e_7313077 [3];
c_7313039.hdr.mark = gc_color_red;
 c_7313039.hdr.grayed = 0;
c_7313039.tag = closureN_tag;
 c_7313039.fn = (function_type)__lambda_826;
c_7313039.num_args = 0;
c_7313039.num_elements = 3;
c_7313039.elements = (object *)e_7313077;
c_7313039.elements[0] = ev_91name_731059_731799_735058;
c_7313039.elements[1] = ((closureN)self_735921)->elements[3];
c_7313039.elements[2] = ((closureN)self_735921)->elements[7];


closureN_type c_7313078;
object e_7313223 [9];
c_7313078.hdr.mark = gc_color_red;
 c_7313078.hdr.grayed = 0;
c_7313078.tag = closureN_tag;
 c_7313078.fn = (function_type)__lambda_829;
c_7313078.num_args = 1;
c_7313078.num_elements = 9;
c_7313078.elements = (object *)e_7313223;
c_7313078.elements[0] = ((closureN)self_735921)->elements[0];
c_7313078.elements[1] = ((closureN)self_735921)->elements[1];
c_7313078.elements[2] = ((closureN)self_735921)->elements[2];
c_7313078.elements[3] = ev_91name_731059_731799_735058;
c_7313078.elements[4] = ((closureN)self_735921)->elements[3];
c_7313078.elements[5] = ((closureN)self_735921)->elements[4];
c_7313078.elements[6] = ((closureN)self_735921)->elements[5];
c_7313078.elements[7] = ((closureN)self_735921)->elements[6];
c_7313078.elements[8] = ((closureN)self_735921)->elements[7];

return_direct_with_clo1(data,(closure)&c_7313039,__lambda_826,  &c_7313078);; 
}

static void __lambda_829(void *data, object self_735922, int argc, object *args) /* object self_735922, object elem_91decl_731062_731800_735062 */
 {
 object elem_91decl_731062_731800_735062 = args[0];
  
closureN_type c_7313080;
object e_7313086 [1];
c_7313080.hdr.mark = gc_color_red;
 c_7313080.hdr.grayed = 0;
c_7313080.tag = closureN_tag;
 c_7313080.fn = (function_type)__lambda_830;
c_7313080.num_args = 0;
c_7313080.num_elements = 1;
c_7313080.elements = (object *)e_7313086;
c_7313080.elements[0] = ((closureN)self_735922)->elements[8];


closureN_type c_7313087;
object e_7313222 [9];
c_7313087.hdr.mark = gc_color_red;
 c_7313087.hdr.grayed = 0;
c_7313087.tag = closureN_tag;
 c_7313087.fn = (function_type)__lambda_831;
c_7313087.num_args = 1;
c_7313087.num_elements = 9;
c_7313087.elements = (object *)e_7313222;
c_7313087.elements[0] = ((closureN)self_735922)->elements[0];
c_7313087.elements[1] = ((closureN)self_735922)->elements[1];
c_7313087.elements[2] = ((closureN)self_735922)->elements[2];
c_7313087.elements[3] = elem_91decl_731062_731800_735062;
c_7313087.elements[4] = ((closureN)self_735922)->elements[3];
c_7313087.elements[5] = ((closureN)self_735922)->elements[4];
c_7313087.elements[6] = ((closureN)self_735922)->elements[5];
c_7313087.elements[7] = ((closureN)self_735922)->elements[6];
c_7313087.elements[8] = ((closureN)self_735922)->elements[7];

return_direct_with_clo1(data,(closure)&c_7313080,__lambda_830,  &c_7313087);; 
}

static void __lambda_831(void *data, object self_735923, int argc, object *args) /* object self_735923, object sep_731065_731801_735064 */
 {
 object sep_731065_731801_735064 = args[0];
  
closureN_type c_7313089;
object e_7313095 [1];
c_7313089.hdr.mark = gc_color_red;
 c_7313089.hdr.grayed = 0;
c_7313089.tag = closureN_tag;
 c_7313089.fn = (function_type)__lambda_832;
c_7313089.num_args = 0;
c_7313089.num_elements = 1;
c_7313089.elements = (object *)e_7313095;
c_7313089.elements[0] = ((closureN)self_735923)->elements[0];


closureN_type c_7313096;
object e_7313221 [9];
c_7313096.hdr.mark = gc_color_red;
 c_7313096.hdr.grayed = 0;
c_7313096.tag = closureN_tag;
 c_7313096.fn = (function_type)__lambda_833;
c_7313096.num_args = 1;
c_7313096.num_elements = 9;
c_7313096.elements = (object *)e_7313221;
c_7313096.elements[0] = ((closureN)self_735923)->elements[1];
c_7313096.elements[1] = ((closureN)self_735923)->elements[2];
c_7313096.elements[2] = ((closureN)self_735923)->elements[3];
c_7313096.elements[3] = ((closureN)self_735923)->elements[4];
c_7313096.elements[4] = ((closureN)self_735923)->elements[5];
c_7313096.elements[5] = ((closureN)self_735923)->elements[6];
c_7313096.elements[6] = ((closureN)self_735923)->elements[7];
c_7313096.elements[7] = ((closureN)self_735923)->elements[8];
c_7313096.elements[8] = sep_731065_731801_735064;

return_direct_with_clo1(data,(closure)&c_7313089,__lambda_832,  &c_7313096);; 
}

static void __lambda_833(void *data, object self_735924, int argc, object *args) /* object self_735924, object r_733395_735066 */
 {
 object r_733395_735066 = args[0];
  
closureN_type c_7313098;
object e_7313216 [9];
c_7313098.hdr.mark = gc_color_red;
 c_7313098.hdr.grayed = 0;
c_7313098.tag = closureN_tag;
 c_7313098.fn = (function_type)__lambda_834;
c_7313098.num_args = 1;
c_7313098.num_elements = 9;
c_7313098.elements = (object *)e_7313216;
c_7313098.elements[0] = ((closureN)self_735924)->elements[0];
c_7313098.elements[1] = ((closureN)self_735924)->elements[1];
c_7313098.elements[2] = ((closureN)self_735924)->elements[2];
c_7313098.elements[3] = ((closureN)self_735924)->elements[3];
c_7313098.elements[4] = ((closureN)self_735924)->elements[4];
c_7313098.elements[5] = ((closureN)self_735924)->elements[5];
c_7313098.elements[6] = ((closureN)self_735924)->elements[7];
c_7313098.elements[7] = r_733395_735066;
c_7313098.elements[8] = ((closureN)self_735924)->elements[8];


object c_7313219 = Cyc_number2string2(data,(closure)&c_7313098,1,((closureN)self_735924)->elements[6]);
return_closcall1(data,(closure)&c_7313098,  c_7313219);; 
}

static void __lambda_834(void *data, object self_735925, int argc, object *args) /* object self_735925, object r_733396_735067 */
 {
 object r_733396_735067 = args[0];
  
closureN_type c_7313100;
object e_7313212 [10];
c_7313100.hdr.mark = gc_color_red;
 c_7313100.hdr.grayed = 0;
c_7313100.tag = closureN_tag;
 c_7313100.fn = (function_type)__lambda_835;
c_7313100.num_args = 1;
c_7313100.num_elements = 10;
c_7313100.elements = (object *)e_7313212;
c_7313100.elements[0] = ((closureN)self_735925)->elements[0];
c_7313100.elements[1] = ((closureN)self_735925)->elements[1];
c_7313100.elements[2] = ((closureN)self_735925)->elements[2];
c_7313100.elements[3] = ((closureN)self_735925)->elements[3];
c_7313100.elements[4] = ((closureN)self_735925)->elements[4];
c_7313100.elements[5] = ((closureN)self_735925)->elements[5];
c_7313100.elements[6] = ((closureN)self_735925)->elements[6];
c_7313100.elements[7] = ((closureN)self_735925)->elements[7];
c_7313100.elements[8] = r_733396_735067;
c_7313100.elements[9] = ((closureN)self_735925)->elements[8];



return_direct_with_clo1(data,(closure)&c_7313100,__lambda_835,  Cyc_length(data, ((closureN)self_735925)->elements[4]));; 
}

static void __lambda_835(void *data, object self_735926, int argc, object *args) /* object self_735926, object r_733408_735068 */
 {
 object r_733408_735068 = args[0];
  
closureN_type c_7313102;
object e_7313208 [10];
c_7313102.hdr.mark = gc_color_red;
 c_7313102.hdr.grayed = 0;
c_7313102.tag = closureN_tag;
 c_7313102.fn = (function_type)__lambda_836;
c_7313102.num_args = 1;
c_7313102.num_elements = 10;
c_7313102.elements = (object *)e_7313208;
c_7313102.elements[0] = ((closureN)self_735926)->elements[0];
c_7313102.elements[1] = ((closureN)self_735926)->elements[1];
c_7313102.elements[2] = ((closureN)self_735926)->elements[2];
c_7313102.elements[3] = ((closureN)self_735926)->elements[3];
c_7313102.elements[4] = ((closureN)self_735926)->elements[4];
c_7313102.elements[5] = ((closureN)self_735926)->elements[5];
c_7313102.elements[6] = ((closureN)self_735926)->elements[6];
c_7313102.elements[7] = ((closureN)self_735926)->elements[7];
c_7313102.elements[8] = ((closureN)self_735926)->elements[8];
c_7313102.elements[9] = ((closureN)self_735926)->elements[9];


object c_7313211 = Cyc_number2string2(data,(closure)&c_7313102,1,r_733408_735068);
return_closcall1(data,(closure)&c_7313102,  c_7313211);; 
}

static void __lambda_836(void *data, object self_735927, int argc, object *args) /* object self_735927, object r_733397_735069 */
 {
 object r_733397_735069 = args[0];
  
closureN_type c_7313104;
object e_7313206 [10];
c_7313104.hdr.mark = gc_color_red;
 c_7313104.hdr.grayed = 0;
c_7313104.tag = closureN_tag;
 c_7313104.fn = (function_type)__lambda_837;
c_7313104.num_args = 1;
c_7313104.num_elements = 10;
c_7313104.elements = (object *)e_7313206;
c_7313104.elements[0] = ((closureN)self_735927)->elements[0];
c_7313104.elements[1] = ((closureN)self_735927)->elements[1];
c_7313104.elements[2] = ((closureN)self_735927)->elements[2];
c_7313104.elements[3] = ((closureN)self_735927)->elements[3];
c_7313104.elements[4] = ((closureN)self_735927)->elements[5];
c_7313104.elements[5] = ((closureN)self_735927)->elements[6];
c_7313104.elements[6] = ((closureN)self_735927)->elements[7];
c_7313104.elements[7] = ((closureN)self_735927)->elements[8];
c_7313104.elements[8] = r_733397_735069;
c_7313104.elements[9] = ((closureN)self_735927)->elements[9];

return_direct_with_clo1(data,(closure)&c_7313104,__lambda_837,  ((closureN)self_735927)->elements[4]);; 
}

static void __lambda_837(void *data, object self_735928, int argc, object *args) /* object self_735928, object vars_731069_731803_735070 */
 {
 object vars_731069_731803_735070 = args[0];
  
closureN_type c_7313106;
object e_7313205 [11];
c_7313106.hdr.mark = gc_color_red;
 c_7313106.hdr.grayed = 0;
c_7313106.tag = closureN_tag;
 c_7313106.fn = (function_type)__lambda_838;
c_7313106.num_args = 1;
c_7313106.num_elements = 11;
c_7313106.elements = (object *)e_7313205;
c_7313106.elements[0] = ((closureN)self_735928)->elements[0];
c_7313106.elements[1] = ((closureN)self_735928)->elements[1];
c_7313106.elements[2] = ((closureN)self_735928)->elements[2];
c_7313106.elements[3] = ((closureN)self_735928)->elements[3];
c_7313106.elements[4] = ((closureN)self_735928)->elements[4];
c_7313106.elements[5] = ((closureN)self_735928)->elements[5];
c_7313106.elements[6] = ((closureN)self_735928)->elements[6];
c_7313106.elements[7] = ((closureN)self_735928)->elements[7];
c_7313106.elements[8] = ((closureN)self_735928)->elements[8];
c_7313106.elements[9] = ((closureN)self_735928)->elements[9];
c_7313106.elements[10] = vars_731069_731803_735070;

return_direct_with_clo1(data,(closure)&c_7313106,__lambda_838,  boolean_f);; 
}

static void __lambda_838(void *data, object self_735929, int argc, object *args) /* object self_735929, object loop_731070_731804_735071 */
 {
 object loop_731070_731804_735071 = args[0];
  
closureN_type c_7313108;
object e_7313201 [11];
c_7313108.hdr.mark = gc_color_red;
 c_7313108.hdr.grayed = 0;
c_7313108.tag = closureN_tag;
 c_7313108.fn = (function_type)__lambda_1321;
c_7313108.num_args = 1;
c_7313108.num_elements = 11;
c_7313108.elements = (object *)e_7313201;
c_7313108.elements[0] = ((closureN)self_735929)->elements[0];
c_7313108.elements[1] = ((closureN)self_735929)->elements[1];
c_7313108.elements[2] = ((closureN)self_735929)->elements[2];
c_7313108.elements[3] = ((closureN)self_735929)->elements[3];
c_7313108.elements[4] = ((closureN)self_735929)->elements[4];
c_7313108.elements[5] = ((closureN)self_735929)->elements[5];
c_7313108.elements[6] = ((closureN)self_735929)->elements[6];
c_7313108.elements[7] = ((closureN)self_735929)->elements[7];
c_7313108.elements[8] = ((closureN)self_735929)->elements[8];
c_7313108.elements[9] = ((closureN)self_735929)->elements[9];
c_7313108.elements[10] = ((closureN)self_735929)->elements[10];


pair_type local_7313204; 
return_direct_with_clo1(data,(closure)&c_7313108,__lambda_1321,  set_cell_as_expr(&local_7313204, loop_731070_731804_735071));; 
}

static void __lambda_1321(void *data, object self_735930, int argc, object *args) /* object self_735930, object loop_731070_731804_735071 */
 {
 object loop_731070_731804_735071 = args[0];
  
closureN_type c_7313110;
object e_7313161 [12];
c_7313110.hdr.mark = gc_color_red;
 c_7313110.hdr.grayed = 0;
c_7313110.tag = closureN_tag;
 c_7313110.fn = (function_type)__lambda_839;
c_7313110.num_args = 1;
c_7313110.num_elements = 12;
c_7313110.elements = (object *)e_7313161;
c_7313110.elements[0] = ((closureN)self_735930)->elements[0];
c_7313110.elements[1] = ((closureN)self_735930)->elements[1];
c_7313110.elements[2] = ((closureN)self_735930)->elements[2];
c_7313110.elements[3] = ((closureN)self_735930)->elements[3];
c_7313110.elements[4] = ((closureN)self_735930)->elements[4];
c_7313110.elements[5] = loop_731070_731804_735071;
c_7313110.elements[6] = ((closureN)self_735930)->elements[5];
c_7313110.elements[7] = ((closureN)self_735930)->elements[6];
c_7313110.elements[8] = ((closureN)self_735930)->elements[7];
c_7313110.elements[9] = ((closureN)self_735930)->elements[8];
c_7313110.elements[10] = ((closureN)self_735930)->elements[9];
c_7313110.elements[11] = ((closureN)self_735930)->elements[10];


closureN_type c_7313162;
object e_7313200 [3];
c_7313162.hdr.mark = gc_color_red;
 c_7313162.hdr.grayed = 0;
c_7313162.tag = closureN_tag;
 c_7313162.fn = (function_type)__lambda_842;
c_7313162.num_args = 2;
c_7313162.num_elements = 3;
c_7313162.elements = (object *)e_7313200;
c_7313162.elements[0] = ((closureN)self_735930)->elements[0];
c_7313162.elements[1] = loop_731070_731804_735071;
c_7313162.elements[2] = ((closureN)self_735930)->elements[9];

return_direct_with_clo1(data,(closure)&c_7313110,__lambda_839,  &c_7313162);; 
}

static void __lambda_842(void *data, object self_735931, int argc, object *args) /* object self_735931, object k_733401_735075, object i_731071_731805_735076, object vars_731072_731806_735077 */
 {
 object k_733401_735075 = args[0]; object i_731071_731805_735076 = args[1]; object vars_731072_731806_735077 = args[2];
    
if( (boolean_f != Cyc_is_null(vars_731072_731806_735077)) ){ 
  
make_utf8_string_with_len(c_7313166, "", 0, 0);
return_direct_with_clo1(data,  k_733401_735075, (((closure)  k_733401_735075)->fn),  &c_7313166);
} else { 
  
closureN_type c_7313168;
object e_7313196 [6];
c_7313168.hdr.mark = gc_color_red;
 c_7313168.hdr.grayed = 0;
c_7313168.tag = closureN_tag;
 c_7313168.fn = (function_type)__lambda_843;
c_7313168.num_args = 1;
c_7313168.num_elements = 6;
c_7313168.elements = (object *)e_7313196;
c_7313168.elements[0] = ((closureN)self_735931)->elements[0];
c_7313168.elements[1] = i_731071_731805_735076;
c_7313168.elements[2] = k_733401_735075;
c_7313168.elements[3] = ((closureN)self_735931)->elements[1];
c_7313168.elements[4] = ((closureN)self_735931)->elements[2];
c_7313168.elements[5] = vars_731072_731806_735077;


object c_7313199 = Cyc_number2string2(data,(closure)&c_7313168,1,i_731071_731805_735076);
return_closcall1(data,(closure)&c_7313168,  c_7313199);}
;; 
}

static void __lambda_843(void *data, object self_735932, int argc, object *args) /* object self_735932, object r_733403_735078 */
 {
 object r_733403_735078 = args[0];
  


closureN_type c_7313173;
object e_7313188 [5];
c_7313173.hdr.mark = gc_color_red;
 c_7313173.hdr.grayed = 0;
c_7313173.tag = closureN_tag;
 c_7313173.fn = (function_type)__lambda_844;
c_7313173.num_args = 1;
c_7313173.num_elements = 5;
c_7313173.elements = (object *)e_7313188;
c_7313173.elements[0] = ((closureN)self_735932)->elements[0];
c_7313173.elements[1] = ((closureN)self_735932)->elements[2];
c_7313173.elements[2] = r_733403_735078;
c_7313173.elements[3] = ((closureN)self_735932)->elements[4];
c_7313173.elements[4] = ((closureN)self_735932)->elements[5];


complex_num_type local_7313191; 


return_closcall3(data,  car(((closureN)self_735932)->elements[3]),  &c_7313173, Cyc_fast_sum(data,&local_7313191, ((closureN)self_735932)->elements[1], obj_int2obj(1)), Cyc_cdr(data, ((closureN)self_735932)->elements[5]));; 
}

static void __lambda_844(void *data, object self_735933, int argc, object *args) /* object self_735933, object r_733405_735079 */
 {
 object r_733405_735079 = args[0];
  
make_utf8_string_with_len(c_7313181, "elements[", 9, 9);

make_utf8_string_with_len(c_7313183, "] = ", 4, 4);



make_utf8_string_with_len(c_7313187, ";\n", 2, 2);

object c_7313178 = Cyc_string_append(data,  ((closureN)self_735933)->elements[1],8,((closureN)self_735933)->elements[0], ((closureN)self_735933)->elements[3], &c_7313181, ((closureN)self_735933)->elements[2], &c_7313183, Cyc_car(data, ((closureN)self_735933)->elements[4]), &c_7313187, r_733405_735079);
return_direct_with_clo1(data,  ((closureN)self_735933)->elements[1], (((closure)  ((closureN)self_735933)->elements[1])->fn),  c_7313178);; 
}

static void __lambda_839(void *data, object self_735934, int argc, object *args) /* object self_735934, object r_733400_735072 */
 {
 object r_733400_735072 = args[0];
  
closureN_type c_7313112;
object e_7313157 [12];
c_7313112.hdr.mark = gc_color_red;
 c_7313112.hdr.grayed = 0;
c_7313112.tag = closureN_tag;
 c_7313112.fn = (function_type)__lambda_840;
c_7313112.num_args = 1;
c_7313112.num_elements = 12;
c_7313112.elements = (object *)e_7313157;
c_7313112.elements[0] = ((closureN)self_735934)->elements[0];
c_7313112.elements[1] = ((closureN)self_735934)->elements[1];
c_7313112.elements[2] = ((closureN)self_735934)->elements[2];
c_7313112.elements[3] = ((closureN)self_735934)->elements[3];
c_7313112.elements[4] = ((closureN)self_735934)->elements[4];
c_7313112.elements[5] = ((closureN)self_735934)->elements[5];
c_7313112.elements[6] = ((closureN)self_735934)->elements[6];
c_7313112.elements[7] = ((closureN)self_735934)->elements[7];
c_7313112.elements[8] = ((closureN)self_735934)->elements[8];
c_7313112.elements[9] = ((closureN)self_735934)->elements[9];
c_7313112.elements[10] = ((closureN)self_735934)->elements[10];
c_7313112.elements[11] = ((closureN)self_735934)->elements[11];



return_direct_with_clo1(data,(closure)&c_7313112,__lambda_840,  Cyc_set_cell(data, ((closureN)self_735934)->elements[5], r_733400_735072));; 
}

static void __lambda_840(void *data, object self_735935, int argc, object *args) /* object self_735935, object r_733399_735073 */
 {

  


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

return_closcall3(data,  car(((closureN)self_735935)->elements[5]),  &c_7313117, obj_int2obj(0), ((closureN)self_735935)->elements[11]);; 
}

static void __lambda_841(void *data, object self_735936, int argc, object *args) /* object self_735936, object r_733398_735074 */
 {
 object r_733398_735074 = args[0];
  
make_utf8_string_with_len(c_7313128, "hdr.mark = gc_color_red;\n ", 26, 26);

make_utf8_string_with_len(c_7313131, "hdr.grayed = 0;\n", 16, 16);

make_utf8_string_with_len(c_7313134, "tag = closureN_tag;\n ", 21, 21);

make_utf8_string_with_len(c_7313137, "fn = (function_type)__lambda_", 29, 29);

make_utf8_string_with_len(c_7313139, ";\n", 2, 2);

make_utf8_string_with_len(c_7313142, "num_args = ", 11, 11);

make_utf8_string_with_len(c_7313144, ";\n", 2, 2);

make_utf8_string_with_len(c_7313147, "num_elements = ", 15, 15);

make_utf8_string_with_len(c_7313149, ";\n", 2, 2);

make_utf8_string_with_len(c_7313152, "elements = (object *)", 21, 21);

make_utf8_string_with_len(c_7313154, ";\n", 2, 2);

object c_7313122 = Cyc_string_append(data,  ((closureN)self_735936)->elements[4],33,((closureN)self_735936)->elements[1], ((closureN)self_735936)->elements[2], ((closureN)self_735936)->elements[6], ((closureN)self_735936)->elements[0], ((closureN)self_735936)->elements[9], &c_7313128, ((closureN)self_735936)->elements[0], ((closureN)self_735936)->elements[9], &c_7313131, ((closureN)self_735936)->elements[0], ((closureN)self_735936)->elements[9], &c_7313134, ((closureN)self_735936)->elements[0], ((closureN)self_735936)->elements[9], &c_7313137, ((closureN)self_735936)->elements[7], &c_7313139, ((closureN)self_735936)->elements[0], ((closureN)self_735936)->elements[9], &c_7313142, ((closureN)self_735936)->elements[5], &c_7313144, ((closureN)self_735936)->elements[0], ((closureN)self_735936)->elements[9], &c_7313147, ((closureN)self_735936)->elements[8], &c_7313149, ((closureN)self_735936)->elements[0], ((closureN)self_735936)->elements[9], &c_7313152, ((closureN)self_735936)->elements[3], &c_7313154, r_733398_735074);
return_direct_with_clo1(data,  ((closureN)self_735936)->elements[4], (((closure)  ((closureN)self_735936)->elements[4])->fn),  c_7313122);; 
}

static void __lambda_832(void *data, object self_735937, int argc, object *args) /* object self_735937, object k_733409_735065 */
 {
 object k_733409_735065 = args[0];
  if( (boolean_f != ((closureN)self_735937)->elements[0]) ){ 
  
make_utf8_string_with_len(c_7313092, "Cyc_check_proc(data, f);\n", 25, 25);
return_direct_with_clo1(data,  k_733409_735065,__lambda_833,  &c_7313092);
} else { 
  
make_utf8_string_with_len(c_7313094, "", 0, 0);
return_direct_with_clo1(data,  k_733409_735065,__lambda_833,  &c_7313094);}
;; 
}

static void __lambda_830(void *data, object self_735938, int argc, object *args) /* object self_735938, object k_733410_735063 */
 {
 object k_733410_735063 = args[0];
  if( (boolean_f != ((closureN)self_735938)->elements[0]) ){ 
  
make_utf8_string_with_len(c_7313083, "->", 2, 2);
return_direct_with_clo1(data,  k_733410_735063,__lambda_831,  &c_7313083);
} else { 
  
make_utf8_string_with_len(c_7313085, ".", 1, 1);
return_direct_with_clo1(data,  k_733410_735063,__lambda_831,  &c_7313085);}
;; 
}

static void __lambda_826(void *data, object self_735939, int argc, object *args) /* object self_735939, object k_733411_735059 */
 {
 object k_733411_735059 = args[0];
  if( (boolean_f != ((closureN)self_735939)->elements[2]) ){ 
  
closureN_type c_7313042;
object e_7313052 [2];
c_7313042.hdr.mark = gc_color_red;
 c_7313042.hdr.grayed = 0;
c_7313042.tag = closureN_tag;
 c_7313042.fn = (function_type)__lambda_827;
c_7313042.num_args = 1;
c_7313042.num_elements = 2;
c_7313042.elements = (object *)e_7313052;
c_7313042.elements[0] = ((closureN)self_735939)->elements[0];
c_7313042.elements[1] = k_733411_735059;




object c_7313055 = Cyc_number2string2(data,(closure)&c_7313042,1,Cyc_length(data, ((closureN)self_735939)->elements[1]));
return_closcall1(data,(closure)&c_7313042,  c_7313055);
} else { 
  
closureN_type c_7313060;
object e_7313070 [2];
c_7313060.hdr.mark = gc_color_red;
 c_7313060.hdr.grayed = 0;
c_7313060.tag = closureN_tag;
 c_7313060.fn = (function_type)__lambda_828;
c_7313060.num_args = 1;
c_7313060.num_elements = 2;
c_7313060.elements = (object *)e_7313070;
c_7313060.elements[0] = ((closureN)self_735939)->elements[0];
c_7313060.elements[1] = k_733411_735059;




object c_7313073 = Cyc_number2string2(data,(closure)&c_7313060,1,Cyc_length(data, ((closureN)self_735939)->elements[1]));
return_closcall1(data,(closure)&c_7313060,  c_7313073);}
;; 
}

static void __lambda_828(void *data, object self_735941, int argc, object *args) /* object self_735941, object r_733414_735061 */
 {
 object r_733414_735061 = args[0];
  
make_utf8_string_with_len(c_7313066, "object ", 7, 7);

make_utf8_string_with_len(c_7313068, " [", 2, 2);

make_utf8_string_with_len(c_7313069, "];\n", 3, 3);

object c_7313065 = Cyc_string_append(data,  ((closureN)self_735941)->elements[1],5,&c_7313066, ((closureN)self_735941)->elements[0], &c_7313068, r_733414_735061, &c_7313069);
return_direct_with_clo1(data,  ((closureN)self_735941)->elements[1], (((closure)  ((closureN)self_735941)->elements[1])->fn),  c_7313065);; 
}

static void __lambda_827(void *data, object self_735940, int argc, object *args) /* object self_735940, object r_733412_735060 */
 {
 object r_733412_735060 = args[0];
  
make_utf8_string_with_len(c_7313048, "object *", 8, 8);

make_utf8_string_with_len(c_7313050, " = (object *)alloca(sizeof(object) * ", 37, 37);

make_utf8_string_with_len(c_7313051, ");", 2, 2);

object c_7313047 = Cyc_string_append(data,  ((closureN)self_735940)->elements[1],5,&c_7313048, ((closureN)self_735940)->elements[0], &c_7313050, r_733412_735060, &c_7313051);
return_direct_with_clo1(data,  ((closureN)self_735940)->elements[1], (((closure)  ((closureN)self_735940)->elements[1])->fn),  c_7313047);; 
}

static void __lambda_822(void *data, object self_735942, int argc, object *args) /* object self_735942, object k_733418_735055 */
 {
 object k_733418_735055 = args[0];
  if( (boolean_f != ((closureN)self_735942)->elements[1]) ){ 
  
make_utf8_string_with_len(c_7313022, "closureN_type * ", 16, 16);

make_utf8_string_with_len(c_7313024, " = alloca(sizeof(closureN_type));\n", 34, 34);

object c_7313021 = Cyc_string_append(data,  k_733418_735055,3,&c_7313022, ((closureN)self_735942)->elements[0], &c_7313024);
return_direct_with_clo1(data,  k_733418_735055, (((closure)  k_733418_735055)->fn),  c_7313021);
} else { 
  
make_utf8_string_with_len(c_7313029, "closureN_type ", 14, 14);

make_utf8_string_with_len(c_7313031, ";\n", 2, 2);

object c_7313028 = Cyc_string_append(data,  k_733418_735055,3,&c_7313029, ((closureN)self_735942)->elements[0], &c_7313031);
return_direct_with_clo1(data,  k_733418_735055, (((closure)  k_733418_735055)->fn),  c_7313028);}
;; 
}

static void __lambda_803(void *data, object self_735943, int argc, object *args) /* object self_735943, object create_91nclosure_731043_731795_735036 */
 {
 object create_91nclosure_731043_731795_735036 = args[0];
  
closureN_type c_7312878;
object e_7312934 [7];
c_7312878.hdr.mark = gc_color_red;
 c_7312878.hdr.grayed = 0;
c_7312878.tag = closureN_tag;
 c_7312878.fn = (function_type)__lambda_804;
c_7312878.num_args = 1;
c_7312878.num_elements = 7;
c_7312878.elements = (object *)e_7312934;
c_7312878.elements[0] = create_91nclosure_731043_731795_735036;
c_7312878.elements[1] = ((closureN)self_735943)->elements[0];
c_7312878.elements[2] = ((closureN)self_735943)->elements[1];
c_7312878.elements[3] = ((closureN)self_735943)->elements[2];
c_7312878.elements[4] = ((closureN)self_735943)->elements[3];
c_7312878.elements[5] = ((closureN)self_735943)->elements[7];
c_7312878.elements[6] = ((closureN)self_735943)->elements[8];


closureN_type c_7312935;
object e_7313012 [5];
c_7312935.hdr.mark = gc_color_red;
 c_7312935.hdr.grayed = 0;
c_7312935.tag = closureN_tag;
 c_7312935.fn = (function_type)__lambda_811;
c_7312935.num_args = 0;
c_7312935.num_elements = 5;
c_7312935.elements = (object *)e_7313012;
c_7312935.elements[0] = ((closureN)self_735943)->elements[1];
c_7312935.elements[1] = ((closureN)self_735943)->elements[2];
c_7312935.elements[2] = ((closureN)self_735943)->elements[4];
c_7312935.elements[3] = ((closureN)self_735943)->elements[5];
c_7312935.elements[4] = ((closureN)self_735943)->elements[6];

return_direct_with_clo1(data,(closure)&c_7312878,__lambda_804,  &c_7312935);; 
}

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


closureN_type c_7312957;
object e_7313011 [5];
c_7312957.hdr.mark = gc_color_red;
 c_7312957.hdr.grayed = 0;
c_7312957.tag = closureN_tag;
 c_7312957.fn = (function_type)__lambda_814;
c_7312957.num_args = 1;
c_7312957.num_elements = 5;
c_7312957.elements = (object *)e_7313011;
c_7312957.elements[0] = ((closureN)self_735944)->elements[0];
c_7312957.elements[1] = ((closureN)self_735944)->elements[1];
c_7312957.elements[2] = k_733377_735044;
c_7312957.elements[3] = ((closureN)self_735944)->elements[2];
c_7312957.elements[4] = ((closureN)self_735944)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312937,__lambda_812,  &c_7312957);; 
}

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


object c_7313009 = Cyc_number2string2(data,(closure)&c_7312959,1,((closureN)self_735945)->elements[4]);
return_closcall1(data,(closure)&c_7312959,  c_7313009);; 
}

static void __lambda_815(void *data, object self_735946, int argc, object *args) /* object self_735946, object r_733379_735048 */
 {
 object r_733379_735048 = args[0];
  
closureN_type c_7312961;
object e_7312971 [1];
c_7312961.hdr.mark = gc_color_red;
 c_7312961.hdr.grayed = 0;
c_7312961.tag = closureN_tag;
 c_7312961.fn = (function_type)__lambda_816;
c_7312961.num_args = 0;
c_7312961.num_elements = 1;
c_7312961.elements = (object *)e_7312971;
c_7312961.elements[0] = ((closureN)self_735946)->elements[1];


closureN_type c_7312972;
object e_7313005 [6];
c_7312972.hdr.mark = gc_color_red;
 c_7312972.hdr.grayed = 0;
c_7312972.tag = closureN_tag;
 c_7312972.fn = (function_type)__lambda_817;
c_7312972.num_args = 1;
c_7312972.num_elements = 6;
c_7312972.elements = (object *)e_7313005;
c_7312972.elements[0] = ((closureN)self_735946)->elements[0];
c_7312972.elements[1] = ((closureN)self_735946)->elements[1];
c_7312972.elements[2] = ((closureN)self_735946)->elements[2];
c_7312972.elements[3] = ((closureN)self_735946)->elements[3];
c_7312972.elements[4] = ((closureN)self_735946)->elements[4];
c_7312972.elements[5] = r_733379_735048;

return_direct_with_clo1(data,(closure)&c_7312961,__lambda_816,  &c_7312972);; 
}

static void __lambda_817(void *data, object self_735947, int argc, object *args) /* object self_735947, object r_733380_735050 */
 {
 object r_733380_735050 = args[0];
  
closureN_type c_7312974;
object e_7313002 [6];
c_7312974.hdr.mark = gc_color_red;
 c_7312974.hdr.grayed = 0;
c_7312974.tag = closureN_tag;
 c_7312974.fn = (function_type)__lambda_818;
c_7312974.num_args = 1;
c_7312974.num_elements = 6;
c_7312974.elements = (object *)e_7313002;
c_7312974.elements[0] = ((closureN)self_735947)->elements[0];
c_7312974.elements[1] = ((closureN)self_735947)->elements[2];
c_7312974.elements[2] = ((closureN)self_735947)->elements[3];
c_7312974.elements[3] = ((closureN)self_735947)->elements[4];
c_7312974.elements[4] = ((closureN)self_735947)->elements[5];
c_7312974.elements[5] = r_733380_735050;


make_utf8_string_with_len(c_7313004, ", ", 2, 2);
return_direct_with_clo3(data,  __glo_string_91join_scheme_cyclone_util, (((closure)  __glo_string_91join_scheme_cyclone_util)->fn),  &c_7312974, ((closureN)self_735947)->elements[1], &c_7313004);; 
}

static void __lambda_818(void *data, object self_735948, int argc, object *args) /* object self_735948, object r_733381_735051 */
 {
 object r_733381_735051 = args[0];
  
closureN_type c_7312976;
object e_7313000 [6];
c_7312976.hdr.mark = gc_color_red;
 c_7312976.hdr.grayed = 0;
c_7312976.tag = closureN_tag;
 c_7312976.fn = (function_type)__lambda_819;
c_7312976.num_args = 1;
c_7312976.num_elements = 6;
c_7312976.elements = (object *)e_7313000;
c_7312976.elements[0] = ((closureN)self_735948)->elements[0];
c_7312976.elements[1] = ((closureN)self_735948)->elements[1];
c_7312976.elements[2] = ((closureN)self_735948)->elements[3];
c_7312976.elements[3] = ((closureN)self_735948)->elements[4];
c_7312976.elements[4] = ((closureN)self_735948)->elements[5];
c_7312976.elements[5] = r_733381_735051;

return_direct_with_clo2(data,  __glo_compute_91num_91args_scheme_cyclone_cgen, (((closure)  __glo_compute_91num_91args_scheme_cyclone_cgen)->fn),  &c_7312976, ((closureN)self_735948)->elements[2]);; 
}

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


object c_7312999 = Cyc_number2string2(data,(closure)&c_7312978,1,r_733383_735052);
return_closcall1(data,(closure)&c_7312978,  c_7312999);; 
}

static void __lambda_820(void *data, object self_735950, int argc, object *args) /* object self_735950, object r_733382_735053 */
 {
 object r_733382_735053 = args[0];
  
make_utf8_string_with_len(c_7312985, "(", 1, 1);

make_utf8_string_with_len(c_7312987, ", ", 2, 2);

make_utf8_string_with_len(c_7312988, "(function_type)__lambda_", 24, 24);

make_utf8_string_with_len(c_7312992, ");", 2, 2);

make_utf8_string_with_len(c_7312994, ".num_args = ", 12, 12);

make_utf8_string_with_len(c_7312995, ";", 1, 1);

object c_7312983 = Cyc_string_append(data,  ((closureN)self_735950)->elements[1],13,((closureN)self_735950)->elements[2], &c_7312985, ((closureN)self_735950)->elements[0], &c_7312987, &c_7312988, ((closureN)self_735950)->elements[3], ((closureN)self_735950)->elements[4], ((closureN)self_735950)->elements[5], &c_7312992, ((closureN)self_735950)->elements[0], &c_7312994, r_733382_735053, &c_7312995);
return_direct_with_clo1(data,  ((closureN)self_735950)->elements[1], (((closure)  ((closureN)self_735950)->elements[1])->fn),  c_7312983);; 
}

static void __lambda_816(void *data, object self_735951, int argc, object *args) /* object self_735951, object k_733384_735049 */
 {
 object k_733384_735049 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_735951)->elements[0]), obj_int2obj(0))) ){ 
  
make_utf8_string_with_len(c_7312968, ",", 1, 1);
return_direct_with_clo1(data,  k_733384_735049,__lambda_817,  &c_7312968);
} else { 
  
make_utf8_string_with_len(c_7312970, "", 0, 0);
return_direct_with_clo1(data,  k_733384_735049,__lambda_817,  &c_7312970);}
;; 
}

static void __lambda_812(void *data, object self_735952, int argc, object *args) /* object self_735952, object k_733387_735045 */
 {
 object k_733387_735045 = args[0];
  if( (boolean_f != ((closureN)self_735952)->elements[1]) ){ 
  
make_utf8_string_with_len(c_7312940, "mmacro", 6, 6);
return_direct_with_clo1(data,  k_733387_735045, (((closure)  k_733387_735045)->fn),  &c_7312940);
} else { 
  
closureN_type c_7312942;
object e_7312949 [1];
c_7312942.hdr.mark = gc_color_red;
 c_7312942.hdr.grayed = 0;
c_7312942.tag = closureN_tag;
 c_7312942.fn = (function_type)__lambda_813;
c_7312942.num_args = 1;
c_7312942.num_elements = 1;
c_7312942.elements = (object *)e_7312949;
c_7312942.elements[0] = k_733387_735045;




object c_7312952 = Cyc_number2string2(data,(closure)&c_7312942,1,Cyc_length(data, ((closureN)self_735952)->elements[0]));
return_closcall1(data,(closure)&c_7312942,  c_7312952);}
;; 
}

static void __lambda_813(void *data, object self_735953, int argc, object *args) /* object self_735953, object r_733388_735046 */
 {
 object r_733388_735046 = args[0];
  
make_utf8_string_with_len(c_7312948, "mclosure", 8, 8);

object c_7312947 = Cyc_string_append(data,  ((closureN)self_735953)->elements[0],2,&c_7312948, r_733388_735046);
return_direct_with_clo1(data,  ((closureN)self_735953)->elements[0], (((closure)  ((closureN)self_735953)->elements[0])->fn),  c_7312947);; 
}

static void __lambda_804(void *data, object self_735954, int argc, object *args) /* object self_735954, object create_91mclosure_731046_731796_735037 */
 {
 object create_91mclosure_731046_731796_735037 = args[0];
  if( (boolean_f != ((closureN)self_735954)->elements[6]) ){ 
  return_closcall1(data,  ((closureN)self_735954)->elements[1],  ((closureN)self_735954)->elements[4]);
} else { 
  
closureN_type c_7312884;
object e_7312908 [3];
c_7312884.hdr.mark = gc_color_red;
 c_7312884.hdr.grayed = 0;
c_7312884.tag = closureN_tag;
 c_7312884.fn = (function_type)__lambda_805;
c_7312884.num_args = 0;
c_7312884.num_elements = 3;
c_7312884.elements = (object *)e_7312908;
c_7312884.elements[0] = ((closureN)self_735954)->elements[2];
c_7312884.elements[1] = ((closureN)self_735954)->elements[3];
c_7312884.elements[2] = ((closureN)self_735954)->elements[5];


closureN_type c_7312909;
object e_7312933 [4];
c_7312909.hdr.mark = gc_color_red;
 c_7312909.hdr.grayed = 0;
c_7312909.tag = closureN_tag;
 c_7312909.fn = (function_type)__lambda_808;
c_7312909.num_args = 1;
c_7312909.num_elements = 4;
c_7312909.elements = (object *)e_7312933;
c_7312909.elements[0] = create_91mclosure_731046_731796_735037;
c_7312909.elements[1] = ((closureN)self_735954)->elements[0];
c_7312909.elements[2] = ((closureN)self_735954)->elements[3];
c_7312909.elements[3] = ((closureN)self_735954)->elements[4];

return_direct_with_clo1(data,(closure)&c_7312884,__lambda_805,  &c_7312909);}
;; 
}

static void __lambda_808(void *data, object self_735955, int argc, object *args) /* object self_735955, object r_733367_735041 */
 {
 object r_733367_735041 = args[0];
  
closureN_type c_7312911;
object e_7312921 [3];
c_7312911.hdr.mark = gc_color_red;
 c_7312911.hdr.grayed = 0;
c_7312911.tag = closureN_tag;
 c_7312911.fn = (function_type)__lambda_809;
c_7312911.num_args = 0;
c_7312911.num_elements = 3;
c_7312911.elements = (object *)e_7312921;
c_7312911.elements[0] = ((closureN)self_735955)->elements[0];
c_7312911.elements[1] = ((closureN)self_735955)->elements[1];
c_7312911.elements[2] = ((closureN)self_735955)->elements[2];


closureN_type c_7312922;
object e_7312932 [2];
c_7312922.hdr.mark = gc_color_red;
 c_7312922.hdr.grayed = 0;
c_7312922.tag = closureN_tag;
 c_7312922.fn = (function_type)__lambda_810;
c_7312922.num_args = 1;
c_7312922.num_elements = 2;
c_7312922.elements = (object *)e_7312932;
c_7312922.elements[0] = ((closureN)self_735955)->elements[3];
c_7312922.elements[1] = r_733367_735041;

return_direct_with_clo1(data,(closure)&c_7312911,__lambda_809,  &c_7312922);; 
}

static void __lambda_810(void *data, object self_735956, int argc, object *args) /* object self_735956, object r_733369_735043 */
 {
 object r_733369_735043 = args[0];
  
list_2_type local_7312927; 

pair_type local_7312931; 
return_direct_with_clo1(data,  ((closureN)self_735956)->elements[0], (((closure)  ((closureN)self_735956)->elements[0])->fn),  Cyc_fast_list_2(&local_7312927, ((closureN)self_735956)->elements[1], set_cell_as_expr(&local_7312931, r_733369_735043)));; 
}

static void __lambda_809(void *data, object self_735957, int argc, object *args) /* object self_735957, object k_733370_735042 */
 {
 object k_733370_735042 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_735957)->elements[2]), obj_int2obj(0))) ){ 
  return_closcall1(data,  ((closureN)self_735957)->elements[1],  k_733370_735042);
} else { 
  return_closcall1(data,  ((closureN)self_735957)->elements[0],  k_733370_735042);}
;; 
}

static void __lambda_805(void *data, object self_735958, int argc, object *args) /* object self_735958, object k_733373_735038 */
 {
 object k_733373_735038 = args[0];
  
closureN_type c_7312886;
object e_7312895 [2];
c_7312886.hdr.mark = gc_color_red;
 c_7312886.hdr.grayed = 0;
c_7312886.tag = closureN_tag;
 c_7312886.fn = (function_type)__lambda_806;
c_7312886.num_args = 0;
c_7312886.num_elements = 2;
c_7312886.elements = (object *)e_7312895;
c_7312886.elements[0] = ((closureN)self_735958)->elements[1];
c_7312886.elements[1] = ((closureN)self_735958)->elements[2];


closureN_type c_7312896;
object e_7312907 [2];
c_7312896.hdr.mark = gc_color_red;
 c_7312896.hdr.grayed = 0;
c_7312896.tag = closureN_tag;
 c_7312896.fn = (function_type)__lambda_807;
c_7312896.num_args = 1;
c_7312896.num_elements = 2;
c_7312896.elements = (object *)e_7312907;
c_7312896.elements[0] = ((closureN)self_735958)->elements[0];
c_7312896.elements[1] = k_733373_735038;

return_direct_with_clo1(data,(closure)&c_7312886,__lambda_806,  &c_7312896);; 
}

static void __lambda_807(void *data, object self_735959, int argc, object *args) /* object self_735959, object r_733374_735040 */
 {
 object r_733374_735040 = args[0];
  if( (boolean_f != r_733374_735040) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735959)->elements[1], (((closure)  ((closureN)self_735959)->elements[1])->fn),  ((closureN)self_735959)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_7312905, "&", 1, 1);

object c_7312904 = Cyc_string_append(data,  ((closureN)self_735959)->elements[1],2,&c_7312905, ((closureN)self_735959)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_735959)->elements[1], (((closure)  ((closureN)self_735959)->elements[1])->fn),  c_7312904);}
;; 
}

static void __lambda_806(void *data, object self_735960, int argc, object *args) /* object self_735960, object k_733375_735039 */
 {
 object k_733375_735039 = args[0];
  if( (boolean_f != ((closureN)self_735960)->elements[1]) ){ 
  



return_direct_with_clo1(data,  k_733375_735039,__lambda_807,  Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_735960)->elements[0]), obj_int2obj(0)));
} else { 
  return_direct_with_clo1(data,  k_733375_735039,__lambda_807,  boolean_f);}
;; 
}

static void __lambda_799(void *data, object self_735961, int argc, object *args) /* object self_735961, object k_733422_735032 */
 {
 object k_733422_735032 = args[0];
  if( (boolean_f != ((closureN)self_735961)->elements[0]) ){ 
  
make_utf8_string_with_len(c_7312861, "1", 1, 1);
return_direct_with_clo1(data,  k_733422_735032, (((closure)  k_733422_735032)->fn),  &c_7312861);
} else { 
  
closureN_type c_7312863;
object e_7312869 [1];
c_7312863.hdr.mark = gc_color_red;
 c_7312863.hdr.grayed = 0;
c_7312863.tag = closureN_tag;
 c_7312863.fn = (function_type)__lambda_800;
c_7312863.num_args = 1;
c_7312863.num_elements = 1;
c_7312863.elements = (object *)e_7312869;
c_7312863.elements[0] = k_733422_735032;

return_direct_with_clo2(data,  __glo_compute_91num_91args_scheme_cyclone_cgen, (((closure)  __glo_compute_91num_91args_scheme_cyclone_cgen)->fn),  &c_7312863, ((closureN)self_735961)->elements[1]);}
;; 
}

static void __lambda_800(void *data, object self_735962, int argc, object *args) /* object self_735962, object r_733423_735033 */
 {
 object r_733423_735033 = args[0];
  
object c_7312868 = Cyc_number2string2(data,  ((closureN)self_735962)->elements[0],1,r_733423_735033);
return_direct_with_clo1(data,  ((closureN)self_735962)->elements[0], (((closure)  ((closureN)self_735962)->elements[0])->fn),  c_7312868);; 
}

static void __lambda_764(void *data, object _, int argc, object *args) /* closure _,object k_733334, object ast_91fnc_73994_731774, object closure_91args_73995_731775 */
 {
object k_733334 = args[0]; object ast_91fnc_73994_731774 = args[1]; object closure_91args_73995_731775 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:find-closure-assigned-var-index!");

closureN_type c_7312714;
object e_7312806 [3];
c_7312714.hdr.mark = gc_color_red;
 c_7312714.hdr.grayed = 0;
c_7312714.tag = closureN_tag;
 c_7312714.fn = (function_type)__lambda_765;
c_7312714.num_args = 1;
c_7312714.num_elements = 3;
c_7312714.elements = (object *)e_7312806;
c_7312714.elements[0] = ast_91fnc_73994_731774;
c_7312714.elements[1] = closure_91args_73995_731775;
c_7312714.elements[2] = k_733334;

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7312714, ast_91fnc_73994_731774);; 
}

static void __lambda_765(void *data, object self_735873, int argc, object *args) /* object self_735873, object r_733350 */
 {
 object r_733350 = args[0];
  
closureN_type c_7312716;
object e_7312805 [3];
c_7312716.hdr.mark = gc_color_red;
 c_7312716.hdr.grayed = 0;
c_7312716.tag = closureN_tag;
 c_7312716.fn = (function_type)__lambda_766;
c_7312716.num_args = 1;
c_7312716.num_elements = 3;
c_7312716.elements = (object *)e_7312805;
c_7312716.elements[0] = ((closureN)self_735873)->elements[0];
c_7312716.elements[1] = ((closureN)self_735873)->elements[1];
c_7312716.elements[2] = ((closureN)self_735873)->elements[2];

return_direct_with_clo3(data,  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations)->fn),  &c_7312716, r_733350, boolean_f);; 
}

static void __lambda_766(void *data, object self_735874, int argc, object *args) /* object self_735874, object r_733335 */
 {
 object r_733335 = args[0];
  
closureN_type c_7312718;
object e_7312804 [3];
c_7312718.hdr.mark = gc_color_red;
 c_7312718.hdr.grayed = 0;
c_7312718.tag = closureN_tag;
 c_7312718.fn = (function_type)__lambda_767;
c_7312718.num_args = 2;
c_7312718.num_elements = 3;
c_7312718.elements = (object *)e_7312804;
c_7312718.elements[0] = ((closureN)self_735874)->elements[0];
c_7312718.elements[1] = ((closureN)self_735874)->elements[1];
c_7312718.elements[2] = ((closureN)self_735874)->elements[2];

return_direct_with_clo2(data,(closure)&c_7312718,__lambda_767,  obj_int2obj(0), r_733335);; 
}

static void __lambda_767(void *data, object self_735875, int argc, object *args) /* object self_735875, object index_73996_731776, object fnc_73997_731777 */
 {
 object index_73996_731776 = args[0]; object fnc_73997_731777 = args[1];
  
closureN_type c_7312720;
object e_7312800 [4];
c_7312720.hdr.mark = gc_color_red;
 c_7312720.hdr.grayed = 0;
c_7312720.tag = closureN_tag;
 c_7312720.fn = (function_type)__lambda_1320;
c_7312720.num_args = 1;
c_7312720.num_elements = 4;
c_7312720.elements = (object *)e_7312800;
c_7312720.elements[0] = ((closureN)self_735875)->elements[0];
c_7312720.elements[1] = ((closureN)self_735875)->elements[1];
c_7312720.elements[2] = fnc_73997_731777;
c_7312720.elements[3] = ((closureN)self_735875)->elements[2];


pair_type local_7312803; 
return_direct_with_clo1(data,(closure)&c_7312720,__lambda_1320,  set_cell_as_expr(&local_7312803, index_73996_731776));; 
}

static void __lambda_1320(void *data, object self_735876, int argc, object *args) /* object self_735876, object index_73996_731776 */
 {
 object index_73996_731776 = args[0];
  
closureN_type c_7312722;
object e_7312733 [1];
c_7312722.hdr.mark = gc_color_red;
 c_7312722.hdr.grayed = 0;
c_7312722.tag = closureN_tag;
 c_7312722.fn = (function_type)__lambda_768;
c_7312722.num_args = 0;
c_7312722.num_elements = 1;
c_7312722.elements = (object *)e_7312733;
c_7312722.elements[0] = ((closureN)self_735876)->elements[2];


closureN_type c_7312734;
object e_7312799 [5];
c_7312734.hdr.mark = gc_color_red;
 c_7312734.hdr.grayed = 0;
c_7312734.tag = closureN_tag;
 c_7312734.fn = (function_type)__lambda_770;
c_7312734.num_args = 1;
c_7312734.num_elements = 5;
c_7312734.elements = (object *)e_7312799;
c_7312734.elements[0] = ((closureN)self_735876)->elements[0];
c_7312734.elements[1] = ((closureN)self_735876)->elements[1];
c_7312734.elements[2] = ((closureN)self_735876)->elements[2];
c_7312734.elements[3] = index_73996_731776;
c_7312734.elements[4] = ((closureN)self_735876)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312722,__lambda_768,  &c_7312734);; 
}

static void __lambda_770(void *data, object self_735877, int argc, object *args) /* object self_735877, object r_733336 */
 {
 object r_733336 = args[0];
  if( (boolean_f != r_733336) ){ 
  
closureN_type c_7312736;
object e_7312740 [2];
c_7312736.hdr.mark = gc_color_red;
 c_7312736.hdr.grayed = 0;
c_7312736.tag = closureN_tag;
 c_7312736.fn = (function_type)__lambda_771;
c_7312736.num_args = 1;
c_7312736.num_elements = 2;
c_7312736.elements = (object *)e_7312740;
c_7312736.elements[0] = ((closureN)self_735877)->elements[1];
c_7312736.elements[1] = ((closureN)self_735877)->elements[4];


closureN_type c_7312741;
object e_7312796 [3];
c_7312741.hdr.mark = gc_color_red;
 c_7312741.hdr.grayed = 0;
c_7312741.tag = closureN_tag;
 c_7312741.fn = (function_type)__lambda_772;
c_7312741.num_args = 1;
c_7312741.num_elements = 3;
c_7312741.elements = (object *)e_7312796;
c_7312741.elements[0] = ((closureN)self_735877)->elements[0];
c_7312741.elements[1] = ((closureN)self_735877)->elements[2];
c_7312741.elements[2] = ((closureN)self_735877)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312736,__lambda_771,  &c_7312741);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735877)->elements[4], (((closure)  ((closureN)self_735877)->elements[4])->fn),  boolean_f);}
;; 
}

static void __lambda_772(void *data, object self_735878, int argc, object *args) /* object self_735878, object k_733338, object arg_731002_731778 */
 {
 object k_733338 = args[0]; object arg_731002_731778 = args[1];
  
closureN_type c_7312743;
object e_7312779 [4];
c_7312743.hdr.mark = gc_color_red;
 c_7312743.hdr.grayed = 0;
c_7312743.tag = closureN_tag;
 c_7312743.fn = (function_type)__lambda_773;
c_7312743.num_args = 0;
c_7312743.num_elements = 4;
c_7312743.elements = (object *)e_7312779;
c_7312743.elements[0] = arg_731002_731778;
c_7312743.elements[1] = ((closureN)self_735878)->elements[0];
c_7312743.elements[2] = ((closureN)self_735878)->elements[1];
c_7312743.elements[3] = ((closureN)self_735878)->elements[2];


closureN_type c_7312780;
object e_7312795 [2];
c_7312780.hdr.mark = gc_color_red;
 c_7312780.hdr.grayed = 0;
c_7312780.tag = closureN_tag;
 c_7312780.fn = (function_type)__lambda_779;
c_7312780.num_args = 1;
c_7312780.num_elements = 2;
c_7312780.elements = (object *)e_7312795;
c_7312780.elements[0] = ((closureN)self_735878)->elements[2];
c_7312780.elements[1] = k_733338;

return_direct_with_clo1(data,(closure)&c_7312743,__lambda_773,  &c_7312780);; 
}

static void __lambda_779(void *data, object self_735879, int argc, object *args) /* object self_735879, object r_733339 */
 {

  
closureN_type c_7312782;
object e_7312788 [2];
c_7312782.hdr.mark = gc_color_red;
 c_7312782.hdr.grayed = 0;
c_7312782.tag = closureN_tag;
 c_7312782.fn = (function_type)__lambda_780;
c_7312782.num_args = 1;
c_7312782.num_elements = 2;
c_7312782.elements = (object *)e_7312788;
c_7312782.elements[0] = ((closureN)self_735879)->elements[0];
c_7312782.elements[1] = ((closureN)self_735879)->elements[1];


complex_num_type local_7312791; 


return_direct_with_clo1(data,(closure)&c_7312782,__lambda_780,  Cyc_fast_sum(data,&local_7312791, car(((closureN)self_735879)->elements[0]), obj_int2obj(1)));; 
}

static void __lambda_780(void *data, object self_735880, int argc, object *args) /* object self_735880, object r_733340 */
 {
 object r_733340 = args[0];
  

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

static void __lambda_773(void *data, object self_735881, int argc, object *args) /* object self_735881, object k_733341 */
 {
 object k_733341 = args[0];
  
closureN_type c_7312745;
object e_7312760 [2];
c_7312745.hdr.mark = gc_color_red;
 c_7312745.hdr.grayed = 0;
c_7312745.tag = closureN_tag;
 c_7312745.fn = (function_type)__lambda_774;
c_7312745.num_args = 0;
c_7312745.num_elements = 2;
c_7312745.elements = (object *)e_7312760;
c_7312745.elements[0] = ((closureN)self_735881)->elements[0];
c_7312745.elements[1] = ((closureN)self_735881)->elements[2];


closureN_type c_7312761;
object e_7312778 [4];
c_7312761.hdr.mark = gc_color_red;
 c_7312761.hdr.grayed = 0;
c_7312761.tag = closureN_tag;
 c_7312761.fn = (function_type)__lambda_776;
c_7312761.num_args = 1;
c_7312761.num_elements = 4;
c_7312761.elements = (object *)e_7312778;
c_7312761.elements[0] = ((closureN)self_735881)->elements[1];
c_7312761.elements[1] = ((closureN)self_735881)->elements[2];
c_7312761.elements[2] = ((closureN)self_735881)->elements[3];
c_7312761.elements[3] = k_733341;

return_direct_with_clo1(data,(closure)&c_7312745,__lambda_774,  &c_7312761);; 
}

static void __lambda_776(void *data, object self_735882, int argc, object *args) /* object self_735882, object r_733342 */
 {
 object r_733342 = args[0];
  if( (boolean_f != r_733342) ){ 
  
closureN_type c_7312763;
object e_7312771 [3];
c_7312763.hdr.mark = gc_color_red;
 c_7312763.hdr.grayed = 0;
c_7312763.tag = closureN_tag;
 c_7312763.fn = (function_type)__lambda_777;
c_7312763.num_args = 1;
c_7312763.num_elements = 3;
c_7312763.elements = (object *)e_7312771;
c_7312763.elements[0] = ((closureN)self_735882)->elements[0];
c_7312763.elements[1] = ((closureN)self_735882)->elements[1];
c_7312763.elements[2] = ((closureN)self_735882)->elements[3];



return_direct_with_clo3(data,  __glo_adbf_117set_91self_91closure_91index_67_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117set_91self_91closure_91index_67_scheme_cyclone_cps_91optimizations)->fn),  &c_7312763, ((closureN)self_735882)->elements[1], car(((closureN)self_735882)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735882)->elements[3], (((closure)  ((closureN)self_735882)->elements[3])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_777(void *data, object self_735883, int argc, object *args) /* object self_735883, object r_733343 */
 {

  
closureN_type c_7312765;
object e_7312769 [2];
c_7312765.hdr.mark = gc_color_red;
 c_7312765.hdr.grayed = 0;
c_7312765.tag = closureN_tag;
 c_7312765.fn = (function_type)__lambda_778;
c_7312765.num_args = 1;
c_7312765.num_elements = 2;
c_7312765.elements = (object *)e_7312769;
c_7312765.elements[0] = ((closureN)self_735883)->elements[1];
c_7312765.elements[1] = ((closureN)self_735883)->elements[2];

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7312765, ((closureN)self_735883)->elements[0]);; 
}

static void __lambda_778(void *data, object self_735884, int argc, object *args) /* object self_735884, object r_733344 */
 {
 object r_733344 = args[0];
  return_direct_with_clo3(data,  __glo_adb_117set_67_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117set_67_scheme_cyclone_cps_91optimizations)->fn),  ((closureN)self_735884)->elements[1], r_733344, ((closureN)self_735884)->elements[0]);; 
}

static void __lambda_774(void *data, object self_735885, int argc, object *args) /* object self_735885, object k_733345 */
 {
 object k_733345 = args[0];
    complex_num_type local_7312748; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7312748, ((closureN)self_735885)->elements[0])) ){ 
  
closureN_type c_7312751;
object e_7312757 [2];
c_7312751.hdr.mark = gc_color_red;
 c_7312751.hdr.grayed = 0;
c_7312751.tag = closureN_tag;
 c_7312751.fn = (function_type)__lambda_775;
c_7312751.num_args = 1;
c_7312751.num_elements = 2;
c_7312751.elements = (object *)e_7312757;
c_7312751.elements[0] = ((closureN)self_735885)->elements[0];
c_7312751.elements[1] = k_733345;

return_direct_with_clo2(data,  __glo_adbf_117assigned_91to_91var_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117assigned_91to_91var_scheme_cyclone_cps_91optimizations)->fn),  &c_7312751, ((closureN)self_735885)->elements[1]);
} else { 
  return_direct_with_clo1(data,  k_733345, (((closure)  k_733345)->fn),  boolean_f);}
;; 
}

static void __lambda_775(void *data, object self_735886, int argc, object *args) /* object self_735886, object r_733347 */
 {
 object r_733347 = args[0];
  

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

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

static void __lambda_768(void *data, object self_735888, int argc, object *args) /* object self_735888, object k_733348 */
 {
 object k_733348 = args[0];
  if( (boolean_f != ((closureN)self_735888)->elements[0]) ){ 
  
closureN_type c_7312725;
object e_7312730 [1];
c_7312725.hdr.mark = gc_color_red;
 c_7312725.hdr.grayed = 0;
c_7312725.tag = closureN_tag;
 c_7312725.fn = (function_type)__lambda_769;
c_7312725.num_args = 1;
c_7312725.num_elements = 1;
c_7312725.elements = (object *)e_7312730;
c_7312725.elements[0] = k_733348;

return_direct_with_clo2(data,  __glo_adbf_117assigned_91to_91var_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117assigned_91to_91var_scheme_cyclone_cps_91optimizations)->fn),  &c_7312725, ((closureN)self_735888)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_733348, (((closure)  k_733348)->fn),  boolean_f);}
;; 
}

static void __lambda_769(void *data, object self_735889, int argc, object *args) /* object self_735889, object r_733349 */
 {
 object r_733349 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_735889)->elements[0], (((closure)  ((closureN)self_735889)->elements[0])->fn),  Cyc_is_pair(r_733349));; 
}

static void __lambda_755(void *data, object _, int argc, object *args) /* closure _,object k_733322, object ast_91id_73984_731770, object var_73985_731771, object idx_73986_731772 */
 {
object k_733322 = args[0]; object ast_91id_73984_731770 = args[1]; object var_73985_731771 = args[2]; object idx_73986_731772 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-closure-element-ref");

closureN_type c_7312664;
object e_7312668 [2];
c_7312664.hdr.mark = gc_color_red;
 c_7312664.hdr.grayed = 0;
c_7312664.tag = closureN_tag;
 c_7312664.fn = (function_type)__lambda_756;
c_7312664.num_args = 1;
c_7312664.num_elements = 2;
c_7312664.elements = (object *)e_7312668;
c_7312664.elements[0] = ast_91id_73984_731770;
c_7312664.elements[1] = k_733322;


closureN_type c_7312669;
object e_7312711 [2];
c_7312669.hdr.mark = gc_color_red;
 c_7312669.hdr.grayed = 0;
c_7312669.tag = closureN_tag;
 c_7312669.fn = (function_type)__lambda_757;
c_7312669.num_args = 1;
c_7312669.num_elements = 2;
c_7312669.elements = (object *)e_7312711;
c_7312669.elements[0] = idx_73986_731772;
c_7312669.elements[1] = var_73985_731771;

return_direct_with_clo1(data,(closure)&c_7312664,__lambda_756,  &c_7312669);; 
}

static void __lambda_757(void *data, object self_735865, int argc, object *args) /* object self_735865, object k_733324, object fnc_73987_731773 */
 {
 object k_733324 = args[0]; object fnc_73987_731773 = args[1];
  
closureN_type c_7312671;
object e_7312687 [1];
c_7312671.hdr.mark = gc_color_red;
 c_7312671.hdr.grayed = 0;
c_7312671.tag = closureN_tag;
 c_7312671.fn = (function_type)__lambda_758;
c_7312671.num_args = 0;
c_7312671.num_elements = 1;
c_7312671.elements = (object *)e_7312687;
c_7312671.elements[0] = fnc_73987_731773;


closureN_type c_7312688;
object e_7312710 [4];
c_7312688.hdr.mark = gc_color_red;
 c_7312688.hdr.grayed = 0;
c_7312688.tag = closureN_tag;
 c_7312688.fn = (function_type)__lambda_761;
c_7312688.num_args = 1;
c_7312688.num_elements = 4;
c_7312688.elements = (object *)e_7312710;
c_7312688.elements[0] = fnc_73987_731773;
c_7312688.elements[1] = ((closureN)self_735865)->elements[0];
c_7312688.elements[2] = k_733324;
c_7312688.elements[3] = ((closureN)self_735865)->elements[1];

return_direct_with_clo1(data,(closure)&c_7312671,__lambda_758,  &c_7312688);; 
}

static void __lambda_761(void *data, object self_735866, int argc, object *args) /* object self_735866, object r_733325 */
 {
 object r_733325 = args[0];
  if( (boolean_f != r_733325) ){ 
  
closureN_type c_7312690;
object e_7312695 [1];
c_7312690.hdr.mark = gc_color_red;
 c_7312690.hdr.grayed = 0;
c_7312690.tag = closureN_tag;
 c_7312690.fn = (function_type)__lambda_762;
c_7312690.num_args = 1;
c_7312690.num_elements = 1;
c_7312690.elements = (object *)e_7312695;
c_7312690.elements[0] = ((closureN)self_735866)->elements[2];

return_direct_with_clo2(data,  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations)->fn),  &c_7312690, ((closureN)self_735866)->elements[0]);
} else { 
  
closureN_type c_7312698;
object e_7312708 [2];
c_7312698.hdr.mark = gc_color_red;
 c_7312698.hdr.grayed = 0;
c_7312698.tag = closureN_tag;
 c_7312698.fn = (function_type)__lambda_763;
c_7312698.num_args = 1;
c_7312698.num_elements = 2;
c_7312698.elements = (object *)e_7312708;
c_7312698.elements[0] = ((closureN)self_735866)->elements[1];
c_7312698.elements[1] = ((closureN)self_735866)->elements[2];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7312698, ((closureN)self_735866)->elements[3]);}
;; 
}

static void __lambda_763(void *data, object self_735868, int argc, object *args) /* object self_735868, object r_733328 */
 {
 object r_733328 = args[0];
  
make_utf8_string_with_len(c_7312704, "((closureN)", 11, 11);

make_utf8_string_with_len(c_7312705, ")->elements[", 12, 12);

make_utf8_string_with_len(c_7312707, "]", 1, 1);

object c_7312703 = Cyc_string_append(data,  ((closureN)self_735868)->elements[1],5,&c_7312704, r_733328, &c_7312705, ((closureN)self_735868)->elements[0], &c_7312707);
return_direct_with_clo1(data,  ((closureN)self_735868)->elements[1], (((closure)  ((closureN)self_735868)->elements[1])->fn),  c_7312703);; 
}

static void __lambda_762(void *data, object self_735867, int argc, object *args) /* object self_735867, object r_733327 */
 {
 object r_733327 = args[0];
  

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  ((closureN)self_735867)->elements[0], Cyc_car(data, r_733327));; 
}

static void __lambda_758(void *data, object self_735869, int argc, object *args) /* object self_735869, object k_733329 */
 {
 object k_733329 = args[0];
  if( (boolean_f != __glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen) ){ 
  
closureN_type c_7312673;
object e_7312684 [2];
c_7312673.hdr.mark = gc_color_red;
 c_7312673.hdr.grayed = 0;
c_7312673.tag = closureN_tag;
 c_7312673.fn = (function_type)__lambda_759;
c_7312673.num_args = 1;
c_7312673.num_elements = 2;
c_7312673.elements = (object *)e_7312684;
c_7312673.elements[0] = ((closureN)self_735869)->elements[0];
c_7312673.elements[1] = k_733329;

return_direct_with_clo2(data,  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations)->fn),  &c_7312673, ((closureN)self_735869)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_733329, (((closure)  k_733329)->fn),  boolean_f);}
;; 
}

static void __lambda_759(void *data, object self_735870, int argc, object *args) /* object self_735870, object r_733330 */
 {
 object r_733330 = args[0];
  if( (boolean_f != r_733330) ){ 
  
closureN_type c_7312675;
object e_7312680 [1];
c_7312675.hdr.mark = gc_color_red;
 c_7312675.hdr.grayed = 0;
c_7312675.tag = closureN_tag;
 c_7312675.fn = (function_type)__lambda_760;
c_7312675.num_args = 1;
c_7312675.num_elements = 1;
c_7312675.elements = (object *)e_7312680;
c_7312675.elements[0] = ((closureN)self_735870)->elements[1];

return_direct_with_clo2(data,  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations)->fn),  &c_7312675, ((closureN)self_735870)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735870)->elements[1], (((closure)  ((closureN)self_735870)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_760(void *data, object self_735871, int argc, object *args) /* object self_735871, object r_733331 */
 {
 object r_733331 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_735871)->elements[0], (((closure)  ((closureN)self_735871)->elements[0])->fn),  equalp(r_733331, obj_int2obj(1)));; 
}

static void __lambda_756(void *data, object self_735872, int argc, object *args) /* object self_735872, object r_733323 */
 {
 object r_733323 = args[0];
  return_direct_with_clo3(data,  __glo_with_91fnc_scheme_cyclone_cps_91optimizations, (((closure)  __glo_with_91fnc_scheme_cyclone_cps_91optimizations)->fn),  ((closureN)self_735872)->elements[1], ((closureN)self_735872)->elements[0], r_733323);; 
}

static void __lambda_749(void *data, object _, int argc, object *args) /* closure _,object k_733309, object lis_73975_731766 */
 {
object k_733309 = args[0]; object lis_73975_731766 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:fl/cont?");

closureN_type c_7312617;
object e_7312632 [2];
c_7312617.hdr.mark = gc_color_red;
 c_7312617.hdr.grayed = 0;
c_7312617.tag = closureN_tag;
 c_7312617.fn = (function_type)__lambda_750;
c_7312617.num_args = 1;
c_7312617.num_elements = 2;
c_7312617.elements = (object *)e_7312632;
c_7312617.elements[0] = k_733309;
c_7312617.elements[1] = lis_73975_731766;


mclosure0(c_7312633, (function_type)__lambda_752);c_7312633.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7312617,__lambda_750,  &c_7312633);; 
}

static void __lambda_752(void *data, object self_735860, int argc, object *args) /* object self_735860, object k_733313, object lis_73977_731768 */
 {
 object k_733313 = args[0]; object lis_73977_731768 = args[1];
    
if( (boolean_f != Cyc_is_null(lis_73977_731768)) ){ 
  return_direct_with_clo1(data,  k_733313, (((closure)  k_733313)->fn),  boolean_f);
} else { 
  
closureN_type c_7312638;
object e_7312656 [1];
c_7312638.hdr.mark = gc_color_red;
 c_7312638.hdr.grayed = 0;
c_7312638.tag = closureN_tag;
 c_7312638.fn = (function_type)__lambda_753;
c_7312638.num_args = 1;
c_7312638.num_elements = 1;
c_7312638.elements = (object *)e_7312656;
c_7312638.elements[0] = k_733313;




object c_7312659 = Cyc_symbol2string(data,(closure)&c_7312638,Cyc_car(data, lis_73977_731768));
return_closcall1(data,(closure)&c_7312638,  c_7312659);}
;; 
}

static void __lambda_753(void *data, object self_735861, int argc, object *args) /* object self_735861, object arg_73982_731769 */
 {
 object arg_73982_731769 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, arg_73982_731769), obj_int2obj(1))) ){ 
  
closureN_type c_7312644;
object e_7312650 [1];
c_7312644.hdr.mark = gc_color_red;
 c_7312644.hdr.grayed = 0;
c_7312644.tag = closureN_tag;
 c_7312644.fn = (function_type)__lambda_754;
c_7312644.num_args = 1;
c_7312644.num_elements = 1;
c_7312644.elements = (object *)e_7312650;
c_7312644.elements[0] = ((closureN)self_735861)->elements[0];


object c_7312653 = Cyc_substring(data,(closure)&c_7312644,arg_73982_731769, obj_int2obj(0), obj_int2obj(2));
return_closcall1(data,(closure)&c_7312644,  c_7312653);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735861)->elements[0], (((closure)  ((closureN)self_735861)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_754(void *data, object self_735862, int argc, object *args) /* object self_735862, object r_733317 */
 {
 object r_733317 = args[0];
  


make_utf8_string_with_len(c_7312649, "k$", 2, 2);
return_direct_with_clo1(data,  ((closureN)self_735862)->elements[0], (((closure)  ((closureN)self_735862)->elements[0])->fn),  equalp(&c_7312649, r_733317));; 
}

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

return_direct_with_clo2(data,  __glo_fl_95closure_127_scheme_cyclone_cgen, (((closure)  __glo_fl_95closure_127_scheme_cyclone_cgen)->fn),  &c_7312619, ((closureN)self_735863)->elements[1]);; 
}

static void __lambda_751(void *data, object self_735864, int argc, object *args) /* object self_735864, object r_733311 */
 {
 object r_733311 = args[0];
  if( (boolean_f != r_733311) ){ 
  

return_closcall2(data,  ((closureN)self_735864)->elements[0],  ((closureN)self_735864)->elements[1], Cyc_cdr(data, ((closureN)self_735864)->elements[2]));
} else { 
  return_closcall2(data,  ((closureN)self_735864)->elements[0],  ((closureN)self_735864)->elements[1], ((closureN)self_735864)->elements[2]);}
;; 
}

static void __lambda_746(void *data, object _, int argc, object *args) /* closure _,object k_733300, object lis_73968_731764 */
 {
object k_733300 = args[0]; object lis_73968_731764 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:fl/closure?");
  
if( (boolean_f != Cyc_is_null(lis_73968_731764)) ){ 
  return_direct_with_clo1(data,  k_733300, (((closure)  k_733300)->fn),  boolean_f);
} else { 
  
closureN_type c_7312591;
object e_7312609 [1];
c_7312591.hdr.mark = gc_color_red;
 c_7312591.hdr.grayed = 0;
c_7312591.tag = closureN_tag;
 c_7312591.fn = (function_type)__lambda_747;
c_7312591.num_args = 1;
c_7312591.num_elements = 1;
c_7312591.elements = (object *)e_7312609;
c_7312591.elements[0] = k_733300;




object c_7312612 = Cyc_symbol2string(data,(closure)&c_7312591,Cyc_car(data, lis_73968_731764));
return_closcall1(data,(closure)&c_7312591,  c_7312612);}
;; 
}

static void __lambda_747(void *data, object self_735858, int argc, object *args) /* object self_735858, object arg_73973_731765 */
 {
 object arg_73973_731765 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, arg_73973_731765), obj_int2obj(4))) ){ 
  
closureN_type c_7312597;
object e_7312603 [1];
c_7312597.hdr.mark = gc_color_red;
 c_7312597.hdr.grayed = 0;
c_7312597.tag = closureN_tag;
 c_7312597.fn = (function_type)__lambda_748;
c_7312597.num_args = 1;
c_7312597.num_elements = 1;
c_7312597.elements = (object *)e_7312603;
c_7312597.elements[0] = ((closureN)self_735858)->elements[0];


object c_7312606 = Cyc_substring(data,(closure)&c_7312597,arg_73973_731765, obj_int2obj(0), obj_int2obj(5));
return_closcall1(data,(closure)&c_7312597,  c_7312606);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735858)->elements[0], (((closure)  ((closureN)self_735858)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_748(void *data, object self_735859, int argc, object *args) /* object self_735859, object r_733304 */
 {
 object r_733304 = args[0];
  


make_utf8_string_with_len(c_7312602, "self$", 5, 5);
return_direct_with_clo1(data,  ((closureN)self_735859)->elements[0], (((closure)  ((closureN)self_735859)->elements[0])->fn),  equalp(&c_7312602, r_733304));; 
}

static void __lambda_742(void *data, object _, int argc, object *args) /* closure _,object k_733290, object exp_73958_731761 */
 {
object k_733290 = args[0]; object exp_73958_731761 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:ast:lambda-num-args");

closureN_type c_7312561;
object e_7312585 [2];
c_7312561.hdr.mark = gc_color_red;
 c_7312561.hdr.grayed = 0;
c_7312561.tag = closureN_tag;
 c_7312561.fn = (function_type)__lambda_743;
c_7312561.num_args = 1;
c_7312561.num_elements = 2;
c_7312561.elements = (object *)e_7312585;
c_7312561.elements[0] = exp_73958_731761;
c_7312561.elements[1] = k_733290;

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms)->fn),  &c_7312561, exp_73958_731761);; 
}

static void __lambda_743(void *data, object self_735855, int argc, object *args) /* object self_735855, object r_733291 */
 {
 object r_733291 = args[0];
  
closureN_type c_7312563;
object e_7312583 [2];
c_7312563.hdr.mark = gc_color_red;
 c_7312563.hdr.grayed = 0;
c_7312563.tag = closureN_tag;
 c_7312563.fn = (function_type)__lambda_744;
c_7312563.num_args = 1;
c_7312563.num_elements = 2;
c_7312563.elements = (object *)e_7312583;
c_7312563.elements[0] = ((closureN)self_735855)->elements[1];
c_7312563.elements[1] = r_733291;

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_7312563, ((closureN)self_735855)->elements[0]);; 
}

static void __lambda_744(void *data, object self_735856, int argc, object *args) /* object self_735856, object r_733297 */
 {
 object r_733297 = args[0];
  
closureN_type c_7312565;
object e_7312579 [1];
c_7312565.hdr.mark = gc_color_red;
 c_7312565.hdr.grayed = 0;
c_7312565.tag = closureN_tag;
 c_7312565.fn = (function_type)__lambda_745;
c_7312565.num_args = 2;
c_7312565.num_elements = 1;
c_7312565.elements = (object *)e_7312579;
c_7312565.elements[0] = ((closureN)self_735856)->elements[0];



return_direct_with_clo2(data,(closure)&c_7312565,__lambda_745,  ((closureN)self_735856)->elements[1], Cyc_length(data, r_733297));; 
}

static void __lambda_745(void *data, object self_735857, int argc, object *args) /* object self_735857, object type_73959_731762, object num_73960_731763 */
 {
 object type_73959_731762 = args[0]; object num_73960_731763 = args[1];
    
if( (boolean_f != equalp(type_73959_731762, quote_args_117varargs)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735857)->elements[0], (((closure)  ((closureN)self_735857)->elements[0])->fn),  obj_int2obj(-1));
} else { 
    
if( (boolean_f != equalp(type_73959_731762, quote_args_117fixed_91with_91varargs)) ){ 
  
complex_num_type local_7312576; 
return_direct_with_clo1(data,  ((closureN)self_735857)->elements[0], (((closure)  ((closureN)self_735857)->elements[0])->fn),  Cyc_fast_sub(data,&local_7312576, num_73960_731763, obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735857)->elements[0], (((closure)  ((closureN)self_735857)->elements[0])->fn),  num_73960_731763);}
;}
;; 
}

static void __lambda_733(void *data, object _, int argc, object *args) /* closure _,object k_733277, object lam_73951_731758 */
 {
object k_733277 = args[0]; object lam_73951_731758 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:compute-num-args");

closureN_type c_7312513;
object e_7312558 [2];
c_7312513.hdr.mark = gc_color_red;
 c_7312513.hdr.grayed = 0;
c_7312513.tag = closureN_tag;
 c_7312513.fn = (function_type)__lambda_734;
c_7312513.num_args = 1;
c_7312513.num_elements = 2;
c_7312513.elements = (object *)e_7312558;
c_7312513.elements[0] = k_733277;
c_7312513.elements[1] = lam_73951_731758;

return_direct_with_clo2(data,  __glo_ast_117lambda_91num_91args_scheme_cyclone_cgen, (((closure)  __glo_ast_117lambda_91num_91args_scheme_cyclone_cgen)->fn),  &c_7312513, lam_73951_731758);; 
}

static void __lambda_734(void *data, object self_735847, int argc, object *args) /* object self_735847, object count_73952_731759 */
 {
 object count_73952_731759 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, count_73952_731759, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735847)->elements[0], (((closure)  ((closureN)self_735847)->elements[0])->fn),  obj_int2obj(-1));
} else { 
  
closureN_type c_7312519;
object e_7312556 [2];
c_7312519.hdr.mark = gc_color_red;
 c_7312519.hdr.grayed = 0;
c_7312519.tag = closureN_tag;
 c_7312519.fn = (function_type)__lambda_735;
c_7312519.num_args = 1;
c_7312519.num_elements = 2;
c_7312519.elements = (object *)e_7312556;
c_7312519.elements[0] = count_73952_731759;
c_7312519.elements[1] = ((closureN)self_735847)->elements[0];

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_7312519, ((closureN)self_735847)->elements[1]);}
;; 
}

static void __lambda_735(void *data, object self_735848, int argc, object *args) /* object self_735848, object formals_73957_731760 */
 {
 object formals_73957_731760 = args[0];
  
closureN_type c_7312521;
object e_7312530 [1];
c_7312521.hdr.mark = gc_color_red;
 c_7312521.hdr.grayed = 0;
c_7312521.tag = closureN_tag;
 c_7312521.fn = (function_type)__lambda_736;
c_7312521.num_args = 0;
c_7312521.num_elements = 1;
c_7312521.elements = (object *)e_7312530;
c_7312521.elements[0] = formals_73957_731760;


closureN_type c_7312531;
object e_7312555 [3];
c_7312531.hdr.mark = gc_color_red;
 c_7312531.hdr.grayed = 0;
c_7312531.tag = closureN_tag;
 c_7312531.fn = (function_type)__lambda_738;
c_7312531.num_args = 1;
c_7312531.num_elements = 3;
c_7312531.elements = (object *)e_7312555;
c_7312531.elements[0] = ((closureN)self_735848)->elements[0];
c_7312531.elements[1] = formals_73957_731760;
c_7312531.elements[2] = ((closureN)self_735848)->elements[1];

return_direct_with_clo1(data,(closure)&c_7312521,__lambda_736,  &c_7312531);; 
}

static void __lambda_738(void *data, object self_735849, int argc, object *args) /* object self_735849, object r_733285 */
 {
 object r_733285 = args[0];
  
closureN_type c_7312533;
object e_7312542 [1];
c_7312533.hdr.mark = gc_color_red;
 c_7312533.hdr.grayed = 0;
c_7312533.tag = closureN_tag;
 c_7312533.fn = (function_type)__lambda_739;
c_7312533.num_args = 0;
c_7312533.num_elements = 1;
c_7312533.elements = (object *)e_7312542;
c_7312533.elements[0] = ((closureN)self_735849)->elements[1];


closureN_type c_7312543;
object e_7312554 [3];
c_7312543.hdr.mark = gc_color_red;
 c_7312543.hdr.grayed = 0;
c_7312543.tag = closureN_tag;
 c_7312543.fn = (function_type)__lambda_741;
c_7312543.num_args = 1;
c_7312543.num_elements = 3;
c_7312543.elements = (object *)e_7312554;
c_7312543.elements[0] = ((closureN)self_735849)->elements[0];
c_7312543.elements[1] = ((closureN)self_735849)->elements[2];
c_7312543.elements[2] = r_733285;

return_direct_with_clo1(data,(closure)&c_7312533,__lambda_739,  &c_7312543);; 
}

static void __lambda_741(void *data, object self_735850, int argc, object *args) /* object self_735850, object r_733282 */
 {
 object r_733282 = args[0];
  
complex_num_type local_7312548; 

complex_num_type local_7312551; 
return_direct_with_clo1(data,  ((closureN)self_735850)->elements[1], (((closure)  ((closureN)self_735850)->elements[1])->fn),  Cyc_fast_sub(data,&local_7312548, Cyc_fast_sub(data,&local_7312551, ((closureN)self_735850)->elements[0], ((closureN)self_735850)->elements[2]), r_733282));; 
}

static void __lambda_739(void *data, object self_735851, int argc, object *args) /* object self_735851, object k_733283 */
 {
 object k_733283 = args[0];
  
closureN_type c_7312535;
object e_7312540 [1];
c_7312535.hdr.mark = gc_color_red;
 c_7312535.hdr.grayed = 0;
c_7312535.tag = closureN_tag;
 c_7312535.fn = (function_type)__lambda_740;
c_7312535.num_args = 1;
c_7312535.num_elements = 1;
c_7312535.elements = (object *)e_7312540;
c_7312535.elements[0] = k_733283;

return_direct_with_clo2(data,  __glo_fl_95cont_127_scheme_cyclone_cgen, (((closure)  __glo_fl_95cont_127_scheme_cyclone_cgen)->fn),  &c_7312535, ((closureN)self_735851)->elements[0]);; 
}

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

static void __lambda_736(void *data, object self_735853, int argc, object *args) /* object self_735853, object k_733286 */
 {
 object k_733286 = args[0];
  
closureN_type c_7312523;
object e_7312528 [1];
c_7312523.hdr.mark = gc_color_red;
 c_7312523.hdr.grayed = 0;
c_7312523.tag = closureN_tag;
 c_7312523.fn = (function_type)__lambda_737;
c_7312523.num_args = 1;
c_7312523.num_elements = 1;
c_7312523.elements = (object *)e_7312528;
c_7312523.elements[0] = k_733286;

return_direct_with_clo2(data,  __glo_fl_95closure_127_scheme_cyclone_cgen, (((closure)  __glo_fl_95closure_127_scheme_cyclone_cgen)->fn),  &c_7312523, ((closureN)self_735853)->elements[0]);; 
}

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

static void __lambda_731(void *data, object _, int argc, object *args) /* closure _,object k_733272, object exp_73949_731756 */
 {
object k_733272 = args[0]; object exp_73949_731756 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:lambda->env");

closureN_type c_7312501;
object e_7312510 [1];
c_7312501.hdr.mark = gc_color_red;
 c_7312501.hdr.grayed = 0;
c_7312501.tag = closureN_tag;
 c_7312501.fn = (function_type)__lambda_732;
c_7312501.num_args = 1;
c_7312501.num_elements = 1;
c_7312501.elements = (object *)e_7312510;
c_7312501.elements[0] = k_733272;

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_7312501, exp_73949_731756);; 
}

static void __lambda_732(void *data, object self_735846, int argc, object *args) /* object self_735846, object formals_73950_731757 */
 {
 object formals_73950_731757 = args[0];
    
if( (boolean_f != Cyc_is_pair(formals_73950_731757)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_735846)->elements[0], (((closure)  ((closureN)self_735846)->elements[0])->fn),  Cyc_car(data, formals_73950_731757));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735846)->elements[0], (((closure)  ((closureN)self_735846)->elements[0])->fn),  quote_unused);}
;; 
}

static void __lambda_719(void *data, object _, int argc, object *args) /* closure _,object k_733253, object ast_117lam_73940_731752, object lam_73941_731753, object cps_127_73942_731754_raw, ... */
 {
object k_733253 = args[0]; object ast_117lam_73940_731752 = args[1]; object lam_73941_731753 = args[2];
load_varargs(cps_127_73942_731754, args, 3, argc - 3);
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:allocate-lambda");

closureN_type c_7312403;
object e_7312498 [4];
c_7312403.hdr.mark = gc_color_red;
 c_7312403.hdr.grayed = 0;
c_7312403.tag = closureN_tag;
 c_7312403.fn = (function_type)__lambda_720;
c_7312403.num_args = 1;
c_7312403.num_elements = 4;
c_7312403.elements = (object *)e_7312498;
c_7312403.elements[0] = ast_117lam_73940_731752;
c_7312403.elements[1] = cps_127_73942_731754;
c_7312403.elements[2] = k_733253;
c_7312403.elements[3] = lam_73941_731753;

return_direct_with_clo1(data,(closure)&c_7312403,__lambda_720,  __glo_num_91lambdas_scheme_cyclone_cgen);; 
}

static void __lambda_720(void *data, object self_735834, int argc, object *args) /* object self_735834, object id_73943_731755 */
 {
 object id_73943_731755 = args[0];
  
closureN_type c_7312405;
object e_7312494 [4];
c_7312405.hdr.mark = gc_color_red;
 c_7312405.hdr.grayed = 0;
c_7312405.tag = closureN_tag;
 c_7312405.fn = (function_type)__lambda_1319;
c_7312405.num_args = 1;
c_7312405.num_elements = 4;
c_7312405.elements = (object *)e_7312494;
c_7312405.elements[0] = ((closureN)self_735834)->elements[0];
c_7312405.elements[1] = ((closureN)self_735834)->elements[1];
c_7312405.elements[2] = ((closureN)self_735834)->elements[2];
c_7312405.elements[3] = ((closureN)self_735834)->elements[3];


pair_type local_7312497; 
return_direct_with_clo1(data,(closure)&c_7312405,__lambda_1319,  set_cell_as_expr(&local_7312497, id_73943_731755));; 
}

static void __lambda_1319(void *data, object self_735835, int argc, object *args) /* object self_735835, object id_73943_731755 */
 {
 object id_73943_731755 = args[0];
  
closureN_type c_7312407;
object e_7312439 [3];
c_7312407.hdr.mark = gc_color_red;
 c_7312407.hdr.grayed = 0;
c_7312407.tag = closureN_tag;
 c_7312407.fn = (function_type)__lambda_721;
c_7312407.num_args = 0;
c_7312407.num_elements = 3;
c_7312407.elements = (object *)e_7312439;
c_7312407.elements[0] = ((closureN)self_735835)->elements[0];
c_7312407.elements[1] = ((closureN)self_735835)->elements[1];
c_7312407.elements[2] = id_73943_731755;


closureN_type c_7312440;
object e_7312493 [5];
c_7312440.hdr.mark = gc_color_red;
 c_7312440.hdr.grayed = 0;
c_7312440.tag = closureN_tag;
 c_7312440.fn = (function_type)__lambda_724;
c_7312440.num_args = 1;
c_7312440.num_elements = 5;
c_7312440.elements = (object *)e_7312493;
c_7312440.elements[0] = ((closureN)self_735835)->elements[0];
c_7312440.elements[1] = ((closureN)self_735835)->elements[1];
c_7312440.elements[2] = id_73943_731755;
c_7312440.elements[3] = ((closureN)self_735835)->elements[2];
c_7312440.elements[4] = ((closureN)self_735835)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312407,__lambda_721,  &c_7312440);; 
}

static void __lambda_724(void *data, object self_735836, int argc, object *args) /* object self_735836, object r_733254 */
 {

  
closureN_type c_7312442;
object e_7312484 [3];
c_7312442.hdr.mark = gc_color_red;
 c_7312442.hdr.grayed = 0;
c_7312442.tag = closureN_tag;
 c_7312442.fn = (function_type)__lambda_725;
c_7312442.num_args = 1;
c_7312442.num_elements = 3;
c_7312442.elements = (object *)e_7312484;
c_7312442.elements[0] = ((closureN)self_735836)->elements[1];
c_7312442.elements[1] = ((closureN)self_735836)->elements[2];
c_7312442.elements[2] = ((closureN)self_735836)->elements[3];


list_3_type local_7312487; 


return_direct_with_clo1(data,(closure)&c_7312442,__lambda_725,  Cyc_fast_list_3(&local_7312487, car(((closureN)self_735836)->elements[2]), ((closureN)self_735836)->elements[4], ((closureN)self_735836)->elements[0]));; 
}

static void __lambda_725(void *data, object self_735837, int argc, object *args) /* object self_735837, object r_733262 */
 {
 object r_733262 = args[0];
  
closureN_type c_7312444;
object e_7312480 [3];
c_7312444.hdr.mark = gc_color_red;
 c_7312444.hdr.grayed = 0;
c_7312444.tag = closureN_tag;
 c_7312444.fn = (function_type)__lambda_726;
c_7312444.num_args = 1;
c_7312444.num_elements = 3;
c_7312444.elements = (object *)e_7312480;
c_7312444.elements[0] = ((closureN)self_735837)->elements[0];
c_7312444.elements[1] = ((closureN)self_735837)->elements[1];
c_7312444.elements[2] = ((closureN)self_735837)->elements[2];


pair_type local_7312483; 
return_direct_with_clo1(data,(closure)&c_7312444,__lambda_726,  set_pair_as_expr(&local_7312483, r_733262, __glo_lambdas_scheme_cyclone_cgen));; 
}

static void __lambda_726(void *data, object self_735838, int argc, object *args) /* object self_735838, object r_733261 */
 {
 object r_733261 = args[0];
  
closureN_type c_7312446;
object e_7312476 [3];
c_7312446.hdr.mark = gc_color_red;
 c_7312446.hdr.grayed = 0;
c_7312446.tag = closureN_tag;
 c_7312446.fn = (function_type)__lambda_727;
c_7312446.num_args = 1;
c_7312446.num_elements = 3;
c_7312446.elements = (object *)e_7312476;
c_7312446.elements[0] = ((closureN)self_735838)->elements[0];
c_7312446.elements[1] = ((closureN)self_735838)->elements[1];
c_7312446.elements[2] = ((closureN)self_735838)->elements[2];


object c_7312479 = global_set_cps_id(data,(closure)&c_7312446,"__glo_lambdas_scheme_cyclone_cgen", __glo_lambdas_scheme_cyclone_cgen, r_733261);
return_closcall1(data,(closure)&c_7312446,  c_7312479);; 
}

static void __lambda_727(void *data, object self_735839, int argc, object *args) /* object self_735839, object r_733255 */
 {

  
closureN_type c_7312448;
object e_7312468 [2];
c_7312448.hdr.mark = gc_color_red;
 c_7312448.hdr.grayed = 0;
c_7312448.tag = closureN_tag;
 c_7312448.fn = (function_type)__lambda_728;
c_7312448.num_args = 0;
c_7312448.num_elements = 2;
c_7312448.elements = (object *)e_7312468;
c_7312448.elements[0] = ((closureN)self_735839)->elements[0];
c_7312448.elements[1] = ((closureN)self_735839)->elements[1];


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

return_direct_with_clo1(data,(closure)&c_7312448,__lambda_728,  &c_7312469);; 
}

static void __lambda_730(void *data, object self_735840, int argc, object *args) /* object self_735840, object r_733256 */
 {

  

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

static void __lambda_728(void *data, object self_735841, int argc, object *args) /* object self_735841, object k_733257 */
 {
 object k_733257 = args[0];
    
  make_pair(c_7312452,boolean_f,NULL);c_7312452.hdr.immutable = 1;
if( (boolean_f != equalp(((closureN)self_735841)->elements[0], &c_7312452)) ){ 
  
closureN_type c_7312454;
object e_7312460 [1];
c_7312454.hdr.mark = gc_color_red;
 c_7312454.hdr.grayed = 0;
c_7312454.tag = closureN_tag;
 c_7312454.fn = (function_type)__lambda_729;
c_7312454.num_args = 1;
c_7312454.num_elements = 1;
c_7312454.elements = (object *)e_7312460;
c_7312454.elements[0] = k_733257;


pair_type local_7312463; 


return_direct_with_clo1(data,(closure)&c_7312454,__lambda_729,  set_pair_as_expr(&local_7312463, car(((closureN)self_735841)->elements[1]), __glo_inline_91lambdas_scheme_cyclone_cgen));
} else { 
  return_direct_with_clo1(data,  k_733257, (((closure)  k_733257)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_729(void *data, object self_735842, int argc, object *args) /* object self_735842, object r_733259 */
 {
 object r_733259 = args[0];
  
object c_7312459 = global_set_cps_id(data,  ((closureN)self_735842)->elements[0],"__glo_inline_91lambdas_scheme_cyclone_cgen", __glo_inline_91lambdas_scheme_cyclone_cgen, r_733259);
return_direct_with_clo1(data,  ((closureN)self_735842)->elements[0], (((closure)  ((closureN)self_735842)->elements[0])->fn),  c_7312459);; 
}

static void __lambda_721(void *data, object self_735843, int argc, object *args) /* object self_735843, object k_733263 */
 {
 object k_733263 = args[0];
  object r_733264;
  if( (boolean_f != ((closureN)self_735843)->elements[0]) ){ 
  object local_7312413 = alloca(sizeof(complex_num_type)); 
  
  alloca_pair(c_7312417,boolean_f,NULL);c_7312417->hdr.immutable = 1;
  r_733264 = ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,local_7312413, equalp(((closureN)self_735843)->elements[1], c_7312417));
} else { 
  r_733264 = boolean_f;}
;if( (boolean_f != r_733264) ){ 
  
closureN_type c_7312420;
object e_7312426 [2];
c_7312420.hdr.mark = gc_color_red;
 c_7312420.hdr.grayed = 0;
c_7312420.tag = closureN_tag;
 c_7312420.fn = (function_type)__lambda_722;
c_7312420.num_args = 1;
c_7312420.num_elements = 2;
c_7312420.elements = (object *)e_7312426;
c_7312420.elements[0] = ((closureN)self_735843)->elements[2];
c_7312420.elements[1] = k_733263;

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7312420, ((closureN)self_735843)->elements[0]);
} else { 
  
closureN_type c_7312429;
object e_7312435 [1];
c_7312429.hdr.mark = gc_color_red;
 c_7312429.hdr.grayed = 0;
c_7312429.tag = closureN_tag;
 c_7312429.fn = (function_type)__lambda_723;
c_7312429.num_args = 1;
c_7312429.num_elements = 1;
c_7312429.elements = (object *)e_7312435;
c_7312429.elements[0] = k_733263;


complex_num_type local_7312438; 
return_direct_with_clo1(data,(closure)&c_7312429,__lambda_723,  Cyc_fast_sum(data,&local_7312438, obj_int2obj(1), __glo_num_91lambdas_scheme_cyclone_cgen));}
;; 
}

static void __lambda_723(void *data, object self_735845, int argc, object *args) /* object self_735845, object r_733266 */
 {
 object r_733266 = args[0];
  
object c_7312434 = global_set_cps_id(data,  ((closureN)self_735845)->elements[0],"__glo_num_91lambdas_scheme_cyclone_cgen", __glo_num_91lambdas_scheme_cyclone_cgen, r_733266);
return_direct_with_clo1(data,  ((closureN)self_735845)->elements[0], (((closure)  ((closureN)self_735845)->elements[0])->fn),  c_7312434);; 
}

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

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

static void __lambda_716(void *data, object _, int argc, object *args) /* closure _,object k_733242, object sym_73939_731751 */
 {
object k_733242 = args[0]; object sym_73939_731751 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:allocate-symbol");

closureN_type c_7312383;
object e_7312398 [2];
c_7312383.hdr.mark = gc_color_red;
 c_7312383.hdr.grayed = 0;
c_7312383.tag = closureN_tag;
 c_7312383.fn = (function_type)__lambda_717;
c_7312383.num_args = 1;
c_7312383.num_elements = 2;
c_7312383.elements = (object *)e_7312398;
c_7312383.elements[0] = k_733242;
c_7312383.elements[1] = sym_73939_731751;



return_direct_with_clo1(data,(closure)&c_7312383,__lambda_717,  memberp(data, sym_73939_731751, __glo__85symbols_85_scheme_cyclone_cgen));; 
}

static void __lambda_717(void *data, object self_735832, int argc, object *args) /* object self_735832, object r_733243 */
 {
 object r_733243 = args[0];
  if( (boolean_f != r_733243) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735832)->elements[0], (((closure)  ((closureN)self_735832)->elements[0])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_7312387;
object e_7312393 [1];
c_7312387.hdr.mark = gc_color_red;
 c_7312387.hdr.grayed = 0;
c_7312387.tag = closureN_tag;
 c_7312387.fn = (function_type)__lambda_718;
c_7312387.num_args = 1;
c_7312387.num_elements = 1;
c_7312387.elements = (object *)e_7312393;
c_7312387.elements[0] = ((closureN)self_735832)->elements[0];


pair_type local_7312396; 
return_direct_with_clo1(data,(closure)&c_7312387,__lambda_718,  set_pair_as_expr(&local_7312396, ((closureN)self_735832)->elements[1], __glo__85symbols_85_scheme_cyclone_cgen));}
;; 
}

static void __lambda_718(void *data, object self_735833, int argc, object *args) /* object self_735833, object r_733244 */
 {
 object r_733244 = args[0];
  
object c_7312392 = global_set_cps_id(data,  ((closureN)self_735833)->elements[0],"__glo__85symbols_85_scheme_cyclone_cgen", __glo__85symbols_85_scheme_cyclone_cgen, r_733244);
return_direct_with_clo1(data,  ((closureN)self_735833)->elements[0], (((closure)  ((closureN)self_735833)->elements[0])->fn),  c_7312392);; 
}

static void __lambda_691(void *data, object _, int argc, object *args) /* closure _,object k_733195, object exp_73905_731737, object append_91preamble_73906_731738, object cont_73907_731739, object trace_73908_731740, object cps_127_73909_731741_raw, ... */
 {
object k_733195 = args[0]; object exp_73905_731737 = args[1]; object append_91preamble_73906_731738 = args[2]; object cont_73907_731739 = args[3]; object trace_73908_731740 = args[4];
load_varargs(cps_127_73909_731741, args, 5, argc - 5);
  object precompiled_91sym_73912_731742;
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-raw-global-lambda");
  
  alloca_pair(c_7312195,boolean_f,NULL);c_7312195->hdr.immutable = 1;
if( (boolean_f != equalp(cps_127_73909_731741, c_7312195)) ){ 
  precompiled_91sym_73912_731742 = quote_precompiled_91inline_91lambda;
} else { 
  precompiled_91sym_73912_731742 = quote_precompiled_91lambda;}
;
closureN_type c_7312199;
object e_7312378 [6];
c_7312199.hdr.mark = gc_color_red;
 c_7312199.hdr.grayed = 0;
c_7312199.tag = closureN_tag;
 c_7312199.fn = (function_type)__lambda_692;
c_7312199.num_args = 1;
c_7312199.num_elements = 6;
c_7312199.elements = (object *)e_7312378;
c_7312199.elements[0] = append_91preamble_73906_731738;
c_7312199.elements[1] = cont_73907_731739;
c_7312199.elements[2] = exp_73905_731737;
c_7312199.elements[3] = k_733195;
c_7312199.elements[4] = precompiled_91sym_73912_731742;
c_7312199.elements[5] = trace_73908_731740;



return_direct_with_clo1(data,(closure)&c_7312199,__lambda_692,  Cyc_caddr(data, exp_73905_731737));; 
}

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



return_direct_with_clo1(data,(closure)&c_7312201,__lambda_693,  Cyc_cadddr(data, ((closureN)self_735807)->elements[2]));; 
}

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


pair_type local_7312365; 

pair_type local_7312369; 

pair_type local_7312373; 
return_direct_with_clo3(data,  __glo_allocate_91lambda_scheme_cyclone_cgen, (((closure)  __glo_allocate_91lambda_scheme_cyclone_cgen)->fn),  &c_7312203, boolean_f, set_pair_as_expr(&local_7312365, ((closureN)self_735808)->elements[4], set_pair_as_expr(&local_7312369, ((closureN)self_735808)->elements[5], set_pair_as_expr(&local_7312373, r_733233, NULL))));; 
}

static void __lambda_694(void *data, object self_735809, int argc, object *args) /* object self_735809, object lid_73918_731744 */
 {
 object lid_73918_731744 = args[0];
  
closureN_type c_7312205;
object e_7312361 [6];
c_7312205.hdr.mark = gc_color_red;
 c_7312205.hdr.grayed = 0;
c_7312205.tag = closureN_tag;
 c_7312205.fn = (function_type)__lambda_695;
c_7312205.num_args = 1;
c_7312205.num_elements = 6;
c_7312205.elements = (object *)e_7312361;
c_7312205.elements[0] = ((closureN)self_735809)->elements[0];
c_7312205.elements[1] = ((closureN)self_735809)->elements[1];
c_7312205.elements[2] = ((closureN)self_735809)->elements[2];
c_7312205.elements[3] = ((closureN)self_735809)->elements[3];
c_7312205.elements[4] = lid_73918_731744;
c_7312205.elements[5] = ((closureN)self_735809)->elements[4];

return_direct_with_clo1(data,(closure)&c_7312205,__lambda_695,  obj_int2obj(1));; 
}

static void __lambda_695(void *data, object self_735810, int argc, object *args) /* object self_735810, object count_73934_731749 */
 {
 object count_73934_731749 = args[0];
  
closureN_type c_7312207;
object e_7312357 [6];
c_7312207.hdr.mark = gc_color_red;
 c_7312207.hdr.grayed = 0;
c_7312207.tag = closureN_tag;
 c_7312207.fn = (function_type)__lambda_1318;
c_7312207.num_args = 1;
c_7312207.num_elements = 6;
c_7312207.elements = (object *)e_7312357;
c_7312207.elements[0] = ((closureN)self_735810)->elements[0];
c_7312207.elements[1] = ((closureN)self_735810)->elements[1];
c_7312207.elements[2] = ((closureN)self_735810)->elements[2];
c_7312207.elements[3] = ((closureN)self_735810)->elements[3];
c_7312207.elements[4] = ((closureN)self_735810)->elements[4];
c_7312207.elements[5] = ((closureN)self_735810)->elements[5];


pair_type local_7312360; 
return_direct_with_clo1(data,(closure)&c_7312207,__lambda_1318,  set_cell_as_expr(&local_7312360, count_73934_731749));; 
}

static void __lambda_1318(void *data, object self_735811, int argc, object *args) /* object self_735811, object count_73934_731749 */
 {
 object count_73934_731749 = args[0];
  
closureN_type c_7312209;
object e_7312337 [7];
c_7312209.hdr.mark = gc_color_red;
 c_7312209.hdr.grayed = 0;
c_7312209.tag = closureN_tag;
 c_7312209.fn = (function_type)__lambda_696;
c_7312209.num_args = 1;
c_7312209.num_elements = 7;
c_7312209.elements = (object *)e_7312337;
c_7312209.elements[0] = ((closureN)self_735811)->elements[0];
c_7312209.elements[1] = ((closureN)self_735811)->elements[1];
c_7312209.elements[2] = count_73934_731749;
c_7312209.elements[3] = ((closureN)self_735811)->elements[2];
c_7312209.elements[4] = ((closureN)self_735811)->elements[3];
c_7312209.elements[5] = ((closureN)self_735811)->elements[4];
c_7312209.elements[6] = ((closureN)self_735811)->elements[5];


closureN_type c_7312338;
object e_7312356 [1];
c_7312338.hdr.mark = gc_color_red;
 c_7312338.hdr.grayed = 0;
c_7312338.tag = closureN_tag;
 c_7312338.fn = (function_type)__lambda_714;
c_7312338.num_args = 1;
c_7312338.num_elements = 1;
c_7312338.elements = (object *)e_7312356;
c_7312338.elements[0] = count_73934_731749;

return_direct_with_clo1(data,(closure)&c_7312209,__lambda_696,  &c_7312338);; 
}

static void __lambda_714(void *data, object self_735812, int argc, object *args) /* object self_735812, object k_733227, object c_73935_731750 */
 {
 object k_733227 = args[0]; object c_73935_731750 = args[1];
    
if( (boolean_f != equalp(obj_char2obj(44), c_73935_731750)) ){ 
  
closureN_type c_7312342;
object e_7312348 [2];
c_7312342.hdr.mark = gc_color_red;
 c_7312342.hdr.grayed = 0;
c_7312342.tag = closureN_tag;
 c_7312342.fn = (function_type)__lambda_715;
c_7312342.num_args = 1;
c_7312342.num_elements = 2;
c_7312342.elements = (object *)e_7312348;
c_7312342.elements[0] = ((closureN)self_735812)->elements[0];
c_7312342.elements[1] = k_733227;


complex_num_type local_7312351; 


return_direct_with_clo1(data,(closure)&c_7312342,__lambda_715,  Cyc_fast_sum(data,&local_7312351, car(((closureN)self_735812)->elements[0]), obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  k_733227, (((closure)  k_733227)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_715(void *data, object self_735813, int argc, object *args) /* object self_735813, object r_733229 */
 {
 object r_733229 = args[0];
  

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

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



return_direct_with_clo1(data,(closure)&c_7312211,__lambda_697,  Cyc_caddr(data, ((closureN)self_735814)->elements[3]));; 
}

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

return_direct_with_clo3(data,  __glo_string_91for_91each_scheme_base, (((closure)  __glo_string_91for_91each_scheme_base)->fn),  &c_7312213, ((closureN)self_735815)->elements[6], r_733226);; 
}

static void __lambda_698(void *data, object self_735816, int argc, object *args) /* object self_735816, object r_733224 */
 {

  
closureN_type c_7312215;
object e_7312327 [6];
c_7312215.hdr.mark = gc_color_red;
 c_7312215.hdr.grayed = 0;
c_7312215.tag = closureN_tag;
 c_7312215.fn = (function_type)__lambda_699;
c_7312215.num_args = 1;
c_7312215.num_elements = 6;
c_7312215.elements = (object *)e_7312327;
c_7312215.elements[0] = ((closureN)self_735816)->elements[0];
c_7312215.elements[1] = ((closureN)self_735816)->elements[1];
c_7312215.elements[2] = ((closureN)self_735816)->elements[3];
c_7312215.elements[3] = ((closureN)self_735816)->elements[4];
c_7312215.elements[4] = ((closureN)self_735816)->elements[5];
c_7312215.elements[5] = ((closureN)self_735816)->elements[6];



return_direct_with_clo1(data,(closure)&c_7312215,__lambda_699,  car(((closureN)self_735816)->elements[2]));; 
}

static void __lambda_699(void *data, object self_735817, int argc, object *args) /* object self_735817, object total_91num_91args_73921_731745 */
 {
 object total_91num_91args_73921_731745 = args[0];
  
closureN_type c_7312217;
object e_7312255 [4];
c_7312217.hdr.mark = gc_color_red;
 c_7312217.hdr.grayed = 0;
c_7312217.tag = closureN_tag;
 c_7312217.fn = (function_type)__lambda_700;
c_7312217.num_args = 0;
c_7312217.num_elements = 4;
c_7312217.elements = (object *)e_7312255;
c_7312217.elements[0] = ((closureN)self_735817)->elements[0];
c_7312217.elements[1] = ((closureN)self_735817)->elements[1];
c_7312217.elements[2] = ((closureN)self_735817)->elements[2];
c_7312217.elements[3] = ((closureN)self_735817)->elements[5];


closureN_type c_7312256;
object e_7312326 [4];
c_7312256.hdr.mark = gc_color_red;
 c_7312256.hdr.grayed = 0;
c_7312256.tag = closureN_tag;
 c_7312256.fn = (function_type)__lambda_705;
c_7312256.num_args = 1;
c_7312256.num_elements = 4;
c_7312256.elements = (object *)e_7312326;
c_7312256.elements[0] = ((closureN)self_735817)->elements[2];
c_7312256.elements[1] = ((closureN)self_735817)->elements[3];
c_7312256.elements[2] = ((closureN)self_735817)->elements[4];
c_7312256.elements[3] = total_91num_91args_73921_731745;

return_direct_with_clo1(data,(closure)&c_7312217,__lambda_700,  &c_7312256);; 
}

static void __lambda_705(void *data, object self_735818, int argc, object *args) /* object self_735818, object r_733201 */
 {

  
closureN_type c_7312258;
object e_7312324 [3];
c_7312258.hdr.mark = gc_color_red;
 c_7312258.hdr.grayed = 0;
c_7312258.tag = closureN_tag;
 c_7312258.fn = (function_type)__lambda_706;
c_7312258.num_args = 1;
c_7312258.num_elements = 3;
c_7312258.elements = (object *)e_7312324;
c_7312258.elements[0] = ((closureN)self_735818)->elements[1];
c_7312258.elements[1] = ((closureN)self_735818)->elements[2];
c_7312258.elements[2] = ((closureN)self_735818)->elements[3];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_7312258, ((closureN)self_735818)->elements[0]);; 
}

static void __lambda_706(void *data, object self_735819, int argc, object *args) /* object self_735819, object r_733204 */
 {
 object r_733204 = args[0];
  
closureN_type c_7312260;
object e_7312323 [4];
c_7312260.hdr.mark = gc_color_red;
 c_7312260.hdr.grayed = 0;
c_7312260.tag = closureN_tag;
 c_7312260.fn = (function_type)__lambda_707;
c_7312260.num_args = 1;
c_7312260.num_elements = 4;
c_7312260.elements = (object *)e_7312323;
c_7312260.elements[0] = ((closureN)self_735819)->elements[0];
c_7312260.elements[1] = ((closureN)self_735819)->elements[1];
c_7312260.elements[2] = r_733204;
c_7312260.elements[3] = ((closureN)self_735819)->elements[2];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7312260, quote_c);; 
}

static void __lambda_707(void *data, object self_735820, int argc, object *args) /* object self_735820, object r_733212 */
 {
 object r_733212 = args[0];
  
closureN_type c_7312262;
object e_7312322 [4];
c_7312262.hdr.mark = gc_color_red;
 c_7312262.hdr.grayed = 0;
c_7312262.tag = closureN_tag;
 c_7312262.fn = (function_type)__lambda_708;
c_7312262.num_args = 1;
c_7312262.num_elements = 4;
c_7312262.elements = (object *)e_7312322;
c_7312262.elements[0] = ((closureN)self_735820)->elements[0];
c_7312262.elements[1] = ((closureN)self_735820)->elements[1];
c_7312262.elements[2] = ((closureN)self_735820)->elements[2];
c_7312262.elements[3] = ((closureN)self_735820)->elements[3];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7312262, r_733212);; 
}

static void __lambda_708(void *data, object self_735821, int argc, object *args) /* object self_735821, object cv_91name_73933_731748 */
 {
 object cv_91name_73933_731748 = args[0];
  
closureN_type c_7312264;
object e_7312317 [5];
c_7312264.hdr.mark = gc_color_red;
 c_7312264.hdr.grayed = 0;
c_7312264.tag = closureN_tag;
 c_7312264.fn = (function_type)__lambda_709;
c_7312264.num_args = 1;
c_7312264.num_elements = 5;
c_7312264.elements = (object *)e_7312317;
c_7312264.elements[0] = cv_91name_73933_731748;
c_7312264.elements[1] = ((closureN)self_735821)->elements[0];
c_7312264.elements[2] = ((closureN)self_735821)->elements[1];
c_7312264.elements[3] = ((closureN)self_735821)->elements[2];
c_7312264.elements[4] = ((closureN)self_735821)->elements[3];


make_utf8_string_with_len(c_7312321, "&", 1, 1);

object c_7312320 = Cyc_string_append(data,(closure)&c_7312264,2,&c_7312321, cv_91name_73933_731748);
return_closcall1(data,(closure)&c_7312264,  c_7312320);; 
}

static void __lambda_709(void *data, object self_735822, int argc, object *args) /* object self_735822, object r_733207 */
 {
 object r_733207 = args[0];
  
closureN_type c_7312266;
object e_7312312 [5];
c_7312266.hdr.mark = gc_color_red;
 c_7312266.hdr.grayed = 0;
c_7312266.tag = closureN_tag;
 c_7312266.fn = (function_type)__lambda_710;
c_7312266.num_args = 1;
c_7312266.num_elements = 5;
c_7312266.elements = (object *)e_7312312;
c_7312266.elements[0] = ((closureN)self_735822)->elements[0];
c_7312266.elements[1] = ((closureN)self_735822)->elements[1];
c_7312266.elements[2] = ((closureN)self_735822)->elements[3];
c_7312266.elements[3] = r_733207;
c_7312266.elements[4] = ((closureN)self_735822)->elements[4];


object c_7312315 = Cyc_number2string2(data,(closure)&c_7312266,1,((closureN)self_735822)->elements[2]);
return_closcall1(data,(closure)&c_7312266,  c_7312315);; 
}

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


complex_num_type local_7312310; 

object c_7312307 = Cyc_number2string2(data,(closure)&c_7312268,1,Cyc_fast_sub(data,&local_7312310, ((closureN)self_735823)->elements[4], obj_int2obj(4)));
return_closcall1(data,(closure)&c_7312268,  c_7312307);; 
}

static void __lambda_711(void *data, object self_735824, int argc, object *args) /* object self_735824, object r_733211 */
 {
 object r_733211 = args[0];
  
closureN_type c_7312270;
object e_7312292 [3];
c_7312270.hdr.mark = gc_color_red;
 c_7312270.hdr.grayed = 0;
c_7312270.tag = closureN_tag;
 c_7312270.fn = (function_type)__lambda_712;
c_7312270.num_args = 1;
c_7312270.num_elements = 3;
c_7312270.elements = (object *)e_7312292;
c_7312270.elements[0] = ((closureN)self_735824)->elements[1];
c_7312270.elements[1] = ((closureN)self_735824)->elements[2];
c_7312270.elements[2] = ((closureN)self_735824)->elements[3];


make_utf8_string_with_len(c_7312296, "mclosure0(", 10, 10);

make_utf8_string_with_len(c_7312298, ", (function_type)__lambda_", 26, 26);

make_utf8_string_with_len(c_7312300, ");", 2, 2);

make_utf8_string_with_len(c_7312302, ".num_args = ", 12, 12);

make_utf8_string_with_len(c_7312303, ";", 1, 1);

object c_7312295 = Cyc_string_append(data,(closure)&c_7312270,9,&c_7312296, ((closureN)self_735824)->elements[0], &c_7312298, ((closureN)self_735824)->elements[4], &c_7312300, ((closureN)self_735824)->elements[0], &c_7312302, r_733211, &c_7312303);
return_closcall1(data,(closure)&c_7312270,  c_7312295);; 
}

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


list_2_type local_7312287; 

pair_type local_7312291; 
return_direct_with_clo4(data,  __glo_add_91global_scheme_cyclone_cgen, (((closure)  __glo_add_91global_scheme_cyclone_cgen)->fn),  &c_7312272, ((closureN)self_735825)->elements[1], boolean_t, Cyc_fast_list_2(&local_7312287, ((closureN)self_735825)->elements[2], set_cell_as_expr(&local_7312291, r_733209)));; 
}

static void __lambda_713(void *data, object self_735826, int argc, object *args) /* object self_735826, object r_733202_735024 */
 {

  
list_2_type local_7312277; 

make_utf8_string_with_len(c_7312278, "", 0, 0);

pair_type local_7312281; 

make_utf8_string_with_len(c_7312282, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735826)->elements[0], (((closure)  ((closureN)self_735826)->elements[0])->fn),  Cyc_fast_list_2(&local_7312277, &c_7312278, set_cell_as_expr(&local_7312281, &c_7312282)));; 
}

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



return_direct_with_clo1(data,(closure)&c_7312219,__lambda_701,  Cyc_length(data, ((closureN)self_735827)->elements[2]));; 
}

static void __lambda_701(void *data, object self_735828, int argc, object *args) /* object self_735828, object r_733223 */
 {
 object r_733223 = args[0];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, r_733223, obj_int2obj(4))) ){ 
  
closureN_type c_7312223;
object e_7312247 [5];
c_7312223.hdr.mark = gc_color_red;
 c_7312223.hdr.grayed = 0;
c_7312223.tag = closureN_tag;
 c_7312223.fn = (function_type)__lambda_702;
c_7312223.num_args = 1;
c_7312223.num_elements = 5;
c_7312223.elements = (object *)e_7312247;
c_7312223.elements[0] = ((closureN)self_735828)->elements[0];
c_7312223.elements[1] = ((closureN)self_735828)->elements[1];
c_7312223.elements[2] = ((closureN)self_735828)->elements[2];
c_7312223.elements[3] = ((closureN)self_735828)->elements[3];
c_7312223.elements[4] = ((closureN)self_735828)->elements[4];

return_direct_with_clo2(data,  __glo_define_91c_91_125inline_91var_scheme_cyclone_util, (((closure)  __glo_define_91c_91_125inline_91var_scheme_cyclone_util)->fn),  &c_7312223, ((closureN)self_735828)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735828)->elements[3], (((closure)  ((closureN)self_735828)->elements[3])->fn),  boolean_f);}
;; 
}

static void __lambda_702(void *data, object self_735829, int argc, object *args) /* object self_735829, object fnc_91sym_73929_731747 */
 {
 object fnc_91sym_73929_731747 = args[0];
  
closureN_type c_7312225;
object e_7312245 [6];
c_7312225.hdr.mark = gc_color_red;
 c_7312225.hdr.grayed = 0;
c_7312225.tag = closureN_tag;
 c_7312225.fn = (function_type)__lambda_703;
c_7312225.num_args = 1;
c_7312225.num_elements = 6;
c_7312225.elements = (object *)e_7312245;
c_7312225.elements[0] = ((closureN)self_735829)->elements[0];
c_7312225.elements[1] = ((closureN)self_735829)->elements[1];
c_7312225.elements[2] = ((closureN)self_735829)->elements[2];
c_7312225.elements[3] = fnc_91sym_73929_731747;
c_7312225.elements[4] = ((closureN)self_735829)->elements[3];
c_7312225.elements[5] = ((closureN)self_735829)->elements[4];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_7312225, ((closureN)self_735829)->elements[2]);; 
}

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

return_direct_with_clo3(data,  __glo_add_91global_91inline_scheme_cyclone_cgen, (((closure)  __glo_add_91global_91inline_scheme_cyclone_cgen)->fn),  &c_7312227, r_733222, ((closureN)self_735830)->elements[3]);; 
}

static void __lambda_704(void *data, object self_735831, int argc, object *args) /* object self_735831, object r_733217 */
 {

  
pair_type local_7312232; 

pair_type local_7312235; 


return_direct_with_clo6(data,  __glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen)->fn),  ((closureN)self_735831)->elements[4], set_pair_as_expr(&local_7312232, quote_define_91c, set_pair_as_expr(&local_7312235, ((closureN)self_735831)->elements[3], Cyc_cddddr(data, ((closureN)self_735831)->elements[2]))), ((closureN)self_735831)->elements[0], ((closureN)self_735831)->elements[1], ((closureN)self_735831)->elements[5], boolean_f);; 
}

static void __lambda_669(void *data, object _, int argc, object *args) /* closure _,object k_733166, object exp_73898_731731, object append_91preamble_73899_731732, object cont_73900_731733, object trace_73901_731734 */
 {
object k_733166 = args[0]; object exp_73898_731731 = args[1]; object append_91preamble_73899_731732 = args[2]; object cont_73900_731733 = args[3]; object trace_73901_731734 = args[4];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-global");

closureN_type c_7312070;
object e_7312190 [5];
c_7312070.hdr.mark = gc_color_red;
 c_7312070.hdr.grayed = 0;
c_7312070.tag = closureN_tag;
 c_7312070.fn = (function_type)__lambda_670;
c_7312070.num_args = 1;
c_7312070.num_elements = 5;
c_7312070.elements = (object *)e_7312190;
c_7312070.elements[0] = append_91preamble_73899_731732;
c_7312070.elements[1] = cont_73900_731733;
c_7312070.elements[2] = exp_73898_731731;
c_7312070.elements[3] = k_733166;
c_7312070.elements[4] = trace_73901_731734;

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_7312070, exp_73898_731731);; 
}

static void __lambda_670(void *data, object self_735786, int argc, object *args) /* object self_735786, object r_733167 */
 {
 object r_733167 = args[0];
  object r_733168;
    
  
if( (boolean_f != equalp(obj_int2obj(4), Cyc_length(data, ((closureN)self_735786)->elements[2]))) ){ 
  
  r_733168 = Cyc_cadddr(data, ((closureN)self_735786)->elements[2]);
} else { 
  
  object local_7312086 = alloca(sizeof(complex_num_type)); 
  r_733168 = Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,local_7312086, ((closureN)self_735786)->elements[2]));}
;
closureN_type c_7312089;
object e_7312189 [5];
c_7312089.hdr.mark = gc_color_red;
 c_7312089.hdr.grayed = 0;
c_7312089.tag = closureN_tag;
 c_7312089.fn = (function_type)__lambda_671;
c_7312089.num_args = 2;
c_7312089.num_elements = 5;
c_7312089.elements = (object *)e_7312189;
c_7312089.elements[0] = ((closureN)self_735786)->elements[0];
c_7312089.elements[1] = ((closureN)self_735786)->elements[1];
c_7312089.elements[2] = ((closureN)self_735786)->elements[2];
c_7312089.elements[3] = ((closureN)self_735786)->elements[3];
c_7312089.elements[4] = ((closureN)self_735786)->elements[4];

return_direct_with_clo2(data,(closure)&c_7312089,__lambda_671,  r_733167, r_733168);; 
}

static void __lambda_671(void *data, object self_735787, int argc, object *args) /* object self_735787, object var_73902_731735, object body_73903_731736 */
 {
 object var_73902_731735 = args[0]; object body_73903_731736 = args[1];
  
closureN_type c_7312091;
object e_7312188 [7];
c_7312091.hdr.mark = gc_color_red;
 c_7312091.hdr.grayed = 0;
c_7312091.tag = closureN_tag;
 c_7312091.fn = (function_type)__lambda_672;
c_7312091.num_args = 1;
c_7312091.num_elements = 7;
c_7312091.elements = (object *)e_7312188;
c_7312091.elements[0] = ((closureN)self_735787)->elements[0];
c_7312091.elements[1] = body_73903_731736;
c_7312091.elements[2] = ((closureN)self_735787)->elements[1];
c_7312091.elements[3] = ((closureN)self_735787)->elements[2];
c_7312091.elements[4] = ((closureN)self_735787)->elements[3];
c_7312091.elements[5] = ((closureN)self_735787)->elements[4];
c_7312091.elements[6] = var_73902_731735;

return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_7312091, body_73903_731736);; 
}

static void __lambda_672(void *data, object self_735788, int argc, object *args) /* object self_735788, object r_733183 */
 {
 object r_733183 = args[0];
  
closureN_type c_7312093;
object e_7312103 [1];
c_7312093.hdr.mark = gc_color_red;
 c_7312093.hdr.grayed = 0;
c_7312093.tag = closureN_tag;
 c_7312093.fn = (function_type)__lambda_673;
c_7312093.num_args = 0;
c_7312093.num_elements = 1;
c_7312093.elements = (object *)e_7312103;
c_7312093.elements[0] = ((closureN)self_735788)->elements[1];


closureN_type c_7312104;
object e_7312187 [8];
c_7312104.hdr.mark = gc_color_red;
 c_7312104.hdr.grayed = 0;
c_7312104.tag = closureN_tag;
 c_7312104.fn = (function_type)__lambda_675;
c_7312104.num_args = 1;
c_7312104.num_elements = 8;
c_7312104.elements = (object *)e_7312187;
c_7312104.elements[0] = ((closureN)self_735788)->elements[0];
c_7312104.elements[1] = ((closureN)self_735788)->elements[1];
c_7312104.elements[2] = ((closureN)self_735788)->elements[2];
c_7312104.elements[3] = ((closureN)self_735788)->elements[3];
c_7312104.elements[4] = ((closureN)self_735788)->elements[4];
c_7312104.elements[5] = r_733183;
c_7312104.elements[6] = ((closureN)self_735788)->elements[5];
c_7312104.elements[7] = ((closureN)self_735788)->elements[6];

return_direct_with_clo1(data,(closure)&c_7312093,__lambda_673,  &c_7312104);; 
}

static void __lambda_675(void *data, object self_735789, int argc, object *args) /* object self_735789, object r_733185 */
 {
 object r_733185 = args[0];
  
closureN_type c_7312106;
object e_7312184 [9];
c_7312106.hdr.mark = gc_color_red;
 c_7312106.hdr.grayed = 0;
c_7312106.tag = closureN_tag;
 c_7312106.fn = (function_type)__lambda_676;
c_7312106.num_args = 1;
c_7312106.num_elements = 9;
c_7312106.elements = (object *)e_7312184;
c_7312106.elements[0] = ((closureN)self_735789)->elements[0];
c_7312106.elements[1] = ((closureN)self_735789)->elements[1];
c_7312106.elements[2] = ((closureN)self_735789)->elements[2];
c_7312106.elements[3] = ((closureN)self_735789)->elements[3];
c_7312106.elements[4] = ((closureN)self_735789)->elements[4];
c_7312106.elements[5] = ((closureN)self_735789)->elements[5];
c_7312106.elements[6] = r_733185;
c_7312106.elements[7] = ((closureN)self_735789)->elements[6];
c_7312106.elements[8] = ((closureN)self_735789)->elements[7];

return_direct_with_clo3(data,  __glo_st_117add_91function_67_scheme_cyclone_cgen, (((closure)  __glo_st_117add_91function_67_scheme_cyclone_cgen)->fn),  &c_7312106, ((closureN)self_735789)->elements[6], ((closureN)self_735789)->elements[7]);; 
}

static void __lambda_676(void *data, object self_735790, int argc, object *args) /* object self_735790, object r_733186 */
 {
 object r_733186 = args[0];
  
closureN_type c_7312108;
object e_7312179 [8];
c_7312108.hdr.mark = gc_color_red;
 c_7312108.hdr.grayed = 0;
c_7312108.tag = closureN_tag;
 c_7312108.fn = (function_type)__lambda_677;
c_7312108.num_args = 1;
c_7312108.num_elements = 8;
c_7312108.elements = (object *)e_7312179;
c_7312108.elements[0] = ((closureN)self_735790)->elements[0];
c_7312108.elements[1] = ((closureN)self_735790)->elements[1];
c_7312108.elements[2] = ((closureN)self_735790)->elements[2];
c_7312108.elements[3] = ((closureN)self_735790)->elements[3];
c_7312108.elements[4] = ((closureN)self_735790)->elements[4];
c_7312108.elements[5] = ((closureN)self_735790)->elements[5];
c_7312108.elements[6] = ((closureN)self_735790)->elements[7];
c_7312108.elements[7] = ((closureN)self_735790)->elements[8];

return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  &c_7312108, ((closureN)self_735790)->elements[1], ((closureN)self_735790)->elements[0], ((closureN)self_735790)->elements[2], ((closureN)self_735790)->elements[6], r_733186, boolean_t);; 
}

static void __lambda_677(void *data, object self_735791, int argc, object *args) /* object self_735791, object r_733184 */
 {
 object r_733184 = args[0];
  
closureN_type c_7312110;
object e_7312176 [7];
c_7312110.hdr.mark = gc_color_red;
 c_7312110.hdr.grayed = 0;
c_7312110.tag = closureN_tag;
 c_7312110.fn = (function_type)__lambda_678;
c_7312110.num_args = 1;
c_7312110.num_elements = 7;
c_7312110.elements = (object *)e_7312176;
c_7312110.elements[0] = ((closureN)self_735791)->elements[0];
c_7312110.elements[1] = ((closureN)self_735791)->elements[1];
c_7312110.elements[2] = ((closureN)self_735791)->elements[2];
c_7312110.elements[3] = ((closureN)self_735791)->elements[3];
c_7312110.elements[4] = ((closureN)self_735791)->elements[4];
c_7312110.elements[5] = ((closureN)self_735791)->elements[6];
c_7312110.elements[6] = ((closureN)self_735791)->elements[7];

return_direct_with_clo4(data,  __glo_add_91global_scheme_cyclone_cgen, (((closure)  __glo_add_91global_scheme_cyclone_cgen)->fn),  &c_7312110, ((closureN)self_735791)->elements[7], ((closureN)self_735791)->elements[5], r_733184);; 
}

static void __lambda_678(void *data, object self_735792, int argc, object *args) /* object self_735792, object r_733169 */
 {

  
closureN_type c_7312112;
object e_7312163 [6];
c_7312112.hdr.mark = gc_color_red;
 c_7312112.hdr.grayed = 0;
c_7312112.tag = closureN_tag;
 c_7312112.fn = (function_type)__lambda_679;
c_7312112.num_args = 0;
c_7312112.num_elements = 6;
c_7312112.elements = (object *)e_7312163;
c_7312112.elements[0] = ((closureN)self_735792)->elements[0];
c_7312112.elements[1] = ((closureN)self_735792)->elements[1];
c_7312112.elements[2] = ((closureN)self_735792)->elements[2];
c_7312112.elements[3] = ((closureN)self_735792)->elements[3];
c_7312112.elements[4] = ((closureN)self_735792)->elements[5];
c_7312112.elements[5] = ((closureN)self_735792)->elements[6];


closureN_type c_7312164;
object e_7312175 [1];
c_7312164.hdr.mark = gc_color_red;
 c_7312164.hdr.grayed = 0;
c_7312164.tag = closureN_tag;
 c_7312164.fn = (function_type)__lambda_690;
c_7312164.num_args = 1;
c_7312164.num_elements = 1;
c_7312164.elements = (object *)e_7312175;
c_7312164.elements[0] = ((closureN)self_735792)->elements[4];

return_direct_with_clo1(data,(closure)&c_7312112,__lambda_679,  &c_7312164);; 
}

static void __lambda_690(void *data, object self_735793, int argc, object *args) /* object self_735793, object r_733170 */
 {

  
list_2_type local_7312169; 

make_utf8_string_with_len(c_7312170, "", 0, 0);

pair_type local_7312173; 

make_utf8_string_with_len(c_7312174, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735793)->elements[0], (((closure)  ((closureN)self_735793)->elements[0])->fn),  Cyc_fast_list_2(&local_7312169, &c_7312170, set_cell_as_expr(&local_7312173, &c_7312174)));; 
}

static void __lambda_679(void *data, object self_735794, int argc, object *args) /* object self_735794, object k_733172 */
 {
 object k_733172 = args[0];
  
closureN_type c_7312114;
object e_7312127 [2];
c_7312114.hdr.mark = gc_color_red;
 c_7312114.hdr.grayed = 0;
c_7312114.tag = closureN_tag;
 c_7312114.fn = (function_type)__lambda_680;
c_7312114.num_args = 0;
c_7312114.num_elements = 2;
c_7312114.elements = (object *)e_7312127;
c_7312114.elements[0] = ((closureN)self_735794)->elements[1];
c_7312114.elements[1] = ((closureN)self_735794)->elements[3];


closureN_type c_7312128;
object e_7312162 [7];
c_7312128.hdr.mark = gc_color_red;
 c_7312128.hdr.grayed = 0;
c_7312128.tag = closureN_tag;
 c_7312128.fn = (function_type)__lambda_683;
c_7312128.num_args = 1;
c_7312128.num_elements = 7;
c_7312128.elements = (object *)e_7312162;
c_7312128.elements[0] = ((closureN)self_735794)->elements[0];
c_7312128.elements[1] = ((closureN)self_735794)->elements[1];
c_7312128.elements[2] = ((closureN)self_735794)->elements[2];
c_7312128.elements[3] = ((closureN)self_735794)->elements[3];
c_7312128.elements[4] = k_733172;
c_7312128.elements[5] = ((closureN)self_735794)->elements[4];
c_7312128.elements[6] = ((closureN)self_735794)->elements[5];

return_direct_with_clo1(data,(closure)&c_7312114,__lambda_680,  &c_7312128);; 
}

static void __lambda_683(void *data, object self_735795, int argc, object *args) /* object self_735795, object r_733173 */
 {
 object r_733173 = args[0];
  if( (boolean_f != r_733173) ){ 
  
closureN_type c_7312130;
object e_7312158 [7];
c_7312130.hdr.mark = gc_color_red;
 c_7312130.hdr.grayed = 0;
c_7312130.tag = closureN_tag;
 c_7312130.fn = (function_type)__lambda_684;
c_7312130.num_args = 1;
c_7312130.num_elements = 7;
c_7312130.elements = (object *)e_7312158;
c_7312130.elements[0] = ((closureN)self_735795)->elements[0];
c_7312130.elements[1] = ((closureN)self_735795)->elements[1];
c_7312130.elements[2] = ((closureN)self_735795)->elements[2];
c_7312130.elements[3] = ((closureN)self_735795)->elements[3];
c_7312130.elements[4] = ((closureN)self_735795)->elements[4];
c_7312130.elements[5] = ((closureN)self_735795)->elements[5];
c_7312130.elements[6] = ((closureN)self_735795)->elements[6];

return_direct_with_clo2(data,  __glo_define_91c_91_125inline_91var_scheme_cyclone_util, (((closure)  __glo_define_91c_91_125inline_91var_scheme_cyclone_util)->fn),  &c_7312130, ((closureN)self_735795)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735795)->elements[4], (((closure)  ((closureN)self_735795)->elements[4])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_684(void *data, object self_735796, int argc, object *args) /* object self_735796, object r_733179 */
 {
 object r_733179 = args[0];
  
closureN_type c_7312132;
object e_7312156 [7];
c_7312132.hdr.mark = gc_color_red;
 c_7312132.hdr.grayed = 0;
c_7312132.tag = closureN_tag;
 c_7312132.fn = (function_type)__lambda_685;
c_7312132.num_args = 1;
c_7312132.num_elements = 7;
c_7312132.elements = (object *)e_7312156;
c_7312132.elements[0] = ((closureN)self_735796)->elements[0];
c_7312132.elements[1] = ((closureN)self_735796)->elements[1];
c_7312132.elements[2] = ((closureN)self_735796)->elements[2];
c_7312132.elements[3] = ((closureN)self_735796)->elements[3];
c_7312132.elements[4] = ((closureN)self_735796)->elements[4];
c_7312132.elements[5] = ((closureN)self_735796)->elements[5];
c_7312132.elements[6] = ((closureN)self_735796)->elements[6];

return_direct_with_clo3(data,  __glo_add_91global_91inline_scheme_cyclone_cgen, (((closure)  __glo_add_91global_91inline_scheme_cyclone_cgen)->fn),  &c_7312132, ((closureN)self_735796)->elements[6], r_733179);; 
}

static void __lambda_685(void *data, object self_735797, int argc, object *args) /* object self_735797, object r_733174 */
 {

  
closureN_type c_7312134;
object e_7312154 [6];
c_7312134.hdr.mark = gc_color_red;
 c_7312134.hdr.grayed = 0;
c_7312134.tag = closureN_tag;
 c_7312134.fn = (function_type)__lambda_686;
c_7312134.num_args = 1;
c_7312134.num_elements = 6;
c_7312134.elements = (object *)e_7312154;
c_7312134.elements[0] = ((closureN)self_735797)->elements[0];
c_7312134.elements[1] = ((closureN)self_735797)->elements[1];
c_7312134.elements[2] = ((closureN)self_735797)->elements[2];
c_7312134.elements[3] = ((closureN)self_735797)->elements[4];
c_7312134.elements[4] = ((closureN)self_735797)->elements[5];
c_7312134.elements[5] = ((closureN)self_735797)->elements[6];

return_direct_with_clo2(data,  __glo_define_91c_91_125inline_91var_scheme_cyclone_util, (((closure)  __glo_define_91c_91_125inline_91var_scheme_cyclone_util)->fn),  &c_7312134, ((closureN)self_735797)->elements[3]);; 
}

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

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7312136, ((closureN)self_735798)->elements[1]);; 
}

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

return_direct_with_clo3(data,  __glo_st_117add_91function_67_scheme_cyclone_cgen, (((closure)  __glo_st_117add_91function_67_scheme_cyclone_cgen)->fn),  &c_7312138, ((closureN)self_735799)->elements[5], ((closureN)self_735799)->elements[6]);; 
}

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

return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  &c_7312140, ((closureN)self_735800)->elements[1], ((closureN)self_735800)->elements[0], ((closureN)self_735800)->elements[2], ((closureN)self_735800)->elements[5], r_733178, boolean_f);; 
}

static void __lambda_689(void *data, object self_735801, int argc, object *args) /* object self_735801, object r_733176 */
 {
 object r_733176 = args[0];
  return_direct_with_clo4(data,  __glo_add_91global_scheme_cyclone_cgen, (((closure)  __glo_add_91global_scheme_cyclone_cgen)->fn),  ((closureN)self_735801)->elements[0], ((closureN)self_735801)->elements[1], boolean_t, r_733176);; 
}

static void __lambda_680(void *data, object self_735802, int argc, object *args) /* object self_735802, object k_733180 */
 {
 object k_733180 = args[0];
  
closureN_type c_7312116;
object e_7312125 [2];
c_7312116.hdr.mark = gc_color_red;
 c_7312116.hdr.grayed = 0;
c_7312116.tag = closureN_tag;
 c_7312116.fn = (function_type)__lambda_681;
c_7312116.num_args = 1;
c_7312116.num_elements = 2;
c_7312116.elements = (object *)e_7312125;
c_7312116.elements[0] = ((closureN)self_735802)->elements[1];
c_7312116.elements[1] = k_733180;

return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_7312116, ((closureN)self_735802)->elements[0]);; 
}

static void __lambda_681(void *data, object self_735803, int argc, object *args) /* object self_735803, object r_733181 */
 {
 object r_733181 = args[0];
  if( (boolean_f != r_733181) ){ 
  
closureN_type c_7312118;
object e_7312121 [1];
c_7312118.hdr.mark = gc_color_red;
 c_7312118.hdr.grayed = 0;
c_7312118.tag = closureN_tag;
 c_7312118.fn = (function_type)__lambda_682;
c_7312118.num_args = 1;
c_7312118.num_elements = 1;
c_7312118.elements = (object *)e_7312121;
c_7312118.elements[0] = ((closureN)self_735803)->elements[1];

return_direct_with_clo2(data,  __glo_define_91c_91_125inline_91var_scheme_cyclone_util, (((closure)  __glo_define_91c_91_125inline_91var_scheme_cyclone_util)->fn),  &c_7312118, ((closureN)self_735803)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735803)->elements[1], (((closure)  ((closureN)self_735803)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_682(void *data, object self_735804, int argc, object *args) /* object self_735804, object r_733182 */
 {
 object r_733182 = args[0];
  return_direct_with_clo2(data,  __glo_prim_117udf_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117udf_127_scheme_cyclone_primitives)->fn),  ((closureN)self_735804)->elements[0], r_733182);; 
}

static void __lambda_673(void *data, object self_735805, int argc, object *args) /* object self_735805, object k_733187 */
 {
 object k_733187 = args[0];
  
closureN_type c_7312095;
object e_7312101 [2];
c_7312095.hdr.mark = gc_color_red;
 c_7312095.hdr.grayed = 0;
c_7312095.tag = closureN_tag;
 c_7312095.fn = (function_type)__lambda_674;
c_7312095.num_args = 1;
c_7312095.num_elements = 2;
c_7312095.elements = (object *)e_7312101;
c_7312095.elements[0] = ((closureN)self_735805)->elements[0];
c_7312095.elements[1] = k_733187;

return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_7312095, ((closureN)self_735805)->elements[0]);; 
}

static void __lambda_674(void *data, object self_735806, int argc, object *args) /* object self_735806, object r_733188 */
 {
 object r_733188 = args[0];
  if( (boolean_f != r_733188) ){ 
  return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  ((closureN)self_735806)->elements[1], ((closureN)self_735806)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735806)->elements[1], (((closure)  ((closureN)self_735806)->elements[1])->fn),  obj_int2obj(-1));}
;; 
}

static void __lambda_667(void *data, object _, int argc, object *args) /* closure _,object k_733161, object var_91sym_73895_731728, object lambda_127_73896_731729, object code_73897_731730 */
 {
object k_733161 = args[0]; object var_91sym_73895_731728 = args[1]; object lambda_127_73896_731729 = args[2]; object code_73897_731730 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:add-global");

closureN_type c_7312055;
object e_7312061 [1];
c_7312055.hdr.mark = gc_color_red;
 c_7312055.hdr.grayed = 0;
c_7312055.tag = closureN_tag;
 c_7312055.fn = (function_type)__lambda_668;
c_7312055.num_args = 1;
c_7312055.num_elements = 1;
c_7312055.elements = (object *)e_7312061;
c_7312055.elements[0] = k_733161;


pair_type local_7312064; 

list_3_type local_7312067; 
return_direct_with_clo1(data,(closure)&c_7312055,__lambda_668,  set_pair_as_expr(&local_7312064, Cyc_fast_list_3(&local_7312067, var_91sym_73895_731728, lambda_127_73896_731729, code_73897_731730), __glo__85globals_85_scheme_cyclone_cgen));; 
}

static void __lambda_668(void *data, object self_735785, int argc, object *args) /* object self_735785, object r_733162 */
 {
 object r_733162 = args[0];
  
object c_7312060 = global_set_cps_id(data,  ((closureN)self_735785)->elements[0],"__glo__85globals_85_scheme_cyclone_cgen", __glo__85globals_85_scheme_cyclone_cgen, r_733162);
return_direct_with_clo1(data,  ((closureN)self_735785)->elements[0], (((closure)  ((closureN)self_735785)->elements[0])->fn),  c_7312060);; 
}

static object __lambda_1343(void *data, object ptr,object global_73894_731727) {

  Cyc_st_add(data, "scheme/cyclone/cgen.sld:global-not-lambda?");

complex_num_type local_7312050; 


return_copy(ptr,  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7312050, Cyc_cadr(data, global_73894_731727)));; 
}

static void __lambda_666(void *data, object _, int argc, object *args) /* closure _,object k_733157, object global_73894_731727 */
 {
object k_733157 = args[0]; object global_73894_731727 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:global-not-lambda?");

complex_num_type local_7312043; 


return_direct_with_clo1(data,  k_733157, (((closure)  k_733157)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7312043, Cyc_cadr(data, global_73894_731727)));; 
}

static object __lambda_1342(void *data, object ptr,object global_73893_731726) {

  Cyc_st_add(data, "scheme/cyclone/cgen.sld:global-lambda?");


return_copy(ptr,  Cyc_cadr(data, global_73893_731726));; 
}

static void __lambda_665(void *data, object _, int argc, object *args) /* closure _,object k_733154, object global_73893_731726 */
 {
object k_733154 = args[0]; object global_73893_731726 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:global-lambda?");


return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  Cyc_cadr(data, global_73893_731726));; 
}

static void __lambda_663(void *data, object _, int argc, object *args) /* closure _,object k_733145, object orig_91sym_73891_731724, object inline_91sym_73892_731725 */
 {
object k_733145 = args[0]; object orig_91sym_73891_731724 = args[1]; object inline_91sym_73892_731725 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:add-global-inline");

closureN_type c_7312018;
object e_7312024 [1];
c_7312018.hdr.mark = gc_color_red;
 c_7312018.hdr.grayed = 0;
c_7312018.tag = closureN_tag;
 c_7312018.fn = (function_type)__lambda_664;
c_7312018.num_args = 1;
c_7312018.num_elements = 1;
c_7312018.elements = (object *)e_7312024;
c_7312018.elements[0] = k_733145;


pair_type local_7312027; 

pair_type local_7312030; 
return_direct_with_clo1(data,(closure)&c_7312018,__lambda_664,  set_pair_as_expr(&local_7312027, set_pair_as_expr(&local_7312030, orig_91sym_73891_731724, inline_91sym_73892_731725), __glo__85global_91inlines_85_scheme_cyclone_cgen));; 
}

static void __lambda_664(void *data, object self_735784, int argc, object *args) /* object self_735784, object r_733146 */
 {
 object r_733146 = args[0];
  
object c_7312023 = global_set_cps_id(data,  ((closureN)self_735784)->elements[0],"__glo__85global_91inlines_85_scheme_cyclone_cgen", __glo__85global_91inlines_85_scheme_cyclone_cgen, r_733146);
return_direct_with_clo1(data,  ((closureN)self_735784)->elements[0], (((closure)  ((closureN)self_735784)->elements[0])->fn),  c_7312023);; 
}

static void __lambda_653(void *data, object _, int argc, object *args) /* closure _,object k_733126, object exp_73871_731713, object append_91preamble_73872_731714, object cont_73873_731715, object ast_91id_73874_731716, object trace_73875_731717, object cps_127_73876_731718 */
 {
object k_733126 = args[0]; object exp_73871_731713 = args[1]; object append_91preamble_73872_731714 = args[2]; object cont_73873_731715 = args[3]; object ast_91id_73874_731716 = args[4]; object trace_73875_731717 = args[5]; object cps_127_73876_731718 = args[6];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-if");

closureN_type c_7311949;
object e_7312007 [2];
c_7311949.hdr.mark = gc_color_red;
 c_7311949.hdr.grayed = 0;
c_7311949.tag = closureN_tag;
 c_7311949.fn = (function_type)__lambda_654;
c_7311949.num_args = 1;
c_7311949.num_elements = 2;
c_7311949.elements = (object *)e_7312007;
c_7311949.elements[0] = exp_73871_731713;
c_7311949.elements[1] = k_733126;


closureN_type c_7312008;
object e_7312015 [5];
c_7312008.hdr.mark = gc_color_red;
 c_7312008.hdr.grayed = 0;
c_7312008.tag = closureN_tag;
 c_7312008.fn = (function_type)__lambda_662;
c_7312008.num_args = 1;
c_7312008.num_elements = 5;
c_7312008.elements = (object *)e_7312015;
c_7312008.elements[0] = append_91preamble_73872_731714;
c_7312008.elements[1] = ast_91id_73874_731716;
c_7312008.elements[2] = cont_73873_731715;
c_7312008.elements[3] = cps_127_73876_731718;
c_7312008.elements[4] = trace_73875_731717;

return_direct_with_clo1(data,(closure)&c_7311949,__lambda_654,  &c_7312008);; 
}

static void __lambda_662(void *data, object self_735775, int argc, object *args) /* object self_735775, object k_733140, object exp_73890_731723 */
 {
 object k_733140 = args[0]; object exp_73890_731723 = args[1];
  return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  k_733140, exp_73890_731723, ((closureN)self_735775)->elements[0], ((closureN)self_735775)->elements[2], ((closureN)self_735775)->elements[1], ((closureN)self_735775)->elements[4], ((closureN)self_735775)->elements[3]);; 
}

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


complex_num_type local_7312005; 
return_closcall2(data,  compile_73879_731719,  &c_7311951, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7312005, ((closureN)self_735776)->elements[0]));; 
}

static void __lambda_655(void *data, object self_735777, int argc, object *args) /* object self_735777, object test_73882_731720 */
 {
 object test_73882_731720 = args[0];
  
closureN_type c_7311954;
object e_7311997 [4];
c_7311954.hdr.mark = gc_color_red;
 c_7311954.hdr.grayed = 0;
c_7311954.tag = closureN_tag;
 c_7311954.fn = (function_type)__lambda_656;
c_7311954.num_args = 1;
c_7311954.num_elements = 4;
c_7311954.elements = (object *)e_7311997;
c_7311954.elements[0] = ((closureN)self_735777)->elements[0];
c_7311954.elements[1] = ((closureN)self_735777)->elements[1];
c_7311954.elements[2] = ((closureN)self_735777)->elements[2];
c_7311954.elements[3] = test_73882_731720;


complex_num_type local_7312000; 
return_closcall2(data,  ((closureN)self_735777)->elements[0],  &c_7311954, ((inline_function_type)
                   ((closure)__glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7312000, ((closureN)self_735777)->elements[1]));; 
}

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


complex_num_type local_7311995; 
return_closcall2(data,  ((closureN)self_735778)->elements[0],  &c_7311957, ((inline_function_type)
                   ((closure)__glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7311995, ((closureN)self_735778)->elements[1]));; 
}

static void __lambda_657(void *data, object self_735779, int argc, object *args) /* object self_735779, object els_73888_731722 */
 {
 object els_73888_731722 = args[0];
  
closureN_type c_7311959;
object e_7311987 [4];
c_7311959.hdr.mark = gc_color_red;
 c_7311959.hdr.grayed = 0;
c_7311959.tag = closureN_tag;
 c_7311959.fn = (function_type)__lambda_658;
c_7311959.num_args = 1;
c_7311959.num_elements = 4;
c_7311959.elements = (object *)e_7311987;
c_7311959.elements[0] = els_73888_731722;
c_7311959.elements[1] = ((closureN)self_735779)->elements[0];
c_7311959.elements[2] = ((closureN)self_735779)->elements[1];
c_7311959.elements[3] = ((closureN)self_735779)->elements[2];




make_utf8_string_with_len(c_7311991, "  ", 2, 2);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311959, Cyc_cadr(data, ((closureN)self_735779)->elements[1]), &c_7311991);; 
}

static void __lambda_658(void *data, object self_735780, int argc, object *args) /* object self_735780, object r_733132_735014 */
 {
 object r_733132_735014 = args[0];
  
closureN_type c_7311961;
object e_7311984 [4];
c_7311961.hdr.mark = gc_color_red;
 c_7311961.hdr.grayed = 0;
c_7311961.tag = closureN_tag;
 c_7311961.fn = (function_type)__lambda_659;
c_7311961.num_args = 1;
c_7311961.num_elements = 4;
c_7311961.elements = (object *)e_7311984;
c_7311961.elements[0] = ((closureN)self_735780)->elements[0];
c_7311961.elements[1] = ((closureN)self_735780)->elements[1];
c_7311961.elements[2] = r_733132_735014;
c_7311961.elements[3] = ((closureN)self_735780)->elements[2];


make_utf8_string_with_len(c_7311986, "  ", 2, 2);
return_direct_with_clo3(data,  __glo_c_117serialize_scheme_cyclone_cgen, (((closure)  __glo_c_117serialize_scheme_cyclone_cgen)->fn),  &c_7311961, ((closureN)self_735780)->elements[3], &c_7311986);; 
}

static void __lambda_659(void *data, object self_735781, int argc, object *args) /* object self_735781, object r_733134_735016_735020 */
 {
 object r_733134_735016_735020 = args[0];
  
closureN_type c_7311963;
object e_7311981 [4];
c_7311963.hdr.mark = gc_color_red;
 c_7311963.hdr.grayed = 0;
c_7311963.tag = closureN_tag;
 c_7311963.fn = (function_type)__lambda_660;
c_7311963.num_args = 1;
c_7311963.num_elements = 4;
c_7311963.elements = (object *)e_7311981;
c_7311963.elements[0] = ((closureN)self_735781)->elements[1];
c_7311963.elements[1] = ((closureN)self_735781)->elements[2];
c_7311963.elements[2] = r_733134_735016_735020;
c_7311963.elements[3] = ((closureN)self_735781)->elements[3];


make_utf8_string_with_len(c_7311983, "  ", 2, 2);
return_direct_with_clo3(data,  __glo_c_117serialize_scheme_cyclone_cgen, (((closure)  __glo_c_117serialize_scheme_cyclone_cgen)->fn),  &c_7311963, ((closureN)self_735781)->elements[0], &c_7311983);; 
}

static void __lambda_660(void *data, object self_735782, int argc, object *args) /* object self_735782, object r_733135_735017_735021 */
 {
 object r_733135_735017_735021 = args[0];
  
closureN_type c_7311965;
object e_7311968 [1];
c_7311965.hdr.mark = gc_color_red;
 c_7311965.hdr.grayed = 0;
c_7311965.tag = closureN_tag;
 c_7311965.fn = (function_type)__lambda_661;
c_7311965.num_args = 1;
c_7311965.num_elements = 1;
c_7311965.elements = (object *)e_7311968;
c_7311965.elements[0] = ((closureN)self_735782)->elements[0];


make_utf8_string_with_len(c_7311973, "if( (boolean_f != ", 18, 18);



make_utf8_string_with_len(c_7311977, ") ){ \n", 6, 6);

make_utf8_string_with_len(c_7311979, "\n} else { \n", 11, 11);

make_utf8_string_with_len(c_7311980, "}\n", 2, 2);

object c_7311971 = Cyc_string_append(data,(closure)&c_7311965,8,((closureN)self_735782)->elements[1], &c_7311973, Cyc_car(data, ((closureN)self_735782)->elements[3]), &c_7311977, ((closureN)self_735782)->elements[2], &c_7311979, r_733135_735017_735021, &c_7311980);
return_closcall1(data,(closure)&c_7311965,  c_7311971);; 
}

static void __lambda_661(void *data, object self_735783, int argc, object *args) /* object self_735783, object r_733131_735018_735022 */
 {
 object r_733131_735018_735022 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735783)->elements[0], r_733131_735018_735022);; 
}

static void __lambda_384(void *data, object _, int argc, object *args) /* closure _,object k_732656, object exp_73551_731620, object append_91preamble_73552_731621, object cont_73553_731622, object ast_91id_73554_731623, object trace_73555_731624, object cps_127_73556_731625 */
 {
object k_732656 = args[0]; object exp_73551_731620 = args[1]; object append_91preamble_73552_731621 = args[2]; object cont_73553_731622 = args[3]; object ast_91id_73554_731623 = args[4]; object trace_73555_731624 = args[5]; object cps_127_73556_731625 = args[6];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-app");

closureN_type c_739799;
object e_7311946 [7];
c_739799.hdr.mark = gc_color_red;
 c_739799.hdr.grayed = 0;
c_739799.tag = closureN_tag;
 c_739799.fn = (function_type)__lambda_385;
c_739799.num_args = 1;
c_739799.num_elements = 7;
c_739799.elements = (object *)e_7311946;
c_739799.elements[0] = append_91preamble_73552_731621;
c_739799.elements[1] = ast_91id_73554_731623;
c_739799.elements[2] = cont_73553_731622;
c_739799.elements[3] = cps_127_73556_731625;
c_739799.elements[4] = exp_73551_731620;
c_739799.elements[5] = k_732656;
c_739799.elements[6] = trace_73555_731624;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739799, quote_tmp);; 
}

static void __lambda_385(void *data, object self_735507, int argc, object *args) /* object self_735507, object r_733122 */
 {
 object r_733122 = args[0];
  
closureN_type c_739801;
object e_7311945 [7];
c_739801.hdr.mark = gc_color_red;
 c_739801.hdr.grayed = 0;
c_739801.tag = closureN_tag;
 c_739801.fn = (function_type)__lambda_386;
c_739801.num_args = 1;
c_739801.num_elements = 7;
c_739801.elements = (object *)e_7311945;
c_739801.elements[0] = ((closureN)self_735507)->elements[0];
c_739801.elements[1] = ((closureN)self_735507)->elements[1];
c_739801.elements[2] = ((closureN)self_735507)->elements[2];
c_739801.elements[3] = ((closureN)self_735507)->elements[3];
c_739801.elements[4] = ((closureN)self_735507)->elements[4];
c_739801.elements[5] = ((closureN)self_735507)->elements[5];
c_739801.elements[6] = ((closureN)self_735507)->elements[6];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_739801, r_733122);; 
}

static void __lambda_386(void *data, object self_735508, int argc, object *args) /* object self_735508, object _73tmp_73557_731626 */
 {

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

return_direct_with_clo2(data,  __glo_app_91_125args_scheme_cyclone_transforms, (((closure)  __glo_app_91_125args_scheme_cyclone_transforms)->fn),  &c_739803, ((closureN)self_735508)->elements[4]);; 
}

static void __lambda_387(void *data, object self_735509, int argc, object *args) /* object self_735509, object args_73560_731627 */
 {
 object args_73560_731627 = args[0];
  
closureN_type c_739805;
object e_7311941 [8];
c_739805.hdr.mark = gc_color_red;
 c_739805.hdr.grayed = 0;
c_739805.tag = closureN_tag;
 c_739805.fn = (function_type)__lambda_388;
c_739805.num_args = 1;
c_739805.num_elements = 8;
c_739805.elements = (object *)e_7311941;
c_739805.elements[0] = ((closureN)self_735509)->elements[0];
c_739805.elements[1] = args_73560_731627;
c_739805.elements[2] = ((closureN)self_735509)->elements[1];
c_739805.elements[3] = ((closureN)self_735509)->elements[2];
c_739805.elements[4] = ((closureN)self_735509)->elements[3];
c_739805.elements[5] = ((closureN)self_735509)->elements[4];
c_739805.elements[6] = ((closureN)self_735509)->elements[5];
c_739805.elements[7] = ((closureN)self_735509)->elements[6];

return_direct_with_clo2(data,  __glo_app_91_125fun_scheme_cyclone_transforms, (((closure)  __glo_app_91_125fun_scheme_cyclone_transforms)->fn),  &c_739805, ((closureN)self_735509)->elements[4]);; 
}

static void __lambda_388(void *data, object self_735510, int argc, object *args) /* object self_735510, object fun_73563_731628 */
 {
 object fun_73563_731628 = args[0];
  
closureN_type c_739807;
object e_7311940 [9];
c_739807.hdr.mark = gc_color_red;
 c_739807.hdr.grayed = 0;
c_739807.tag = closureN_tag;
 c_739807.fn = (function_type)__lambda_389;
c_739807.num_args = 1;
c_739807.num_elements = 9;
c_739807.elements = (object *)e_7311940;
c_739807.elements[0] = ((closureN)self_735510)->elements[0];
c_739807.elements[1] = ((closureN)self_735510)->elements[1];
c_739807.elements[2] = ((closureN)self_735510)->elements[2];
c_739807.elements[3] = ((closureN)self_735510)->elements[3];
c_739807.elements[4] = ((closureN)self_735510)->elements[4];
c_739807.elements[5] = ((closureN)self_735510)->elements[5];
c_739807.elements[6] = fun_73563_731628;
c_739807.elements[7] = ((closureN)self_735510)->elements[6];
c_739807.elements[8] = ((closureN)self_735510)->elements[7];

return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_739807, fun_73563_731628);; 
}

static void __lambda_389(void *data, object self_735511, int argc, object *args) /* object self_735511, object r_732660 */
 {
 object r_732660 = args[0];
  if( (boolean_f != r_732660) ){ 
  
closureN_type c_739809;
object e_739884 [7];
c_739809.hdr.mark = gc_color_red;
 c_739809.hdr.grayed = 0;
c_739809.tag = closureN_tag;
 c_739809.fn = (function_type)__lambda_390;
c_739809.num_args = 1;
c_739809.num_elements = 7;
c_739809.elements = (object *)e_739884;
c_739809.elements[0] = ((closureN)self_735511)->elements[0];
c_739809.elements[1] = ((closureN)self_735511)->elements[1];
c_739809.elements[2] = ((closureN)self_735511)->elements[2];
c_739809.elements[3] = ((closureN)self_735511)->elements[4];
c_739809.elements[4] = ((closureN)self_735511)->elements[6];
c_739809.elements[5] = ((closureN)self_735511)->elements[7];
c_739809.elements[6] = ((closureN)self_735511)->elements[8];

return_direct_with_clo4(data,  __glo_c_91compile_91lambda_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91lambda_scheme_cyclone_cgen)->fn),  &c_739809, ((closureN)self_735511)->elements[6], ((closureN)self_735511)->elements[8], boolean_t);
} else { 
  
closureN_type c_739888;
object e_739944 [3];
c_739888.hdr.mark = gc_color_red;
 c_739888.hdr.grayed = 0;
c_739888.tag = closureN_tag;
 c_739888.fn = (function_type)__lambda_399;
c_739888.num_args = 0;
c_739888.num_elements = 3;
c_739888.elements = (object *)e_739944;
c_739888.elements[0] = ((closureN)self_735511)->elements[1];
c_739888.elements[1] = ((closureN)self_735511)->elements[6];
c_739888.elements[2] = ((closureN)self_735511)->elements[8];


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

return_direct_with_clo1(data,(closure)&c_739888,__lambda_399,  &c_739945);}
;; 
}

static void __lambda_402(void *data, object self_735521, int argc, object *args) /* object self_735521, object r_732676 */
 {
 object r_732676 = args[0];
  if( (boolean_f != r_732676) ){ 
  
closureN_type c_739947;
object e_7310060 [3];
c_739947.hdr.mark = gc_color_red;
 c_739947.hdr.grayed = 0;
c_739947.tag = closureN_tag;
 c_739947.fn = (function_type)__lambda_403;
c_739947.num_args = 1;
c_739947.num_elements = 3;
c_739947.elements = (object *)e_7310060;
c_739947.elements[0] = ((closureN)self_735521)->elements[1];
c_739947.elements[1] = ((closureN)self_735521)->elements[7];
c_739947.elements[2] = ((closureN)self_735521)->elements[8];


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

return_direct_with_clo1(data,(closure)&c_739947,__lambda_403,  &c_7310061);
} else { 
  
closureN_type c_7310070;
object e_7311935 [9];
c_7310070.hdr.mark = gc_color_red;
 c_7310070.hdr.grayed = 0;
c_7310070.tag = closureN_tag;
 c_7310070.fn = (function_type)__lambda_422;
c_7310070.num_args = 1;
c_7310070.num_elements = 9;
c_7310070.elements = (object *)e_7311935;
c_7310070.elements[0] = ((closureN)self_735521)->elements[0];
c_7310070.elements[1] = ((closureN)self_735521)->elements[1];
c_7310070.elements[2] = ((closureN)self_735521)->elements[2];
c_7310070.elements[3] = ((closureN)self_735521)->elements[3];
c_7310070.elements[4] = ((closureN)self_735521)->elements[4];
c_7310070.elements[5] = ((closureN)self_735521)->elements[5];
c_7310070.elements[6] = ((closureN)self_735521)->elements[6];
c_7310070.elements[7] = ((closureN)self_735521)->elements[7];
c_7310070.elements[8] = ((closureN)self_735521)->elements[8];



return_direct_with_clo1(data,(closure)&c_7310070,__lambda_422,  Cyc_eq(quote_Cyc_91foreign_91code, ((closureN)self_735521)->elements[6]));}
;; 
}

static void __lambda_422(void *data, object self_735541, int argc, object *args) /* object self_735541, object r_732708 */
 {
 object r_732708 = args[0];
  if( (boolean_f != r_732708) ){ 
  
list_2_type local_7310075; 

make_utf8_string_with_len(c_7310076, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735541)->elements[7], (((closure)  ((closureN)self_735541)->elements[7])->fn),  Cyc_fast_list_2(&local_7310075, &c_7310076, ((closureN)self_735541)->elements[1]));
} else { 
  
closureN_type c_7310079;
object e_7311931 [9];
c_7310079.hdr.mark = gc_color_red;
 c_7310079.hdr.grayed = 0;
c_7310079.tag = closureN_tag;
 c_7310079.fn = (function_type)__lambda_423;
c_7310079.num_args = 1;
c_7310079.num_elements = 9;
c_7310079.elements = (object *)e_7311931;
c_7310079.elements[0] = ((closureN)self_735541)->elements[0];
c_7310079.elements[1] = ((closureN)self_735541)->elements[1];
c_7310079.elements[2] = ((closureN)self_735541)->elements[2];
c_7310079.elements[3] = ((closureN)self_735541)->elements[3];
c_7310079.elements[4] = ((closureN)self_735541)->elements[4];
c_7310079.elements[5] = ((closureN)self_735541)->elements[5];
c_7310079.elements[6] = ((closureN)self_735541)->elements[6];
c_7310079.elements[7] = ((closureN)self_735541)->elements[7];
c_7310079.elements[8] = ((closureN)self_735541)->elements[8];



return_direct_with_clo1(data,(closure)&c_7310079,__lambda_423,  Cyc_eq(quote_Cyc_91foreign_91value, ((closureN)self_735541)->elements[6]));}
;; 
}

static void __lambda_423(void *data, object self_735542, int argc, object *args) /* object self_735542, object r_732710 */
 {
 object r_732710 = args[0];
  if( (boolean_f != r_732710) ){ 
  object tmp_73617_73620_731643;
    
  
if( (boolean_f != Cyc_is_string(Cyc_cadr(data, ((closureN)self_735542)->elements[1]))) ){ 
  
  
  tmp_73617_73620_731643 = Cyc_string2symbol(data, Cyc_cadr(data, ((closureN)self_735542)->elements[1]));
} else { 
  
  tmp_73617_73620_731643 = Cyc_cadr(data, ((closureN)self_735542)->elements[1]);}
;
closureN_type c_7310097;
object e_7310389 [2];
c_7310097.hdr.mark = gc_color_red;
 c_7310097.hdr.grayed = 0;
c_7310097.tag = closureN_tag;
 c_7310097.fn = (function_type)__lambda_424;
c_7310097.num_args = 0;
c_7310097.num_elements = 2;
c_7310097.elements = (object *)e_7310389;
c_7310097.elements[0] = ((closureN)self_735542)->elements[1];
c_7310097.elements[1] = tmp_73617_73620_731643;


closureN_type c_7310390;
object e_7310403 [1];
c_7310390.hdr.mark = gc_color_red;
 c_7310390.hdr.grayed = 0;
c_7310390.tag = closureN_tag;
 c_7310390.fn = (function_type)__lambda_455;
c_7310390.num_args = 1;
c_7310390.num_elements = 1;
c_7310390.elements = (object *)e_7310403;
c_7310390.elements[0] = ((closureN)self_735542)->elements[7];

return_direct_with_clo1(data,(closure)&c_7310097,__lambda_424,  &c_7310390);
} else { 
  
closureN_type c_7310405;
object e_7311929 [9];
c_7310405.hdr.mark = gc_color_red;
 c_7310405.hdr.grayed = 0;
c_7310405.tag = closureN_tag;
 c_7310405.fn = (function_type)__lambda_456;
c_7310405.num_args = 1;
c_7310405.num_elements = 9;
c_7310405.elements = (object *)e_7311929;
c_7310405.elements[0] = ((closureN)self_735542)->elements[0];
c_7310405.elements[1] = ((closureN)self_735542)->elements[1];
c_7310405.elements[2] = ((closureN)self_735542)->elements[2];
c_7310405.elements[3] = ((closureN)self_735542)->elements[3];
c_7310405.elements[4] = ((closureN)self_735542)->elements[4];
c_7310405.elements[5] = ((closureN)self_735542)->elements[5];
c_7310405.elements[6] = ((closureN)self_735542)->elements[6];
c_7310405.elements[7] = ((closureN)self_735542)->elements[7];
c_7310405.elements[8] = ((closureN)self_735542)->elements[8];

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_7310405, ((closureN)self_735542)->elements[6]);}
;; 
}

static void __lambda_456(void *data, object self_735575, int argc, object *args) /* object self_735575, object r_732787 */
 {
 object r_732787 = args[0];
  if( (boolean_f != r_732787) ){ 
  
closureN_type c_7310407;
object e_7310686 [7];
c_7310407.hdr.mark = gc_color_red;
 c_7310407.hdr.grayed = 0;
c_7310407.tag = closureN_tag;
 c_7310407.fn = (function_type)__lambda_457;
c_7310407.num_args = 1;
c_7310407.num_elements = 7;
c_7310407.elements = (object *)e_7310686;
c_7310407.elements[0] = ((closureN)self_735575)->elements[0];
c_7310407.elements[1] = ((closureN)self_735575)->elements[1];
c_7310407.elements[2] = ((closureN)self_735575)->elements[2];
c_7310407.elements[3] = ((closureN)self_735575)->elements[4];
c_7310407.elements[4] = ((closureN)self_735575)->elements[6];
c_7310407.elements[5] = ((closureN)self_735575)->elements[7];
c_7310407.elements[6] = ((closureN)self_735575)->elements[8];

return_direct_with_clo4(data,  __glo_c_91compile_91prim_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91prim_scheme_cyclone_cgen)->fn),  &c_7310407, ((closureN)self_735575)->elements[6], ((closureN)self_735575)->elements[3], ((closureN)self_735575)->elements[2]);
} else { 
  
closureN_type c_7310691;
object e_7311925 [9];
c_7310691.hdr.mark = gc_color_red;
 c_7310691.hdr.grayed = 0;
c_7310691.tag = closureN_tag;
 c_7310691.fn = (function_type)__lambda_497;
c_7310691.num_args = 1;
c_7310691.num_elements = 9;
c_7310691.elements = (object *)e_7311925;
c_7310691.elements[0] = ((closureN)self_735575)->elements[0];
c_7310691.elements[1] = ((closureN)self_735575)->elements[1];
c_7310691.elements[2] = ((closureN)self_735575)->elements[2];
c_7310691.elements[3] = ((closureN)self_735575)->elements[3];
c_7310691.elements[4] = ((closureN)self_735575)->elements[4];
c_7310691.elements[5] = ((closureN)self_735575)->elements[5];
c_7310691.elements[6] = ((closureN)self_735575)->elements[6];
c_7310691.elements[7] = ((closureN)self_735575)->elements[7];
c_7310691.elements[8] = ((closureN)self_735575)->elements[8];



return_direct_with_clo1(data,(closure)&c_7310691,__lambda_497,  equalp(quote__75closure_91ref, ((closureN)self_735575)->elements[6]));}
;; 
}

static void __lambda_497(void *data, object self_735616, int argc, object *args) /* object self_735616, object r_732844 */
 {
 object r_732844 = args[0];
  if( (boolean_f != r_732844) ){ 
  
closureN_type c_7310693;
object e_7310712 [3];
c_7310693.hdr.mark = gc_color_red;
 c_7310693.hdr.grayed = 0;
c_7310693.tag = closureN_tag;
 c_7310693.fn = (function_type)__lambda_498;
c_7310693.num_args = 1;
c_7310693.num_elements = 3;
c_7310693.elements = (object *)e_7310712;
c_7310693.elements[0] = ((closureN)self_735616)->elements[1];
c_7310693.elements[1] = ((closureN)self_735616)->elements[2];
c_7310693.elements[2] = ((closureN)self_735616)->elements[7];


complex_num_type local_7310718; 



object c_7310715 = Cyc_number2string2(data,(closure)&c_7310693,1,Cyc_fast_sub(data,&local_7310718, Cyc_cadr(data, ((closureN)self_735616)->elements[1]), obj_int2obj(1)));
return_closcall1(data,(closure)&c_7310693,  c_7310715);
} else { 
  
closureN_type c_7310723;
object e_7311920 [9];
c_7310723.hdr.mark = gc_color_red;
 c_7310723.hdr.grayed = 0;
c_7310723.tag = closureN_tag;
 c_7310723.fn = (function_type)__lambda_501;
c_7310723.num_args = 1;
c_7310723.num_elements = 9;
c_7310723.elements = (object *)e_7311920;
c_7310723.elements[0] = ((closureN)self_735616)->elements[0];
c_7310723.elements[1] = ((closureN)self_735616)->elements[1];
c_7310723.elements[2] = ((closureN)self_735616)->elements[2];
c_7310723.elements[3] = ((closureN)self_735616)->elements[3];
c_7310723.elements[4] = ((closureN)self_735616)->elements[4];
c_7310723.elements[5] = ((closureN)self_735616)->elements[5];
c_7310723.elements[6] = ((closureN)self_735616)->elements[6];
c_7310723.elements[7] = ((closureN)self_735616)->elements[7];
c_7310723.elements[8] = ((closureN)self_735616)->elements[8];


complex_num_type local_7311923; 
return_direct_with_clo1(data,(closure)&c_7310723,__lambda_501,  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7311923, quote__75closure_91ref, ((closureN)self_735616)->elements[6]));}
;; 
}

static void __lambda_501(void *data, object self_735620, int argc, object *args) /* object self_735620, object r_732852 */
 {
 object r_732852 = args[0];
  if( (boolean_f != r_732852) ){ 
  
closureN_type c_7310725;
object e_7311313 [7];
c_7310725.hdr.mark = gc_color_red;
 c_7310725.hdr.grayed = 0;
c_7310725.tag = closureN_tag;
 c_7310725.fn = (function_type)__lambda_502;
c_7310725.num_args = 1;
c_7310725.num_elements = 7;
c_7310725.elements = (object *)e_7311313;
c_7310725.elements[0] = ((closureN)self_735620)->elements[0];
c_7310725.elements[1] = ((closureN)self_735620)->elements[1];
c_7310725.elements[2] = ((closureN)self_735620)->elements[2];
c_7310725.elements[3] = ((closureN)self_735620)->elements[4];
c_7310725.elements[4] = ((closureN)self_735620)->elements[6];
c_7310725.elements[5] = ((closureN)self_735620)->elements[7];
c_7310725.elements[6] = ((closureN)self_735620)->elements[8];


pair_type local_7311316; 



make_utf8_string_with_len(c_7311321, "  ", 2, 2);
return_direct_with_clo8(data,  __glo_c_91compile_91args_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91args_scheme_cyclone_cgen)->fn),  &c_7310725, set_cell_as_expr(&local_7311316, Cyc_car(data, ((closureN)self_735620)->elements[1])), ((closureN)self_735620)->elements[0], &c_7311321, ((closureN)self_735620)->elements[3], ((closureN)self_735620)->elements[2], ((closureN)self_735620)->elements[8], ((closureN)self_735620)->elements[4]);
} else { 
  
closureN_type c_7311327;
object e_7311915 [9];
c_7311327.hdr.mark = gc_color_red;
 c_7311327.hdr.grayed = 0;
c_7311327.tag = closureN_tag;
 c_7311327.fn = (function_type)__lambda_584;
c_7311327.num_args = 1;
c_7311327.num_elements = 9;
c_7311327.elements = (object *)e_7311915;
c_7311327.elements[0] = ((closureN)self_735620)->elements[0];
c_7311327.elements[1] = ((closureN)self_735620)->elements[1];
c_7311327.elements[2] = ((closureN)self_735620)->elements[2];
c_7311327.elements[3] = ((closureN)self_735620)->elements[3];
c_7311327.elements[4] = ((closureN)self_735620)->elements[4];
c_7311327.elements[5] = ((closureN)self_735620)->elements[5];
c_7311327.elements[6] = ((closureN)self_735620)->elements[6];
c_7311327.elements[7] = ((closureN)self_735620)->elements[7];
c_7311327.elements[8] = ((closureN)self_735620)->elements[8];


complex_num_type local_7311918; 
return_direct_with_clo1(data,(closure)&c_7311327,__lambda_584,  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7311918, quote__75closure, ((closureN)self_735620)->elements[6]));}
;; 
}

static void __lambda_584(void *data, object self_735703, int argc, object *args) /* object self_735703, object r_732977 */
 {
 object r_732977 = args[0];
  if( (boolean_f != r_732977) ){ 
  
closureN_type c_7311329;
object e_7311640 [7];
c_7311329.hdr.mark = gc_color_red;
 c_7311329.hdr.grayed = 0;
c_7311329.tag = closureN_tag;
 c_7311329.fn = (function_type)__lambda_585;
c_7311329.num_args = 1;
c_7311329.num_elements = 7;
c_7311329.elements = (object *)e_7311640;
c_7311329.elements[0] = ((closureN)self_735703)->elements[0];
c_7311329.elements[1] = ((closureN)self_735703)->elements[1];
c_7311329.elements[2] = ((closureN)self_735703)->elements[2];
c_7311329.elements[3] = ((closureN)self_735703)->elements[4];
c_7311329.elements[4] = ((closureN)self_735703)->elements[6];
c_7311329.elements[5] = ((closureN)self_735703)->elements[7];
c_7311329.elements[6] = ((closureN)self_735703)->elements[8];

return_direct_with_clo7(data,  __glo_c_91compile_91closure_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91closure_scheme_cyclone_cgen)->fn),  &c_7311329, ((closureN)self_735703)->elements[6], ((closureN)self_735703)->elements[0], ((closureN)self_735703)->elements[3], ((closureN)self_735703)->elements[2], ((closureN)self_735703)->elements[8], ((closureN)self_735703)->elements[4]);
} else { 
    
if( (boolean_f != equalp(quote_Cyc_91seq, ((closureN)self_735703)->elements[6])) ){ 
  
closureN_type c_7311651;
object e_7311663 [2];
c_7311651.hdr.mark = gc_color_red;
 c_7311651.hdr.grayed = 0;
c_7311651.tag = closureN_tag;
 c_7311651.fn = (function_type)__lambda_624;
c_7311651.num_args = 1;
c_7311651.num_elements = 2;
c_7311651.elements = (object *)e_7311663;
c_7311651.elements[0] = ((closureN)self_735703)->elements[1];
c_7311651.elements[1] = ((closureN)self_735703)->elements[7];


closureN_type c_7311664;
object e_7311751 [5];
c_7311664.hdr.mark = gc_color_red;
 c_7311664.hdr.grayed = 0;
c_7311664.tag = closureN_tag;
 c_7311664.fn = (function_type)__lambda_627;
c_7311664.num_args = 2;
c_7311664.num_elements = 5;
c_7311664.elements = (object *)e_7311751;
c_7311664.elements[0] = ((closureN)self_735703)->elements[0];
c_7311664.elements[1] = ((closureN)self_735703)->elements[2];
c_7311664.elements[2] = ((closureN)self_735703)->elements[3];
c_7311664.elements[3] = ((closureN)self_735703)->elements[4];
c_7311664.elements[4] = ((closureN)self_735703)->elements[8];

return_direct_with_clo1(data,(closure)&c_7311651,__lambda_624,  &c_7311664);
} else { 
    
if( (boolean_f != equalp(quote_Cyc_91local_91set_67, ((closureN)self_735703)->elements[6])) ){ 
  
closureN_type c_7311756;
object e_7311786 [2];
c_7311756.hdr.mark = gc_color_red;
 c_7311756.hdr.grayed = 0;
c_7311756.tag = closureN_tag;
 c_7311756.fn = (function_type)__lambda_636;
c_7311756.num_args = 1;
c_7311756.num_elements = 2;
c_7311756.elements = (object *)e_7311786;
c_7311756.elements[0] = ((closureN)self_735703)->elements[5];
c_7311756.elements[1] = ((closureN)self_735703)->elements[7];



return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  &c_7311756, Cyc_caddr(data, ((closureN)self_735703)->elements[5]), ((closureN)self_735703)->elements[0], ((closureN)self_735703)->elements[3], ((closureN)self_735703)->elements[2], ((closureN)self_735703)->elements[8], ((closureN)self_735703)->elements[4]);
} else { 
    
if( (boolean_f != equalp(quote_let, ((closureN)self_735703)->elements[6])) ){ 
  
closureN_type c_7311799;
object e_7311825 [7];
c_7311799.hdr.mark = gc_color_red;
 c_7311799.hdr.grayed = 0;
c_7311799.tag = closureN_tag;
 c_7311799.fn = (function_type)__lambda_640;
c_7311799.num_args = 1;
c_7311799.num_elements = 7;
c_7311799.elements = (object *)e_7311825;
c_7311799.elements[0] = ((closureN)self_735703)->elements[0];
c_7311799.elements[1] = ((closureN)self_735703)->elements[2];
c_7311799.elements[2] = ((closureN)self_735703)->elements[3];
c_7311799.elements[3] = ((closureN)self_735703)->elements[4];
c_7311799.elements[4] = ((closureN)self_735703)->elements[5];
c_7311799.elements[5] = ((closureN)self_735703)->elements[7];
c_7311799.elements[6] = ((closureN)self_735703)->elements[8];


closureN_type c_7311826;
object e_7311899 [5];
c_7311826.hdr.mark = gc_color_red;
 c_7311826.hdr.grayed = 0;
c_7311826.tag = closureN_tag;
 c_7311826.fn = (function_type)__lambda_644;
c_7311826.num_args = 2;
c_7311826.num_elements = 5;
c_7311826.elements = (object *)e_7311899;
c_7311826.elements[0] = ((closureN)self_735703)->elements[0];
c_7311826.elements[1] = ((closureN)self_735703)->elements[2];
c_7311826.elements[2] = ((closureN)self_735703)->elements[3];
c_7311826.elements[3] = ((closureN)self_735703)->elements[4];
c_7311826.elements[4] = ((closureN)self_735703)->elements[8];

return_direct_with_clo1(data,(closure)&c_7311799,__lambda_640,  &c_7311826);
} else { 
  
pair_type local_7311904; 

pair_type local_7311907; 

pair_type local_7311910; 

pair_type local_7311913; 
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735703)->elements[7], set_pair_as_expr(&local_7311904, quote_Unsupported, set_pair_as_expr(&local_7311907, quote_function, set_pair_as_expr(&local_7311910, quote_application, set_pair_as_expr(&local_7311913, ((closureN)self_735703)->elements[5], NULL)))));}
;}
;}
;}
;; 
}

static void __lambda_644(void *data, object self_735759, int argc, object *args) /* object self_735759, object k_733075, object var_95val_73862_731708, object acc_73863_731709 */
 {
 object k_733075 = args[0]; object var_95val_73862_731708 = args[1]; object acc_73863_731709 = args[2];
  
closureN_type c_7311828;
object e_7311895 [8];
c_7311828.hdr.mark = gc_color_red;
 c_7311828.hdr.grayed = 0;
c_7311828.tag = closureN_tag;
 c_7311828.fn = (function_type)__lambda_645;
c_7311828.num_args = 1;
c_7311828.num_elements = 8;
c_7311828.elements = (object *)e_7311895;
c_7311828.elements[0] = acc_73863_731709;
c_7311828.elements[1] = ((closureN)self_735759)->elements[0];
c_7311828.elements[2] = ((closureN)self_735759)->elements[1];
c_7311828.elements[3] = ((closureN)self_735759)->elements[2];
c_7311828.elements[4] = ((closureN)self_735759)->elements[3];
c_7311828.elements[5] = k_733075;
c_7311828.elements[6] = ((closureN)self_735759)->elements[4];
c_7311828.elements[7] = var_95val_73862_731708;


object c_7311898 = global_set_cps_id(data,(closure)&c_7311828,"__glo__85use_91alloca_85_scheme_cyclone_cgen", __glo__85use_91alloca_85_scheme_cyclone_cgen, boolean_t);
return_closcall1(data,(closure)&c_7311828,  c_7311898);; 
}

static void __lambda_645(void *data, object self_735760, int argc, object *args) /* object self_735760, object r_733076_734971 */
 {

  
closureN_type c_7311830;
object e_7311886 [3];
c_7311830.hdr.mark = gc_color_red;
 c_7311830.hdr.grayed = 0;
c_7311830.tag = closureN_tag;
 c_7311830.fn = (function_type)__lambda_646;
c_7311830.num_args = 1;
c_7311830.num_elements = 3;
c_7311830.elements = (object *)e_7311886;
c_7311830.elements[0] = ((closureN)self_735760)->elements[0];
c_7311830.elements[1] = ((closureN)self_735760)->elements[5];
c_7311830.elements[2] = ((closureN)self_735760)->elements[7];



return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  &c_7311830, Cyc_cadr(data, ((closureN)self_735760)->elements[7]), ((closureN)self_735760)->elements[1], ((closureN)self_735760)->elements[3], ((closureN)self_735760)->elements[2], ((closureN)self_735760)->elements[6], ((closureN)self_735760)->elements[4]);; 
}

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

return_direct_with_clo2(data,(closure)&c_7311832,__lambda_647,  r_733077_734972, ((closureN)self_735761)->elements[0]);; 
}

static void __lambda_647(void *data, object self_735762, int argc, object *args) /* object self_735762, object cp1_73864_731710_734973, object cp2_73865_731711_734974 */
 {
 object cp1_73864_731710_734973 = args[0]; object cp2_73865_731711_734974 = args[1];
  
closureN_type c_7311834;
object e_7311880 [4];
c_7311834.hdr.mark = gc_color_red;
 c_7311834.hdr.grayed = 0;
c_7311834.tag = closureN_tag;
 c_7311834.fn = (function_type)__lambda_648;
c_7311834.num_args = 1;
c_7311834.num_elements = 4;
c_7311834.elements = (object *)e_7311880;
c_7311834.elements[0] = cp1_73864_731710_734973;
c_7311834.elements[1] = cp2_73865_731711_734974;
c_7311834.elements[2] = ((closureN)self_735762)->elements[0];
c_7311834.elements[3] = ((closureN)self_735762)->elements[1];


object c_7311883 = global_set_cps_id(data,(closure)&c_7311834,"__glo__85use_91alloca_85_scheme_cyclone_cgen", __glo__85use_91alloca_85_scheme_cyclone_cgen, boolean_f);
return_closcall1(data,(closure)&c_7311834,  c_7311883);; 
}

static void __lambda_648(void *data, object self_735763, int argc, object *args) /* object self_735763, object r_733078_734975_734984 */
 {

  
closureN_type c_7311836;
object e_7311869 [4];
c_7311836.hdr.mark = gc_color_red;
 c_7311836.hdr.grayed = 0;
c_7311836.tag = closureN_tag;
 c_7311836.fn = (function_type)__lambda_649;
c_7311836.num_args = 1;
c_7311836.num_elements = 4;
c_7311836.elements = (object *)e_7311869;
c_7311836.elements[0] = ((closureN)self_735763)->elements[0];
c_7311836.elements[1] = ((closureN)self_735763)->elements[1];
c_7311836.elements[2] = ((closureN)self_735763)->elements[2];
c_7311836.elements[3] = ((closureN)self_735763)->elements[3];




make_utf8_string_with_len(c_7311876, ";", 1, 1);



object c_7311872 = Cyc_string_append(data,(closure)&c_7311836,3,Cyc_car(data, ((closureN)self_735763)->elements[0]), &c_7311876, Cyc_car(data, ((closureN)self_735763)->elements[1]));
return_closcall1(data,(closure)&c_7311836,  c_7311872);; 
}

static void __lambda_649(void *data, object self_735764, int argc, object *args) /* object self_735764, object r_733079_734978_734987_734995_735002 */
 {
 object r_733079_734978_734987_734995_735002 = args[0];
  
closureN_type c_7311838;
object e_7311865 [4];
c_7311838.hdr.mark = gc_color_red;
 c_7311838.hdr.grayed = 0;
c_7311838.tag = closureN_tag;
 c_7311838.fn = (function_type)__lambda_650;
c_7311838.num_args = 1;
c_7311838.num_elements = 4;
c_7311838.elements = (object *)e_7311865;
c_7311838.elements[0] = ((closureN)self_735764)->elements[0];
c_7311838.elements[1] = ((closureN)self_735764)->elements[1];
c_7311838.elements[2] = ((closureN)self_735764)->elements[2];
c_7311838.elements[3] = r_733079_734978_734987_734995_735002;



return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7311838, Cyc_car(data, ((closureN)self_735764)->elements[3]));; 
}

static void __lambda_650(void *data, object self_735765, int argc, object *args) /* object self_735765, object r_733085_734979_734988_734996_735003 */
 {
 object r_733085_734979_734988_734996_735003 = args[0];
  
closureN_type c_7311840;
object e_7311859 [4];
c_7311840.hdr.mark = gc_color_red;
 c_7311840.hdr.grayed = 0;
c_7311840.tag = closureN_tag;
 c_7311840.fn = (function_type)__lambda_651;
c_7311840.num_args = 1;
c_7311840.num_elements = 4;
c_7311840.elements = (object *)e_7311859;
c_7311840.elements[0] = ((closureN)self_735765)->elements[0];
c_7311840.elements[1] = ((closureN)self_735765)->elements[1];
c_7311840.elements[2] = ((closureN)self_735765)->elements[2];
c_7311840.elements[3] = ((closureN)self_735765)->elements[3];


make_utf8_string_with_len(c_7311863, "object ", 7, 7);

make_utf8_string_with_len(c_7311864, ";", 1, 1);

object c_7311862 = Cyc_string_append(data,(closure)&c_7311840,3,&c_7311863, r_733085_734979_734988_734996_735003, &c_7311864);
return_closcall1(data,(closure)&c_7311840,  c_7311862);; 
}

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


pair_type local_7311852; 




return_direct_with_clo4(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7311842, set_cell_as_expr(&local_7311852, r_733084_734980_734989_734997_735004), Cyc_cadr(data, ((closureN)self_735766)->elements[0]), Cyc_cadr(data, ((closureN)self_735766)->elements[1]));; 
}

static void __lambda_652(void *data, object self_735767, int argc, object *args) /* object self_735767, object r_733080_734983_734992_735000_735007_735010_735012 */
 {
 object r_733080_734983_734992_735000_735007_735010_735012 = args[0];
  
list_2_type local_7311847; 
return_direct_with_clo1(data,  ((closureN)self_735767)->elements[0], (((closure)  ((closureN)self_735767)->elements[0])->fn),  Cyc_fast_list_2(&local_7311847, ((closureN)self_735767)->elements[1], r_733080_734983_734992_735000_735007_735010_735012));; 
}

static void __lambda_640(void *data, object self_735768, int argc, object *args) /* object self_735768, object r_733073 */
 {
 object r_733073 = args[0];
  
closureN_type c_7311801;
object e_7311823 [8];
c_7311801.hdr.mark = gc_color_red;
 c_7311801.hdr.grayed = 0;
c_7311801.tag = closureN_tag;
 c_7311801.fn = (function_type)__lambda_641;
c_7311801.num_args = 1;
c_7311801.num_elements = 8;
c_7311801.elements = (object *)e_7311823;
c_7311801.elements[0] = ((closureN)self_735768)->elements[0];
c_7311801.elements[1] = ((closureN)self_735768)->elements[1];
c_7311801.elements[2] = ((closureN)self_735768)->elements[2];
c_7311801.elements[3] = ((closureN)self_735768)->elements[3];
c_7311801.elements[4] = ((closureN)self_735768)->elements[4];
c_7311801.elements[5] = ((closureN)self_735768)->elements[5];
c_7311801.elements[6] = r_733073;
c_7311801.elements[7] = ((closureN)self_735768)->elements[6];


make_utf8_string_with_len(c_7311824, "", 0, 0);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  &c_7311801, &c_7311824);; 
}

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



return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  &c_7311803, ((closureN)self_735769)->elements[6], r_733074, Cyc_cadr(data, ((closureN)self_735769)->elements[4]));; 
}

static void __lambda_642(void *data, object self_735770, int argc, object *args) /* object self_735770, object vexps_73857_731706 */
 {
 object vexps_73857_731706 = args[0];
  
closureN_type c_7311805;
object e_7311809 [2];
c_7311805.hdr.mark = gc_color_red;
 c_7311805.hdr.grayed = 0;
c_7311805.tag = closureN_tag;
 c_7311805.fn = (function_type)__lambda_643;
c_7311805.num_args = 1;
c_7311805.num_elements = 2;
c_7311805.elements = (object *)e_7311809;
c_7311805.elements[0] = ((closureN)self_735770)->elements[5];
c_7311805.elements[1] = vexps_73857_731706;



return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  &c_7311805, Cyc_caddr(data, ((closureN)self_735770)->elements[4]), ((closureN)self_735770)->elements[0], ((closureN)self_735770)->elements[2], ((closureN)self_735770)->elements[1], ((closureN)self_735770)->elements[6], ((closureN)self_735770)->elements[3]);; 
}

static void __lambda_643(void *data, object self_735771, int argc, object *args) /* object self_735771, object body_91exp_73860_731707 */
 {
 object body_91exp_73860_731707 = args[0];
  return_direct_with_clo3(data,  __glo_c_117append_scheme_cyclone_cgen, (((closure)  __glo_c_117append_scheme_cyclone_cgen)->fn),  ((closureN)self_735771)->elements[0], ((closureN)self_735771)->elements[1], body_91exp_73860_731707);; 
}

static void __lambda_636(void *data, object self_735755, int argc, object *args) /* object self_735755, object val_91exp_73845_731703 */
 {
 object val_91exp_73845_731703 = args[0];
  
closureN_type c_7311758;
object e_7311782 [2];
c_7311758.hdr.mark = gc_color_red;
 c_7311758.hdr.grayed = 0;
c_7311758.tag = closureN_tag;
 c_7311758.fn = (function_type)__lambda_637;
c_7311758.num_args = 1;
c_7311758.num_elements = 2;
c_7311758.elements = (object *)e_7311782;
c_7311758.elements[0] = ((closureN)self_735755)->elements[1];
c_7311758.elements[1] = val_91exp_73845_731703;



return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7311758, Cyc_cadr(data, ((closureN)self_735755)->elements[0]));; 
}

static void __lambda_637(void *data, object self_735756, int argc, object *args) /* object self_735756, object r_733064 */
 {
 object r_733064 = args[0];
  
closureN_type c_7311760;
object e_7311778 [3];
c_7311760.hdr.mark = gc_color_red;
 c_7311760.hdr.grayed = 0;
c_7311760.tag = closureN_tag;
 c_7311760.fn = (function_type)__lambda_638;
c_7311760.num_args = 1;
c_7311760.num_elements = 3;
c_7311760.elements = (object *)e_7311778;
c_7311760.elements[0] = ((closureN)self_735756)->elements[0];
c_7311760.elements[1] = r_733064;
c_7311760.elements[2] = ((closureN)self_735756)->elements[1];



return_direct_with_clo1(data,(closure)&c_7311760,__lambda_638,  Cyc_car(data, ((closureN)self_735756)->elements[1]));; 
}

static void __lambda_638(void *data, object self_735757, int argc, object *args) /* object self_735757, object r_733065_734967 */
 {
 object r_733065_734967 = args[0];
  
closureN_type c_7311762;
object e_7311771 [2];
c_7311762.hdr.mark = gc_color_red;
 c_7311762.hdr.grayed = 0;
c_7311762.tag = closureN_tag;
 c_7311762.fn = (function_type)__lambda_639;
c_7311762.num_args = 1;
c_7311762.num_elements = 2;
c_7311762.elements = (object *)e_7311771;
c_7311762.elements[0] = ((closureN)self_735757)->elements[0];
c_7311762.elements[1] = ((closureN)self_735757)->elements[2];


make_utf8_string_with_len(c_7311776, " = ", 3, 3);

make_utf8_string_with_len(c_7311777, ";", 1, 1);

object c_7311774 = Cyc_string_append(data,(closure)&c_7311762,4,((closureN)self_735757)->elements[1], &c_7311776, r_733065_734967, &c_7311777);
return_closcall1(data,(closure)&c_7311762,  c_7311774);; 
}

static void __lambda_639(void *data, object self_735758, int argc, object *args) /* object self_735758, object r_733062_734968 */
 {
 object r_733062_734968 = args[0];
  
list_2_type local_7311767; 


return_direct_with_clo1(data,  ((closureN)self_735758)->elements[0], (((closure)  ((closureN)self_735758)->elements[0])->fn),  Cyc_fast_list_2(&local_7311767, r_733062_734968, Cyc_cadr(data, ((closureN)self_735758)->elements[1])));; 
}

static void __lambda_627(void *data, object self_735743, int argc, object *args) /* object self_735743, object k_733043, object expr_73830_731698, object acc_73831_731699 */
 {
 object k_733043 = args[0]; object expr_73830_731698 = args[1]; object acc_73831_731699 = args[2];
  
closureN_type c_7311666;
object e_7311701 [6];
c_7311666.hdr.mark = gc_color_red;
 c_7311666.hdr.grayed = 0;
c_7311666.tag = closureN_tag;
 c_7311666.fn = (function_type)__lambda_628;
c_7311666.num_args = 0;
c_7311666.num_elements = 6;
c_7311666.elements = (object *)e_7311701;
c_7311666.elements[0] = ((closureN)self_735743)->elements[0];
c_7311666.elements[1] = ((closureN)self_735743)->elements[1];
c_7311666.elements[2] = ((closureN)self_735743)->elements[2];
c_7311666.elements[3] = ((closureN)self_735743)->elements[3];
c_7311666.elements[4] = expr_73830_731698;
c_7311666.elements[5] = ((closureN)self_735743)->elements[4];


closureN_type c_7311702;
object e_7311750 [2];
c_7311702.hdr.mark = gc_color_red;
 c_7311702.hdr.grayed = 0;
c_7311702.tag = closureN_tag;
 c_7311702.fn = (function_type)__lambda_631;
c_7311702.num_args = 1;
c_7311702.num_elements = 2;
c_7311702.elements = (object *)e_7311750;
c_7311702.elements[0] = acc_73831_731699;
c_7311702.elements[1] = k_733043;

return_direct_with_clo1(data,(closure)&c_7311666,__lambda_628,  &c_7311702);; 
}

static void __lambda_631(void *data, object self_735744, int argc, object *args) /* object self_735744, object r_733044 */
 {
 object r_733044 = args[0];
  
closureN_type c_7311704;
object e_7311748 [1];
c_7311704.hdr.mark = gc_color_red;
 c_7311704.hdr.grayed = 0;
c_7311704.tag = closureN_tag;
 c_7311704.fn = (function_type)__lambda_632;
c_7311704.num_args = 2;
c_7311704.num_elements = 1;
c_7311704.elements = (object *)e_7311748;
c_7311704.elements[0] = ((closureN)self_735744)->elements[1];

return_direct_with_clo2(data,(closure)&c_7311704,__lambda_632,  r_733044, ((closureN)self_735744)->elements[0]);; 
}

static void __lambda_632(void *data, object self_735745, int argc, object *args) /* object self_735745, object cp1_73832_731700, object cp2_73833_731701 */
 {
 object cp1_73832_731700 = args[0]; object cp2_73833_731701 = args[1];
  
closureN_type c_7311706;
object e_7311730 [2];
c_7311706.hdr.mark = gc_color_red;
 c_7311706.hdr.grayed = 0;
c_7311706.tag = closureN_tag;
 c_7311706.fn = (function_type)__lambda_633;
c_7311706.num_args = 0;
c_7311706.num_elements = 2;
c_7311706.elements = (object *)e_7311730;
c_7311706.elements[0] = cp1_73832_731700;
c_7311706.elements[1] = cp2_73833_731701;


closureN_type c_7311731;
object e_7311747 [3];
c_7311731.hdr.mark = gc_color_red;
 c_7311731.hdr.grayed = 0;
c_7311731.tag = closureN_tag;
 c_7311731.fn = (function_type)__lambda_634;
c_7311731.num_args = 1;
c_7311731.num_elements = 3;
c_7311731.elements = (object *)e_7311747;
c_7311731.elements[0] = cp1_73832_731700;
c_7311731.elements[1] = cp2_73833_731701;
c_7311731.elements[2] = ((closureN)self_735745)->elements[0];

return_direct_with_clo1(data,(closure)&c_7311706,__lambda_633,  &c_7311731);; 
}

static void __lambda_634(void *data, object self_735746, int argc, object *args) /* object self_735746, object r_733045_734957 */
 {
 object r_733045_734957 = args[0];
  
closureN_type c_7311733;
object e_7311740 [2];
c_7311733.hdr.mark = gc_color_red;
 c_7311733.hdr.grayed = 0;
c_7311733.tag = closureN_tag;
 c_7311733.fn = (function_type)__lambda_635;
c_7311733.num_args = 1;
c_7311733.num_elements = 2;
c_7311733.elements = (object *)e_7311740;
c_7311733.elements[0] = ((closureN)self_735746)->elements[2];
c_7311733.elements[1] = r_733045_734957;





return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7311733, Cyc_cadr(data, ((closureN)self_735746)->elements[0]), Cyc_cadr(data, ((closureN)self_735746)->elements[1]));; 
}

static void __lambda_635(void *data, object self_735747, int argc, object *args) /* object self_735747, object r_733046_734960_734964_734966 */
 {
 object r_733046_734960_734964_734966 = args[0];
  
list_2_type local_7311738; 
return_direct_with_clo1(data,  ((closureN)self_735747)->elements[0], (((closure)  ((closureN)self_735747)->elements[0])->fn),  Cyc_fast_list_2(&local_7311738, ((closureN)self_735747)->elements[1], r_733046_734960_734964_734966));; 
}

static void __lambda_633(void *data, object self_735748, int argc, object *args) /* object self_735748, object k_733050_734955 */
 {
 object k_733050_734955 = args[0];
    complex_num_type local_7311709; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7311709, Cyc_string_length(data, Cyc_car(data, ((closureN)self_735748)->elements[0])))) ){ 
  

return_direct_with_clo1(data,  k_733050_734955, (((closure)  k_733050_734955)->fn),  Cyc_car(data, ((closureN)self_735748)->elements[1]));
} else { 
  


make_utf8_string_with_len(c_7311726, ";", 1, 1);



object c_7311722 = Cyc_string_append(data,  k_733050_734955,3,Cyc_car(data, ((closureN)self_735748)->elements[0]), &c_7311726, Cyc_car(data, ((closureN)self_735748)->elements[1]));
return_direct_with_clo1(data,  k_733050_734955, (((closure)  k_733050_734955)->fn),  c_7311722);}
;; 
}

static void __lambda_628(void *data, object self_735749, int argc, object *args) /* object self_735749, object k_733054 */
 {
 object k_733054 = args[0];
  
closureN_type c_7311668;
object e_7311696 [7];
c_7311668.hdr.mark = gc_color_red;
 c_7311668.hdr.grayed = 0;
c_7311668.tag = closureN_tag;
 c_7311668.fn = (function_type)__lambda_629;
c_7311668.num_args = 1;
c_7311668.num_elements = 7;
c_7311668.elements = (object *)e_7311696;
c_7311668.elements[0] = ((closureN)self_735749)->elements[0];
c_7311668.elements[1] = ((closureN)self_735749)->elements[1];
c_7311668.elements[2] = ((closureN)self_735749)->elements[2];
c_7311668.elements[3] = ((closureN)self_735749)->elements[3];
c_7311668.elements[4] = ((closureN)self_735749)->elements[4];
c_7311668.elements[5] = k_733054;
c_7311668.elements[6] = ((closureN)self_735749)->elements[5];


complex_num_type local_7311699; 
return_direct_with_clo1(data,(closure)&c_7311668,__lambda_629,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7311699, ((closureN)self_735749)->elements[4]));; 
}

static void __lambda_629(void *data, object self_735750, int argc, object *args) /* object self_735750, object r_733055 */
 {
 object r_733055 = args[0];
  if( (boolean_f != r_733055) ){ 
  
list_2_type local_7311673; 

make_utf8_string_with_len(c_7311674, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735750)->elements[5], (((closure)  ((closureN)self_735750)->elements[5])->fn),  Cyc_fast_list_2(&local_7311673, &c_7311674, NULL));
} else { 
  
closureN_type c_7311676;
object e_7311691 [7];
c_7311676.hdr.mark = gc_color_red;
 c_7311676.hdr.grayed = 0;
c_7311676.tag = closureN_tag;
 c_7311676.fn = (function_type)__lambda_630;
c_7311676.num_args = 1;
c_7311676.num_elements = 7;
c_7311676.elements = (object *)e_7311691;
c_7311676.elements[0] = ((closureN)self_735750)->elements[0];
c_7311676.elements[1] = ((closureN)self_735750)->elements[1];
c_7311676.elements[2] = ((closureN)self_735750)->elements[2];
c_7311676.elements[3] = ((closureN)self_735750)->elements[3];
c_7311676.elements[4] = ((closureN)self_735750)->elements[4];
c_7311676.elements[5] = ((closureN)self_735750)->elements[5];
c_7311676.elements[6] = ((closureN)self_735750)->elements[6];


complex_num_type local_7311694; 
return_direct_with_clo1(data,(closure)&c_7311676,__lambda_630,  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_7311694, quote__75closure, ((closureN)self_735750)->elements[4]));}
;; 
}

static void __lambda_630(void *data, object self_735751, int argc, object *args) /* object self_735751, object r_733057 */
 {
 object r_733057 = args[0];
  if( (boolean_f != r_733057) ){ 
  
list_2_type local_7311681; 

make_utf8_string_with_len(c_7311682, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735751)->elements[5], (((closure)  ((closureN)self_735751)->elements[5])->fn),  Cyc_fast_list_2(&local_7311681, &c_7311682, NULL));
} else { 
  return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  ((closureN)self_735751)->elements[5], ((closureN)self_735751)->elements[4], ((closureN)self_735751)->elements[0], ((closureN)self_735751)->elements[2], ((closureN)self_735751)->elements[1], ((closureN)self_735751)->elements[6], ((closureN)self_735751)->elements[3]);}
;; 
}

static void __lambda_624(void *data, object self_735752, int argc, object *args) /* object self_735752, object r_733041 */
 {
 object r_733041 = args[0];
  
closureN_type c_7311653;
object e_7311661 [3];
c_7311653.hdr.mark = gc_color_red;
 c_7311653.hdr.grayed = 0;
c_7311653.tag = closureN_tag;
 c_7311653.fn = (function_type)__lambda_625;
c_7311653.num_args = 1;
c_7311653.num_elements = 3;
c_7311653.elements = (object *)e_7311661;
c_7311653.elements[0] = ((closureN)self_735752)->elements[0];
c_7311653.elements[1] = ((closureN)self_735752)->elements[1];
c_7311653.elements[2] = r_733041;


make_utf8_string_with_len(c_7311662, "", 0, 0);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  &c_7311653, &c_7311662);; 
}

static void __lambda_625(void *data, object self_735753, int argc, object *args) /* object self_735753, object r_733042 */
 {
 object r_733042 = args[0];
  
closureN_type c_7311655;
object e_7311658 [1];
c_7311655.hdr.mark = gc_color_red;
 c_7311655.hdr.grayed = 0;
c_7311655.tag = closureN_tag;
 c_7311655.fn = (function_type)__lambda_626;
c_7311655.num_args = 1;
c_7311655.num_elements = 1;
c_7311655.elements = (object *)e_7311658;
c_7311655.elements[0] = ((closureN)self_735753)->elements[1];

return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  &c_7311655, ((closureN)self_735753)->elements[2], r_733042, ((closureN)self_735753)->elements[0]);; 
}

static void __lambda_626(void *data, object self_735754, int argc, object *args) /* object self_735754, object exps_73829_731697 */
 {
 object exps_73829_731697 = args[0];
  return_direct_with_clo1(data,  ((closureN)self_735754)->elements[0], (((closure)  ((closureN)self_735754)->elements[0])->fn),  exps_73829_731697);; 
}

static void __lambda_585(void *data, object self_735704, int argc, object *args) /* object self_735704, object cfun_73784_731687 */
 {
 object cfun_73784_731687 = args[0];
  
closureN_type c_7311331;
object e_7311637 [8];
c_7311331.hdr.mark = gc_color_red;
 c_7311331.hdr.grayed = 0;
c_7311331.tag = closureN_tag;
 c_7311331.fn = (function_type)__lambda_586;
c_7311331.num_args = 1;
c_7311331.num_elements = 8;
c_7311331.elements = (object *)e_7311637;
c_7311331.elements[0] = ((closureN)self_735704)->elements[0];
c_7311331.elements[1] = ((closureN)self_735704)->elements[1];
c_7311331.elements[2] = ((closureN)self_735704)->elements[2];
c_7311331.elements[3] = cfun_73784_731687;
c_7311331.elements[4] = ((closureN)self_735704)->elements[3];
c_7311331.elements[5] = ((closureN)self_735704)->elements[4];
c_7311331.elements[6] = ((closureN)self_735704)->elements[5];
c_7311331.elements[7] = ((closureN)self_735704)->elements[6];



return_direct_with_clo1(data,(closure)&c_7311331,__lambda_586,  Cyc_car(data, cfun_73784_731687));; 
}

static void __lambda_586(void *data, object self_735705, int argc, object *args) /* object self_735705, object r_733038_734775 */
 {
 object r_733038_734775 = args[0];
  
closureN_type c_7311333;
object e_7311632 [8];
c_7311333.hdr.mark = gc_color_red;
 c_7311333.hdr.grayed = 0;
c_7311333.tag = closureN_tag;
 c_7311333.fn = (function_type)__lambda_587;
c_7311333.num_args = 1;
c_7311333.num_elements = 8;
c_7311333.elements = (object *)e_7311632;
c_7311333.elements[0] = ((closureN)self_735705)->elements[0];
c_7311333.elements[1] = ((closureN)self_735705)->elements[1];
c_7311333.elements[2] = ((closureN)self_735705)->elements[2];
c_7311333.elements[3] = ((closureN)self_735705)->elements[3];
c_7311333.elements[4] = ((closureN)self_735705)->elements[4];
c_7311333.elements[5] = ((closureN)self_735705)->elements[5];
c_7311333.elements[6] = ((closureN)self_735705)->elements[6];
c_7311333.elements[7] = ((closureN)self_735705)->elements[7];


make_utf8_string_with_len(c_7311636, "(closure)", 9, 9);

object c_7311635 = Cyc_string_append(data,(closure)&c_7311333,2,&c_7311636, r_733038_734775);
return_closcall1(data,(closure)&c_7311333,  c_7311635);; 
}

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


make_utf8_string_with_len(c_7311628, "  ", 2, 2);
return_direct_with_clo8(data,  __glo_c_91compile_91args_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91args_scheme_cyclone_cgen)->fn),  &c_7311335, ((closureN)self_735706)->elements[1], ((closureN)self_735706)->elements[0], &c_7311628, this_91cont_73787_731688_734776, ((closureN)self_735706)->elements[2], ((closureN)self_735706)->elements[7], ((closureN)self_735706)->elements[4]);; 
}

static void __lambda_588(void *data, object self_735707, int argc, object *args) /* object self_735707, object cargs_73790_731689_734777 */
 {
 object cargs_73790_731689_734777 = args[0];
  if( (boolean_f != ((closureN)self_735707)->elements[1]) ){ 
  
closureN_type c_7311338;
object e_7311594 [5];
c_7311338.hdr.mark = gc_color_red;
 c_7311338.hdr.grayed = 0;
c_7311338.tag = closureN_tag;
 c_7311338.fn = (function_type)__lambda_589;
c_7311338.num_args = 1;
c_7311338.num_elements = 5;
c_7311338.elements = (object *)e_7311594;
c_7311338.elements[0] = cargs_73790_731689_734777;
c_7311338.elements[1] = ((closureN)self_735707)->elements[0];
c_7311338.elements[2] = ((closureN)self_735707)->elements[2];
c_7311338.elements[3] = ((closureN)self_735707)->elements[3];
c_7311338.elements[4] = ((closureN)self_735707)->elements[4];



return_direct_with_clo2(data,  __glo_set_91c_91call_91arity_67_scheme_cyclone_cgen, (((closure)  __glo_set_91c_91call_91arity_67_scheme_cyclone_cgen)->fn),  &c_7311338, Cyc_caddr(data, cargs_73790_731689_734777));
} else { 
  
closureN_type c_7311598;
object e_7311620 [2];
c_7311598.hdr.mark = gc_color_red;
 c_7311598.hdr.grayed = 0;
c_7311598.tag = closureN_tag;
 c_7311598.fn = (function_type)__lambda_621;
c_7311598.num_args = 1;
c_7311598.num_elements = 2;
c_7311598.elements = (object *)e_7311620;
c_7311598.elements[0] = cargs_73790_731689_734777;
c_7311598.elements[1] = ((closureN)self_735707)->elements[3];




make_utf8_string_with_len(c_7311624, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311598, Cyc_cadr(data, ((closureN)self_735707)->elements[0]), &c_7311624);}
;; 
}

static void __lambda_621(void *data, object self_735740, int argc, object *args) /* object self_735740, object r_733033_734828_734883_734943 */
 {
 object r_733033_734828_734883_734943 = args[0];
  
closureN_type c_7311600;
object e_7311615 [3];
c_7311600.hdr.mark = gc_color_red;
 c_7311600.hdr.grayed = 0;
c_7311600.tag = closureN_tag;
 c_7311600.fn = (function_type)__lambda_622;
c_7311600.num_args = 1;
c_7311600.num_elements = 3;
c_7311600.elements = (object *)e_7311615;
c_7311600.elements[0] = ((closureN)self_735740)->elements[0];
c_7311600.elements[1] = ((closureN)self_735740)->elements[1];
c_7311600.elements[2] = r_733033_734828_734883_734943;




make_utf8_string_with_len(c_7311619, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311600, Cyc_cadr(data, ((closureN)self_735740)->elements[0]), &c_7311619);; 
}

static void __lambda_622(void *data, object self_735741, int argc, object *args) /* object self_735741, object r_733034_734830_734885_734945_734949 */
 {
 object r_733034_734830_734885_734945_734949 = args[0];
  
closureN_type c_7311602;
object e_7311605 [1];
c_7311602.hdr.mark = gc_color_red;
 c_7311602.hdr.grayed = 0;
c_7311602.tag = closureN_tag;
 c_7311602.fn = (function_type)__lambda_623;
c_7311602.num_args = 1;
c_7311602.num_elements = 1;
c_7311602.elements = (object *)e_7311605;
c_7311602.elements[0] = ((closureN)self_735741)->elements[1];


make_utf8_string_with_len(c_7311610, "return_copy(ptr,", 16, 16);



make_utf8_string_with_len(c_7311614, ");", 2, 2);

object c_7311608 = Cyc_string_append(data,(closure)&c_7311602,5,((closureN)self_735741)->elements[2], r_733034_734830_734885_734945_734949, &c_7311610, Cyc_car(data, ((closureN)self_735741)->elements[0]), &c_7311614);
return_closcall1(data,(closure)&c_7311602,  c_7311608);; 
}

static void __lambda_623(void *data, object self_735742, int argc, object *args) /* object self_735742, object r_733032_734832_734887_734947_734951_734953 */
 {
 object r_733032_734832_734887_734947_734951_734953 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735742)->elements[0], r_733032_734832_734887_734947_734951_734953);; 
}

static void __lambda_589(void *data, object self_735708, int argc, object *args) /* object self_735708, object r_732982_734779_734834 */
 {

  
closureN_type c_7311340;
object e_7311592 [5];
c_7311340.hdr.mark = gc_color_red;
 c_7311340.hdr.grayed = 0;
c_7311340.tag = closureN_tag;
 c_7311340.fn = (function_type)__lambda_590;
c_7311340.num_args = 1;
c_7311340.num_elements = 5;
c_7311340.elements = (object *)e_7311592;
c_7311340.elements[0] = ((closureN)self_735708)->elements[0];
c_7311340.elements[1] = ((closureN)self_735708)->elements[1];
c_7311340.elements[2] = ((closureN)self_735708)->elements[2];
c_7311340.elements[3] = ((closureN)self_735708)->elements[3];
c_7311340.elements[4] = ((closureN)self_735708)->elements[4];

return_direct_with_clo2(data,  __glo_closure_91_125lam_scheme_cyclone_transforms, (((closure)  __glo_closure_91_125lam_scheme_cyclone_transforms)->fn),  &c_7311340, ((closureN)self_735708)->elements[2]);; 
}

static void __lambda_590(void *data, object self_735709, int argc, object *args) /* object self_735709, object r_733031_734780_734835 */
 {
 object r_733031_734780_734835 = args[0];
  
closureN_type c_7311342;
object e_7311591 [5];
c_7311342.hdr.mark = gc_color_red;
 c_7311342.hdr.grayed = 0;
c_7311342.tag = closureN_tag;
 c_7311342.fn = (function_type)__lambda_591;
c_7311342.num_args = 1;
c_7311342.num_elements = 5;
c_7311342.elements = (object *)e_7311591;
c_7311342.elements[0] = ((closureN)self_735709)->elements[0];
c_7311342.elements[1] = ((closureN)self_735709)->elements[1];
c_7311342.elements[2] = ((closureN)self_735709)->elements[2];
c_7311342.elements[3] = ((closureN)self_735709)->elements[3];
c_7311342.elements[4] = ((closureN)self_735709)->elements[4];

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7311342, r_733031_734780_734835);; 
}

static void __lambda_591(void *data, object self_735710, int argc, object *args) /* object self_735710, object r_732983_734781_734836 */
 {
 object r_732983_734781_734836 = args[0];
  
closureN_type c_7311344;
object e_7311348 [2];
c_7311344.hdr.mark = gc_color_red;
 c_7311344.hdr.grayed = 0;
c_7311344.tag = closureN_tag;
 c_7311344.fn = (function_type)__lambda_592;
c_7311344.num_args = 1;
c_7311344.num_elements = 2;
c_7311344.elements = (object *)e_7311348;
c_7311344.elements[0] = ((closureN)self_735710)->elements[3];
c_7311344.elements[1] = r_732983_734781_734836;


closureN_type c_7311349;
object e_7311590 [4];
c_7311349.hdr.mark = gc_color_red;
 c_7311349.hdr.grayed = 0;
c_7311349.tag = closureN_tag;
 c_7311349.fn = (function_type)__lambda_593;
c_7311349.num_args = 1;
c_7311349.num_elements = 4;
c_7311349.elements = (object *)e_7311590;
c_7311349.elements[0] = ((closureN)self_735710)->elements[0];
c_7311349.elements[1] = ((closureN)self_735710)->elements[1];
c_7311349.elements[2] = ((closureN)self_735710)->elements[2];
c_7311349.elements[3] = ((closureN)self_735710)->elements[4];

return_direct_with_clo1(data,(closure)&c_7311344,__lambda_592,  &c_7311349);; 
}

static void __lambda_593(void *data, object self_735711, int argc, object *args) /* object self_735711, object k_732985_734783_734838, object fnc_73799_731691_734784_734839 */
 {
 object k_732985_734783_734838 = args[0]; object fnc_73799_731691_734784_734839 = args[1];
  
closureN_type c_7311351;
object e_7311367 [1];
c_7311351.hdr.mark = gc_color_red;
 c_7311351.hdr.grayed = 0;
c_7311351.tag = closureN_tag;
 c_7311351.fn = (function_type)__lambda_594;
c_7311351.num_args = 0;
c_7311351.num_elements = 1;
c_7311351.elements = (object *)e_7311367;
c_7311351.elements[0] = fnc_73799_731691_734784_734839;


closureN_type c_7311368;
object e_7311589 [6];
c_7311368.hdr.mark = gc_color_red;
 c_7311368.hdr.grayed = 0;
c_7311368.tag = closureN_tag;
 c_7311368.fn = (function_type)__lambda_597;
c_7311368.num_args = 1;
c_7311368.num_elements = 6;
c_7311368.elements = (object *)e_7311589;
c_7311368.elements[0] = ((closureN)self_735711)->elements[0];
c_7311368.elements[1] = ((closureN)self_735711)->elements[1];
c_7311368.elements[2] = fnc_73799_731691_734784_734839;
c_7311368.elements[3] = ((closureN)self_735711)->elements[2];
c_7311368.elements[4] = k_732985_734783_734838;
c_7311368.elements[5] = ((closureN)self_735711)->elements[3];

return_direct_with_clo1(data,(closure)&c_7311351,__lambda_594,  &c_7311368);; 
}

static void __lambda_597(void *data, object self_735712, int argc, object *args) /* object self_735712, object r_732986_734788_734843 */
 {
 object r_732986_734788_734843 = args[0];
  if( (boolean_f != r_732986_734788_734843) ){ 
  
closureN_type c_7311370;
object e_7311457 [4];
c_7311370.hdr.mark = gc_color_red;
 c_7311370.hdr.grayed = 0;
c_7311370.tag = closureN_tag;
 c_7311370.fn = (function_type)__lambda_598;
c_7311370.num_args = 1;
c_7311370.num_elements = 4;
c_7311370.elements = (object *)e_7311457;
c_7311370.elements[0] = ((closureN)self_735712)->elements[0];
c_7311370.elements[1] = ((closureN)self_735712)->elements[1];
c_7311370.elements[2] = ((closureN)self_735712)->elements[4];
c_7311370.elements[3] = ((closureN)self_735712)->elements[5];

return_direct_with_clo2(data,  __glo_closure_91_125lam_scheme_cyclone_transforms, (((closure)  __glo_closure_91_125lam_scheme_cyclone_transforms)->fn),  &c_7311370, ((closureN)self_735712)->elements[3]);
} else { 
  
closureN_type c_7311460;
object e_7311587 [5];
c_7311460.hdr.mark = gc_color_red;
 c_7311460.hdr.grayed = 0;
c_7311460.tag = closureN_tag;
 c_7311460.fn = (function_type)__lambda_608;
c_7311460.num_args = 1;
c_7311460.num_elements = 5;
c_7311460.elements = (object *)e_7311587;
c_7311460.elements[0] = ((closureN)self_735712)->elements[0];
c_7311460.elements[1] = ((closureN)self_735712)->elements[1];
c_7311460.elements[2] = ((closureN)self_735712)->elements[3];
c_7311460.elements[3] = ((closureN)self_735712)->elements[4];
c_7311460.elements[4] = ((closureN)self_735712)->elements[5];

return_direct_with_clo2(data,  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations)->fn),  &c_7311460, ((closureN)self_735712)->elements[2]);}
;; 
}

static void __lambda_608(void *data, object self_735723, int argc, object *args) /* object self_735723, object r_733003_734804_734859 */
 {
 object r_733003_734804_734859 = args[0];
  if( (boolean_f != r_733003_734804_734859) ){ 
  
closureN_type c_7311462;
object e_7311533 [4];
c_7311462.hdr.mark = gc_color_red;
 c_7311462.hdr.grayed = 0;
c_7311462.tag = closureN_tag;
 c_7311462.fn = (function_type)__lambda_609;
c_7311462.num_args = 1;
c_7311462.num_elements = 4;
c_7311462.elements = (object *)e_7311533;
c_7311462.elements[0] = ((closureN)self_735723)->elements[0];
c_7311462.elements[1] = ((closureN)self_735723)->elements[1];
c_7311462.elements[2] = ((closureN)self_735723)->elements[3];
c_7311462.elements[3] = ((closureN)self_735723)->elements[4];

return_direct_with_clo2(data,  __glo_closure_91_125lam_scheme_cyclone_transforms, (((closure)  __glo_closure_91_125lam_scheme_cyclone_transforms)->fn),  &c_7311462, ((closureN)self_735723)->elements[2]);
} else { 
  
closureN_type c_7311536;
object e_7311582 [3];
c_7311536.hdr.mark = gc_color_red;
 c_7311536.hdr.grayed = 0;
c_7311536.tag = closureN_tag;
 c_7311536.fn = (function_type)__lambda_617;
c_7311536.num_args = 1;
c_7311536.num_elements = 3;
c_7311536.elements = (object *)e_7311582;
c_7311536.elements[0] = ((closureN)self_735723)->elements[0];
c_7311536.elements[1] = ((closureN)self_735723)->elements[3];
c_7311536.elements[2] = ((closureN)self_735723)->elements[4];




make_utf8_string_with_len(c_7311586, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311536, Cyc_cadr(data, ((closureN)self_735723)->elements[1]), &c_7311586);}
;; 
}

static void __lambda_617(void *data, object self_735732, int argc, object *args) /* object self_735732, object r_733019_734819_734874_734925 */
 {
 object r_733019_734819_734874_734925 = args[0];
  
closureN_type c_7311538;
object e_7311577 [4];
c_7311538.hdr.mark = gc_color_red;
 c_7311538.hdr.grayed = 0;
c_7311538.tag = closureN_tag;
 c_7311538.fn = (function_type)__lambda_618;
c_7311538.num_args = 1;
c_7311538.num_elements = 4;
c_7311538.elements = (object *)e_7311577;
c_7311538.elements[0] = ((closureN)self_735732)->elements[0];
c_7311538.elements[1] = ((closureN)self_735732)->elements[1];
c_7311538.elements[2] = r_733019_734819_734874_734925;
c_7311538.elements[3] = ((closureN)self_735732)->elements[2];




make_utf8_string_with_len(c_7311581, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311538, Cyc_cadr(data, ((closureN)self_735732)->elements[0]), &c_7311581);; 
}

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




object c_7311573 = Cyc_number2string2(data,(closure)&c_7311540,1,Cyc_caddr(data, ((closureN)self_735733)->elements[0]));
return_closcall1(data,(closure)&c_7311540,  c_7311573);; 
}

static void __lambda_619(void *data, object self_735734, int argc, object *args) /* object self_735734, object r_733021_734822_734877_734928_734935 */
 {
 object r_733021_734822_734877_734928_734935 = args[0];
  object r_733022_734824_734879_734930_734937;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735734)->elements[0]), obj_int2obj(0))) ){ 
  object c_7311548;
 alloc_string(data,c_7311548, 1, 1);
char tmp_7311549[] = ",";
memcpy(((string_type *)c_7311548)->str, tmp_7311549,1);
((string_type *)c_7311548)->str[1] = '\0';
  r_733022_734824_734879_734930_734937 = c_7311548;
} else { 
  object c_7311551;
 alloc_string(data,c_7311551, 0, 0);
char tmp_7311552[] = "";
memcpy(((string_type *)c_7311551)->str, tmp_7311552,0);
((string_type *)c_7311551)->str[0] = '\0';
  r_733022_734824_734879_734930_734937 = c_7311551;}
;
closureN_type c_7311554;
object e_7311557 [1];
c_7311554.hdr.mark = gc_color_red;
 c_7311554.hdr.grayed = 0;
c_7311554.tag = closureN_tag;
 c_7311554.fn = (function_type)__lambda_620;
c_7311554.num_args = 1;
c_7311554.num_elements = 1;
c_7311554.elements = (object *)e_7311557;
c_7311554.elements[0] = ((closureN)self_735734)->elements[1];


make_utf8_string_with_len(c_7311563, "return_closcall", 15, 15);

make_utf8_string_with_len(c_7311564, "(data,", 6, 6);



make_utf8_string_with_len(c_7311569, ");", 2, 2);

object c_7311560 = Cyc_string_append(data,(closure)&c_7311554,9,((closureN)self_735734)->elements[2], ((closureN)self_735734)->elements[3], &c_7311563, r_733021_734822_734877_734928_734935, &c_7311564, ((closureN)self_735734)->elements[4], r_733022_734824_734879_734930_734937, Cyc_car(data, ((closureN)self_735734)->elements[0]), &c_7311569);
return_closcall1(data,(closure)&c_7311554,  c_7311560);; 
}

static void __lambda_620(void *data, object self_735735, int argc, object *args) /* object self_735735, object r_733018_734826_734881_734932_734939_734941 */
 {
 object r_733018_734826_734881_734932_734939_734941 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735735)->elements[0], r_733018_734826_734881_734932_734939_734941);; 
}

static void __lambda_609(void *data, object self_735724, int argc, object *args) /* object self_735724, object r_733017_734805_734860 */
 {
 object r_733017_734805_734860 = args[0];
  
closureN_type c_7311464;
object e_7311532 [4];
c_7311464.hdr.mark = gc_color_red;
 c_7311464.hdr.grayed = 0;
c_7311464.tag = closureN_tag;
 c_7311464.fn = (function_type)__lambda_610;
c_7311464.num_args = 1;
c_7311464.num_elements = 4;
c_7311464.elements = (object *)e_7311532;
c_7311464.elements[0] = ((closureN)self_735724)->elements[0];
c_7311464.elements[1] = ((closureN)self_735724)->elements[1];
c_7311464.elements[2] = ((closureN)self_735724)->elements[2];
c_7311464.elements[3] = ((closureN)self_735724)->elements[3];

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7311464, r_733017_734805_734860);; 
}

static void __lambda_610(void *data, object self_735725, int argc, object *args) /* object self_735725, object lid_73820_731695_734806_734861 */
 {
 object lid_73820_731695_734806_734861 = args[0];
  
closureN_type c_7311466;
object e_7311528 [4];
c_7311466.hdr.mark = gc_color_red;
 c_7311466.hdr.grayed = 0;
c_7311466.tag = closureN_tag;
 c_7311466.fn = (function_type)__lambda_611;
c_7311466.num_args = 1;
c_7311466.num_elements = 4;
c_7311466.elements = (object *)e_7311528;
c_7311466.elements[0] = ((closureN)self_735725)->elements[0];
c_7311466.elements[1] = ((closureN)self_735725)->elements[1];
c_7311466.elements[2] = ((closureN)self_735725)->elements[2];
c_7311466.elements[3] = ((closureN)self_735725)->elements[3];


object c_7311531 = Cyc_number2string2(data,(closure)&c_7311466,1,lid_73820_731695_734806_734861);
return_closcall1(data,(closure)&c_7311466,  c_7311531);; 
}

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


make_utf8_string_with_len(c_7311527, "__lambda_", 9, 9);

object c_7311526 = Cyc_string_append(data,(closure)&c_7311468,2,&c_7311527, r_733016_734807_734862);
return_closcall1(data,(closure)&c_7311468,  c_7311526);; 
}

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




make_utf8_string_with_len(c_7311522, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311470, Cyc_cadr(data, ((closureN)self_735727)->elements[1]), &c_7311522);; 
}

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




make_utf8_string_with_len(c_7311517, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311472, Cyc_cadr(data, ((closureN)self_735728)->elements[1]), &c_7311517);; 
}

static void __lambda_614(void *data, object self_735729, int argc, object *args) /* object self_735729, object r_733008_734812_734867_734909_734916 */
 {
 object r_733008_734812_734867_734909_734916 = args[0];
  
closureN_type c_7311474;
object e_7311506 [6];
c_7311474.hdr.mark = gc_color_red;
 c_7311474.hdr.grayed = 0;
c_7311474.tag = closureN_tag;
 c_7311474.fn = (function_type)__lambda_615;
c_7311474.num_args = 1;
c_7311474.num_elements = 6;
c_7311474.elements = (object *)e_7311506;
c_7311474.elements[0] = ((closureN)self_735729)->elements[0];
c_7311474.elements[1] = ((closureN)self_735729)->elements[1];
c_7311474.elements[2] = ((closureN)self_735729)->elements[2];
c_7311474.elements[3] = ((closureN)self_735729)->elements[3];
c_7311474.elements[4] = r_733008_734812_734867_734909_734916;
c_7311474.elements[5] = ((closureN)self_735729)->elements[4];




object c_7311509 = Cyc_number2string2(data,(closure)&c_7311474,1,Cyc_caddr(data, ((closureN)self_735729)->elements[1]));
return_closcall1(data,(closure)&c_7311474,  c_7311509);; 
}

static void __lambda_615(void *data, object self_735730, int argc, object *args) /* object self_735730, object r_733009_734813_734868_734910_734917 */
 {
 object r_733009_734813_734868_734910_734917 = args[0];
  object r_733010_734815_734870_734912_734919;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735730)->elements[1]), obj_int2obj(0))) ){ 
  object c_7311482;
 alloc_string(data,c_7311482, 1, 1);
char tmp_7311483[] = ",";
memcpy(((string_type *)c_7311482)->str, tmp_7311483,1);
((string_type *)c_7311482)->str[1] = '\0';
  r_733010_734815_734870_734912_734919 = c_7311482;
} else { 
  object c_7311485;
 alloc_string(data,c_7311485, 0, 0);
char tmp_7311486[] = "";
memcpy(((string_type *)c_7311485)->str, tmp_7311486,0);
((string_type *)c_7311485)->str[0] = '\0';
  r_733010_734815_734870_734912_734919 = c_7311485;}
;
closureN_type c_7311488;
object e_7311491 [1];
c_7311488.hdr.mark = gc_color_red;
 c_7311488.hdr.grayed = 0;
c_7311488.tag = closureN_tag;
 c_7311488.fn = (function_type)__lambda_616;
c_7311488.num_args = 1;
c_7311488.num_elements = 1;
c_7311488.elements = (object *)e_7311491;
c_7311488.elements[0] = ((closureN)self_735730)->elements[2];


make_utf8_string_with_len(c_7311497, "return_direct_with_clo", 22, 22);

make_utf8_string_with_len(c_7311498, "(data,", 6, 6);

make_utf8_string_with_len(c_7311500, ",", 1, 1);



make_utf8_string_with_len(c_7311505, ");", 2, 2);

object c_7311494 = Cyc_string_append(data,(closure)&c_7311488,11,((closureN)self_735730)->elements[3], ((closureN)self_735730)->elements[4], &c_7311497, r_733009_734813_734868_734910_734917, &c_7311498, ((closureN)self_735730)->elements[5], &c_7311500, ((closureN)self_735730)->elements[0], r_733010_734815_734870_734912_734919, Cyc_car(data, ((closureN)self_735730)->elements[1]), &c_7311505);
return_closcall1(data,(closure)&c_7311488,  c_7311494);; 
}

static void __lambda_616(void *data, object self_735731, int argc, object *args) /* object self_735731, object r_733006_734817_734872_734914_734921_734923 */
 {
 object r_733006_734817_734872_734914_734921_734923 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735731)->elements[0], r_733006_734817_734872_734914_734921_734923);; 
}

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

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7311372, r_733002_734789_734844);; 
}

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


object c_7311455 = Cyc_number2string2(data,(closure)&c_7311374,1,lid_73807_731692_734790_734845);
return_closcall1(data,(closure)&c_7311374,  c_7311455);; 
}

static void __lambda_600(void *data, object self_735715, int argc, object *args) /* object self_735715, object r_733001_734791_734846 */
 {
 object r_733001_734791_734846 = args[0];
  
closureN_type c_7311376;
object e_7311447 [5];
c_7311376.hdr.mark = gc_color_red;
 c_7311376.hdr.grayed = 0;
c_7311376.tag = closureN_tag;
 c_7311376.fn = (function_type)__lambda_601;
c_7311376.num_args = 1;
c_7311376.num_elements = 5;
c_7311376.elements = (object *)e_7311447;
c_7311376.elements[0] = ((closureN)self_735715)->elements[0];
c_7311376.elements[1] = ((closureN)self_735715)->elements[1];
c_7311376.elements[2] = ((closureN)self_735715)->elements[2];
c_7311376.elements[3] = ((closureN)self_735715)->elements[3];
c_7311376.elements[4] = ((closureN)self_735715)->elements[4];


make_utf8_string_with_len(c_7311451, "__lambda_", 9, 9);

object c_7311450 = Cyc_string_append(data,(closure)&c_7311376,2,&c_7311451, r_733001_734791_734846);
return_closcall1(data,(closure)&c_7311376,  c_7311450);; 
}

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


object c_7311445 = Cyc_number2string2(data,(closure)&c_7311378,1,((closureN)self_735716)->elements[3]);
return_closcall1(data,(closure)&c_7311378,  c_7311445);; 
}

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


make_utf8_string_with_len(c_7311441, "__lambda_gc_ret_", 16, 16);

object c_7311440 = Cyc_string_append(data,(closure)&c_7311380,2,&c_7311441, r_733000_734793_734848);
return_closcall1(data,(closure)&c_7311380,  c_7311440);; 
}

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




make_utf8_string_with_len(c_7311436, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311382, Cyc_cadr(data, ((closureN)self_735718)->elements[2]), &c_7311436);; 
}

static void __lambda_604(void *data, object self_735719, int argc, object *args) /* object self_735719, object r_732991_734796_734851_734889 */
 {
 object r_732991_734796_734851_734889 = args[0];
  
closureN_type c_7311384;
object e_7311427 [6];
c_7311384.hdr.mark = gc_color_red;
 c_7311384.hdr.grayed = 0;
c_7311384.tag = closureN_tag;
 c_7311384.fn = (function_type)__lambda_605;
c_7311384.num_args = 1;
c_7311384.num_elements = 6;
c_7311384.elements = (object *)e_7311427;
c_7311384.elements[0] = ((closureN)self_735719)->elements[0];
c_7311384.elements[1] = ((closureN)self_735719)->elements[1];
c_7311384.elements[2] = ((closureN)self_735719)->elements[2];
c_7311384.elements[3] = ((closureN)self_735719)->elements[3];
c_7311384.elements[4] = r_732991_734796_734851_734889;
c_7311384.elements[5] = ((closureN)self_735719)->elements[4];




make_utf8_string_with_len(c_7311431, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311384, Cyc_cadr(data, ((closureN)self_735719)->elements[2]), &c_7311431);; 
}

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




object c_7311423 = Cyc_number2string2(data,(closure)&c_7311386,1,Cyc_caddr(data, ((closureN)self_735720)->elements[2]));
return_closcall1(data,(closure)&c_7311386,  c_7311423);; 
}

static void __lambda_606(void *data, object self_735721, int argc, object *args) /* object self_735721, object r_732993_734799_734854_734892_734899 */
 {
 object r_732993_734799_734854_734892_734899 = args[0];
  object r_732994_734801_734856_734894_734901;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735721)->elements[2]), obj_int2obj(0))) ){ 
  object c_7311394;
 alloc_string(data,c_7311394, 1, 1);
char tmp_7311395[] = ",";
memcpy(((string_type *)c_7311394)->str, tmp_7311395,1);
((string_type *)c_7311394)->str[1] = '\0';
  r_732994_734801_734856_734894_734901 = c_7311394;
} else { 
  object c_7311397;
 alloc_string(data,c_7311397, 0, 0);
char tmp_7311398[] = "";
memcpy(((string_type *)c_7311397)->str, tmp_7311398,0);
((string_type *)c_7311397)->str[0] = '\0';
  r_732994_734801_734856_734894_734901 = c_7311397;}
;
closureN_type c_7311400;
object e_7311403 [1];
c_7311400.hdr.mark = gc_color_red;
 c_7311400.hdr.grayed = 0;
c_7311400.tag = closureN_tag;
 c_7311400.fn = (function_type)__lambda_607;
c_7311400.num_args = 1;
c_7311400.num_elements = 1;
c_7311400.elements = (object *)e_7311403;
c_7311400.elements[0] = ((closureN)self_735721)->elements[3];


make_utf8_string_with_len(c_7311409, "return_direct_with_obj", 22, 22);

make_utf8_string_with_len(c_7311410, "(data,", 6, 6);

make_utf8_string_with_len(c_7311412, ",", 1, 1);

make_utf8_string_with_len(c_7311414, ",", 1, 1);



make_utf8_string_with_len(c_7311419, ");", 2, 2);

object c_7311406 = Cyc_string_append(data,(closure)&c_7311400,13,((closureN)self_735721)->elements[4], ((closureN)self_735721)->elements[5], &c_7311409, r_732993_734799_734854_734892_734899, &c_7311410, ((closureN)self_735721)->elements[6], &c_7311412, ((closureN)self_735721)->elements[0], &c_7311414, ((closureN)self_735721)->elements[1], r_732994_734801_734856_734894_734901, Cyc_car(data, ((closureN)self_735721)->elements[2]), &c_7311419);
return_closcall1(data,(closure)&c_7311400,  c_7311406);; 
}

static void __lambda_607(void *data, object self_735722, int argc, object *args) /* object self_735722, object r_732990_734803_734858_734896_734903_734905 */
 {
 object r_732990_734803_734858_734896_734903_734905 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735722)->elements[0], r_732990_734803_734858_734896_734903_734905);; 
}

static void __lambda_594(void *data, object self_735736, int argc, object *args) /* object self_735736, object k_733028_734785_734840 */
 {
 object k_733028_734785_734840 = args[0];
  if( (boolean_f != __glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen) ){ 
  
closureN_type c_7311353;
object e_7311364 [2];
c_7311353.hdr.mark = gc_color_red;
 c_7311353.hdr.grayed = 0;
c_7311353.tag = closureN_tag;
 c_7311353.fn = (function_type)__lambda_595;
c_7311353.num_args = 1;
c_7311353.num_elements = 2;
c_7311353.elements = (object *)e_7311364;
c_7311353.elements[0] = ((closureN)self_735736)->elements[0];
c_7311353.elements[1] = k_733028_734785_734840;

return_direct_with_clo2(data,  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations)->fn),  &c_7311353, ((closureN)self_735736)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_733028_734785_734840, (((closure)  k_733028_734785_734840)->fn),  boolean_f);}
;; 
}

static void __lambda_595(void *data, object self_735737, int argc, object *args) /* object self_735737, object r_733029_734786_734841 */
 {
 object r_733029_734786_734841 = args[0];
  if( (boolean_f != r_733029_734786_734841) ){ 
  
closureN_type c_7311355;
object e_7311360 [1];
c_7311355.hdr.mark = gc_color_red;
 c_7311355.hdr.grayed = 0;
c_7311355.tag = closureN_tag;
 c_7311355.fn = (function_type)__lambda_596;
c_7311355.num_args = 1;
c_7311355.num_elements = 1;
c_7311355.elements = (object *)e_7311360;
c_7311355.elements[0] = ((closureN)self_735737)->elements[1];

return_direct_with_clo2(data,  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations)->fn),  &c_7311355, ((closureN)self_735737)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735737)->elements[1], (((closure)  ((closureN)self_735737)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_596(void *data, object self_735738, int argc, object *args) /* object self_735738, object r_733030_734787_734842 */
 {
 object r_733030_734787_734842 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_735738)->elements[0], (((closure)  ((closureN)self_735738)->elements[0])->fn),  equalp(r_733030_734787_734842, obj_int2obj(1)));; 
}

static void __lambda_592(void *data, object self_735739, int argc, object *args) /* object self_735739, object r_732984_734782_734837 */
 {
 object r_732984_734782_734837 = args[0];
  return_direct_with_clo3(data,  __glo_with_91fnc_scheme_cyclone_cps_91optimizations, (((closure)  __glo_with_91fnc_scheme_cyclone_cps_91optimizations)->fn),  ((closureN)self_735739)->elements[0], ((closureN)self_735739)->elements[1], r_732984_734782_734837);; 
}

static void __lambda_502(void *data, object self_735621, int argc, object *args) /* object self_735621, object cfun_73684_731662 */
 {
 object cfun_73684_731662 = args[0];
  
closureN_type c_7310727;
object e_7311310 [8];
c_7310727.hdr.mark = gc_color_red;
 c_7310727.hdr.grayed = 0;
c_7310727.tag = closureN_tag;
 c_7310727.fn = (function_type)__lambda_503;
c_7310727.num_args = 1;
c_7310727.num_elements = 8;
c_7310727.elements = (object *)e_7311310;
c_7310727.elements[0] = ((closureN)self_735621)->elements[0];
c_7310727.elements[1] = ((closureN)self_735621)->elements[1];
c_7310727.elements[2] = ((closureN)self_735621)->elements[2];
c_7310727.elements[3] = cfun_73684_731662;
c_7310727.elements[4] = ((closureN)self_735621)->elements[3];
c_7310727.elements[5] = ((closureN)self_735621)->elements[4];
c_7310727.elements[6] = ((closureN)self_735621)->elements[5];
c_7310727.elements[7] = ((closureN)self_735621)->elements[6];



return_direct_with_clo1(data,(closure)&c_7310727,__lambda_503,  Cyc_car(data, cfun_73684_731662));; 
}

static void __lambda_503(void *data, object self_735622, int argc, object *args) /* object self_735622, object this_91cont_73687_731663_734292 */
 {
 object this_91cont_73687_731663_734292 = args[0];
  
closureN_type c_7310729;
object e_7311301 [7];
c_7310729.hdr.mark = gc_color_red;
 c_7310729.hdr.grayed = 0;
c_7310729.tag = closureN_tag;
 c_7310729.fn = (function_type)__lambda_504;
c_7310729.num_args = 1;
c_7310729.num_elements = 7;
c_7310729.elements = (object *)e_7311301;
c_7310729.elements[0] = ((closureN)self_735622)->elements[1];
c_7310729.elements[1] = ((closureN)self_735622)->elements[2];
c_7310729.elements[2] = ((closureN)self_735622)->elements[3];
c_7310729.elements[3] = ((closureN)self_735622)->elements[4];
c_7310729.elements[4] = ((closureN)self_735622)->elements[5];
c_7310729.elements[5] = ((closureN)self_735622)->elements[6];
c_7310729.elements[6] = this_91cont_73687_731663_734292;




make_utf8_string_with_len(c_7311306, "  ", 2, 2);
return_direct_with_clo8(data,  __glo_c_91compile_91args_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91args_scheme_cyclone_cgen)->fn),  &c_7310729, Cyc_cdr(data, ((closureN)self_735622)->elements[1]), ((closureN)self_735622)->elements[0], &c_7311306, this_91cont_73687_731663_734292, ((closureN)self_735622)->elements[2], ((closureN)self_735622)->elements[7], ((closureN)self_735622)->elements[4]);; 
}

static void __lambda_504(void *data, object self_735623, int argc, object *args) /* object self_735623, object cargs_73690_731664_734293 */
 {
 object cargs_73690_731664_734293 = args[0];
  object is_91cont_73699_731667_734296_734408;
    
  
if( (boolean_f != equalp(Cyc_length(data, ((closureN)self_735623)->elements[4]), obj_int2obj(4))) ){ 
  
  is_91cont_73699_731667_734296_734408 = Cyc_cadddr(data, ((closureN)self_735623)->elements[4]);
} else { 
  is_91cont_73699_731667_734296_734408 = boolean_f;}
;if( (boolean_f != ((closureN)self_735623)->elements[3]) ){ 
  
closureN_type c_7310743;
object e_7311270 [8];
c_7310743.hdr.mark = gc_color_red;
 c_7310743.hdr.grayed = 0;
c_7310743.tag = closureN_tag;
 c_7310743.fn = (function_type)__lambda_505;
c_7310743.num_args = 1;
c_7310743.num_elements = 8;
c_7310743.elements = (object *)e_7311270;
c_7310743.elements[0] = ((closureN)self_735623)->elements[0];
c_7310743.elements[1] = ((closureN)self_735623)->elements[1];
c_7310743.elements[2] = cargs_73690_731664_734293;
c_7310743.elements[3] = ((closureN)self_735623)->elements[2];
c_7310743.elements[4] = ((closureN)self_735623)->elements[4];
c_7310743.elements[5] = is_91cont_73699_731667_734296_734408;
c_7310743.elements[6] = ((closureN)self_735623)->elements[5];
c_7310743.elements[7] = ((closureN)self_735623)->elements[6];



return_direct_with_clo2(data,  __glo_set_91c_91call_91arity_67_scheme_cyclone_cgen, (((closure)  __glo_set_91c_91call_91arity_67_scheme_cyclone_cgen)->fn),  &c_7310743, Cyc_caddr(data, cargs_73690_731664_734293));
} else { 
  
closureN_type c_7311274;
object e_7311296 [2];
c_7311274.hdr.mark = gc_color_red;
 c_7311274.hdr.grayed = 0;
c_7311274.tag = closureN_tag;
 c_7311274.fn = (function_type)__lambda_581;
c_7311274.num_args = 1;
c_7311274.num_elements = 2;
c_7311274.elements = (object *)e_7311296;
c_7311274.elements[0] = cargs_73690_731664_734293;
c_7311274.elements[1] = ((closureN)self_735623)->elements[5];




make_utf8_string_with_len(c_7311300, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311274, Cyc_cadr(data, ((closureN)self_735623)->elements[2]), &c_7311300);}
;; 
}

static void __lambda_581(void *data, object self_735700, int argc, object *args) /* object self_735700, object r_732966_734401_734513_734764 */
 {
 object r_732966_734401_734513_734764 = args[0];
  
closureN_type c_7311276;
object e_7311291 [3];
c_7311276.hdr.mark = gc_color_red;
 c_7311276.hdr.grayed = 0;
c_7311276.tag = closureN_tag;
 c_7311276.fn = (function_type)__lambda_582;
c_7311276.num_args = 1;
c_7311276.num_elements = 3;
c_7311276.elements = (object *)e_7311291;
c_7311276.elements[0] = ((closureN)self_735700)->elements[0];
c_7311276.elements[1] = ((closureN)self_735700)->elements[1];
c_7311276.elements[2] = r_732966_734401_734513_734764;




make_utf8_string_with_len(c_7311295, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311276, Cyc_cadr(data, ((closureN)self_735700)->elements[0]), &c_7311295);; 
}

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


make_utf8_string_with_len(c_7311286, "return_copy(ptr,", 16, 16);



make_utf8_string_with_len(c_7311290, ");", 2, 2);

object c_7311284 = Cyc_string_append(data,(closure)&c_7311278,5,((closureN)self_735701)->elements[2], r_732967_734403_734515_734766_734770, &c_7311286, Cyc_car(data, ((closureN)self_735701)->elements[0]), &c_7311290);
return_closcall1(data,(closure)&c_7311278,  c_7311284);; 
}

static void __lambda_583(void *data, object self_735702, int argc, object *args) /* object self_735702, object r_732965_734405_734517_734768_734772_734774 */
 {
 object r_732965_734405_734517_734768_734772_734774 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735702)->elements[0], r_732965_734405_734517_734768_734772_734774);; 
}

static void __lambda_505(void *data, object self_735624, int argc, object *args) /* object self_735624, object r_732859_734298_734410_734519 */
 {

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



return_direct_with_clo2(data,  __glo_well_91known_91lambda_scheme_cyclone_cps_91optimizations, (((closure)  __glo_well_91known_91lambda_scheme_cyclone_cps_91optimizations)->fn),  &c_7310745, Cyc_car(data, ((closureN)self_735624)->elements[0]));; 
}

static void __lambda_506(void *data, object self_735625, int argc, object *args) /* object self_735625, object wkf_73707_731668_734299_734411_734520 */
 {
 object wkf_73707_731668_734299_734411_734520 = args[0];
  
closureN_type c_7310747;
object e_7310756 [1];
c_7310747.hdr.mark = gc_color_red;
 c_7310747.hdr.grayed = 0;
c_7310747.tag = closureN_tag;
 c_7310747.fn = (function_type)__lambda_507;
c_7310747.num_args = 0;
c_7310747.num_elements = 1;
c_7310747.elements = (object *)e_7310756;
c_7310747.elements[0] = wkf_73707_731668_734299_734411_734520;


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

return_direct_with_clo1(data,(closure)&c_7310747,__lambda_507,  &c_7310757);; 
}

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

return_direct_with_clo3(data,  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations)->fn),  &c_7310759, ((closureN)self_735626)->elements[0], boolean_f);; 
}

static void __lambda_510(void *data, object self_735627, int argc, object *args) /* object self_735627, object adbf_117fnc_73713_731670_734303_734415_734524 */
 {
 object adbf_117fnc_73713_731670_734303_734415_734524 = args[0];
  
closureN_type c_7310761;
object e_7310787 [2];
c_7310761.hdr.mark = gc_color_red;
 c_7310761.hdr.grayed = 0;
c_7310761.tag = closureN_tag;
 c_7310761.fn = (function_type)__lambda_511;
c_7310761.num_args = 0;
c_7310761.num_elements = 2;
c_7310761.elements = (object *)e_7310787;
c_7310761.elements[0] = adbf_117fnc_73713_731670_734303_734415_734524;
c_7310761.elements[1] = ((closureN)self_735627)->elements[3];


closureN_type c_7310788;
object e_7311262 [8];
c_7310788.hdr.mark = gc_color_red;
 c_7310788.hdr.grayed = 0;
c_7310788.tag = closureN_tag;
 c_7310788.fn = (function_type)__lambda_516;
c_7310788.num_args = 1;
c_7310788.num_elements = 8;
c_7310788.elements = (object *)e_7311262;
c_7310788.elements[0] = adbf_117fnc_73713_731670_734303_734415_734524;
c_7310788.elements[1] = ((closureN)self_735627)->elements[0];
c_7310788.elements[2] = ((closureN)self_735627)->elements[1];
c_7310788.elements[3] = ((closureN)self_735627)->elements[2];
c_7310788.elements[4] = ((closureN)self_735627)->elements[4];
c_7310788.elements[5] = ((closureN)self_735627)->elements[5];
c_7310788.elements[6] = ((closureN)self_735627)->elements[6];
c_7310788.elements[7] = ((closureN)self_735627)->elements[7];

return_direct_with_clo1(data,(closure)&c_7310761,__lambda_511,  &c_7310788);; 
}

static void __lambda_516(void *data, object self_735628, int argc, object *args) /* object self_735628, object r_732863_734309_734421_734530 */
 {
 object r_732863_734309_734421_734530 = args[0];
  if( (boolean_f != r_732863_734309_734421_734530) ){ 
  
closureN_type c_7310790;
object e_7310949 [4];
c_7310790.hdr.mark = gc_color_red;
 c_7310790.hdr.grayed = 0;
c_7310790.tag = closureN_tag;
 c_7310790.fn = (function_type)__lambda_517;
c_7310790.num_args = 1;
c_7310790.num_elements = 4;
c_7310790.elements = (object *)e_7310949;
c_7310790.elements[0] = ((closureN)self_735628)->elements[0];
c_7310790.elements[1] = ((closureN)self_735628)->elements[1];
c_7310790.elements[2] = ((closureN)self_735628)->elements[2];
c_7310790.elements[3] = ((closureN)self_735628)->elements[5];

return_direct_with_clo2(data,  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations)->fn),  &c_7310790, ((closureN)self_735628)->elements[0]);
} else { 
  
closureN_type c_7310952;
object e_7310972 [2];
c_7310952.hdr.mark = gc_color_red;
 c_7310952.hdr.grayed = 0;
c_7310952.tag = closureN_tag;
 c_7310952.fn = (function_type)__lambda_543;
c_7310952.num_args = 0;
c_7310952.num_elements = 2;
c_7310952.elements = (object *)e_7310972;
c_7310952.elements[0] = ((closureN)self_735628)->elements[3];
c_7310952.elements[1] = ((closureN)self_735628)->elements[7];


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

return_direct_with_clo1(data,(closure)&c_7310952,__lambda_543,  &c_7310973);}
;; 
}

static void __lambda_546(void *data, object self_735655, int argc, object *args) /* object self_735655, object r_732898_734349_734461_734570 */
 {
 object r_732898_734349_734461_734570 = args[0];
  if( (boolean_f != r_732898_734349_734461_734570) ){ 
  
closureN_type c_7310975;
object e_7311062 [4];
c_7310975.hdr.mark = gc_color_red;
 c_7310975.hdr.grayed = 0;
c_7310975.tag = closureN_tag;
 c_7310975.fn = (function_type)__lambda_547;
c_7310975.num_args = 1;
c_7310975.num_elements = 4;
c_7310975.elements = (object *)e_7311062;
c_7310975.elements[0] = ((closureN)self_735655)->elements[0];
c_7310975.elements[1] = ((closureN)self_735655)->elements[1];
c_7310975.elements[2] = ((closureN)self_735655)->elements[4];
c_7310975.elements[3] = ((closureN)self_735655)->elements[5];

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7310975, ((closureN)self_735655)->elements[6]);
} else { 
  
closureN_type c_7311065;
object e_7311070 [2];
c_7311065.hdr.mark = gc_color_red;
 c_7311065.hdr.grayed = 0;
c_7311065.tag = closureN_tag;
 c_7311065.fn = (function_type)__lambda_558;
c_7311065.num_args = 0;
c_7311065.num_elements = 2;
c_7311065.elements = (object *)e_7311070;
c_7311065.elements[0] = ((closureN)self_735655)->elements[2];
c_7311065.elements[1] = ((closureN)self_735655)->elements[6];


closureN_type c_7311071;
object e_7311260 [6];
c_7311071.hdr.mark = gc_color_red;
 c_7311071.hdr.grayed = 0;
c_7311071.tag = closureN_tag;
 c_7311071.fn = (function_type)__lambda_559;
c_7311071.num_args = 1;
c_7311071.num_elements = 6;
c_7311071.elements = (object *)e_7311260;
c_7311071.elements[0] = ((closureN)self_735655)->elements[0];
c_7311071.elements[1] = ((closureN)self_735655)->elements[1];
c_7311071.elements[2] = ((closureN)self_735655)->elements[3];
c_7311071.elements[3] = ((closureN)self_735655)->elements[4];
c_7311071.elements[4] = ((closureN)self_735655)->elements[5];
c_7311071.elements[5] = ((closureN)self_735655)->elements[6];

return_direct_with_clo1(data,(closure)&c_7311065,__lambda_558,  &c_7311071);}
;; 
}

static void __lambda_559(void *data, object self_735667, int argc, object *args) /* object self_735667, object r_732914_734365_734477_734586 */
 {
 object r_732914_734365_734477_734586 = args[0];
  if( (boolean_f != r_732914_734365_734477_734586) ){ 
  
closureN_type c_7311073;
object e_7311144 [4];
c_7311073.hdr.mark = gc_color_red;
 c_7311073.hdr.grayed = 0;
c_7311073.tag = closureN_tag;
 c_7311073.fn = (function_type)__lambda_560;
c_7311073.num_args = 1;
c_7311073.num_elements = 4;
c_7311073.elements = (object *)e_7311144;
c_7311073.elements[0] = ((closureN)self_735667)->elements[0];
c_7311073.elements[1] = ((closureN)self_735667)->elements[1];
c_7311073.elements[2] = ((closureN)self_735667)->elements[3];
c_7311073.elements[3] = ((closureN)self_735667)->elements[4];

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7311073, ((closureN)self_735667)->elements[5]);
} else { 
  if( (boolean_f != ((closureN)self_735667)->elements[2]) ){ 
  
closureN_type c_7311148;
object e_7311200 [3];
c_7311148.hdr.mark = gc_color_red;
 c_7311148.hdr.grayed = 0;
c_7311148.tag = closureN_tag;
 c_7311148.fn = (function_type)__lambda_569;
c_7311148.num_args = 1;
c_7311148.num_elements = 3;
c_7311148.elements = (object *)e_7311200;
c_7311148.elements[0] = ((closureN)self_735667)->elements[0];
c_7311148.elements[1] = ((closureN)self_735667)->elements[3];
c_7311148.elements[2] = ((closureN)self_735667)->elements[4];




make_utf8_string_with_len(c_7311204, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311148, Cyc_cadr(data, ((closureN)self_735667)->elements[1]), &c_7311204);
} else { 
  
closureN_type c_7311206;
object e_7311255 [3];
c_7311206.hdr.mark = gc_color_red;
 c_7311206.hdr.grayed = 0;
c_7311206.tag = closureN_tag;
 c_7311206.fn = (function_type)__lambda_575;
c_7311206.num_args = 1;
c_7311206.num_elements = 3;
c_7311206.elements = (object *)e_7311255;
c_7311206.elements[0] = ((closureN)self_735667)->elements[0];
c_7311206.elements[1] = ((closureN)self_735667)->elements[3];
c_7311206.elements[2] = ((closureN)self_735667)->elements[4];




make_utf8_string_with_len(c_7311259, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311206, Cyc_cadr(data, ((closureN)self_735667)->elements[1]), &c_7311259);}
;}
;; 
}

static void __lambda_575(void *data, object self_735683, int argc, object *args) /* object self_735683, object r_732941_734390_734502_734611_734734 */
 {
 object r_732941_734390_734502_734611_734734 = args[0];
  
closureN_type c_7311208;
object e_7311250 [4];
c_7311208.hdr.mark = gc_color_red;
 c_7311208.hdr.grayed = 0;
c_7311208.tag = closureN_tag;
 c_7311208.fn = (function_type)__lambda_576;
c_7311208.num_args = 1;
c_7311208.num_elements = 4;
c_7311208.elements = (object *)e_7311250;
c_7311208.elements[0] = ((closureN)self_735683)->elements[0];
c_7311208.elements[1] = ((closureN)self_735683)->elements[1];
c_7311208.elements[2] = r_732941_734390_734502_734611_734734;
c_7311208.elements[3] = ((closureN)self_735683)->elements[2];




make_utf8_string_with_len(c_7311254, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311208, Cyc_cadr(data, ((closureN)self_735683)->elements[0]), &c_7311254);; 
}

static void __lambda_576(void *data, object self_735684, int argc, object *args) /* object self_735684, object r_732942_734392_734504_734613_734736_734745 */
 {
 object r_732942_734392_734504_734613_734736_734745 = args[0];
  
closureN_type c_7311210;
object e_7311243 [5];
c_7311210.hdr.mark = gc_color_red;
 c_7311210.hdr.grayed = 0;
c_7311210.tag = closureN_tag;
 c_7311210.fn = (function_type)__lambda_577;
c_7311210.num_args = 1;
c_7311210.num_elements = 5;
c_7311210.elements = (object *)e_7311243;
c_7311210.elements[0] = ((closureN)self_735684)->elements[0];
c_7311210.elements[1] = ((closureN)self_735684)->elements[1];
c_7311210.elements[2] = ((closureN)self_735684)->elements[2];
c_7311210.elements[3] = r_732942_734392_734504_734613_734736_734745;
c_7311210.elements[4] = ((closureN)self_735684)->elements[3];




object c_7311246 = Cyc_number2string2(data,(closure)&c_7311210,1,Cyc_caddr(data, ((closureN)self_735684)->elements[0]));
return_closcall1(data,(closure)&c_7311210,  c_7311246);; 
}

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


closureN_type c_7311223;
object e_7311242 [6];
c_7311223.hdr.mark = gc_color_red;
 c_7311223.hdr.grayed = 0;
c_7311223.tag = closureN_tag;
 c_7311223.fn = (function_type)__lambda_579;
c_7311223.num_args = 1;
c_7311223.num_elements = 6;
c_7311223.elements = (object *)e_7311242;
c_7311223.elements[0] = ((closureN)self_735685)->elements[0];
c_7311223.elements[1] = ((closureN)self_735685)->elements[1];
c_7311223.elements[2] = ((closureN)self_735685)->elements[2];
c_7311223.elements[3] = ((closureN)self_735685)->elements[3];
c_7311223.elements[4] = r_732943_734394_734506_734615_734738_734747_734754;
c_7311223.elements[5] = ((closureN)self_735685)->elements[4];

return_direct_with_clo1(data,(closure)&c_7311212,__lambda_578,  &c_7311223);; 
}

static void __lambda_579(void *data, object self_735686, int argc, object *args) /* object self_735686, object r_732944_734397_734509_734618_734741_734750_734757 */
 {
 object r_732944_734397_734509_734618_734741_734750_734757 = args[0];
  
closureN_type c_7311225;
object e_7311228 [1];
c_7311225.hdr.mark = gc_color_red;
 c_7311225.hdr.grayed = 0;
c_7311225.tag = closureN_tag;
 c_7311225.fn = (function_type)__lambda_580;
c_7311225.num_args = 1;
c_7311225.num_elements = 1;
c_7311225.elements = (object *)e_7311228;
c_7311225.elements[0] = ((closureN)self_735686)->elements[1];


make_utf8_string_with_len(c_7311234, "return_closcall", 15, 15);

make_utf8_string_with_len(c_7311236, "(data,", 6, 6);



make_utf8_string_with_len(c_7311241, ");", 2, 2);

object c_7311231 = Cyc_string_append(data,(closure)&c_7311225,9,((closureN)self_735686)->elements[2], ((closureN)self_735686)->elements[3], &c_7311234, ((closureN)self_735686)->elements[4], &c_7311236, ((closureN)self_735686)->elements[5], r_732944_734397_734509_734618_734741_734750_734757, Cyc_car(data, ((closureN)self_735686)->elements[0]), &c_7311241);
return_closcall1(data,(closure)&c_7311225,  c_7311231);; 
}

static void __lambda_580(void *data, object self_735687, int argc, object *args) /* object self_735687, object r_732940_734399_734511_734620_734743_734752_734759_734762 */
 {
 object r_732940_734399_734511_734620_734743_734752_734759_734762 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735687)->elements[0], r_732940_734399_734511_734620_734743_734752_734759_734762);; 
}

static void __lambda_578(void *data, object self_735688, int argc, object *args) /* object self_735688, object k_732946_734395_734507_734616_734739_734748_734755 */
 {
 object k_732946_734395_734507_734616_734739_734748_734755 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735688)->elements[0]), obj_int2obj(0))) ){ 
  
make_utf8_string_with_len(c_7311219, ",", 1, 1);
return_direct_with_clo1(data,  k_732946_734395_734507_734616_734739_734748_734755,__lambda_579,  &c_7311219);
} else { 
  
make_utf8_string_with_len(c_7311221, "", 0, 0);
return_direct_with_clo1(data,  k_732946_734395_734507_734616_734739_734748_734755,__lambda_579,  &c_7311221);}
;; 
}

static void __lambda_569(void *data, object self_735677, int argc, object *args) /* object self_735677, object r_732929_734379_734491_734600_734704 */
 {
 object r_732929_734379_734491_734600_734704 = args[0];
  
closureN_type c_7311150;
object e_7311195 [4];
c_7311150.hdr.mark = gc_color_red;
 c_7311150.hdr.grayed = 0;
c_7311150.tag = closureN_tag;
 c_7311150.fn = (function_type)__lambda_570;
c_7311150.num_args = 1;
c_7311150.num_elements = 4;
c_7311150.elements = (object *)e_7311195;
c_7311150.elements[0] = ((closureN)self_735677)->elements[0];
c_7311150.elements[1] = ((closureN)self_735677)->elements[1];
c_7311150.elements[2] = r_732929_734379_734491_734600_734704;
c_7311150.elements[3] = ((closureN)self_735677)->elements[2];




make_utf8_string_with_len(c_7311199, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311150, Cyc_cadr(data, ((closureN)self_735677)->elements[0]), &c_7311199);; 
}

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




object c_7311191 = Cyc_number2string2(data,(closure)&c_7311152,1,Cyc_caddr(data, ((closureN)self_735678)->elements[0]));
return_closcall1(data,(closure)&c_7311152,  c_7311191);; 
}

static void __lambda_571(void *data, object self_735679, int argc, object *args) /* object self_735679, object r_732931_734383_734495_734604_734708_734717_734724 */
 {
 object r_732931_734383_734495_734604_734708_734717_734724 = args[0];
  
closureN_type c_7311154;
object e_7311164 [1];
c_7311154.hdr.mark = gc_color_red;
 c_7311154.hdr.grayed = 0;
c_7311154.tag = closureN_tag;
 c_7311154.fn = (function_type)__lambda_572;
c_7311154.num_args = 0;
c_7311154.num_elements = 1;
c_7311154.elements = (object *)e_7311164;
c_7311154.elements[0] = ((closureN)self_735679)->elements[0];


closureN_type c_7311165;
object e_7311187 [6];
c_7311165.hdr.mark = gc_color_red;
 c_7311165.hdr.grayed = 0;
c_7311165.tag = closureN_tag;
 c_7311165.fn = (function_type)__lambda_573;
c_7311165.num_args = 1;
c_7311165.num_elements = 6;
c_7311165.elements = (object *)e_7311187;
c_7311165.elements[0] = ((closureN)self_735679)->elements[0];
c_7311165.elements[1] = ((closureN)self_735679)->elements[1];
c_7311165.elements[2] = ((closureN)self_735679)->elements[2];
c_7311165.elements[3] = ((closureN)self_735679)->elements[3];
c_7311165.elements[4] = r_732931_734383_734495_734604_734708_734717_734724;
c_7311165.elements[5] = ((closureN)self_735679)->elements[4];

return_direct_with_clo1(data,(closure)&c_7311154,__lambda_572,  &c_7311165);; 
}

static void __lambda_573(void *data, object self_735680, int argc, object *args) /* object self_735680, object r_732932_734386_734498_734607_734711_734720_734727 */
 {
 object r_732932_734386_734498_734607_734711_734720_734727 = args[0];
  
closureN_type c_7311167;
object e_7311170 [1];
c_7311167.hdr.mark = gc_color_red;
 c_7311167.hdr.grayed = 0;
c_7311167.tag = closureN_tag;
 c_7311167.fn = (function_type)__lambda_574;
c_7311167.num_args = 1;
c_7311167.num_elements = 1;
c_7311167.elements = (object *)e_7311170;
c_7311167.elements[0] = ((closureN)self_735680)->elements[1];


make_utf8_string_with_len(c_7311176, "return_direct_with_clo", 22, 22);

make_utf8_string_with_len(c_7311178, "(data,", 6, 6);

make_utf8_string_with_len(c_7311180, ", (((closure)", 13, 13);

make_utf8_string_with_len(c_7311182, ")->fn)", 6, 6);



make_utf8_string_with_len(c_7311186, ");", 2, 2);

object c_7311173 = Cyc_string_append(data,(closure)&c_7311167,12,((closureN)self_735680)->elements[2], ((closureN)self_735680)->elements[3], &c_7311176, ((closureN)self_735680)->elements[4], &c_7311178, ((closureN)self_735680)->elements[5], &c_7311180, ((closureN)self_735680)->elements[5], &c_7311182, r_732932_734386_734498_734607_734711_734720_734727, Cyc_car(data, ((closureN)self_735680)->elements[0]), &c_7311186);
return_closcall1(data,(closure)&c_7311167,  c_7311173);; 
}

static void __lambda_574(void *data, object self_735681, int argc, object *args) /* object self_735681, object r_732928_734388_734500_734609_734713_734722_734729_734732 */
 {
 object r_732928_734388_734500_734609_734713_734722_734729_734732 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735681)->elements[0], r_732928_734388_734500_734609_734713_734722_734729_734732);; 
}

static void __lambda_572(void *data, object self_735682, int argc, object *args) /* object self_735682, object k_732934_734384_734496_734605_734709_734718_734725 */
 {
 object k_732934_734384_734496_734605_734709_734718_734725 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735682)->elements[0]), obj_int2obj(0))) ){ 
  
make_utf8_string_with_len(c_7311161, ",", 1, 1);
return_direct_with_clo1(data,  k_732934_734384_734496_734605_734709_734718_734725,__lambda_573,  &c_7311161);
} else { 
  
make_utf8_string_with_len(c_7311163, "", 0, 0);
return_direct_with_clo1(data,  k_732934_734384_734496_734605_734709_734718_734725,__lambda_573,  &c_7311163);}
;; 
}

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


object c_7311143 = Cyc_number2string2(data,(closure)&c_7311075,1,lid_73769_731685_734366_734478_734587);
return_closcall1(data,(closure)&c_7311075,  c_7311143);; 
}

static void __lambda_561(void *data, object self_735669, int argc, object *args) /* object self_735669, object r_732927_734367_734479_734588 */
 {
 object r_732927_734367_734479_734588 = args[0];
  
closureN_type c_7311077;
object e_7311135 [4];
c_7311077.hdr.mark = gc_color_red;
 c_7311077.hdr.grayed = 0;
c_7311077.tag = closureN_tag;
 c_7311077.fn = (function_type)__lambda_562;
c_7311077.num_args = 1;
c_7311077.num_elements = 4;
c_7311077.elements = (object *)e_7311135;
c_7311077.elements[0] = ((closureN)self_735669)->elements[0];
c_7311077.elements[1] = ((closureN)self_735669)->elements[1];
c_7311077.elements[2] = ((closureN)self_735669)->elements[2];
c_7311077.elements[3] = ((closureN)self_735669)->elements[3];


make_utf8_string_with_len(c_7311139, "__lambda_", 9, 9);

object c_7311138 = Cyc_string_append(data,(closure)&c_7311077,2,&c_7311139, r_732927_734367_734479_734588);
return_closcall1(data,(closure)&c_7311077,  c_7311138);; 
}

static void __lambda_562(void *data, object self_735670, int argc, object *args) /* object self_735670, object c_91lambda_91fnc_91str_73772_731686_734368_734480_734589 */
 {
 object c_91lambda_91fnc_91str_73772_731686_734368_734480_734589 = args[0];
  
closureN_type c_7311079;
object e_7311130 [4];
c_7311079.hdr.mark = gc_color_red;
 c_7311079.hdr.grayed = 0;
c_7311079.tag = closureN_tag;
 c_7311079.fn = (function_type)__lambda_563;
c_7311079.num_args = 1;
c_7311079.num_elements = 4;
c_7311079.elements = (object *)e_7311130;
c_7311079.elements[0] = c_91lambda_91fnc_91str_73772_731686_734368_734480_734589;
c_7311079.elements[1] = ((closureN)self_735670)->elements[0];
c_7311079.elements[2] = ((closureN)self_735670)->elements[2];
c_7311079.elements[3] = ((closureN)self_735670)->elements[3];




make_utf8_string_with_len(c_7311134, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311079, Cyc_cadr(data, ((closureN)self_735670)->elements[1]), &c_7311134);; 
}

static void __lambda_563(void *data, object self_735671, int argc, object *args) /* object self_735671, object r_732918_734370_734482_734591_734686 */
 {
 object r_732918_734370_734482_734591_734686 = args[0];
  
closureN_type c_7311081;
object e_7311125 [5];
c_7311081.hdr.mark = gc_color_red;
 c_7311081.hdr.grayed = 0;
c_7311081.tag = closureN_tag;
 c_7311081.fn = (function_type)__lambda_564;
c_7311081.num_args = 1;
c_7311081.num_elements = 5;
c_7311081.elements = (object *)e_7311125;
c_7311081.elements[0] = ((closureN)self_735671)->elements[0];
c_7311081.elements[1] = ((closureN)self_735671)->elements[1];
c_7311081.elements[2] = ((closureN)self_735671)->elements[2];
c_7311081.elements[3] = r_732918_734370_734482_734591_734686;
c_7311081.elements[4] = ((closureN)self_735671)->elements[3];




make_utf8_string_with_len(c_7311129, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7311081, Cyc_cadr(data, ((closureN)self_735671)->elements[1]), &c_7311129);; 
}

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




object c_7311121 = Cyc_number2string2(data,(closure)&c_7311083,1,Cyc_caddr(data, ((closureN)self_735672)->elements[1]));
return_closcall1(data,(closure)&c_7311083,  c_7311121);; 
}

static void __lambda_565(void *data, object self_735673, int argc, object *args) /* object self_735673, object r_732920_734373_734485_734594_734689_734696 */
 {
 object r_732920_734373_734485_734594_734689_734696 = args[0];
  
closureN_type c_7311085;
object e_7311095 [1];
c_7311085.hdr.mark = gc_color_red;
 c_7311085.hdr.grayed = 0;
c_7311085.tag = closureN_tag;
 c_7311085.fn = (function_type)__lambda_566;
c_7311085.num_args = 0;
c_7311085.num_elements = 1;
c_7311085.elements = (object *)e_7311095;
c_7311085.elements[0] = ((closureN)self_735673)->elements[1];


closureN_type c_7311096;
object e_7311117 [7];
c_7311096.hdr.mark = gc_color_red;
 c_7311096.hdr.grayed = 0;
c_7311096.tag = closureN_tag;
 c_7311096.fn = (function_type)__lambda_567;
c_7311096.num_args = 1;
c_7311096.num_elements = 7;
c_7311096.elements = (object *)e_7311117;
c_7311096.elements[0] = ((closureN)self_735673)->elements[0];
c_7311096.elements[1] = ((closureN)self_735673)->elements[1];
c_7311096.elements[2] = ((closureN)self_735673)->elements[2];
c_7311096.elements[3] = ((closureN)self_735673)->elements[3];
c_7311096.elements[4] = ((closureN)self_735673)->elements[4];
c_7311096.elements[5] = r_732920_734373_734485_734594_734689_734696;
c_7311096.elements[6] = ((closureN)self_735673)->elements[5];

return_direct_with_clo1(data,(closure)&c_7311085,__lambda_566,  &c_7311096);; 
}

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


make_utf8_string_with_len(c_7311107, "return_direct_with_clo", 22, 22);

make_utf8_string_with_len(c_7311109, "(data,", 6, 6);

make_utf8_string_with_len(c_7311111, ",", 1, 1);



make_utf8_string_with_len(c_7311116, ");", 2, 2);

object c_7311104 = Cyc_string_append(data,(closure)&c_7311098,11,((closureN)self_735674)->elements[3], ((closureN)self_735674)->elements[4], &c_7311107, ((closureN)self_735674)->elements[5], &c_7311109, ((closureN)self_735674)->elements[6], &c_7311111, ((closureN)self_735674)->elements[0], r_732921_734375_734487_734596_734691_734698, Cyc_car(data, ((closureN)self_735674)->elements[1]), &c_7311116);
return_closcall1(data,(closure)&c_7311098,  c_7311104);; 
}

static void __lambda_568(void *data, object self_735675, int argc, object *args) /* object self_735675, object r_732917_734377_734489_734598_734693_734700_734702 */
 {
 object r_732917_734377_734489_734598_734693_734700_734702 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735675)->elements[0], r_732917_734377_734489_734598_734693_734700_734702);; 
}

static void __lambda_566(void *data, object self_735676, int argc, object *args) /* object self_735676, object k_732923_734374_734486_734595_734690_734697 */
 {
 object k_732923_734374_734486_734595_734690_734697 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735676)->elements[0]), obj_int2obj(0))) ){ 
  
make_utf8_string_with_len(c_7311092, ",", 1, 1);
return_direct_with_clo1(data,  k_732923_734374_734486_734595_734690_734697,__lambda_567,  &c_7311092);
} else { 
  
make_utf8_string_with_len(c_7311094, "", 0, 0);
return_direct_with_clo1(data,  k_732923_734374_734486_734595_734690_734697,__lambda_567,  &c_7311094);}
;; 
}

static void __lambda_558(void *data, object self_735689, int argc, object *args) /* object self_735689, object k_732952_734364_734476_734585 */
 {
 object k_732952_734364_734476_734585 = args[0];
  if( (boolean_f != ((closureN)self_735689)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_732952_734364_734476_734585,__lambda_559,  ((closureN)self_735689)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_732952_734364_734476_734585,__lambda_559,  boolean_f);}
;; 
}

static void __lambda_547(void *data, object self_735656, int argc, object *args) /* object self_735656, object lid_73755_731682_734350_734462_734571 */
 {
 object lid_73755_731682_734350_734462_734571 = args[0];
  
closureN_type c_7310977;
object e_7311058 [5];
c_7310977.hdr.mark = gc_color_red;
 c_7310977.hdr.grayed = 0;
c_7310977.tag = closureN_tag;
 c_7310977.fn = (function_type)__lambda_548;
c_7310977.num_args = 1;
c_7310977.num_elements = 5;
c_7310977.elements = (object *)e_7311058;
c_7310977.elements[0] = ((closureN)self_735656)->elements[0];
c_7310977.elements[1] = ((closureN)self_735656)->elements[1];
c_7310977.elements[2] = ((closureN)self_735656)->elements[2];
c_7310977.elements[3] = lid_73755_731682_734350_734462_734571;
c_7310977.elements[4] = ((closureN)self_735656)->elements[3];


object c_7311061 = Cyc_number2string2(data,(closure)&c_7310977,1,lid_73755_731682_734350_734462_734571);
return_closcall1(data,(closure)&c_7310977,  c_7311061);; 
}

static void __lambda_548(void *data, object self_735657, int argc, object *args) /* object self_735657, object r_732913_734351_734463_734572 */
 {
 object r_732913_734351_734463_734572 = args[0];
  
closureN_type c_7310979;
object e_7311053 [5];
c_7310979.hdr.mark = gc_color_red;
 c_7310979.hdr.grayed = 0;
c_7310979.tag = closureN_tag;
 c_7310979.fn = (function_type)__lambda_549;
c_7310979.num_args = 1;
c_7310979.num_elements = 5;
c_7310979.elements = (object *)e_7311053;
c_7310979.elements[0] = ((closureN)self_735657)->elements[0];
c_7310979.elements[1] = ((closureN)self_735657)->elements[1];
c_7310979.elements[2] = ((closureN)self_735657)->elements[2];
c_7310979.elements[3] = ((closureN)self_735657)->elements[3];
c_7310979.elements[4] = ((closureN)self_735657)->elements[4];


make_utf8_string_with_len(c_7311057, "__lambda_", 9, 9);

object c_7311056 = Cyc_string_append(data,(closure)&c_7310979,2,&c_7311057, r_732913_734351_734463_734572);
return_closcall1(data,(closure)&c_7310979,  c_7311056);; 
}

static void __lambda_549(void *data, object self_735658, int argc, object *args) /* object self_735658, object c_91lambda_91fnc_91str_73758_731683_734352_734464_734573 */
 {
 object c_91lambda_91fnc_91str_73758_731683_734352_734464_734573 = args[0];
  
closureN_type c_7310981;
object e_7311048 [5];
c_7310981.hdr.mark = gc_color_red;
 c_7310981.hdr.grayed = 0;
c_7310981.tag = closureN_tag;
 c_7310981.fn = (function_type)__lambda_550;
c_7310981.num_args = 1;
c_7310981.num_elements = 5;
c_7310981.elements = (object *)e_7311048;
c_7310981.elements[0] = c_91lambda_91fnc_91str_73758_731683_734352_734464_734573;
c_7310981.elements[1] = ((closureN)self_735658)->elements[0];
c_7310981.elements[2] = ((closureN)self_735658)->elements[1];
c_7310981.elements[3] = ((closureN)self_735658)->elements[2];
c_7310981.elements[4] = ((closureN)self_735658)->elements[4];


object c_7311051 = Cyc_number2string2(data,(closure)&c_7310981,1,((closureN)self_735658)->elements[3]);
return_closcall1(data,(closure)&c_7310981,  c_7311051);; 
}

static void __lambda_550(void *data, object self_735659, int argc, object *args) /* object self_735659, object r_732912_734353_734465_734574 */
 {
 object r_732912_734353_734465_734574 = args[0];
  
closureN_type c_7310983;
object e_7311043 [5];
c_7310983.hdr.mark = gc_color_red;
 c_7310983.hdr.grayed = 0;
c_7310983.tag = closureN_tag;
 c_7310983.fn = (function_type)__lambda_551;
c_7310983.num_args = 1;
c_7310983.num_elements = 5;
c_7310983.elements = (object *)e_7311043;
c_7310983.elements[0] = ((closureN)self_735659)->elements[0];
c_7310983.elements[1] = ((closureN)self_735659)->elements[1];
c_7310983.elements[2] = ((closureN)self_735659)->elements[2];
c_7310983.elements[3] = ((closureN)self_735659)->elements[3];
c_7310983.elements[4] = ((closureN)self_735659)->elements[4];


make_utf8_string_with_len(c_7311047, "__lambda_gc_ret_", 16, 16);

object c_7311046 = Cyc_string_append(data,(closure)&c_7310983,2,&c_7311047, r_732912_734353_734465_734574);
return_closcall1(data,(closure)&c_7310983,  c_7311046);; 
}

static void __lambda_551(void *data, object self_735660, int argc, object *args) /* object self_735660, object c_91lambda_91fnc_91gc_91ret_91str_73761_731684_734354_734466_734575 */
 {
 object c_91lambda_91fnc_91gc_91ret_91str_73761_731684_734354_734466_734575 = args[0];
  
closureN_type c_7310985;
object e_7311038 [5];
c_7310985.hdr.mark = gc_color_red;
 c_7310985.hdr.grayed = 0;
c_7310985.tag = closureN_tag;
 c_7310985.fn = (function_type)__lambda_552;
c_7310985.num_args = 1;
c_7310985.num_elements = 5;
c_7310985.elements = (object *)e_7311038;
c_7310985.elements[0] = c_91lambda_91fnc_91gc_91ret_91str_73761_731684_734354_734466_734575;
c_7310985.elements[1] = ((closureN)self_735660)->elements[0];
c_7310985.elements[2] = ((closureN)self_735660)->elements[1];
c_7310985.elements[3] = ((closureN)self_735660)->elements[3];
c_7310985.elements[4] = ((closureN)self_735660)->elements[4];




make_utf8_string_with_len(c_7311042, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7310985, Cyc_cadr(data, ((closureN)self_735660)->elements[2]), &c_7311042);; 
}

static void __lambda_552(void *data, object self_735661, int argc, object *args) /* object self_735661, object r_732903_734356_734468_734577_734668 */
 {
 object r_732903_734356_734468_734577_734668 = args[0];
  
closureN_type c_7310987;
object e_7311033 [6];
c_7310987.hdr.mark = gc_color_red;
 c_7310987.hdr.grayed = 0;
c_7310987.tag = closureN_tag;
 c_7310987.fn = (function_type)__lambda_553;
c_7310987.num_args = 1;
c_7310987.num_elements = 6;
c_7310987.elements = (object *)e_7311033;
c_7310987.elements[0] = ((closureN)self_735661)->elements[0];
c_7310987.elements[1] = ((closureN)self_735661)->elements[1];
c_7310987.elements[2] = ((closureN)self_735661)->elements[2];
c_7310987.elements[3] = ((closureN)self_735661)->elements[3];
c_7310987.elements[4] = r_732903_734356_734468_734577_734668;
c_7310987.elements[5] = ((closureN)self_735661)->elements[4];




make_utf8_string_with_len(c_7311037, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7310987, Cyc_cadr(data, ((closureN)self_735661)->elements[2]), &c_7311037);; 
}

static void __lambda_553(void *data, object self_735662, int argc, object *args) /* object self_735662, object r_732904_734358_734470_734579_734670_734677 */
 {
 object r_732904_734358_734470_734579_734670_734677 = args[0];
  
closureN_type c_7310989;
object e_7311026 [7];
c_7310989.hdr.mark = gc_color_red;
 c_7310989.hdr.grayed = 0;
c_7310989.tag = closureN_tag;
 c_7310989.fn = (function_type)__lambda_554;
c_7310989.num_args = 1;
c_7310989.num_elements = 7;
c_7310989.elements = (object *)e_7311026;
c_7310989.elements[0] = ((closureN)self_735662)->elements[0];
c_7310989.elements[1] = ((closureN)self_735662)->elements[1];
c_7310989.elements[2] = ((closureN)self_735662)->elements[2];
c_7310989.elements[3] = ((closureN)self_735662)->elements[3];
c_7310989.elements[4] = ((closureN)self_735662)->elements[4];
c_7310989.elements[5] = r_732904_734358_734470_734579_734670_734677;
c_7310989.elements[6] = ((closureN)self_735662)->elements[5];




object c_7311029 = Cyc_number2string2(data,(closure)&c_7310989,1,Cyc_caddr(data, ((closureN)self_735662)->elements[2]));
return_closcall1(data,(closure)&c_7310989,  c_7311029);; 
}

static void __lambda_554(void *data, object self_735663, int argc, object *args) /* object self_735663, object r_732905_734359_734471_734580_734671_734678 */
 {
 object r_732905_734359_734471_734580_734671_734678 = args[0];
  
closureN_type c_7310991;
object e_7311001 [1];
c_7310991.hdr.mark = gc_color_red;
 c_7310991.hdr.grayed = 0;
c_7310991.tag = closureN_tag;
 c_7310991.fn = (function_type)__lambda_555;
c_7310991.num_args = 0;
c_7310991.num_elements = 1;
c_7310991.elements = (object *)e_7311001;
c_7310991.elements[0] = ((closureN)self_735663)->elements[2];


closureN_type c_7311002;
object e_7311025 [8];
c_7311002.hdr.mark = gc_color_red;
 c_7311002.hdr.grayed = 0;
c_7311002.tag = closureN_tag;
 c_7311002.fn = (function_type)__lambda_556;
c_7311002.num_args = 1;
c_7311002.num_elements = 8;
c_7311002.elements = (object *)e_7311025;
c_7311002.elements[0] = ((closureN)self_735663)->elements[0];
c_7311002.elements[1] = ((closureN)self_735663)->elements[1];
c_7311002.elements[2] = ((closureN)self_735663)->elements[2];
c_7311002.elements[3] = ((closureN)self_735663)->elements[3];
c_7311002.elements[4] = ((closureN)self_735663)->elements[4];
c_7311002.elements[5] = ((closureN)self_735663)->elements[5];
c_7311002.elements[6] = r_732905_734359_734471_734580_734671_734678;
c_7311002.elements[7] = ((closureN)self_735663)->elements[6];

return_direct_with_clo1(data,(closure)&c_7310991,__lambda_555,  &c_7311002);; 
}

static void __lambda_556(void *data, object self_735664, int argc, object *args) /* object self_735664, object r_732906_734361_734473_734582_734673_734680 */
 {
 object r_732906_734361_734473_734582_734673_734680 = args[0];
  
closureN_type c_7311004;
object e_7311007 [1];
c_7311004.hdr.mark = gc_color_red;
 c_7311004.hdr.grayed = 0;
c_7311004.tag = closureN_tag;
 c_7311004.fn = (function_type)__lambda_557;
c_7311004.num_args = 1;
c_7311004.num_elements = 1;
c_7311004.elements = (object *)e_7311007;
c_7311004.elements[0] = ((closureN)self_735664)->elements[3];


make_utf8_string_with_len(c_7311013, "return_direct_with_obj", 22, 22);

make_utf8_string_with_len(c_7311015, "(data,", 6, 6);

make_utf8_string_with_len(c_7311017, ",", 1, 1);

make_utf8_string_with_len(c_7311019, ",", 1, 1);



make_utf8_string_with_len(c_7311024, ");", 2, 2);

object c_7311010 = Cyc_string_append(data,(closure)&c_7311004,13,((closureN)self_735664)->elements[4], ((closureN)self_735664)->elements[5], &c_7311013, ((closureN)self_735664)->elements[6], &c_7311015, ((closureN)self_735664)->elements[7], &c_7311017, ((closureN)self_735664)->elements[0], &c_7311019, ((closureN)self_735664)->elements[1], r_732906_734361_734473_734582_734673_734680, Cyc_car(data, ((closureN)self_735664)->elements[2]), &c_7311024);
return_closcall1(data,(closure)&c_7311004,  c_7311010);; 
}

static void __lambda_557(void *data, object self_735665, int argc, object *args) /* object self_735665, object r_732902_734363_734475_734584_734675_734682_734684 */
 {
 object r_732902_734363_734475_734584_734675_734682_734684 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735665)->elements[0], r_732902_734363_734475_734584_734675_734682_734684);; 
}

static void __lambda_555(void *data, object self_735666, int argc, object *args) /* object self_735666, object k_732908_734360_734472_734581_734672_734679 */
 {
 object k_732908_734360_734472_734581_734672_734679 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735666)->elements[0]), obj_int2obj(0))) ){ 
  
make_utf8_string_with_len(c_7310998, ",", 1, 1);
return_direct_with_clo1(data,  k_732908_734360_734472_734581_734672_734679,__lambda_556,  &c_7310998);
} else { 
  
make_utf8_string_with_len(c_7311000, "", 0, 0);
return_direct_with_clo1(data,  k_732908_734360_734472_734581_734672_734679,__lambda_556,  &c_7311000);}
;; 
}

static void __lambda_543(void *data, object self_735690, int argc, object *args) /* object self_735690, object k_732953_734346_734458_734567 */
 {
 object k_732953_734346_734458_734567 = args[0];
  if( (boolean_f != ((closureN)self_735690)->elements[1]) ){ 
  if( (boolean_f != ((closureN)self_735690)->elements[0]) ){ 
  if( (boolean_f != __glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen) ){ 
  
closureN_type c_7310956;
object e_7310967 [2];
c_7310956.hdr.mark = gc_color_red;
 c_7310956.hdr.grayed = 0;
c_7310956.tag = closureN_tag;
 c_7310956.fn = (function_type)__lambda_544;
c_7310956.num_args = 1;
c_7310956.num_elements = 2;
c_7310956.elements = (object *)e_7310967;
c_7310956.elements[0] = ((closureN)self_735690)->elements[0];
c_7310956.elements[1] = k_732953_734346_734458_734567;

return_direct_with_clo2(data,  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117well_91known_scheme_cyclone_cps_91optimizations)->fn),  &c_7310956, ((closureN)self_735690)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_732953_734346_734458_734567, (((closure)  k_732953_734346_734458_734567)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732953_734346_734458_734567, (((closure)  k_732953_734346_734458_734567)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732953_734346_734458_734567, (((closure)  k_732953_734346_734458_734567)->fn),  boolean_f);}
;; 
}

static void __lambda_544(void *data, object self_735691, int argc, object *args) /* object self_735691, object r_732954_734347_734459_734568 */
 {
 object r_732954_734347_734459_734568 = args[0];
  if( (boolean_f != r_732954_734347_734459_734568) ){ 
  
closureN_type c_7310958;
object e_7310963 [1];
c_7310958.hdr.mark = gc_color_red;
 c_7310958.hdr.grayed = 0;
c_7310958.tag = closureN_tag;
 c_7310958.fn = (function_type)__lambda_545;
c_7310958.num_args = 1;
c_7310958.num_elements = 1;
c_7310958.elements = (object *)e_7310963;
c_7310958.elements[0] = ((closureN)self_735691)->elements[1];

return_direct_with_clo2(data,  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117closure_91size_scheme_cyclone_cps_91optimizations)->fn),  &c_7310958, ((closureN)self_735691)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735691)->elements[1], (((closure)  ((closureN)self_735691)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_545(void *data, object self_735692, int argc, object *args) /* object self_735692, object r_732955_734348_734460_734569 */
 {
 object r_732955_734348_734460_734569 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_735692)->elements[0], (((closure)  ((closureN)self_735692)->elements[0])->fn),  equalp(r_732955_734348_734460_734569, obj_int2obj(1)));; 
}

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



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7310792, __glo_mangle_scheme_cyclone_util, Cyc_cdr(data, r_732897_734310_734422_734531));; 
}

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


mclosure0(c_7310940, (function_type)__lambda_542);c_7310940.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7310794,__lambda_519,  &c_7310940);; 
}

static void __lambda_542(void *data, object self_735631, int argc, object *args) /* object self_735631, object k_732895_734344_734456_734565, object param_73745_731681_734345_734457_734566 */
 {
 object k_732895_734344_734456_734565 = args[0]; object param_73745_731681_734345_734457_734566 = args[1];
  
make_utf8_string_with_len(c_7310945, "tmp_", 4, 4);

object c_7310944 = Cyc_string_append(data,  k_732895_734344_734456_734565,2,&c_7310945, param_73745_731681_734345_734457_734566);
return_direct_with_clo1(data,  k_732895_734344_734456_734565, (((closure)  k_732895_734344_734456_734565)->fn),  c_7310944);; 
}

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

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7310796, r_732894_734312_734424_734533, ((closureN)self_735632)->elements[4]);; 
}

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



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7310798, primitive_car, Cyc_cdddr(data, ((closureN)self_735633)->elements[1]));; 
}

static void __lambda_521(void *data, object self_735634, int argc, object *args) /* object self_735634, object args_73728_731673_734314_734426_734535 */
 {
 object args_73728_731673_734314_734426_734535 = args[0];
  
closureN_type c_7310800;
object e_7310921 [7];
c_7310800.hdr.mark = gc_color_red;
 c_7310800.hdr.grayed = 0;
c_7310800.tag = closureN_tag;
 c_7310800.fn = (function_type)__lambda_522;
c_7310800.num_args = 1;
c_7310800.num_elements = 7;
c_7310800.elements = (object *)e_7310921;
c_7310800.elements[0] = ((closureN)self_735634)->elements[0];
c_7310800.elements[1] = args_73728_731673_734314_734426_734535;
c_7310800.elements[2] = ((closureN)self_735634)->elements[1];
c_7310800.elements[3] = ((closureN)self_735634)->elements[2];
c_7310800.elements[4] = ((closureN)self_735634)->elements[3];
c_7310800.elements[5] = ((closureN)self_735634)->elements[4];
c_7310800.elements[6] = ((closureN)self_735634)->elements[5];


mclosure0(c_7310922, (function_type)__lambda_541);c_7310922.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7310800,__lambda_522,  &c_7310922);; 
}

static void __lambda_541(void *data, object self_735635, int argc, object *args) /* object self_735635, object k_732892_734341_734453_734562, object param_73739_731679_734342_734454_734563, object arg_73740_731680_734343_734455_734564 */
 {
 object k_732892_734341_734453_734562 = args[0]; object param_73739_731679_734342_734454_734563 = args[1]; object arg_73740_731680_734343_734455_734564 = args[2];
    
if( (boolean_f != equalp(param_73739_731679_734342_734454_734563, arg_73740_731680_734343_734455_734564)) ){ 
  
make_utf8_string_with_len(c_7310926, "", 0, 0);
return_direct_with_clo1(data,  k_732892_734341_734453_734562, (((closure)  k_732892_734341_734453_734562)->fn),  &c_7310926);
} else { 
  
make_utf8_string_with_len(c_7310931, " = ", 3, 3);

make_utf8_string_with_len(c_7310932, ";\n", 2, 2);

object c_7310930 = Cyc_string_append(data,  k_732892_734341_734453_734562,4,param_73739_731679_734342_734454_734563, &c_7310931, arg_73740_731680_734343_734455_734564, &c_7310932);
return_direct_with_clo1(data,  k_732892_734341_734453_734562, (((closure)  k_732892_734341_734453_734562)->fn),  c_7310930);}
;; 
}

static void __lambda_522(void *data, object self_735636, int argc, object *args) /* object self_735636, object r_732891_734315_734427_734536 */
 {
 object r_732891_734315_734427_734536 = args[0];
  
closureN_type c_7310802;
object e_7310918 [6];
c_7310802.hdr.mark = gc_color_red;
 c_7310802.hdr.grayed = 0;
c_7310802.tag = closureN_tag;
 c_7310802.fn = (function_type)__lambda_523;
c_7310802.num_args = 1;
c_7310802.num_elements = 6;
c_7310802.elements = (object *)e_7310918;
c_7310802.elements[0] = ((closureN)self_735636)->elements[0];
c_7310802.elements[1] = ((closureN)self_735636)->elements[2];
c_7310802.elements[2] = ((closureN)self_735636)->elements[3];
c_7310802.elements[3] = ((closureN)self_735636)->elements[4];
c_7310802.elements[4] = ((closureN)self_735636)->elements[5];
c_7310802.elements[5] = ((closureN)self_735636)->elements[6];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7310802, r_732891_734315_734427_734536, ((closureN)self_735636)->elements[6], ((closureN)self_735636)->elements[1]);; 
}

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


object c_7310917 = apply(data,(closure)&c_7310804,primitive_string_91append, r_732890_734316_734428_734537);
return_closcall1(data,(closure)&c_7310804,  c_7310917);; 
}

static void __lambda_524(void *data, object self_735638, int argc, object *args) /* object self_735638, object reassignments_73731_731674_734317_734429_734538 */
 {
 object reassignments_73731_731674_734317_734429_734538 = args[0];
  
closureN_type c_7310806;
object e_7310905 [7];
c_7310806.hdr.mark = gc_color_red;
 c_7310806.hdr.grayed = 0;
c_7310806.tag = closureN_tag;
 c_7310806.fn = (function_type)__lambda_525;
c_7310806.num_args = 1;
c_7310806.num_elements = 7;
c_7310806.elements = (object *)e_7310905;
c_7310806.elements[0] = ((closureN)self_735638)->elements[0];
c_7310806.elements[1] = ((closureN)self_735638)->elements[1];
c_7310806.elements[2] = ((closureN)self_735638)->elements[2];
c_7310806.elements[3] = ((closureN)self_735638)->elements[3];
c_7310806.elements[4] = ((closureN)self_735638)->elements[4];
c_7310806.elements[5] = reassignments_73731_731674_734317_734429_734538;
c_7310806.elements[6] = ((closureN)self_735638)->elements[5];


mclosure0(c_7310906, (function_type)__lambda_540);c_7310906.num_args = 2;
return_direct_with_clo1(data,(closure)&c_7310806,__lambda_525,  &c_7310906);; 
}

static void __lambda_540(void *data, object self_735639, int argc, object *args) /* object self_735639, object k_732889_734338_734450_734559, object p_73737_731677_734339_734451_734560, object tmp_73738_731678_734340_734452_734561 */
 {
 object k_732889_734338_734450_734559 = args[0]; object p_73737_731677_734339_734451_734560 = args[1]; object tmp_73738_731678_734340_734452_734561 = args[2];
  
make_utf8_string_with_len(c_7310911, " ", 1, 1);

make_utf8_string_with_len(c_7310912, " = ", 3, 3);

make_utf8_string_with_len(c_7310913, "; ", 2, 2);

object c_7310910 = Cyc_string_append(data,  k_732889_734338_734450_734559,5,&c_7310911, p_73737_731677_734339_734451_734560, &c_7310912, tmp_73738_731678_734340_734452_734561, &c_7310913);
return_direct_with_clo1(data,  k_732889_734338_734450_734559, (((closure)  k_732889_734338_734450_734559)->fn),  c_7310910);; 
}

static void __lambda_525(void *data, object self_735640, int argc, object *args) /* object self_735640, object r_732888_734318_734430_734539 */
 {
 object r_732888_734318_734430_734539 = args[0];
  
closureN_type c_7310808;
object e_7310902 [7];
c_7310808.hdr.mark = gc_color_red;
 c_7310808.hdr.grayed = 0;
c_7310808.tag = closureN_tag;
 c_7310808.fn = (function_type)__lambda_526;
c_7310808.num_args = 1;
c_7310808.num_elements = 7;
c_7310808.elements = (object *)e_7310902;
c_7310808.elements[0] = ((closureN)self_735640)->elements[0];
c_7310808.elements[1] = ((closureN)self_735640)->elements[1];
c_7310808.elements[2] = ((closureN)self_735640)->elements[2];
c_7310808.elements[3] = ((closureN)self_735640)->elements[3];
c_7310808.elements[4] = ((closureN)self_735640)->elements[4];
c_7310808.elements[5] = ((closureN)self_735640)->elements[5];
c_7310808.elements[6] = ((closureN)self_735640)->elements[6];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7310808, r_732888_734318_734430_734539, ((closureN)self_735640)->elements[4], ((closureN)self_735640)->elements[6]);; 
}

static void __lambda_526(void *data, object self_735641, int argc, object *args) /* object self_735641, object r_732887_734319_734431_734540 */
 {
 object r_732887_734319_734431_734540 = args[0];
  
closureN_type c_7310810;
object e_7310898 [7];
c_7310810.hdr.mark = gc_color_red;
 c_7310810.hdr.grayed = 0;
c_7310810.tag = closureN_tag;
 c_7310810.fn = (function_type)__lambda_527;
c_7310810.num_args = 1;
c_7310810.num_elements = 7;
c_7310810.elements = (object *)e_7310898;
c_7310810.elements[0] = ((closureN)self_735641)->elements[0];
c_7310810.elements[1] = ((closureN)self_735641)->elements[1];
c_7310810.elements[2] = ((closureN)self_735641)->elements[2];
c_7310810.elements[3] = ((closureN)self_735641)->elements[3];
c_7310810.elements[4] = ((closureN)self_735641)->elements[4];
c_7310810.elements[5] = ((closureN)self_735641)->elements[5];
c_7310810.elements[6] = ((closureN)self_735641)->elements[6];


object c_7310901 = apply(data,(closure)&c_7310810,primitive_string_91append, r_732887_734319_734431_734540);
return_closcall1(data,(closure)&c_7310810,  c_7310901);; 
}

static void __lambda_527(void *data, object self_735642, int argc, object *args) /* object self_735642, object swap_91tmps_73734_731675_734320_734432_734541 */
 {
 object swap_91tmps_73734_731675_734320_734432_734541 = args[0];
  
closureN_type c_7310812;
object e_7310893 [7];
c_7310812.hdr.mark = gc_color_red;
 c_7310812.hdr.grayed = 0;
c_7310812.tag = closureN_tag;
 c_7310812.fn = (function_type)__lambda_528;
c_7310812.num_args = 1;
c_7310812.num_elements = 7;
c_7310812.elements = (object *)e_7310893;
c_7310812.elements[0] = ((closureN)self_735642)->elements[0];
c_7310812.elements[1] = ((closureN)self_735642)->elements[1];
c_7310812.elements[2] = ((closureN)self_735642)->elements[3];
c_7310812.elements[3] = ((closureN)self_735642)->elements[4];
c_7310812.elements[4] = ((closureN)self_735642)->elements[5];
c_7310812.elements[5] = swap_91tmps_73734_731675_734320_734432_734541;
c_7310812.elements[6] = ((closureN)self_735642)->elements[6];




make_utf8_string_with_len(c_7310897, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7310812, Cyc_cadr(data, ((closureN)self_735642)->elements[2]), &c_7310897);; 
}

static void __lambda_528(void *data, object self_735643, int argc, object *args) /* object self_735643, object r_732873_734322_734434_734543_734622 */
 {
 object r_732873_734322_734434_734543_734622 = args[0];
  
closureN_type c_7310814;
object e_7310888 [8];
c_7310814.hdr.mark = gc_color_red;
 c_7310814.hdr.grayed = 0;
c_7310814.tag = closureN_tag;
 c_7310814.fn = (function_type)__lambda_529;
c_7310814.num_args = 1;
c_7310814.num_elements = 8;
c_7310814.elements = (object *)e_7310888;
c_7310814.elements[0] = ((closureN)self_735643)->elements[0];
c_7310814.elements[1] = ((closureN)self_735643)->elements[1];
c_7310814.elements[2] = ((closureN)self_735643)->elements[2];
c_7310814.elements[3] = ((closureN)self_735643)->elements[3];
c_7310814.elements[4] = r_732873_734322_734434_734543_734622;
c_7310814.elements[5] = ((closureN)self_735643)->elements[4];
c_7310814.elements[6] = ((closureN)self_735643)->elements[5];
c_7310814.elements[7] = ((closureN)self_735643)->elements[6];




make_utf8_string_with_len(c_7310892, "\n", 1, 1);
return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_7310814, Cyc_cadr(data, ((closureN)self_735643)->elements[1]), &c_7310892);; 
}

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




object c_7310884 = Cyc_number2string2(data,(closure)&c_7310816,1,Cyc_caddr(data, ((closureN)self_735644)->elements[1]));
return_closcall1(data,(closure)&c_7310816,  c_7310884);; 
}

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

return_direct_with_clo2(data,  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations)->fn),  &c_7310818, ((closureN)self_735645)->elements[0]);; 
}

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



return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7310820, Cyc_car(data, r_732883_734327_734439_734548_734627_734642_734655));; 
}

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


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

return_direct_with_clo1(data,(closure)&c_7310822,__lambda_533,  &c_7310833);; 
}

static void __lambda_534(void *data, object self_735648, int argc, object *args) /* object self_735648, object r_732877_734331_734443_734552_734631_734646_734659 */
 {
 object r_732877_734331_734443_734552_734631_734646_734659 = args[0];
  
closureN_type c_7310835;
object e_7310872 [9];
c_7310835.hdr.mark = gc_color_red;
 c_7310835.hdr.grayed = 0;
c_7310835.tag = closureN_tag;
 c_7310835.fn = (function_type)__lambda_535;
c_7310835.num_args = 1;
c_7310835.num_elements = 9;
c_7310835.elements = (object *)e_7310872;
c_7310835.elements[0] = ((closureN)self_735648)->elements[0];
c_7310835.elements[1] = ((closureN)self_735648)->elements[2];
c_7310835.elements[2] = ((closureN)self_735648)->elements[3];
c_7310835.elements[3] = ((closureN)self_735648)->elements[4];
c_7310835.elements[4] = ((closureN)self_735648)->elements[5];
c_7310835.elements[5] = r_732877_734331_734443_734552_734631_734646_734659;
c_7310835.elements[6] = ((closureN)self_735648)->elements[6];
c_7310835.elements[7] = ((closureN)self_735648)->elements[7];
c_7310835.elements[8] = ((closureN)self_735648)->elements[8];


make_utf8_string_with_len(c_7310874, ", ", 2, 2);
return_direct_with_clo3(data,  __glo_string_91join_scheme_cyclone_util, (((closure)  __glo_string_91join_scheme_cyclone_util)->fn),  &c_7310835, ((closureN)self_735648)->elements[1], &c_7310874);; 
}

static void __lambda_535(void *data, object self_735649, int argc, object *args) /* object self_735649, object r_732878_734332_734444_734553_734632_734647_734660 */
 {
 object r_732878_734332_734444_734553_734632_734647_734660 = args[0];
  
closureN_type c_7310837;
object e_7310858 [2];
c_7310837.hdr.mark = gc_color_red;
 c_7310837.hdr.grayed = 0;
c_7310837.tag = closureN_tag;
 c_7310837.fn = (function_type)__lambda_536;
c_7310837.num_args = 1;
c_7310837.num_elements = 2;
c_7310837.elements = (object *)e_7310858;
c_7310837.elements[0] = ((closureN)self_735649)->elements[0];
c_7310837.elements[1] = ((closureN)self_735649)->elements[8];


make_utf8_string_with_len(c_7310866, "continue_or_gc", 14, 14);

make_utf8_string_with_len(c_7310868, "(data,", 6, 6);

make_utf8_string_with_len(c_7310871, ");", 2, 2);

object c_7310861 = Cyc_string_append(data,(closure)&c_7310837,11,((closureN)self_735649)->elements[1], ((closureN)self_735649)->elements[2], ((closureN)self_735649)->elements[6], ((closureN)self_735649)->elements[7], &c_7310866, ((closureN)self_735649)->elements[3], &c_7310868, ((closureN)self_735649)->elements[4], ((closureN)self_735649)->elements[5], r_732878_734332_734444_734553_734632_734647_734660, &c_7310871);
return_closcall1(data,(closure)&c_7310837,  c_7310861);; 
}

static void __lambda_536(void *data, object self_735650, int argc, object *args) /* object self_735650, object r_732869_734333_734445_734554_734633_734648_734661 */
 {
 object r_732869_734333_734445_734554_734633_734648_734661 = args[0];
  
closureN_type c_7310839;
object e_7310850 [3];
c_7310839.hdr.mark = gc_color_red;
 c_7310839.hdr.grayed = 0;
c_7310839.tag = closureN_tag;
 c_7310839.fn = (function_type)__lambda_537;
c_7310839.num_args = 1;
c_7310839.num_elements = 3;
c_7310839.elements = (object *)e_7310850;
c_7310839.elements[0] = ((closureN)self_735650)->elements[0];
c_7310839.elements[1] = r_732869_734333_734445_734554_734633_734648_734661;
c_7310839.elements[2] = ((closureN)self_735650)->elements[1];


mclosure0(c_7310851, (function_type)__lambda_539);c_7310851.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7310839,__lambda_537,  &c_7310851);; 
}

static void __lambda_539(void *data, object self_735651, int argc, object *args) /* object self_735651, object k_732872_734336_734448_734557_734636_734651_734664, object param_73736_731676_734337_734449_734558_734637_734652_734665 */
 {
 object k_732872_734336_734448_734557_734636_734651_734664 = args[0]; object param_73736_731676_734337_734449_734558_734637_734652_734665 = args[1];
  
make_utf8_string_with_len(c_7310856, " object ", 8, 8);

make_utf8_string_with_len(c_7310857, "; ", 2, 2);

object c_7310855 = Cyc_string_append(data,  k_732872_734336_734448_734557_734636_734651_734664,3,&c_7310856, param_73736_731676_734337_734449_734558_734637_734652_734665, &c_7310857);
return_direct_with_clo1(data,  k_732872_734336_734448_734557_734636_734651_734664, (((closure)  k_732872_734336_734448_734557_734636_734651_734664)->fn),  c_7310855);; 
}

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

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7310841, r_732871_734334_734446_734555_734634_734649_734662, ((closureN)self_735652)->elements[2]);; 
}

static void __lambda_538(void *data, object self_735653, int argc, object *args) /* object self_735653, object r_732870_734335_734447_734556_734635_734650_734663 */
 {
 object r_732870_734335_734447_734556_734635_734650_734663 = args[0];
  
list_2_type local_7310846; 
return_direct_with_clo1(data,  ((closureN)self_735653)->elements[0], (((closure)  ((closureN)self_735653)->elements[0])->fn),  Cyc_fast_list_2(&local_7310846, ((closureN)self_735653)->elements[1], r_732870_734335_734447_734556_734635_734650_734663));; 
}

static void __lambda_533(void *data, object self_735654, int argc, object *args) /* object self_735654, object k_732879_734329_734441_734550_734629_734644_734657 */
 {
 object k_732879_734329_734441_734550_734629_734644_734657 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735654)->elements[0]), obj_int2obj(0))) ){ 
  
make_utf8_string_with_len(c_7310829, ",", 1, 1);
return_direct_with_clo1(data,  k_732879_734329_734441_734550_734629_734644_734657,__lambda_534,  &c_7310829);
} else { 
  
make_utf8_string_with_len(c_7310831, "", 0, 0);
return_direct_with_clo1(data,  k_732879_734329_734441_734550_734629_734644_734657,__lambda_534,  &c_7310831);}
;; 
}

static void __lambda_511(void *data, object self_735693, int argc, object *args) /* object self_735693, object k_732956_734304_734416_734525 */
 {
 object k_732956_734304_734416_734525 = args[0];
  if( (boolean_f != ((closureN)self_735693)->elements[0]) ){ 
  
closureN_type c_7310764;
object e_7310784 [3];
c_7310764.hdr.mark = gc_color_red;
 c_7310764.hdr.grayed = 0;
c_7310764.tag = closureN_tag;
 c_7310764.fn = (function_type)__lambda_512;
c_7310764.num_args = 1;
c_7310764.num_elements = 3;
c_7310764.elements = (object *)e_7310784;
c_7310764.elements[0] = ((closureN)self_735693)->elements[0];
c_7310764.elements[1] = ((closureN)self_735693)->elements[1];
c_7310764.elements[2] = k_732956_734304_734416_734525;

return_direct_with_clo2(data,  __glo_adbf_117calls_91self_127_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117calls_91self_127_scheme_cyclone_cps_91optimizations)->fn),  &c_7310764, ((closureN)self_735693)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_732956_734304_734416_734525, (((closure)  k_732956_734304_734416_734525)->fn),  boolean_f);}
;; 
}

static void __lambda_512(void *data, object self_735694, int argc, object *args) /* object self_735694, object r_732957_734305_734417_734526 */
 {
 object r_732957_734305_734417_734526 = args[0];
  if( (boolean_f != r_732957_734305_734417_734526) ){ 
  
closureN_type c_7310766;
object e_7310780 [3];
c_7310766.hdr.mark = gc_color_red;
 c_7310766.hdr.grayed = 0;
c_7310766.tag = closureN_tag;
 c_7310766.fn = (function_type)__lambda_513;
c_7310766.num_args = 1;
c_7310766.num_elements = 3;
c_7310766.elements = (object *)e_7310780;
c_7310766.elements[0] = ((closureN)self_735694)->elements[0];
c_7310766.elements[1] = ((closureN)self_735694)->elements[1];
c_7310766.elements[2] = ((closureN)self_735694)->elements[2];

return_direct_with_clo2(data,  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117all_91params_scheme_cyclone_cps_91optimizations)->fn),  &c_7310766, ((closureN)self_735694)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735694)->elements[2], (((closure)  ((closureN)self_735694)->elements[2])->fn),  boolean_f);}
;; 
}

static void __lambda_513(void *data, object self_735695, int argc, object *args) /* object self_735695, object r_732960_734306_734418_734527 */
 {
 object r_732960_734306_734418_734527 = args[0];
  
closureN_type c_7310768;
object e_7310777 [3];
c_7310768.hdr.mark = gc_color_red;
 c_7310768.hdr.grayed = 0;
c_7310768.tag = closureN_tag;
 c_7310768.fn = (function_type)__lambda_514;
c_7310768.num_args = 1;
c_7310768.num_elements = 3;
c_7310768.elements = (object *)e_7310777;
c_7310768.elements[0] = ((closureN)self_735695)->elements[0];
c_7310768.elements[1] = ((closureN)self_735695)->elements[1];
c_7310768.elements[2] = ((closureN)self_735695)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310768,__lambda_514,  Cyc_car(data, r_732960_734306_734418_734527));; 
}

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

return_direct_with_clo2(data,  __glo_adbf_117self_91closure_91index_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117self_91closure_91index_scheme_cyclone_cps_91optimizations)->fn),  &c_7310770, ((closureN)self_735696)->elements[0]);; 
}

static void __lambda_515(void *data, object self_735697, int argc, object *args) /* object self_735697, object r_732959_734308_734420_734529 */
 {
 object r_732959_734308_734420_734529 = args[0];
  return_direct_with_clo4(data,  __glo_self_91closure_91call_127_scheme_cyclone_cgen, (((closure)  __glo_self_91closure_91call_127_scheme_cyclone_cgen)->fn),  ((closureN)self_735697)->elements[1], ((closureN)self_735697)->elements[0], ((closureN)self_735697)->elements[2], r_732959_734308_734420_734529);; 
}

static void __lambda_507(void *data, object self_735698, int argc, object *args) /* object self_735698, object k_732961_734300_734412_734521 */
 {
 object k_732961_734300_734412_734521 = args[0];
  if( (boolean_f != ((closureN)self_735698)->elements[0]) ){ 
  
closureN_type c_7310750;
object e_7310753 [1];
c_7310750.hdr.mark = gc_color_red;
 c_7310750.hdr.grayed = 0;
c_7310750.tag = closureN_tag;
 c_7310750.fn = (function_type)__lambda_508;
c_7310750.num_args = 1;
c_7310750.num_elements = 1;
c_7310750.elements = (object *)e_7310753;
c_7310750.elements[0] = k_732961_734300_734412_734521;

return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_7310750, ((closureN)self_735698)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_732961_734300_734412_734521, (((closure)  k_732961_734300_734412_734521)->fn),  boolean_f);}
;; 
}

static void __lambda_508(void *data, object self_735699, int argc, object *args) /* object self_735699, object r_732962_734301_734413_734522 */
 {
 object r_732962_734301_734413_734522 = args[0];
  return_direct_with_clo3(data,  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations)->fn),  ((closureN)self_735699)->elements[0], r_732962_734301_734413_734522, boolean_f);; 
}

static void __lambda_498(void *data, object self_735617, int argc, object *args) /* object self_735617, object r_732849 */
 {
 object r_732849 = args[0];
  
closureN_type c_7310695;
object e_7310707 [1];
c_7310695.hdr.mark = gc_color_red;
 c_7310695.hdr.grayed = 0;
c_7310695.tag = closureN_tag;
 c_7310695.fn = (function_type)__lambda_499;
c_7310695.num_args = 1;
c_7310695.num_elements = 1;
c_7310695.elements = (object *)e_7310707;
c_7310695.elements[0] = ((closureN)self_735617)->elements[2];



return_direct_with_clo4(data,  __glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen)->fn),  &c_7310695, ((closureN)self_735617)->elements[1], Cyc_car(data, ((closureN)self_735617)->elements[0]), r_732849);; 
}

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


pair_type local_7310706; 

object c_7310703 = apply(data,(closure)&c_7310697,primitive_string_91append, set_cell_as_expr(&local_7310706, r_732847));
return_closcall1(data,(closure)&c_7310697,  c_7310703);; 
}

static void __lambda_500(void *data, object self_735619, int argc, object *args) /* object self_735619, object r_732845 */
 {
 object r_732845 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735619)->elements[0], r_732845);; 
}

static void __lambda_457(void *data, object self_735576, int argc, object *args) /* object self_735576, object c_91fun_73631_731649 */
 {
 object c_91fun_73631_731649 = args[0];
  
closureN_type c_7310409;
object e_7310678 [4];
c_7310409.hdr.mark = gc_color_red;
 c_7310409.hdr.grayed = 0;
c_7310409.tag = closureN_tag;
 c_7310409.fn = (function_type)__lambda_458;
c_7310409.num_args = 1;
c_7310409.num_elements = 4;
c_7310409.elements = (object *)e_7310678;
c_7310409.elements[0] = ((closureN)self_735576)->elements[1];
c_7310409.elements[1] = c_91fun_73631_731649;
c_7310409.elements[2] = ((closureN)self_735576)->elements[4];
c_7310409.elements[3] = ((closureN)self_735576)->elements[5];


make_utf8_string_with_len(c_7310681, "", 0, 0);

make_utf8_string_with_len(c_7310682, "", 0, 0);
return_direct_with_clo8(data,  __glo_c_91compile_91args_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91args_scheme_cyclone_cgen)->fn),  &c_7310409, ((closureN)self_735576)->elements[1], ((closureN)self_735576)->elements[0], &c_7310681, &c_7310682, ((closureN)self_735576)->elements[2], ((closureN)self_735576)->elements[6], ((closureN)self_735576)->elements[3]);; 
}

static void __lambda_458(void *data, object self_735577, int argc, object *args) /* object self_735577, object c_91args_73634_731650 */
 {
 object c_91args_73634_731650 = args[0];
  
closureN_type c_7310411;
object e_7310671 [5];
c_7310411.hdr.mark = gc_color_red;
 c_7310411.hdr.grayed = 0;
c_7310411.tag = closureN_tag;
 c_7310411.fn = (function_type)__lambda_459;
c_7310411.num_args = 1;
c_7310411.num_elements = 5;
c_7310411.elements = (object *)e_7310671;
c_7310411.elements[0] = ((closureN)self_735577)->elements[0];
c_7310411.elements[1] = c_91args_73634_731650;
c_7310411.elements[2] = ((closureN)self_735577)->elements[1];
c_7310411.elements[3] = ((closureN)self_735577)->elements[2];
c_7310411.elements[4] = ((closureN)self_735577)->elements[3];




object c_7310674 = Cyc_number2string2(data,(closure)&c_7310411,1,Cyc_length(data, ((closureN)self_735577)->elements[0]));
return_closcall1(data,(closure)&c_7310411,  c_7310674);; 
}

static void __lambda_459(void *data, object self_735578, int argc, object *args) /* object self_735578, object r_732840 */
 {
 object r_732840 = args[0];
  object r_732841;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_735578)->elements[0]), obj_int2obj(0))) ){ 
  object c_7310419;
 alloc_string(data,c_7310419, 1, 1);
char tmp_7310420[] = ",";
memcpy(((string_type *)c_7310419)->str, tmp_7310420,1);
((string_type *)c_7310419)->str[1] = '\0';
  r_732841 = c_7310419;
} else { 
  object c_7310422;
 alloc_string(data,c_7310422, 0, 0);
char tmp_7310423[] = "";
memcpy(((string_type *)c_7310422)->str, tmp_7310423,0);
((string_type *)c_7310422)->str[0] = '\0';
  r_732841 = c_7310422;}
;
closureN_type c_7310425;
object e_7310667 [5];
c_7310425.hdr.mark = gc_color_red;
 c_7310425.hdr.grayed = 0;
c_7310425.tag = closureN_tag;
 c_7310425.fn = (function_type)__lambda_460;
c_7310425.num_args = 1;
c_7310425.num_elements = 5;
c_7310425.elements = (object *)e_7310667;
c_7310425.elements[0] = ((closureN)self_735578)->elements[0];
c_7310425.elements[1] = ((closureN)self_735578)->elements[1];
c_7310425.elements[2] = ((closureN)self_735578)->elements[2];
c_7310425.elements[3] = ((closureN)self_735578)->elements[3];
c_7310425.elements[4] = ((closureN)self_735578)->elements[4];


object c_7310670 = Cyc_string_append(data,(closure)&c_7310425,2,r_732840, r_732841);
return_closcall1(data,(closure)&c_7310425,  c_7310670);; 
}

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


closureN_type c_7310443;
object e_7310666 [5];
c_7310443.hdr.mark = gc_color_red;
 c_7310443.hdr.grayed = 0;
c_7310443.tag = closureN_tag;
 c_7310443.fn = (function_type)__lambda_464;
c_7310443.num_args = 1;
c_7310443.num_elements = 5;
c_7310443.elements = (object *)e_7310666;
c_7310443.elements[0] = ((closureN)self_735579)->elements[0];
c_7310443.elements[1] = ((closureN)self_735579)->elements[1];
c_7310443.elements[2] = ((closureN)self_735579)->elements[2];
c_7310443.elements[3] = ((closureN)self_735579)->elements[3];
c_7310443.elements[4] = ((closureN)self_735579)->elements[4];

return_direct_with_clo1(data,(closure)&c_7310427,__lambda_461,  &c_7310443);; 
}

static void __lambda_464(void *data, object self_735580, int argc, object *args) /* object self_735580, object c_91args_85_73643_731653 */
 {
 object c_91args_85_73643_731653 = args[0];
  
closureN_type c_7310445;
object e_7310499 [4];
c_7310445.hdr.mark = gc_color_red;
 c_7310445.hdr.grayed = 0;
c_7310445.tag = closureN_tag;
 c_7310445.fn = (function_type)__lambda_465;
c_7310445.num_args = 0;
c_7310445.num_elements = 4;
c_7310445.elements = (object *)e_7310499;
c_7310445.elements[0] = ((closureN)self_735580)->elements[0];
c_7310445.elements[1] = ((closureN)self_735580)->elements[1];
c_7310445.elements[2] = c_91args_85_73643_731653;
c_7310445.elements[3] = ((closureN)self_735580)->elements[3];


closureN_type c_7310500;
object e_7310665 [5];
c_7310500.hdr.mark = gc_color_red;
 c_7310500.hdr.grayed = 0;
c_7310500.tag = closureN_tag;
 c_7310500.fn = (function_type)__lambda_472;
c_7310500.num_args = 1;
c_7310500.num_elements = 5;
c_7310500.elements = (object *)e_7310665;
c_7310500.elements[0] = ((closureN)self_735580)->elements[0];
c_7310500.elements[1] = c_91args_85_73643_731653;
c_7310500.elements[2] = ((closureN)self_735580)->elements[2];
c_7310500.elements[3] = ((closureN)self_735580)->elements[3];
c_7310500.elements[4] = ((closureN)self_735580)->elements[4];

return_direct_with_clo1(data,(closure)&c_7310445,__lambda_465,  &c_7310500);; 
}

static void __lambda_472(void *data, object self_735581, int argc, object *args) /* object self_735581, object r_732793 */
 {

  
closureN_type c_7310502;
object e_7310663 [5];
c_7310502.hdr.mark = gc_color_red;
 c_7310502.hdr.grayed = 0;
c_7310502.tag = closureN_tag;
 c_7310502.fn = (function_type)__lambda_473;
c_7310502.num_args = 1;
c_7310502.num_elements = 5;
c_7310502.elements = (object *)e_7310663;
c_7310502.elements[0] = ((closureN)self_735581)->elements[0];
c_7310502.elements[1] = ((closureN)self_735581)->elements[1];
c_7310502.elements[2] = ((closureN)self_735581)->elements[2];
c_7310502.elements[3] = ((closureN)self_735581)->elements[3];
c_7310502.elements[4] = ((closureN)self_735581)->elements[4];

return_direct_with_clo2(data,  __glo_prim_95cvar_127_scheme_cyclone_primitives, (((closure)  __glo_prim_95cvar_127_scheme_cyclone_primitives)->fn),  &c_7310502, ((closureN)self_735581)->elements[3]);; 
}

static void __lambda_473(void *data, object self_735582, int argc, object *args) /* object self_735582, object r_732794 */
 {
 object r_732794 = args[0];
  if( (boolean_f != r_732794) ){ 
  
closureN_type c_7310504;
object e_7310598 [5];
c_7310504.hdr.mark = gc_color_red;
 c_7310504.hdr.grayed = 0;
c_7310504.tag = closureN_tag;
 c_7310504.fn = (function_type)__lambda_474;
c_7310504.num_args = 1;
c_7310504.num_elements = 5;
c_7310504.elements = (object *)e_7310598;
c_7310504.elements[0] = ((closureN)self_735582)->elements[0];
c_7310504.elements[1] = ((closureN)self_735582)->elements[1];
c_7310504.elements[2] = ((closureN)self_735582)->elements[2];
c_7310504.elements[3] = ((closureN)self_735582)->elements[3];
c_7310504.elements[4] = ((closureN)self_735582)->elements[4];



return_direct_with_clo1(data,(closure)&c_7310504,__lambda_474,  Cyc_car(data, ((closureN)self_735582)->elements[2]));
} else { 
  
closureN_type c_7310603;
object e_7310649 [3];
c_7310603.hdr.mark = gc_color_red;
 c_7310603.hdr.grayed = 0;
c_7310603.tag = closureN_tag;
 c_7310603.fn = (function_type)__lambda_487;
c_7310603.num_args = 0;
c_7310603.num_elements = 3;
c_7310603.elements = (object *)e_7310649;
c_7310603.elements[0] = ((closureN)self_735582)->elements[0];
c_7310603.elements[1] = ((closureN)self_735582)->elements[2];
c_7310603.elements[2] = ((closureN)self_735582)->elements[3];


closureN_type c_7310650;
object e_7310662 [2];
c_7310650.hdr.mark = gc_color_red;
 c_7310650.hdr.grayed = 0;
c_7310650.tag = closureN_tag;
 c_7310650.fn = (function_type)__lambda_494;
c_7310650.num_args = 1;
c_7310650.num_elements = 2;
c_7310650.elements = (object *)e_7310662;
c_7310650.elements[0] = ((closureN)self_735582)->elements[1];
c_7310650.elements[1] = ((closureN)self_735582)->elements[4];

return_direct_with_clo1(data,(closure)&c_7310603,__lambda_487,  &c_7310650);}
;; 
}

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

return_direct_with_clo3(data,  __glo_c_117append_scheme_cyclone_cgen, (((closure)  __glo_c_117append_scheme_cyclone_cgen)->fn),  &c_7310652, r_732815, ((closureN)self_735596)->elements[0]);; 
}

static void __lambda_495(void *data, object self_735597, int argc, object *args) /* object self_735597, object r_732813 */
 {
 object r_732813 = args[0];
  
closureN_type c_7310654;
object e_7310658 [2];
c_7310654.hdr.mark = gc_color_red;
 c_7310654.hdr.grayed = 0;
c_7310654.tag = closureN_tag;
 c_7310654.fn = (function_type)__lambda_496;
c_7310654.num_args = 1;
c_7310654.num_elements = 2;
c_7310654.elements = (object *)e_7310658;
c_7310654.elements[0] = ((closureN)self_735597)->elements[0];
c_7310654.elements[1] = r_732813;


make_utf8_string_with_len(c_7310659, ")", 1, 1);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  &c_7310654, &c_7310659);; 
}

static void __lambda_496(void *data, object self_735598, int argc, object *args) /* object self_735598, object r_732814 */
 {
 object r_732814 = args[0];
  return_direct_with_clo3(data,  __glo_c_117append_scheme_cyclone_cgen, (((closure)  __glo_c_117append_scheme_cyclone_cgen)->fn),  ((closureN)self_735598)->elements[0], ((closureN)self_735598)->elements[1], r_732814);; 
}

static void __lambda_487(void *data, object self_735599, int argc, object *args) /* object self_735599, object k_732816 */
 {
 object k_732816 = args[0];
  
closureN_type c_7310605;
object e_7310644 [4];
c_7310605.hdr.mark = gc_color_red;
 c_7310605.hdr.grayed = 0;
c_7310605.tag = closureN_tag;
 c_7310605.fn = (function_type)__lambda_488;
c_7310605.num_args = 1;
c_7310605.num_elements = 4;
c_7310605.elements = (object *)e_7310644;
c_7310605.elements[0] = ((closureN)self_735599)->elements[0];
c_7310605.elements[1] = ((closureN)self_735599)->elements[1];
c_7310605.elements[2] = ((closureN)self_735599)->elements[2];
c_7310605.elements[3] = k_732816;




make_utf8_string_with_len(c_7310648, "(", 1, 1);
return_direct_with_clo3(data,  __glo_str_91ending_127_scheme_cyclone_cgen, (((closure)  __glo_str_91ending_127_scheme_cyclone_cgen)->fn),  &c_7310605, Cyc_car(data, ((closureN)self_735599)->elements[1]), &c_7310648);; 
}

static void __lambda_488(void *data, object self_735600, int argc, object *args) /* object self_735600, object tmp_73668_73670_731660_734286 */
 {
 object tmp_73668_73670_731660_734286 = args[0];
  
closureN_type c_7310607;
object e_7310631 [3];
c_7310607.hdr.mark = gc_color_red;
 c_7310607.hdr.grayed = 0;
c_7310607.tag = closureN_tag;
 c_7310607.fn = (function_type)__lambda_489;
c_7310607.num_args = 0;
c_7310607.num_elements = 3;
c_7310607.elements = (object *)e_7310631;
c_7310607.elements[0] = ((closureN)self_735600)->elements[0];
c_7310607.elements[1] = ((closureN)self_735600)->elements[2];
c_7310607.elements[2] = tmp_73668_73670_731660_734286;


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

return_direct_with_clo1(data,(closure)&c_7310607,__lambda_489,  &c_7310632);; 
}

static void __lambda_492(void *data, object self_735601, int argc, object *args) /* object self_735601, object r_732817_734290 */
 {
 object r_732817_734290 = args[0];
  if( (boolean_f != r_732817_734290) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735601)->elements[1], (((closure)  ((closureN)self_735601)->elements[1])->fn),  ((closureN)self_735601)->elements[0]);
} else { 
  
closureN_type c_7310637;
object e_7310641 [2];
c_7310637.hdr.mark = gc_color_red;
 c_7310637.hdr.grayed = 0;
c_7310637.tag = closureN_tag;
 c_7310637.fn = (function_type)__lambda_493;
c_7310637.num_args = 1;
c_7310637.num_elements = 2;
c_7310637.elements = (object *)e_7310641;
c_7310637.elements[0] = ((closureN)self_735601)->elements[0];
c_7310637.elements[1] = ((closureN)self_735601)->elements[1];


make_utf8_string_with_len(c_7310642, ", ", 2, 2);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  &c_7310637, &c_7310642);}
;; 
}

static void __lambda_493(void *data, object self_735602, int argc, object *args) /* object self_735602, object r_732818_734291 */
 {
 object r_732818_734291 = args[0];
  return_direct_with_clo3(data,  __glo_c_117append_scheme_cyclone_cgen, (((closure)  __glo_c_117append_scheme_cyclone_cgen)->fn),  ((closureN)self_735602)->elements[1], ((closureN)self_735602)->elements[0], r_732818_734291);; 
}

static void __lambda_489(void *data, object self_735603, int argc, object *args) /* object self_735603, object k_732820_734287 */
 {
 object k_732820_734287 = args[0];
  if( (boolean_f != ((closureN)self_735603)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_732820_734287, (((closure)  k_732820_734287)->fn),  ((closureN)self_735603)->elements[2]);
} else { 
  
closureN_type c_7310612;
object e_7310629 [3];
c_7310612.hdr.mark = gc_color_red;
 c_7310612.hdr.grayed = 0;
c_7310612.tag = closureN_tag;
 c_7310612.fn = (function_type)__lambda_490;
c_7310612.num_args = 1;
c_7310612.num_elements = 3;
c_7310612.elements = (object *)e_7310629;
c_7310612.elements[0] = ((closureN)self_735603)->elements[0];
c_7310612.elements[1] = ((closureN)self_735603)->elements[1];
c_7310612.elements[2] = k_732820_734287;

return_direct_with_clo2(data,  __glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives)->fn),  &c_7310612, ((closureN)self_735603)->elements[1]);}
;; 
}

static void __lambda_490(void *data, object self_735604, int argc, object *args) /* object self_735604, object tmp_73672_73674_731661_734288 */
 {
 object tmp_73672_73674_731661_734288 = args[0];
  if( (boolean_f != tmp_73672_73674_731661_734288) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735604)->elements[2], (((closure)  ((closureN)self_735604)->elements[2])->fn),  tmp_73672_73674_731661_734288);
} else { 
  
closureN_type c_7310616;
object e_7310627 [2];
c_7310616.hdr.mark = gc_color_red;
 c_7310616.hdr.grayed = 0;
c_7310616.tag = closureN_tag;
 c_7310616.fn = (function_type)__lambda_491;
c_7310616.num_args = 1;
c_7310616.num_elements = 2;
c_7310616.elements = (object *)e_7310627;
c_7310616.elements[0] = ((closureN)self_735604)->elements[0];
c_7310616.elements[1] = ((closureN)self_735604)->elements[2];

return_direct_with_clo2(data,  __glo_prim_117udf_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117udf_127_scheme_cyclone_primitives)->fn),  &c_7310616, ((closureN)self_735604)->elements[1]);}
;; 
}

static void __lambda_491(void *data, object self_735605, int argc, object *args) /* object self_735605, object r_732822_734289 */
 {
 object r_732822_734289 = args[0];
  if( (boolean_f != r_732822_734289) ){ 
  
complex_num_type local_7310621; 


return_direct_with_clo1(data,  ((closureN)self_735605)->elements[1], (((closure)  ((closureN)self_735605)->elements[1])->fn),  ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310621, Cyc_length(data, ((closureN)self_735605)->elements[0])));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735605)->elements[1], (((closure)  ((closureN)self_735605)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_474(void *data, object self_735583, int argc, object *args) /* object self_735583, object r_732795_734230 */
 {
 object r_732795_734230 = args[0];
  
closureN_type c_7310506;
object e_7310594 [6];
c_7310506.hdr.mark = gc_color_red;
 c_7310506.hdr.grayed = 0;
c_7310506.tag = closureN_tag;
 c_7310506.fn = (function_type)__lambda_475;
c_7310506.num_args = 1;
c_7310506.num_elements = 6;
c_7310506.elements = (object *)e_7310594;
c_7310506.elements[0] = ((closureN)self_735583)->elements[0];
c_7310506.elements[1] = ((closureN)self_735583)->elements[1];
c_7310506.elements[2] = ((closureN)self_735583)->elements[2];
c_7310506.elements[3] = ((closureN)self_735583)->elements[3];
c_7310506.elements[4] = ((closureN)self_735583)->elements[4];
c_7310506.elements[5] = r_732795_734230;



return_direct_with_clo1(data,(closure)&c_7310506,__lambda_475,  Cyc_cadr(data, ((closureN)self_735583)->elements[1]));; 
}

static void __lambda_475(void *data, object self_735584, int argc, object *args) /* object self_735584, object r_732797_734231_734246 */
 {
 object r_732797_734231_734246 = args[0];
  
closureN_type c_7310508;
object e_7310559 [3];
c_7310508.hdr.mark = gc_color_red;
 c_7310508.hdr.grayed = 0;
c_7310508.tag = closureN_tag;
 c_7310508.fn = (function_type)__lambda_476;
c_7310508.num_args = 0;
c_7310508.num_elements = 3;
c_7310508.elements = (object *)e_7310559;
c_7310508.elements[0] = ((closureN)self_735584)->elements[0];
c_7310508.elements[1] = ((closureN)self_735584)->elements[2];
c_7310508.elements[2] = ((closureN)self_735584)->elements[3];


closureN_type c_7310560;
object e_7310593 [5];
c_7310560.hdr.mark = gc_color_red;
 c_7310560.hdr.grayed = 0;
c_7310560.tag = closureN_tag;
 c_7310560.fn = (function_type)__lambda_483;
c_7310560.num_args = 1;
c_7310560.num_elements = 5;
c_7310560.elements = (object *)e_7310593;
c_7310560.elements[0] = ((closureN)self_735584)->elements[1];
c_7310560.elements[1] = ((closureN)self_735584)->elements[2];
c_7310560.elements[2] = ((closureN)self_735584)->elements[4];
c_7310560.elements[3] = ((closureN)self_735584)->elements[5];
c_7310560.elements[4] = r_732797_734231_734246;

return_direct_with_clo1(data,(closure)&c_7310508,__lambda_476,  &c_7310560);; 
}

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



return_direct_with_clo1(data,(closure)&c_7310562,__lambda_484,  Cyc_car(data, ((closureN)self_735585)->elements[0]));; 
}

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






make_utf8_string_with_len(c_7310588, ");", 2, 2);

object c_7310581 = Cyc_string_append(data,(closure)&c_7310564,4,Cyc_car(data, Cyc_cadr(data, ((closureN)self_735586)->elements[0])), ((closureN)self_735586)->elements[4], r_732802_734243_734258_734272_734282, &c_7310588);
return_closcall1(data,(closure)&c_7310564,  c_7310581);; 
}

static void __lambda_485(void *data, object self_735587, int argc, object *args) /* object self_735587, object r_732799_734244_734259_734273_734283 */
 {
 object r_732799_734244_734259_734273_734283 = args[0];
  
closureN_type c_7310566;
object e_7310573 [2];
c_7310566.hdr.mark = gc_color_red;
 c_7310566.hdr.grayed = 0;
c_7310566.tag = closureN_tag;
 c_7310566.fn = (function_type)__lambda_486;
c_7310566.num_args = 1;
c_7310566.num_elements = 2;
c_7310566.elements = (object *)e_7310573;
c_7310566.elements[0] = ((closureN)self_735587)->elements[0];
c_7310566.elements[1] = ((closureN)self_735587)->elements[1];


pair_type local_7310577; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7310566, ((closureN)self_735587)->elements[2], set_cell_as_expr(&local_7310577, r_732799_734244_734259_734273_734283));; 
}

static void __lambda_486(void *data, object self_735588, int argc, object *args) /* object self_735588, object r_732796_734245_734260_734274_734284 */
 {
 object r_732796_734245_734260_734274_734284 = args[0];
  
list_2_type local_7310571; 
return_direct_with_clo1(data,  ((closureN)self_735588)->elements[0], (((closure)  ((closureN)self_735588)->elements[0])->fn),  Cyc_fast_list_2(&local_7310571, ((closureN)self_735588)->elements[1], r_732796_734245_734260_734274_734284));; 
}

static void __lambda_476(void *data, object self_735589, int argc, object *args) /* object self_735589, object k_732803_734233_734248_734262 */
 {
 object k_732803_734233_734248_734262 = args[0];
  
closureN_type c_7310510;
object e_7310557 [4];
c_7310510.hdr.mark = gc_color_red;
 c_7310510.hdr.grayed = 0;
c_7310510.tag = closureN_tag;
 c_7310510.fn = (function_type)__lambda_477;
c_7310510.num_args = 1;
c_7310510.num_elements = 4;
c_7310510.elements = (object *)e_7310557;
c_7310510.elements[0] = ((closureN)self_735589)->elements[0];
c_7310510.elements[1] = ((closureN)self_735589)->elements[1];
c_7310510.elements[2] = ((closureN)self_735589)->elements[2];
c_7310510.elements[3] = k_732803_734233_734248_734262;

return_direct_with_clo2(data,  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives, (((closure)  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives)->fn),  &c_7310510, ((closureN)self_735589)->elements[2]);; 
}

static void __lambda_477(void *data, object self_735590, int argc, object *args) /* object self_735590, object r_732804_734234_734249_734263 */
 {
 object r_732804_734234_734249_734263 = args[0];
  if( (boolean_f != r_732804_734234_734249_734263) ){ 
  
closureN_type c_7310512;
object e_7310547 [3];
c_7310512.hdr.mark = gc_color_red;
 c_7310512.hdr.grayed = 0;
c_7310512.tag = closureN_tag;
 c_7310512.fn = (function_type)__lambda_478;
c_7310512.num_args = 1;
c_7310512.num_elements = 3;
c_7310512.elements = (object *)e_7310547;
c_7310512.elements[0] = ((closureN)self_735590)->elements[0];
c_7310512.elements[1] = ((closureN)self_735590)->elements[2];
c_7310512.elements[2] = ((closureN)self_735590)->elements[3];






make_utf8_string_with_len(c_7310553, "(", 1, 1);
return_direct_with_clo3(data,  __glo_str_91ending_127_scheme_cyclone_cgen, (((closure)  __glo_str_91ending_127_scheme_cyclone_cgen)->fn),  &c_7310512, Cyc_car(data, Cyc_cadr(data, ((closureN)self_735590)->elements[1])), &c_7310553);
} else { 
  
make_utf8_string_with_len(c_7310556, ",", 1, 1);
return_direct_with_clo1(data,  ((closureN)self_735590)->elements[3], (((closure)  ((closureN)self_735590)->elements[3])->fn),  &c_7310556);}
;; 
}

static void __lambda_478(void *data, object self_735591, int argc, object *args) /* object self_735591, object tmp_73659_73661_731658_734237_734252_734266_734277 */
 {
 object tmp_73659_73661_731658_734237_734252_734266_734277 = args[0];
  
closureN_type c_7310514;
object e_7310538 [3];
c_7310514.hdr.mark = gc_color_red;
 c_7310514.hdr.grayed = 0;
c_7310514.tag = closureN_tag;
 c_7310514.fn = (function_type)__lambda_479;
c_7310514.num_args = 0;
c_7310514.num_elements = 3;
c_7310514.elements = (object *)e_7310538;
c_7310514.elements[0] = ((closureN)self_735591)->elements[0];
c_7310514.elements[1] = ((closureN)self_735591)->elements[1];
c_7310514.elements[2] = tmp_73659_73661_731658_734237_734252_734266_734277;


closureN_type c_7310539;
object e_7310546 [1];
c_7310539.hdr.mark = gc_color_red;
 c_7310539.hdr.grayed = 0;
c_7310539.tag = closureN_tag;
 c_7310539.fn = (function_type)__lambda_482;
c_7310539.num_args = 1;
c_7310539.num_elements = 1;
c_7310539.elements = (object *)e_7310546;
c_7310539.elements[0] = ((closureN)self_735591)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310514,__lambda_479,  &c_7310539);; 
}

static void __lambda_482(void *data, object self_735592, int argc, object *args) /* object self_735592, object r_732805_734241_734256_734270_734281 */
 {
 object r_732805_734241_734256_734270_734281 = args[0];
  if( (boolean_f != r_732805_734241_734256_734270_734281) ){ 
  
make_utf8_string_with_len(c_7310542, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735592)->elements[0], (((closure)  ((closureN)self_735592)->elements[0])->fn),  &c_7310542);
} else { 
  
make_utf8_string_with_len(c_7310545, ",", 1, 1);
return_direct_with_clo1(data,  ((closureN)self_735592)->elements[0], (((closure)  ((closureN)self_735592)->elements[0])->fn),  &c_7310545);}
;; 
}

static void __lambda_479(void *data, object self_735593, int argc, object *args) /* object self_735593, object k_732807_734238_734253_734267_734278 */
 {
 object k_732807_734238_734253_734267_734278 = args[0];
  if( (boolean_f != ((closureN)self_735593)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_732807_734238_734253_734267_734278, (((closure)  k_732807_734238_734253_734267_734278)->fn),  ((closureN)self_735593)->elements[2]);
} else { 
  
closureN_type c_7310519;
object e_7310536 [3];
c_7310519.hdr.mark = gc_color_red;
 c_7310519.hdr.grayed = 0;
c_7310519.tag = closureN_tag;
 c_7310519.fn = (function_type)__lambda_480;
c_7310519.num_args = 1;
c_7310519.num_elements = 3;
c_7310519.elements = (object *)e_7310536;
c_7310519.elements[0] = ((closureN)self_735593)->elements[0];
c_7310519.elements[1] = ((closureN)self_735593)->elements[1];
c_7310519.elements[2] = k_732807_734238_734253_734267_734278;

return_direct_with_clo2(data,  __glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives)->fn),  &c_7310519, ((closureN)self_735593)->elements[1]);}
;; 
}

static void __lambda_480(void *data, object self_735594, int argc, object *args) /* object self_735594, object tmp_73663_73665_731659_734239_734254_734268_734279 */
 {
 object tmp_73663_73665_731659_734239_734254_734268_734279 = args[0];
  if( (boolean_f != tmp_73663_73665_731659_734239_734254_734268_734279) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735594)->elements[2], (((closure)  ((closureN)self_735594)->elements[2])->fn),  tmp_73663_73665_731659_734239_734254_734268_734279);
} else { 
  
closureN_type c_7310523;
object e_7310534 [2];
c_7310523.hdr.mark = gc_color_red;
 c_7310523.hdr.grayed = 0;
c_7310523.tag = closureN_tag;
 c_7310523.fn = (function_type)__lambda_481;
c_7310523.num_args = 1;
c_7310523.num_elements = 2;
c_7310523.elements = (object *)e_7310534;
c_7310523.elements[0] = ((closureN)self_735594)->elements[0];
c_7310523.elements[1] = ((closureN)self_735594)->elements[2];

return_direct_with_clo2(data,  __glo_prim_117udf_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117udf_127_scheme_cyclone_primitives)->fn),  &c_7310523, ((closureN)self_735594)->elements[1]);}
;; 
}

static void __lambda_481(void *data, object self_735595, int argc, object *args) /* object self_735595, object r_732809_734240_734255_734269_734280 */
 {
 object r_732809_734240_734255_734269_734280 = args[0];
  if( (boolean_f != r_732809_734240_734255_734269_734280) ){ 
  
complex_num_type local_7310528; 


return_direct_with_clo1(data,  ((closureN)self_735595)->elements[1], (((closure)  ((closureN)self_735595)->elements[1])->fn),  ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310528, Cyc_length(data, ((closureN)self_735595)->elements[0])));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735595)->elements[1], (((closure)  ((closureN)self_735595)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_465(void *data, object self_735606, int argc, object *args) /* object self_735606, object k_732824 */
 {
 object k_732824 = args[0];
    
if( (boolean_f != Cyc_eq(quote_set_91global_67, ((closureN)self_735606)->elements[3])) ){ 
  
closureN_type c_7310450;
object e_7310494 [3];
c_7310450.hdr.mark = gc_color_red;
 c_7310450.hdr.grayed = 0;
c_7310450.tag = closureN_tag;
 c_7310450.fn = (function_type)__lambda_466;
c_7310450.num_args = 1;
c_7310450.num_elements = 3;
c_7310450.elements = (object *)e_7310494;
c_7310450.elements[0] = ((closureN)self_735606)->elements[1];
c_7310450.elements[1] = ((closureN)self_735606)->elements[2];
c_7310450.elements[2] = k_732824;



return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_7310450, Cyc_cadr(data, ((closureN)self_735606)->elements[0]));
} else { 
  return_direct_with_clo1(data,  k_732824, (((closure)  k_732824)->fn),  Cyc_VOID);}
;; 
}

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


make_utf8_string_with_len(c_7310492, "\"", 1, 1);

make_utf8_string_with_len(c_7310493, "\"", 1, 1);

object c_7310491 = Cyc_string_append(data,(closure)&c_7310452,3,&c_7310492, r_732835, &c_7310493);
return_closcall1(data,(closure)&c_7310452,  c_7310491);; 
}

static void __lambda_467(void *data, object self_735608, int argc, object *args) /* object self_735608, object mangled_73650_731655 */
 {
 object mangled_73650_731655 = args[0];
  
closureN_type c_7310454;
object e_7310484 [3];
c_7310454.hdr.mark = gc_color_red;
 c_7310454.hdr.grayed = 0;
c_7310454.tag = closureN_tag;
 c_7310454.fn = (function_type)__lambda_468;
c_7310454.num_args = 1;
c_7310454.num_elements = 3;
c_7310454.elements = (object *)e_7310484;
c_7310454.elements[0] = ((closureN)self_735608)->elements[1];
c_7310454.elements[1] = ((closureN)self_735608)->elements[2];
c_7310454.elements[2] = mangled_73650_731655;



return_direct_with_clo3(data,  __glo_string_91split_scheme_cyclone_util, (((closure)  __glo_string_91split_scheme_cyclone_util)->fn),  &c_7310454, Cyc_car(data, ((closureN)self_735608)->elements[0]), obj_char2obj(44));; 
}

static void __lambda_468(void *data, object self_735609, int argc, object *args) /* object self_735609, object all_91args_73653_731656 */
 {
 object all_91args_73653_731656 = args[0];
  
closureN_type c_7310456;
object e_7310476 [3];
c_7310456.hdr.mark = gc_color_red;
 c_7310456.hdr.grayed = 0;
c_7310456.tag = closureN_tag;
 c_7310456.fn = (function_type)__lambda_469;
c_7310456.num_args = 1;
c_7310456.num_elements = 3;
c_7310456.elements = (object *)e_7310476;
c_7310456.elements[0] = ((closureN)self_735609)->elements[0];
c_7310456.elements[1] = ((closureN)self_735609)->elements[1];
c_7310456.elements[2] = ((closureN)self_735609)->elements[2];


pair_type local_7310479; 



make_utf8_string_with_len(c_7310483, ",", 1, 1);
return_direct_with_clo3(data,  __glo_string_91join_scheme_cyclone_util, (((closure)  __glo_string_91join_scheme_cyclone_util)->fn),  &c_7310456, set_pair_as_expr(&local_7310479, ((closureN)self_735609)->elements[2], Cyc_cdr(data, all_91args_73653_731656)), &c_7310483);; 
}

static void __lambda_469(void *data, object self_735610, int argc, object *args) /* object self_735610, object new_91all_91args_73656_731657 */
 {
 object new_91all_91args_73656_731657 = args[0];
  
closureN_type c_7310458;
object e_7310471 [3];
c_7310458.hdr.mark = gc_color_red;
 c_7310458.hdr.grayed = 0;
c_7310458.tag = closureN_tag;
 c_7310458.fn = (function_type)__lambda_470;
c_7310458.num_args = 1;
c_7310458.num_elements = 3;
c_7310458.elements = (object *)e_7310471;
c_7310458.elements[0] = ((closureN)self_735610)->elements[0];
c_7310458.elements[1] = ((closureN)self_735610)->elements[1];
c_7310458.elements[2] = ((closureN)self_735610)->elements[2];


object c_7310474 = Cyc_set_car_cps(data,(closure)&c_7310458,((closureN)self_735610)->elements[0], new_91all_91args_73656_731657);
return_closcall1(data,(closure)&c_7310458,  c_7310474);; 
}

static void __lambda_470(void *data, object self_735611, int argc, object *args) /* object self_735611, object r_732830 */
 {

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



return_direct_with_clo1(data,(closure)&c_7310460,__lambda_471,  Cyc_cadddr(data, ((closureN)self_735611)->elements[0]));; 
}

static void __lambda_471(void *data, object self_735612, int argc, object *args) /* object self_735612, object r_732831 */
 {
 object r_732831 = args[0];
  
object c_7310465 = Cyc_set_car_cps(data,  ((closureN)self_735612)->elements[0],r_732831, ((closureN)self_735612)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_735612)->elements[0], (((closure)  ((closureN)self_735612)->elements[0])->fn),  c_7310465);; 
}

static void __lambda_461(void *data, object self_735613, int argc, object *args) /* object self_735613, object k_732837 */
 {
 object k_732837 = args[0];
  
closureN_type c_7310429;
object e_7310440 [3];
c_7310429.hdr.mark = gc_color_red;
 c_7310429.hdr.grayed = 0;
c_7310429.tag = closureN_tag;
 c_7310429.fn = (function_type)__lambda_462;
c_7310429.num_args = 1;
c_7310429.num_elements = 3;
c_7310429.elements = (object *)e_7310440;
c_7310429.elements[0] = ((closureN)self_735613)->elements[0];
c_7310429.elements[1] = k_732837;
c_7310429.elements[2] = ((closureN)self_735613)->elements[2];

return_direct_with_clo2(data,  __glo_prim_117arg_91count_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117arg_91count_127_scheme_cyclone_primitives)->fn),  &c_7310429, ((closureN)self_735613)->elements[1]);; 
}

static void __lambda_462(void *data, object self_735614, int argc, object *args) /* object self_735614, object r_732838 */
 {
 object r_732838 = args[0];
  if( (boolean_f != r_732838) ){ 
  
closureN_type c_7310431;
object e_7310435 [2];
c_7310431.hdr.mark = gc_color_red;
 c_7310431.hdr.grayed = 0;
c_7310431.tag = closureN_tag;
 c_7310431.fn = (function_type)__lambda_463;
c_7310431.num_args = 1;
c_7310431.num_elements = 2;
c_7310431.elements = (object *)e_7310435;
c_7310431.elements[0] = ((closureN)self_735614)->elements[0];
c_7310431.elements[1] = ((closureN)self_735614)->elements[1];

return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  &c_7310431, ((closureN)self_735614)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735614)->elements[1], (((closure)  ((closureN)self_735614)->elements[1])->fn),  ((closureN)self_735614)->elements[0]);}
;; 
}

static void __lambda_463(void *data, object self_735615, int argc, object *args) /* object self_735615, object r_732839 */
 {
 object r_732839 = args[0];
  return_direct_with_clo3(data,  __glo_c_117append_scheme_cyclone_cgen, (((closure)  __glo_c_117append_scheme_cyclone_cgen)->fn),  ((closureN)self_735615)->elements[1], r_732839, ((closureN)self_735615)->elements[0]);; 
}

static void __lambda_455(void *data, object self_735543, int argc, object *args) /* object self_735543, object kons_73616_731642 */
 {
 object kons_73616_731642 = args[0];
  
list_2_type local_7310395; 



pair_type local_7310400; 


return_direct_with_clo1(data,  ((closureN)self_735543)->elements[0], (((closure)  ((closureN)self_735543)->elements[0])->fn),  Cyc_fast_list_2(&local_7310395, Cyc_cdr(data, kons_73616_731642), set_cell_as_expr(&local_7310400, Cyc_car(data, kons_73616_731642))));; 
}

static void __lambda_424(void *data, object self_735544, int argc, object *args) /* object self_735544, object k_732716 */
 {
 object k_732716 = args[0];
  
closureN_type c_7310099;
object e_7310108 [1];
c_7310099.hdr.mark = gc_color_red;
 c_7310099.hdr.grayed = 0;
c_7310099.tag = closureN_tag;
 c_7310099.fn = (function_type)__lambda_425;
c_7310099.num_args = 0;
c_7310099.num_elements = 1;
c_7310099.elements = (object *)e_7310108;
c_7310099.elements[0] = ((closureN)self_735544)->elements[1];


closureN_type c_7310109;
object e_7310388 [3];
c_7310109.hdr.mark = gc_color_red;
 c_7310109.hdr.grayed = 0;
c_7310109.tag = closureN_tag;
 c_7310109.fn = (function_type)__lambda_426;
c_7310109.num_args = 1;
c_7310109.num_elements = 3;
c_7310109.elements = (object *)e_7310388;
c_7310109.elements[0] = ((closureN)self_735544)->elements[0];
c_7310109.elements[1] = k_732716;
c_7310109.elements[2] = ((closureN)self_735544)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310099,__lambda_425,  &c_7310109);; 
}

static void __lambda_426(void *data, object self_735545, int argc, object *args) /* object self_735545, object r_732717 */
 {
 object r_732717 = args[0];
  if( (boolean_f != r_732717) ){ 
  
closureN_type c_7310111;
object e_7310118 [1];
c_7310111.hdr.mark = gc_color_red;
 c_7310111.hdr.grayed = 0;
c_7310111.tag = closureN_tag;
 c_7310111.fn = (function_type)__lambda_427;
c_7310111.num_args = 1;
c_7310111.num_elements = 1;
c_7310111.elements = (object *)e_7310118;
c_7310111.elements[0] = ((closureN)self_735545)->elements[1];


make_utf8_string_with_len(c_7310122, "obj_int2obj(", 12, 12);



make_utf8_string_with_len(c_7310126, ")", 1, 1);

object c_7310121 = Cyc_string_append(data,(closure)&c_7310111,3,&c_7310122, Cyc_car(data, ((closureN)self_735545)->elements[0]), &c_7310126);
return_closcall1(data,(closure)&c_7310111,  c_7310121);
} else { 
  
closureN_type c_7310128;
object e_7310137 [1];
c_7310128.hdr.mark = gc_color_red;
 c_7310128.hdr.grayed = 0;
c_7310128.tag = closureN_tag;
 c_7310128.fn = (function_type)__lambda_428;
c_7310128.num_args = 0;
c_7310128.num_elements = 1;
c_7310128.elements = (object *)e_7310137;
c_7310128.elements[0] = ((closureN)self_735545)->elements[2];


closureN_type c_7310138;
object e_7310387 [3];
c_7310138.hdr.mark = gc_color_red;
 c_7310138.hdr.grayed = 0;
c_7310138.tag = closureN_tag;
 c_7310138.fn = (function_type)__lambda_429;
c_7310138.num_args = 1;
c_7310138.num_elements = 3;
c_7310138.elements = (object *)e_7310387;
c_7310138.elements[0] = ((closureN)self_735545)->elements[0];
c_7310138.elements[1] = ((closureN)self_735545)->elements[1];
c_7310138.elements[2] = ((closureN)self_735545)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310128,__lambda_428,  &c_7310138);}
;; 
}

static void __lambda_429(void *data, object self_735547, int argc, object *args) /* object self_735547, object r_732720 */
 {
 object r_732720 = args[0];
  if( (boolean_f != r_732720) ){ 
  
closureN_type c_7310140;
object e_7310170 [2];
c_7310140.hdr.mark = gc_color_red;
 c_7310140.hdr.grayed = 0;
c_7310140.tag = closureN_tag;
 c_7310140.fn = (function_type)__lambda_430;
c_7310140.num_args = 1;
c_7310140.num_elements = 2;
c_7310140.elements = (object *)e_7310170;
c_7310140.elements[0] = ((closureN)self_735547)->elements[0];
c_7310140.elements[1] = ((closureN)self_735547)->elements[1];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7310140, quote_var);
} else { 
  
closureN_type c_7310172;
object e_7310181 [1];
c_7310172.hdr.mark = gc_color_red;
 c_7310172.hdr.grayed = 0;
c_7310172.tag = closureN_tag;
 c_7310172.fn = (function_type)__lambda_434;
c_7310172.num_args = 0;
c_7310172.num_elements = 1;
c_7310172.elements = (object *)e_7310181;
c_7310172.elements[0] = ((closureN)self_735547)->elements[2];


closureN_type c_7310182;
object e_7310386 [3];
c_7310182.hdr.mark = gc_color_red;
 c_7310182.hdr.grayed = 0;
c_7310182.tag = closureN_tag;
 c_7310182.fn = (function_type)__lambda_435;
c_7310182.num_args = 1;
c_7310182.num_elements = 3;
c_7310182.elements = (object *)e_7310386;
c_7310182.elements[0] = ((closureN)self_735547)->elements[0];
c_7310182.elements[1] = ((closureN)self_735547)->elements[1];
c_7310182.elements[2] = ((closureN)self_735547)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310172,__lambda_434,  &c_7310182);}
;; 
}

static void __lambda_435(void *data, object self_735552, int argc, object *args) /* object self_735552, object r_732727 */
 {
 object r_732727 = args[0];
  if( (boolean_f != r_732727) ){ 
  
closureN_type c_7310184;
object e_7310214 [2];
c_7310184.hdr.mark = gc_color_red;
 c_7310184.hdr.grayed = 0;
c_7310184.tag = closureN_tag;
 c_7310184.fn = (function_type)__lambda_436;
c_7310184.num_args = 1;
c_7310184.num_elements = 2;
c_7310184.elements = (object *)e_7310214;
c_7310184.elements[0] = ((closureN)self_735552)->elements[0];
c_7310184.elements[1] = ((closureN)self_735552)->elements[1];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7310184, quote_var);
} else { 
    
if( (boolean_f != Cyc_eqv(((closureN)self_735552)->elements[2], quote_bool)) ){ 
  
closureN_type c_7310219;
object e_7310226 [1];
c_7310219.hdr.mark = gc_color_red;
 c_7310219.hdr.grayed = 0;
c_7310219.tag = closureN_tag;
 c_7310219.fn = (function_type)__lambda_440;
c_7310219.num_args = 1;
c_7310219.num_elements = 1;
c_7310219.elements = (object *)e_7310226;
c_7310219.elements[0] = ((closureN)self_735552)->elements[1];


make_utf8_string_with_len(c_7310230, "(", 1, 1);



make_utf8_string_with_len(c_7310234, " == 0 \? boolean_f : boolean_t)", 30, 30);

object c_7310229 = Cyc_string_append(data,(closure)&c_7310219,3,&c_7310230, Cyc_car(data, ((closureN)self_735552)->elements[0]), &c_7310234);
return_closcall1(data,(closure)&c_7310219,  c_7310229);
} else { 
    
if( (boolean_f != Cyc_eqv(((closureN)self_735552)->elements[2], quote__char)) ){ 
  
closureN_type c_7310239;
object e_7310246 [1];
c_7310239.hdr.mark = gc_color_red;
 c_7310239.hdr.grayed = 0;
c_7310239.tag = closureN_tag;
 c_7310239.fn = (function_type)__lambda_441;
c_7310239.num_args = 1;
c_7310239.num_elements = 1;
c_7310239.elements = (object *)e_7310246;
c_7310239.elements[0] = ((closureN)self_735552)->elements[1];


make_utf8_string_with_len(c_7310250, "obj_char2obj(", 13, 13);



make_utf8_string_with_len(c_7310254, ")", 1, 1);

object c_7310249 = Cyc_string_append(data,(closure)&c_7310239,3,&c_7310250, Cyc_car(data, ((closureN)self_735552)->elements[0]), &c_7310254);
return_closcall1(data,(closure)&c_7310239,  c_7310249);
} else { 
    
if( (boolean_f != Cyc_eqv(((closureN)self_735552)->elements[2], quote_string)) ){ 
  
closureN_type c_7310259;
object e_7310289 [2];
c_7310259.hdr.mark = gc_color_red;
 c_7310259.hdr.grayed = 0;
c_7310259.tag = closureN_tag;
 c_7310259.fn = (function_type)__lambda_442;
c_7310259.num_args = 1;
c_7310259.num_elements = 2;
c_7310259.elements = (object *)e_7310289;
c_7310259.elements[0] = ((closureN)self_735552)->elements[0];
c_7310259.elements[1] = ((closureN)self_735552)->elements[1];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7310259, quote_var);
} else { 
    
if( (boolean_f != Cyc_eqv(((closureN)self_735552)->elements[2], quote_bytevector)) ){ 
  
closureN_type c_7310294;
object e_7310325 [2];
c_7310294.hdr.mark = gc_color_red;
 c_7310294.hdr.grayed = 0;
c_7310294.tag = closureN_tag;
 c_7310294.fn = (function_type)__lambda_446;
c_7310294.num_args = 1;
c_7310294.num_elements = 2;
c_7310294.elements = (object *)e_7310325;
c_7310294.elements[0] = ((closureN)self_735552)->elements[0];
c_7310294.elements[1] = ((closureN)self_735552)->elements[1];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7310294, quote_var);
} else { 
    
if( (boolean_f != Cyc_eqv(((closureN)self_735552)->elements[2], quote_opaque)) ){ 
  
closureN_type c_7310330;
object e_7310360 [2];
c_7310330.hdr.mark = gc_color_red;
 c_7310330.hdr.grayed = 0;
c_7310330.tag = closureN_tag;
 c_7310330.fn = (function_type)__lambda_450;
c_7310330.num_args = 1;
c_7310330.num_elements = 2;
c_7310330.elements = (object *)e_7310360;
c_7310330.elements[0] = ((closureN)self_735552)->elements[0];
c_7310330.elements[1] = ((closureN)self_735552)->elements[1];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_7310330, quote_var);
} else { 
    
if( (boolean_f != Cyc_eqv(((closureN)self_735552)->elements[2], quote_c_91void)) ){ 
  
closureN_type c_7310365;
object e_7310372 [1];
c_7310365.hdr.mark = gc_color_red;
 c_7310365.hdr.grayed = 0;
c_7310365.tag = closureN_tag;
 c_7310365.fn = (function_type)__lambda_454;
c_7310365.num_args = 1;
c_7310365.num_elements = 1;
c_7310365.elements = (object *)e_7310372;
c_7310365.elements[0] = ((closureN)self_735552)->elements[1];




make_utf8_string_with_len(c_7310379, ";", 1, 1);

object c_7310375 = Cyc_string_append(data,(closure)&c_7310365,2,Cyc_car(data, ((closureN)self_735552)->elements[0]), &c_7310379);
return_closcall1(data,(closure)&c_7310365,  c_7310375);
} else { 
  
make_utf8_string_with_len(c_7310382, "c->scm unable to convert C object of type ", 42, 42);


return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735552)->elements[1], &c_7310382, Cyc_cadr(data, ((closureN)self_735552)->elements[0]));}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_454(void *data, object self_735571, int argc, object *args) /* object self_735571, object r_732762 */
 {
 object r_732762 = args[0];
  
pair_type local_7310370; 

make_utf8_string_with_len(c_7310371, "Cyc_VOID", 8, 8);
return_direct_with_clo1(data,  ((closureN)self_735571)->elements[0], (((closure)  ((closureN)self_735571)->elements[0])->fn),  set_pair_as_expr(&local_7310370, r_732762, &c_7310371));; 
}

static void __lambda_450(void *data, object self_735567, int argc, object *args) /* object self_735567, object r_732759 */
 {
 object r_732759 = args[0];
  
closureN_type c_7310332;
object e_7310359 [2];
c_7310332.hdr.mark = gc_color_red;
 c_7310332.hdr.grayed = 0;
c_7310332.tag = closureN_tag;
 c_7310332.fn = (function_type)__lambda_451;
c_7310332.num_args = 1;
c_7310332.num_elements = 2;
c_7310332.elements = (object *)e_7310359;
c_7310332.elements[0] = ((closureN)self_735567)->elements[0];
c_7310332.elements[1] = ((closureN)self_735567)->elements[1];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7310332, r_732759);; 
}

static void __lambda_451(void *data, object self_735568, int argc, object *args) /* object self_735568, object var_73625_731648 */
 {
 object var_73625_731648 = args[0];
  
closureN_type c_7310334;
object e_7310349 [2];
c_7310334.hdr.mark = gc_color_red;
 c_7310334.hdr.grayed = 0;
c_7310334.tag = closureN_tag;
 c_7310334.fn = (function_type)__lambda_452;
c_7310334.num_args = 1;
c_7310334.num_elements = 2;
c_7310334.elements = (object *)e_7310349;
c_7310334.elements[0] = ((closureN)self_735568)->elements[1];
c_7310334.elements[1] = var_73625_731648;


make_utf8_string_with_len(c_7310353, "make_c_opaque(", 14, 14);

make_utf8_string_with_len(c_7310354, ", ", 2, 2);



make_utf8_string_with_len(c_7310358, ");", 2, 2);

object c_7310352 = Cyc_string_append(data,(closure)&c_7310334,5,&c_7310353, var_73625_731648, &c_7310354, Cyc_car(data, ((closureN)self_735568)->elements[0]), &c_7310358);
return_closcall1(data,(closure)&c_7310334,  c_7310352);; 
}

static void __lambda_452(void *data, object self_735569, int argc, object *args) /* object self_735569, object r_732756 */
 {
 object r_732756 = args[0];
  
closureN_type c_7310336;
object e_7310343 [2];
c_7310336.hdr.mark = gc_color_red;
 c_7310336.hdr.grayed = 0;
c_7310336.tag = closureN_tag;
 c_7310336.fn = (function_type)__lambda_453;
c_7310336.num_args = 1;
c_7310336.num_elements = 2;
c_7310336.elements = (object *)e_7310343;
c_7310336.elements[0] = ((closureN)self_735569)->elements[0];
c_7310336.elements[1] = r_732756;


make_utf8_string_with_len(c_7310347, "&", 1, 1);

object c_7310346 = Cyc_string_append(data,(closure)&c_7310336,2,&c_7310347, ((closureN)self_735569)->elements[1]);
return_closcall1(data,(closure)&c_7310336,  c_7310346);; 
}

static void __lambda_453(void *data, object self_735570, int argc, object *args) /* object self_735570, object r_732757 */
 {
 object r_732757 = args[0];
  
pair_type local_7310341; 
return_direct_with_clo1(data,  ((closureN)self_735570)->elements[0], (((closure)  ((closureN)self_735570)->elements[0])->fn),  set_pair_as_expr(&local_7310341, ((closureN)self_735570)->elements[1], r_732757));; 
}

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

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7310296, r_732752);; 
}

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


make_utf8_string_with_len(c_7310317, "make_empty_bytevector(", 22, 22);

make_utf8_string_with_len(c_7310318, ");", 2, 2);

make_utf8_string_with_len(c_7310319, "->data = ", 9, 9);



make_utf8_string_with_len(c_7310323, ";", 1, 1);

object c_7310316 = Cyc_string_append(data,(closure)&c_7310298,7,&c_7310317, var_73624_731647, &c_7310318, var_73624_731647, &c_7310319, Cyc_car(data, ((closureN)self_735564)->elements[0]), &c_7310323);
return_closcall1(data,(closure)&c_7310298,  c_7310316);; 
}

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


make_utf8_string_with_len(c_7310311, "&", 1, 1);

object c_7310310 = Cyc_string_append(data,(closure)&c_7310300,2,&c_7310311, ((closureN)self_735565)->elements[1]);
return_closcall1(data,(closure)&c_7310300,  c_7310310);; 
}

static void __lambda_449(void *data, object self_735566, int argc, object *args) /* object self_735566, object r_732750 */
 {
 object r_732750 = args[0];
  
pair_type local_7310305; 
return_direct_with_clo1(data,  ((closureN)self_735566)->elements[0], (((closure)  ((closureN)self_735566)->elements[0])->fn),  set_pair_as_expr(&local_7310305, ((closureN)self_735566)->elements[1], r_732750));; 
}

static void __lambda_442(void *data, object self_735559, int argc, object *args) /* object self_735559, object r_732745 */
 {
 object r_732745 = args[0];
  
closureN_type c_7310261;
object e_7310288 [2];
c_7310261.hdr.mark = gc_color_red;
 c_7310261.hdr.grayed = 0;
c_7310261.tag = closureN_tag;
 c_7310261.fn = (function_type)__lambda_443;
c_7310261.num_args = 1;
c_7310261.num_elements = 2;
c_7310261.elements = (object *)e_7310288;
c_7310261.elements[0] = ((closureN)self_735559)->elements[0];
c_7310261.elements[1] = ((closureN)self_735559)->elements[1];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7310261, r_732745);; 
}

static void __lambda_443(void *data, object self_735560, int argc, object *args) /* object self_735560, object var_73623_731646 */
 {
 object var_73623_731646 = args[0];
  
closureN_type c_7310263;
object e_7310278 [2];
c_7310263.hdr.mark = gc_color_red;
 c_7310263.hdr.grayed = 0;
c_7310263.tag = closureN_tag;
 c_7310263.fn = (function_type)__lambda_444;
c_7310263.num_args = 1;
c_7310263.num_elements = 2;
c_7310263.elements = (object *)e_7310278;
c_7310263.elements[0] = ((closureN)self_735560)->elements[1];
c_7310263.elements[1] = var_73623_731646;


make_utf8_string_with_len(c_7310282, "make_utf8_string(data,", 22, 22);

make_utf8_string_with_len(c_7310283, ", ", 2, 2);



make_utf8_string_with_len(c_7310287, ");", 2, 2);

object c_7310281 = Cyc_string_append(data,(closure)&c_7310263,5,&c_7310282, var_73623_731646, &c_7310283, Cyc_car(data, ((closureN)self_735560)->elements[0]), &c_7310287);
return_closcall1(data,(closure)&c_7310263,  c_7310281);; 
}

static void __lambda_444(void *data, object self_735561, int argc, object *args) /* object self_735561, object r_732742 */
 {
 object r_732742 = args[0];
  
closureN_type c_7310265;
object e_7310272 [2];
c_7310265.hdr.mark = gc_color_red;
 c_7310265.hdr.grayed = 0;
c_7310265.tag = closureN_tag;
 c_7310265.fn = (function_type)__lambda_445;
c_7310265.num_args = 1;
c_7310265.num_elements = 2;
c_7310265.elements = (object *)e_7310272;
c_7310265.elements[0] = ((closureN)self_735561)->elements[0];
c_7310265.elements[1] = r_732742;


make_utf8_string_with_len(c_7310276, "&", 1, 1);

object c_7310275 = Cyc_string_append(data,(closure)&c_7310265,2,&c_7310276, ((closureN)self_735561)->elements[1]);
return_closcall1(data,(closure)&c_7310265,  c_7310275);; 
}

static void __lambda_445(void *data, object self_735562, int argc, object *args) /* object self_735562, object r_732743 */
 {
 object r_732743 = args[0];
  
pair_type local_7310270; 
return_direct_with_clo1(data,  ((closureN)self_735562)->elements[0], (((closure)  ((closureN)self_735562)->elements[0])->fn),  set_pair_as_expr(&local_7310270, ((closureN)self_735562)->elements[1], r_732743));; 
}

static void __lambda_441(void *data, object self_735558, int argc, object *args) /* object self_735558, object r_732738 */
 {
 object r_732738 = args[0];
  
pair_type local_7310244; 

make_utf8_string_with_len(c_7310245, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735558)->elements[0], (((closure)  ((closureN)self_735558)->elements[0])->fn),  set_pair_as_expr(&local_7310244, &c_7310245, r_732738));; 
}

static void __lambda_440(void *data, object self_735557, int argc, object *args) /* object self_735557, object r_732735 */
 {
 object r_732735 = args[0];
  
pair_type local_7310224; 

make_utf8_string_with_len(c_7310225, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735557)->elements[0], (((closure)  ((closureN)self_735557)->elements[0])->fn),  set_pair_as_expr(&local_7310224, &c_7310225, r_732735));; 
}

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

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7310186, r_732732);; 
}

static void __lambda_437(void *data, object self_735554, int argc, object *args) /* object self_735554, object var_73622_731645 */
 {
 object var_73622_731645 = args[0];
  
closureN_type c_7310188;
object e_7310202 [2];
c_7310188.hdr.mark = gc_color_red;
 c_7310188.hdr.grayed = 0;
c_7310188.tag = closureN_tag;
 c_7310188.fn = (function_type)__lambda_438;
c_7310188.num_args = 1;
c_7310188.num_elements = 2;
c_7310188.elements = (object *)e_7310202;
c_7310188.elements[0] = ((closureN)self_735554)->elements[1];
c_7310188.elements[1] = var_73622_731645;


make_utf8_string_with_len(c_7310206, "alloc_bignum(data,", 18, 18);

make_utf8_string_with_len(c_7310207, ");", 2, 2);

make_utf8_string_with_len(c_7310208, "->bn = ", 7, 7);



make_utf8_string_with_len(c_7310212, ";", 1, 1);

object c_7310205 = Cyc_string_append(data,(closure)&c_7310188,7,&c_7310206, var_73622_731645, &c_7310207, var_73622_731645, &c_7310208, Cyc_car(data, ((closureN)self_735554)->elements[0]), &c_7310212);
return_closcall1(data,(closure)&c_7310188,  c_7310205);; 
}

static void __lambda_438(void *data, object self_735555, int argc, object *args) /* object self_735555, object r_732729 */
 {
 object r_732729 = args[0];
  
closureN_type c_7310190;
object e_7310197 [2];
c_7310190.hdr.mark = gc_color_red;
 c_7310190.hdr.grayed = 0;
c_7310190.tag = closureN_tag;
 c_7310190.fn = (function_type)__lambda_439;
c_7310190.num_args = 1;
c_7310190.num_elements = 2;
c_7310190.elements = (object *)e_7310197;
c_7310190.elements[0] = ((closureN)self_735555)->elements[0];
c_7310190.elements[1] = r_732729;


object c_7310200 = Cyc_string_append(data,(closure)&c_7310190,1,((closureN)self_735555)->elements[1]);
return_closcall1(data,(closure)&c_7310190,  c_7310200);; 
}

static void __lambda_439(void *data, object self_735556, int argc, object *args) /* object self_735556, object r_732730 */
 {
 object r_732730 = args[0];
  
pair_type local_7310195; 
return_direct_with_clo1(data,  ((closureN)self_735556)->elements[0], (((closure)  ((closureN)self_735556)->elements[0])->fn),  set_pair_as_expr(&local_7310195, ((closureN)self_735556)->elements[1], r_732730));; 
}

static void __lambda_434(void *data, object self_735572, int argc, object *args) /* object self_735572, object k_732771 */
 {
 object k_732771 = args[0];
    
if( (boolean_f != Cyc_eq(((closureN)self_735572)->elements[0], quote_bignum)) ){ 
  return_direct_with_clo1(data,  k_732771,__lambda_435,  boolean_t);
} else { 
  

return_direct_with_clo1(data,  k_732771,__lambda_435,  Cyc_eq(((closureN)self_735572)->elements[0], quote_bigint));}
;; 
}

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

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7310142, r_732725);; 
}

static void __lambda_431(void *data, object self_735549, int argc, object *args) /* object self_735549, object var_73621_731644 */
 {
 object var_73621_731644 = args[0];
  
closureN_type c_7310144;
object e_7310159 [2];
c_7310144.hdr.mark = gc_color_red;
 c_7310144.hdr.grayed = 0;
c_7310144.tag = closureN_tag;
 c_7310144.fn = (function_type)__lambda_432;
c_7310144.num_args = 1;
c_7310144.num_elements = 2;
c_7310144.elements = (object *)e_7310159;
c_7310144.elements[0] = ((closureN)self_735549)->elements[1];
c_7310144.elements[1] = var_73621_731644;


make_utf8_string_with_len(c_7310163, "make_double(", 12, 12);

make_utf8_string_with_len(c_7310164, ", ", 2, 2);



make_utf8_string_with_len(c_7310168, ");", 2, 2);

object c_7310162 = Cyc_string_append(data,(closure)&c_7310144,5,&c_7310163, var_73621_731644, &c_7310164, Cyc_car(data, ((closureN)self_735549)->elements[0]), &c_7310168);
return_closcall1(data,(closure)&c_7310144,  c_7310162);; 
}

static void __lambda_432(void *data, object self_735550, int argc, object *args) /* object self_735550, object r_732722 */
 {
 object r_732722 = args[0];
  
closureN_type c_7310146;
object e_7310153 [2];
c_7310146.hdr.mark = gc_color_red;
 c_7310146.hdr.grayed = 0;
c_7310146.tag = closureN_tag;
 c_7310146.fn = (function_type)__lambda_433;
c_7310146.num_args = 1;
c_7310146.num_elements = 2;
c_7310146.elements = (object *)e_7310153;
c_7310146.elements[0] = ((closureN)self_735550)->elements[0];
c_7310146.elements[1] = r_732722;


make_utf8_string_with_len(c_7310157, "&", 1, 1);

object c_7310156 = Cyc_string_append(data,(closure)&c_7310146,2,&c_7310157, ((closureN)self_735550)->elements[1]);
return_closcall1(data,(closure)&c_7310146,  c_7310156);; 
}

static void __lambda_433(void *data, object self_735551, int argc, object *args) /* object self_735551, object r_732723 */
 {
 object r_732723 = args[0];
  
pair_type local_7310151; 
return_direct_with_clo1(data,  ((closureN)self_735551)->elements[0], (((closure)  ((closureN)self_735551)->elements[0])->fn),  set_pair_as_expr(&local_7310151, ((closureN)self_735551)->elements[1], r_732723));; 
}

static void __lambda_428(void *data, object self_735573, int argc, object *args) /* object self_735573, object k_732775 */
 {
 object k_732775 = args[0];
    
if( (boolean_f != Cyc_eq(((closureN)self_735573)->elements[0], quote__float)) ){ 
  return_direct_with_clo1(data,  k_732775,__lambda_429,  boolean_t);
} else { 
  

return_direct_with_clo1(data,  k_732775,__lambda_429,  Cyc_eq(((closureN)self_735573)->elements[0], quote__double));}
;; 
}

static void __lambda_427(void *data, object self_735546, int argc, object *args) /* object self_735546, object r_732718 */
 {
 object r_732718 = args[0];
  
pair_type local_7310116; 

make_utf8_string_with_len(c_7310117, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735546)->elements[0], (((closure)  ((closureN)self_735546)->elements[0])->fn),  set_pair_as_expr(&local_7310116, &c_7310117, r_732718));; 
}

static void __lambda_425(void *data, object self_735574, int argc, object *args) /* object self_735574, object k_732779 */
 {
 object k_732779 = args[0];
    
if( (boolean_f != Cyc_eq(((closureN)self_735574)->elements[0], quote__int)) ){ 
  return_direct_with_clo1(data,  k_732779,__lambda_426,  boolean_t);
} else { 
  

return_direct_with_clo1(data,  k_732779,__lambda_426,  Cyc_eq(((closureN)self_735574)->elements[0], quote_integer));}
;; 
}

static void __lambda_421(void *data, object self_735522, int argc, object *args) /* object self_735522, object k_732707, object e_73609_731641 */
 {
 object k_732707 = args[0]; object e_73609_731641 = args[1];
  
make_utf8_string_with_len(c_7310064, "", 0, 0);

make_utf8_string_with_len(c_7310066, "", 0, 0);
return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  k_732707, e_73609_731641, ((closureN)self_735522)->elements[0], &c_7310064, ((closureN)self_735522)->elements[1], &c_7310066, ((closureN)self_735522)->elements[2]);; 
}

static void __lambda_403(void *data, object self_735523, int argc, object *args) /* object self_735523, object r_732705 */
 {
 object r_732705 = args[0];
  
closureN_type c_739949;
object e_7310056 [3];
c_739949.hdr.mark = gc_color_red;
 c_739949.hdr.grayed = 0;
c_739949.tag = closureN_tag;
 c_739949.fn = (function_type)__lambda_404;
c_739949.num_args = 1;
c_739949.num_elements = 3;
c_739949.elements = (object *)e_7310056;
c_739949.elements[0] = ((closureN)self_735523)->elements[0];
c_739949.elements[1] = ((closureN)self_735523)->elements[1];
c_739949.elements[2] = ((closureN)self_735523)->elements[2];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_739949, r_732705, Cyc_cddr(data, ((closureN)self_735523)->elements[0]));; 
}

static void __lambda_404(void *data, object self_735524, int argc, object *args) /* object self_735524, object cgen_91lis_73592_731633 */
 {
 object cgen_91lis_73592_731633 = args[0];
  
closureN_type c_739951;
object e_7310051 [4];
c_739951.hdr.mark = gc_color_red;
 c_739951.hdr.grayed = 0;
c_739951.tag = closureN_tag;
 c_739951.fn = (function_type)__lambda_405;
c_739951.num_args = 1;
c_739951.num_elements = 4;
c_739951.elements = (object *)e_7310051;
c_739951.elements[0] = ((closureN)self_735524)->elements[0];
c_739951.elements[1] = cgen_91lis_73592_731633;
c_739951.elements[2] = ((closureN)self_735524)->elements[1];
c_739951.elements[3] = ((closureN)self_735524)->elements[2];


mclosure0(c_7310052, (function_type)__lambda_420);c_7310052.num_args = 1;
return_direct_with_clo1(data,(closure)&c_739951,__lambda_405,  &c_7310052);; 
}

static void __lambda_420(void *data, object self_735525, int argc, object *args) /* object self_735525, object k_732703, object a_73608_731640 */
 {
 object k_732703 = args[0]; object a_73608_731640 = args[1];
  

return_direct_with_clo2(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  k_732703, Cyc_cadr(data, a_73608_731640));; 
}

static void __lambda_405(void *data, object self_735526, int argc, object *args) /* object self_735526, object r_732702 */
 {
 object r_732702 = args[0];
  
closureN_type c_739953;
object e_7310049 [4];
c_739953.hdr.mark = gc_color_red;
 c_739953.hdr.grayed = 0;
c_739953.tag = closureN_tag;
 c_739953.fn = (function_type)__lambda_406;
c_739953.num_args = 1;
c_739953.num_elements = 4;
c_739953.elements = (object *)e_7310049;
c_739953.elements[0] = ((closureN)self_735526)->elements[0];
c_739953.elements[1] = ((closureN)self_735526)->elements[1];
c_739953.elements[2] = ((closureN)self_735526)->elements[2];
c_739953.elements[3] = ((closureN)self_735526)->elements[3];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_739953, r_732702, ((closureN)self_735526)->elements[1]);; 
}

static void __lambda_406(void *data, object self_735527, int argc, object *args) /* object self_735527, object r_732701 */
 {
 object r_732701 = args[0];
  
closureN_type c_739955;
object e_7310045 [4];
c_739955.hdr.mark = gc_color_red;
 c_739955.hdr.grayed = 0;
c_739955.tag = closureN_tag;
 c_739955.fn = (function_type)__lambda_407;
c_739955.num_args = 1;
c_739955.num_elements = 4;
c_739955.elements = (object *)e_7310045;
c_739955.elements[0] = ((closureN)self_735527)->elements[0];
c_739955.elements[1] = ((closureN)self_735527)->elements[1];
c_739955.elements[2] = ((closureN)self_735527)->elements[2];
c_739955.elements[3] = ((closureN)self_735527)->elements[3];


object c_7310048 = apply(data,(closure)&c_739955,primitive_string_91append, r_732701);
return_closcall1(data,(closure)&c_739955,  c_7310048);; 
}

static void __lambda_407(void *data, object self_735528, int argc, object *args) /* object self_735528, object cgen_91allocs_73595_731634 */
 {
 object cgen_91allocs_73595_731634 = args[0];
  
closureN_type c_739957;
object e_7310041 [4];
c_739957.hdr.mark = gc_color_red;
 c_739957.hdr.grayed = 0;
c_739957.tag = closureN_tag;
 c_739957.fn = (function_type)__lambda_408;
c_739957.num_args = 1;
c_739957.num_elements = 4;
c_739957.elements = (object *)e_7310041;
c_739957.elements[0] = ((closureN)self_735528)->elements[0];
c_739957.elements[1] = cgen_91allocs_73595_731634;
c_739957.elements[2] = ((closureN)self_735528)->elements[1];
c_739957.elements[3] = ((closureN)self_735528)->elements[2];



return_direct_with_clo2(data,  __glo_adb_117get_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_scheme_cyclone_cps_91optimizations)->fn),  &c_739957, Cyc_cdr(data, ((closureN)self_735528)->elements[3]));; 
}

static void __lambda_408(void *data, object self_735529, int argc, object *args) /* object self_735529, object r_732699 */
 {
 object r_732699 = args[0];
  
closureN_type c_739959;
object e_7310040 [4];
c_739959.hdr.mark = gc_color_red;
 c_739959.hdr.grayed = 0;
c_739959.tag = closureN_tag;
 c_739959.fn = (function_type)__lambda_409;
c_739959.num_args = 1;
c_739959.num_elements = 4;
c_739959.elements = (object *)e_7310040;
c_739959.elements[0] = ((closureN)self_735529)->elements[0];
c_739959.elements[1] = ((closureN)self_735529)->elements[1];
c_739959.elements[2] = ((closureN)self_735529)->elements[2];
c_739959.elements[3] = ((closureN)self_735529)->elements[3];

return_direct_with_clo2(data,  __glo_adbv_117assigned_91value_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbv_117assigned_91value_scheme_cyclone_cps_91optimizations)->fn),  &c_739959, r_732699);; 
}

static void __lambda_409(void *data, object self_735530, int argc, object *args) /* object self_735530, object parent_91fnc_73598_731635 */
 {
 object parent_91fnc_73598_731635 = args[0];
  object r_732696;
    
if( (boolean_f != Cyc_is_pair(parent_91fnc_73598_731635)) ){ 
  
  r_732696 = Cyc_car(data, parent_91fnc_73598_731635);
} else { 
  r_732696 = parent_91fnc_73598_731635;}
;
closureN_type c_739968;
object e_7310039 [4];
c_739968.hdr.mark = gc_color_red;
 c_739968.hdr.grayed = 0;
c_739968.tag = closureN_tag;
 c_739968.fn = (function_type)__lambda_410;
c_739968.num_args = 1;
c_739968.num_elements = 4;
c_739968.elements = (object *)e_7310039;
c_739968.elements[0] = ((closureN)self_735530)->elements[0];
c_739968.elements[1] = ((closureN)self_735530)->elements[1];
c_739968.elements[2] = ((closureN)self_735530)->elements[2];
c_739968.elements[3] = ((closureN)self_735530)->elements[3];

return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  &c_739968, r_732696);; 
}

static void __lambda_410(void *data, object self_735531, int argc, object *args) /* object self_735531, object r_732695 */
 {
 object r_732695 = args[0];
  
closureN_type c_739970;
object e_7310012 [5];
c_739970.hdr.mark = gc_color_red;
 c_739970.hdr.grayed = 0;
c_739970.tag = closureN_tag;
 c_739970.fn = (function_type)__lambda_411;
c_739970.num_args = 1;
c_739970.num_elements = 5;
c_739970.elements = (object *)e_7310012;
c_739970.elements[0] = ((closureN)self_735531)->elements[0];
c_739970.elements[1] = ((closureN)self_735531)->elements[1];
c_739970.elements[2] = ((closureN)self_735531)->elements[2];
c_739970.elements[3] = ((closureN)self_735531)->elements[3];
c_739970.elements[4] = r_732695;


mclosure0(c_7310013, (function_type)__lambda_417);c_7310013.num_args = 2;
return_direct_with_clo1(data,(closure)&c_739970,__lambda_411,  &c_7310013);; 
}

static void __lambda_417(void *data, object self_735532, int argc, object *args) /* object self_735532, object k_732689, object arg_73606_731638, object body_91exp_73607_731639 */
 {
 object k_732689 = args[0]; object arg_73606_731638 = args[1]; object body_91exp_73607_731639 = args[2];
  
closureN_type c_7310015;
object e_7310038 [3];
c_7310015.hdr.mark = gc_color_red;
 c_7310015.hdr.grayed = 0;
c_7310015.tag = closureN_tag;
 c_7310015.fn = (function_type)__lambda_418;
c_7310015.num_args = 1;
c_7310015.num_elements = 3;
c_7310015.elements = (object *)e_7310038;
c_7310015.elements[0] = arg_73606_731638;
c_7310015.elements[1] = body_91exp_73607_731639;
c_7310015.elements[2] = k_732689;

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7310015, arg_73606_731638);; 
}

static void __lambda_418(void *data, object self_735533, int argc, object *args) /* object self_735533, object r_732693 */
 {
 object r_732693 = args[0];
    
  
if( (boolean_f != equalp(r_732693, Cyc_car(data, ((closureN)self_735533)->elements[1]))) ){ 
  
make_utf8_string_with_len(c_7310023, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735533)->elements[2], (((closure)  ((closureN)self_735533)->elements[2])->fn),  &c_7310023);
} else { 
  
closureN_type c_7310025;
object e_7310036 [2];
c_7310025.hdr.mark = gc_color_red;
 c_7310025.hdr.grayed = 0;
c_7310025.tag = closureN_tag;
 c_7310025.fn = (function_type)__lambda_419;
c_7310025.num_args = 1;
c_7310025.num_elements = 2;
c_7310025.elements = (object *)e_7310036;
c_7310025.elements[0] = ((closureN)self_735533)->elements[1];
c_7310025.elements[1] = ((closureN)self_735533)->elements[2];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_7310025, ((closureN)self_735533)->elements[0]);}
;; 
}

static void __lambda_419(void *data, object self_735534, int argc, object *args) /* object self_735534, object r_732691_734226 */
 {
 object r_732691_734226 = args[0];
  
make_utf8_string_with_len(c_7310031, " = ", 3, 3);



make_utf8_string_with_len(c_7310035, ";", 1, 1);

object c_7310030 = Cyc_string_append(data,  ((closureN)self_735534)->elements[1],4,r_732691_734226, &c_7310031, Cyc_car(data, ((closureN)self_735534)->elements[0]), &c_7310035);
return_direct_with_clo1(data,  ((closureN)self_735534)->elements[1], (((closure)  ((closureN)self_735534)->elements[1])->fn),  c_7310030);; 
}

static void __lambda_411(void *data, object self_735535, int argc, object *args) /* object self_735535, object r_732688 */
 {
 object r_732688 = args[0];
  
closureN_type c_739972;
object e_7310007 [3];
c_739972.hdr.mark = gc_color_red;
 c_739972.hdr.grayed = 0;
c_739972.tag = closureN_tag;
 c_739972.fn = (function_type)__lambda_412;
c_739972.num_args = 1;
c_739972.num_elements = 3;
c_739972.elements = (object *)e_7310007;
c_739972.elements[0] = ((closureN)self_735535)->elements[0];
c_739972.elements[1] = ((closureN)self_735535)->elements[1];
c_739972.elements[2] = ((closureN)self_735535)->elements[3];



return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_739972, r_732688, Cyc_cdr(data, ((closureN)self_735535)->elements[4]), ((closureN)self_735535)->elements[2]);; 
}

static void __lambda_412(void *data, object self_735536, int argc, object *args) /* object self_735536, object r_732687 */
 {
 object r_732687 = args[0];
  
closureN_type c_739974;
object e_7310003 [3];
c_739974.hdr.mark = gc_color_red;
 c_739974.hdr.grayed = 0;
c_739974.tag = closureN_tag;
 c_739974.fn = (function_type)__lambda_413;
c_739974.num_args = 1;
c_739974.num_elements = 3;
c_739974.elements = (object *)e_7310003;
c_739974.elements[0] = ((closureN)self_735536)->elements[0];
c_739974.elements[1] = ((closureN)self_735536)->elements[1];
c_739974.elements[2] = ((closureN)self_735536)->elements[2];


object c_7310006 = apply(data,(closure)&c_739974,primitive_string_91append, r_732687);
return_closcall1(data,(closure)&c_739974,  c_7310006);; 
}

static void __lambda_413(void *data, object self_735537, int argc, object *args) /* object self_735537, object cgen_91body_73604_731637 */
 {
 object cgen_91body_73604_731637 = args[0];
  
closureN_type c_739976;
object e_739999 [4];
c_739976.hdr.mark = gc_color_red;
 c_739976.hdr.grayed = 0;
c_739976.tag = closureN_tag;
 c_739976.fn = (function_type)__lambda_414;
c_739976.num_args = 1;
c_739976.num_elements = 4;
c_739976.elements = (object *)e_739999;
c_739976.elements[0] = ((closureN)self_735537)->elements[0];
c_739976.elements[1] = ((closureN)self_735537)->elements[1];
c_739976.elements[2] = cgen_91body_73604_731637;
c_739976.elements[3] = ((closureN)self_735537)->elements[2];



return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_739976, Cyc_cadr(data, ((closureN)self_735537)->elements[0]));; 
}

static void __lambda_414(void *data, object self_735538, int argc, object *args) /* object self_735538, object r_732683 */
 {
 object r_732683 = args[0];
  
closureN_type c_739978;
object e_739995 [4];
c_739978.hdr.mark = gc_color_red;
 c_739978.hdr.grayed = 0;
c_739978.tag = closureN_tag;
 c_739978.fn = (function_type)__lambda_415;
c_739978.num_args = 1;
c_739978.num_elements = 4;
c_739978.elements = (object *)e_739995;
c_739978.elements[0] = ((closureN)self_735538)->elements[1];
c_739978.elements[1] = ((closureN)self_735538)->elements[2];
c_739978.elements[2] = ((closureN)self_735538)->elements[3];
c_739978.elements[3] = r_732683;



return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_739978, Cyc_cadr(data, ((closureN)self_735538)->elements[0]));; 
}

static void __lambda_415(void *data, object self_735539, int argc, object *args) /* object self_735539, object r_732684 */
 {
 object r_732684 = args[0];
  
closureN_type c_739980;
object e_739983 [1];
c_739980.hdr.mark = gc_color_red;
 c_739980.hdr.grayed = 0;
c_739980.tag = closureN_tag;
 c_739980.fn = (function_type)__lambda_416;
c_739980.num_args = 1;
c_739980.num_elements = 1;
c_739980.elements = (object *)e_739983;
c_739980.elements[0] = ((closureN)self_735539)->elements[2];


make_utf8_string_with_len(c_739988, "\n", 1, 1);

make_utf8_string_with_len(c_739990, "\n", 1, 1);

make_utf8_string_with_len(c_739992, " = ", 3, 3);

make_utf8_string_with_len(c_739993, ";", 1, 1);

make_utf8_string_with_len(c_739994, "continue;", 9, 9);

object c_739986 = Cyc_string_append(data,(closure)&c_739980,9,((closureN)self_735539)->elements[0], &c_739988, ((closureN)self_735539)->elements[1], &c_739990, ((closureN)self_735539)->elements[3], &c_739992, r_732684, &c_739993, &c_739994);
return_closcall1(data,(closure)&c_739980,  c_739986);; 
}

static void __lambda_416(void *data, object self_735540, int argc, object *args) /* object self_735540, object r_732682 */
 {
 object r_732682 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735540)->elements[0], r_732682);; 
}

static void __lambda_399(void *data, object self_735772, int argc, object *args) /* object self_735772, object k_733106 */
 {
 object k_733106 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_735772)->elements[2])) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_735772)->elements[2]))) ){ 
  return_direct_with_clo1(data,  k_733106, (((closure)  k_733106)->fn),  boolean_f);
} else { 
  
closureN_type c_739899;
object e_739939 [4];
c_739899.hdr.mark = gc_color_red;
 c_739899.hdr.grayed = 0;
c_739899.tag = closureN_tag;
 c_739899.fn = (function_type)__lambda_400;
c_739899.num_args = 1;
c_739899.num_elements = 4;
c_739899.elements = (object *)e_739939;
c_739899.elements[0] = ((closureN)self_735772)->elements[0];
c_739899.elements[1] = ((closureN)self_735772)->elements[1];
c_739899.elements[2] = k_733106;
c_739899.elements[3] = ((closureN)self_735772)->elements[2];



return_direct_with_clo2(data,  __glo_adb_117get_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_scheme_cyclone_cps_91optimizations)->fn),  &c_739899, Cyc_cdr(data, ((closureN)self_735772)->elements[2]));}
;
} else { 
  return_direct_with_clo1(data,  k_733106, (((closure)  k_733106)->fn),  boolean_f);}
;; 
}

static void __lambda_400(void *data, object self_735773, int argc, object *args) /* object self_735773, object r_733119 */
 {
 object r_733119 = args[0];
  
closureN_type c_739901;
object e_739938 [4];
c_739901.hdr.mark = gc_color_red;
 c_739901.hdr.grayed = 0;
c_739901.tag = closureN_tag;
 c_739901.fn = (function_type)__lambda_401;
c_739901.num_args = 1;
c_739901.num_elements = 4;
c_739901.elements = (object *)e_739938;
c_739901.elements[0] = ((closureN)self_735773)->elements[0];
c_739901.elements[1] = ((closureN)self_735773)->elements[1];
c_739901.elements[2] = ((closureN)self_735773)->elements[2];
c_739901.elements[3] = ((closureN)self_735773)->elements[3];

return_direct_with_clo2(data,  __glo_adbv_117direct_91rec_91call_127_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbv_117direct_91rec_91call_127_scheme_cyclone_cps_91optimizations)->fn),  &c_739901, r_733119);; 
}

static void __lambda_401(void *data, object self_735774, int argc, object *args) /* object self_735774, object r_733109 */
 {
 object r_733109 = args[0];
  if( (boolean_f != r_733109) ){ 
    complex_num_type local_739904; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739904, quote__75closure_91ref, ((closureN)self_735774)->elements[1])) ){ 
    
  
  
if( (boolean_f != equalp(Cyc_cadr(data, ((closureN)self_735774)->elements[1]), Cyc_cdr(data, ((closureN)self_735774)->elements[3]))) ){ 
    
  
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_735774)->elements[0]), Cyc_cdr(data, ((closureN)self_735774)->elements[3]))) ){ 
  
complex_num_type local_739926; 


return_direct_with_clo1(data,  ((closureN)self_735774)->elements[2], (((closure)  ((closureN)self_735774)->elements[2])->fn),  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739926, Cyc_cadr(data, ((closureN)self_735774)->elements[0])));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735774)->elements[2], (((closure)  ((closureN)self_735774)->elements[2])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735774)->elements[2], (((closure)  ((closureN)self_735774)->elements[2])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735774)->elements[2], (((closure)  ((closureN)self_735774)->elements[2])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735774)->elements[2], (((closure)  ((closureN)self_735774)->elements[2])->fn),  boolean_f);}
;; 
}

static void __lambda_390(void *data, object self_735512, int argc, object *args) /* object self_735512, object r_732675 */
 {
 object r_732675 = args[0];
  
closureN_type c_739811;
object e_739882 [6];
c_739811.hdr.mark = gc_color_red;
 c_739811.hdr.grayed = 0;
c_739811.tag = closureN_tag;
 c_739811.fn = (function_type)__lambda_391;
c_739811.num_args = 1;
c_739811.num_elements = 6;
c_739811.elements = (object *)e_739882;
c_739811.elements[0] = ((closureN)self_735512)->elements[0];
c_739811.elements[1] = ((closureN)self_735512)->elements[1];
c_739811.elements[2] = ((closureN)self_735512)->elements[2];
c_739811.elements[3] = ((closureN)self_735512)->elements[3];
c_739811.elements[4] = ((closureN)self_735512)->elements[5];
c_739811.elements[5] = ((closureN)self_735512)->elements[6];

return_direct_with_clo3(data,  __glo_allocate_91lambda_scheme_cyclone_cgen, (((closure)  __glo_allocate_91lambda_scheme_cyclone_cgen)->fn),  &c_739811, ((closureN)self_735512)->elements[4], r_732675);; 
}

static void __lambda_391(void *data, object self_735513, int argc, object *args) /* object self_735513, object lid_73570_731629 */
 {
 object lid_73570_731629 = args[0];
  
closureN_type c_739813;
object e_739878 [6];
c_739813.hdr.mark = gc_color_red;
 c_739813.hdr.grayed = 0;
c_739813.tag = closureN_tag;
 c_739813.fn = (function_type)__lambda_392;
c_739813.num_args = 1;
c_739813.num_elements = 6;
c_739813.elements = (object *)e_739878;
c_739813.elements[0] = ((closureN)self_735513)->elements[0];
c_739813.elements[1] = ((closureN)self_735513)->elements[1];
c_739813.elements[2] = ((closureN)self_735513)->elements[2];
c_739813.elements[3] = ((closureN)self_735513)->elements[3];
c_739813.elements[4] = ((closureN)self_735513)->elements[4];
c_739813.elements[5] = ((closureN)self_735513)->elements[5];


object c_739881 = Cyc_number2string2(data,(closure)&c_739813,1,lid_73570_731629);
return_closcall1(data,(closure)&c_739813,  c_739881);; 
}

static void __lambda_392(void *data, object self_735514, int argc, object *args) /* object self_735514, object r_732674 */
 {
 object r_732674 = args[0];
  
closureN_type c_739815;
object e_739873 [6];
c_739815.hdr.mark = gc_color_red;
 c_739815.hdr.grayed = 0;
c_739815.tag = closureN_tag;
 c_739815.fn = (function_type)__lambda_393;
c_739815.num_args = 1;
c_739815.num_elements = 6;
c_739815.elements = (object *)e_739873;
c_739815.elements[0] = ((closureN)self_735514)->elements[0];
c_739815.elements[1] = ((closureN)self_735514)->elements[1];
c_739815.elements[2] = ((closureN)self_735514)->elements[2];
c_739815.elements[3] = ((closureN)self_735514)->elements[3];
c_739815.elements[4] = ((closureN)self_735514)->elements[4];
c_739815.elements[5] = ((closureN)self_735514)->elements[5];


make_utf8_string_with_len(c_739877, "__lambda_", 9, 9);

object c_739876 = Cyc_string_append(data,(closure)&c_739815,2,&c_739877, r_732674);
return_closcall1(data,(closure)&c_739815,  c_739876);; 
}

static void __lambda_393(void *data, object self_735515, int argc, object *args) /* object self_735515, object this_91cont_73573_731630 */
 {
 object this_91cont_73573_731630 = args[0];
  
closureN_type c_739817;
object e_739866 [2];
c_739817.hdr.mark = gc_color_red;
 c_739817.hdr.grayed = 0;
c_739817.tag = closureN_tag;
 c_739817.fn = (function_type)__lambda_394;
c_739817.num_args = 1;
c_739817.num_elements = 2;
c_739817.elements = (object *)e_739866;
c_739817.elements[0] = ((closureN)self_735515)->elements[4];
c_739817.elements[1] = this_91cont_73573_731630;


make_utf8_string_with_len(c_739869, "", 0, 0);
return_direct_with_clo8(data,  __glo_c_91compile_91args_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91args_scheme_cyclone_cgen)->fn),  &c_739817, ((closureN)self_735515)->elements[1], ((closureN)self_735515)->elements[0], &c_739869, this_91cont_73573_731630, ((closureN)self_735515)->elements[2], ((closureN)self_735515)->elements[5], ((closureN)self_735515)->elements[3]);; 
}

static void __lambda_394(void *data, object self_735516, int argc, object *args) /* object self_735516, object cgen_73576_731631 */
 {
 object cgen_73576_731631 = args[0];
  
closureN_type c_739819;
object e_739863 [3];
c_739819.hdr.mark = gc_color_red;
 c_739819.hdr.grayed = 0;
c_739819.tag = closureN_tag;
 c_739819.fn = (function_type)__lambda_395;
c_739819.num_args = 1;
c_739819.num_elements = 3;
c_739819.elements = (object *)e_739863;
c_739819.elements[0] = cgen_73576_731631;
c_739819.elements[1] = ((closureN)self_735516)->elements[0];
c_739819.elements[2] = ((closureN)self_735516)->elements[1];



return_direct_with_clo2(data,  __glo_set_91c_91call_91arity_67_scheme_cyclone_cgen, (((closure)  __glo_set_91c_91call_91arity_67_scheme_cyclone_cgen)->fn),  &c_739819, Cyc_caddr(data, cgen_73576_731631));; 
}

static void __lambda_395(void *data, object self_735517, int argc, object *args) /* object self_735517, object r_732665_734208 */
 {

  
closureN_type c_739821;
object e_739859 [3];
c_739821.hdr.mark = gc_color_red;
 c_739821.hdr.grayed = 0;
c_739821.tag = closureN_tag;
 c_739821.fn = (function_type)__lambda_396;
c_739821.num_args = 1;
c_739821.num_elements = 3;
c_739821.elements = (object *)e_739859;
c_739821.elements[0] = ((closureN)self_735517)->elements[0];
c_739821.elements[1] = ((closureN)self_735517)->elements[1];
c_739821.elements[2] = ((closureN)self_735517)->elements[2];



return_direct_with_clo2(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_739821, Cyc_cadr(data, ((closureN)self_735517)->elements[0]));; 
}

static void __lambda_396(void *data, object self_735518, int argc, object *args) /* object self_735518, object r_732667_734210_734217 */
 {
 object r_732667_734210_734217 = args[0];
  
closureN_type c_739823;
object e_739852 [4];
c_739823.hdr.mark = gc_color_red;
 c_739823.hdr.grayed = 0;
c_739823.tag = closureN_tag;
 c_739823.fn = (function_type)__lambda_397;
c_739823.num_args = 1;
c_739823.num_elements = 4;
c_739823.elements = (object *)e_739852;
c_739823.elements[0] = ((closureN)self_735518)->elements[0];
c_739823.elements[1] = ((closureN)self_735518)->elements[1];
c_739823.elements[2] = r_732667_734210_734217;
c_739823.elements[3] = ((closureN)self_735518)->elements[2];




object c_739855 = Cyc_number2string2(data,(closure)&c_739823,1,Cyc_caddr(data, ((closureN)self_735518)->elements[0]));
return_closcall1(data,(closure)&c_739823,  c_739855);; 
}

static void __lambda_397(void *data, object self_735519, int argc, object *args) /* object self_735519, object r_732668_734211_734218 */
 {
 object r_732668_734211_734218 = args[0];
  object r_732669_734213_734220;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_caddr(data, ((closureN)self_735519)->elements[0]), obj_int2obj(0))) ){ 
  object c_739831;
 alloc_string(data,c_739831, 1, 1);
char tmp_739832[] = ",";
memcpy(((string_type *)c_739831)->str, tmp_739832,1);
((string_type *)c_739831)->str[1] = '\0';
  r_732669_734213_734220 = c_739831;
} else { 
  object c_739834;
 alloc_string(data,c_739834, 0, 0);
char tmp_739835[] = "";
memcpy(((string_type *)c_739834)->str, tmp_739835,0);
((string_type *)c_739834)->str[0] = '\0';
  r_732669_734213_734220 = c_739834;}
;
closureN_type c_739837;
object e_739840 [1];
c_739837.hdr.mark = gc_color_red;
 c_739837.hdr.grayed = 0;
c_739837.tag = closureN_tag;
 c_739837.fn = (function_type)__lambda_398;
c_739837.num_args = 1;
c_739837.num_elements = 1;
c_739837.elements = (object *)e_739840;
c_739837.elements[0] = ((closureN)self_735519)->elements[1];


make_utf8_string_with_len(c_739845, "return_direct", 13, 13);

make_utf8_string_with_len(c_739846, "(data,", 6, 6);



make_utf8_string_with_len(c_739851, ");", 2, 2);

object c_739843 = Cyc_string_append(data,(closure)&c_739837,8,((closureN)self_735519)->elements[2], &c_739845, r_732668_734211_734218, &c_739846, ((closureN)self_735519)->elements[3], r_732669_734213_734220, Cyc_car(data, ((closureN)self_735519)->elements[0]), &c_739851);
return_closcall1(data,(closure)&c_739837,  c_739843);; 
}

static void __lambda_398(void *data, object self_735520, int argc, object *args) /* object self_735520, object r_732666_734215_734222_734224 */
 {
 object r_732666_734215_734222_734224 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735520)->elements[0], r_732666_734215_734222_734224);; 
}

static void __lambda_368(void *data, object _, int argc, object *args) /* closure _,object k_732635, object args_73532_731605, object append_91preamble_73533_731606, object prefix_73534_731607, object cont_73535_731608, object ast_91id_73536_731609, object trace_73537_731610, object cps_127_73538_731611 */
 {
object k_732635 = args[0]; object args_73532_731605 = args[1]; object append_91preamble_73533_731606 = args[2]; object prefix_73534_731607 = args[3]; object cont_73535_731608 = args[4]; object ast_91id_73536_731609 = args[5]; object trace_73537_731610 = args[6]; object cps_127_73538_731611 = args[7];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-args");

closureN_type c_739665;
object e_739796 [8];
c_739665.hdr.mark = gc_color_red;
 c_739665.hdr.grayed = 0;
c_739665.tag = closureN_tag;
 c_739665.fn = (function_type)__lambda_369;
c_739665.num_args = 3;
c_739665.num_elements = 8;
c_739665.elements = (object *)e_739796;
c_739665.elements[0] = append_91preamble_73533_731606;
c_739665.elements[1] = args_73532_731605;
c_739665.elements[2] = ast_91id_73536_731609;
c_739665.elements[3] = cont_73535_731608;
c_739665.elements[4] = cps_127_73538_731611;
c_739665.elements[5] = k_732635;
c_739665.elements[6] = prefix_73534_731607;
c_739665.elements[7] = trace_73537_731610;

return_direct_with_clo3(data,(closure)&c_739665,__lambda_369,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_369(void *data, object self_735489, int argc, object *args) /* object self_735489, object num_91args_73539_731612, object cp_91lis_73540_731613, object _191c_91compile_91args_73541_731614 */
 {
 object num_91args_73539_731612 = args[0]; object cp_91lis_73540_731613 = args[1]; object _191c_91compile_91args_73541_731614 = args[2];
  
closureN_type c_739667;
object e_739792 [10];
c_739667.hdr.mark = gc_color_red;
 c_739667.hdr.grayed = 0;
c_739667.tag = closureN_tag;
 c_739667.fn = (function_type)__lambda_1317;
c_739667.num_args = 1;
c_739667.num_elements = 10;
c_739667.elements = (object *)e_739792;
c_739667.elements[0] = _191c_91compile_91args_73541_731614;
c_739667.elements[1] = ((closureN)self_735489)->elements[0];
c_739667.elements[2] = ((closureN)self_735489)->elements[1];
c_739667.elements[3] = ((closureN)self_735489)->elements[2];
c_739667.elements[4] = ((closureN)self_735489)->elements[3];
c_739667.elements[5] = cp_91lis_73540_731613;
c_739667.elements[6] = ((closureN)self_735489)->elements[4];
c_739667.elements[7] = ((closureN)self_735489)->elements[5];
c_739667.elements[8] = ((closureN)self_735489)->elements[6];
c_739667.elements[9] = ((closureN)self_735489)->elements[7];


pair_type local_739795; 
return_direct_with_clo1(data,(closure)&c_739667,__lambda_1317,  set_cell_as_expr(&local_739795, num_91args_73539_731612));; 
}

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


pair_type local_739790; 
return_direct_with_clo1(data,(closure)&c_739669,__lambda_1316,  set_cell_as_expr(&local_739790, ((closureN)self_735490)->elements[5]));; 
}

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


pair_type local_739785; 
return_direct_with_clo1(data,(closure)&c_739671,__lambda_1315,  set_cell_as_expr(&local_739785, ((closureN)self_735491)->elements[0]));; 
}

static void __lambda_1315(void *data, object self_735492, int argc, object *args) /* object self_735492, object _191c_91compile_91args_73541_731614 */
 {
 object _191c_91compile_91args_73541_731614 = args[0];
  
closureN_type c_739673;
object e_739778 [11];
c_739673.hdr.mark = gc_color_red;
 c_739673.hdr.grayed = 0;
c_739673.tag = closureN_tag;
 c_739673.fn = (function_type)__lambda_370;
c_739673.num_args = 1;
c_739673.num_elements = 11;
c_739673.elements = (object *)e_739778;
c_739673.elements[0] = _191c_91compile_91args_73541_731614;
c_739673.elements[1] = ((closureN)self_735492)->elements[0];
c_739673.elements[2] = ((closureN)self_735492)->elements[1];
c_739673.elements[3] = ((closureN)self_735492)->elements[2];
c_739673.elements[4] = ((closureN)self_735492)->elements[3];
c_739673.elements[5] = ((closureN)self_735492)->elements[4];
c_739673.elements[6] = ((closureN)self_735492)->elements[5];
c_739673.elements[7] = ((closureN)self_735492)->elements[6];
c_739673.elements[8] = ((closureN)self_735492)->elements[7];
c_739673.elements[9] = ((closureN)self_735492)->elements[8];
c_739673.elements[10] = ((closureN)self_735492)->elements[9];



return_direct_with_clo1(data,(closure)&c_739673,__lambda_370,  Cyc_set_cell(data, ((closureN)self_735492)->elements[7], obj_int2obj(0)));; 
}

static void __lambda_370(void *data, object self_735493, int argc, object *args) /* object self_735493, object r_732636 */
 {

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



return_direct_with_clo1(data,(closure)&c_739675,__lambda_371,  Cyc_set_cell(data, ((closureN)self_735493)->elements[5], NULL));; 
}

static void __lambda_371(void *data, object self_735494, int argc, object *args) /* object self_735494, object r_732637 */
 {

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


closureN_type c_739713;
object e_739773 [6];
c_739713.hdr.mark = gc_color_red;
 c_739713.hdr.grayed = 0;
c_739713.tag = closureN_tag;
 c_739713.fn = (function_type)__lambda_377;
c_739713.num_args = 4;
c_739713.num_elements = 6;
c_739713.elements = (object *)e_739773;
c_739713.elements[0] = ((closureN)self_735494)->elements[0];
c_739713.elements[1] = ((closureN)self_735494)->elements[3];
c_739713.elements[2] = ((closureN)self_735494)->elements[5];
c_739713.elements[3] = ((closureN)self_735494)->elements[6];
c_739713.elements[4] = ((closureN)self_735494)->elements[8];
c_739713.elements[5] = ((closureN)self_735494)->elements[10];

return_direct_with_clo1(data,(closure)&c_739677,__lambda_372,  &c_739713);; 
}

static void __lambda_377(void *data, object self_735495, int argc, object *args) /* object self_735495, object k_732643, object args_73542_731615, object append_91preamble_73543_731616, object prefix_73544_731617, object cont_73545_731618 */
 {
 object k_732643 = args[0]; object args_73542_731615 = args[1]; object append_91preamble_73543_731616 = args[2]; object prefix_73544_731617 = args[3]; object cont_73545_731618 = args[4];
    
if( (boolean_f != Cyc_is_pair(args_73542_731615)) ){ 
  
closureN_type c_739717;
object e_739765 [8];
c_739717.hdr.mark = gc_color_red;
 c_739717.hdr.grayed = 0;
c_739717.tag = closureN_tag;
 c_739717.fn = (function_type)__lambda_378;
c_739717.num_args = 1;
c_739717.num_elements = 8;
c_739717.elements = (object *)e_739765;
c_739717.elements[0] = ((closureN)self_735495)->elements[0];
c_739717.elements[1] = append_91preamble_73543_731616;
c_739717.elements[2] = args_73542_731615;
c_739717.elements[3] = cont_73545_731618;
c_739717.elements[4] = ((closureN)self_735495)->elements[2];
c_739717.elements[5] = k_732643;
c_739717.elements[6] = ((closureN)self_735495)->elements[4];
c_739717.elements[7] = prefix_73544_731617;



return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  &c_739717, Cyc_car(data, args_73542_731615), append_91preamble_73543_731616, cont_73545_731618, ((closureN)self_735495)->elements[1], ((closureN)self_735495)->elements[5], ((closureN)self_735495)->elements[3]);
} else { 
  
make_utf8_string_with_len(c_739772, "", 0, 0);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  k_732643, &c_739772);}
;; 
}

static void __lambda_378(void *data, object self_735496, int argc, object *args) /* object self_735496, object cp_73550_731619 */
 {
 object cp_73550_731619 = args[0];
  
closureN_type c_739719;
object e_739758 [9];
c_739719.hdr.mark = gc_color_red;
 c_739719.hdr.grayed = 0;
c_739719.tag = closureN_tag;
 c_739719.fn = (function_type)__lambda_379;
c_739719.num_args = 1;
c_739719.num_elements = 9;
c_739719.elements = (object *)e_739758;
c_739719.elements[0] = ((closureN)self_735496)->elements[0];
c_739719.elements[1] = ((closureN)self_735496)->elements[1];
c_739719.elements[2] = ((closureN)self_735496)->elements[2];
c_739719.elements[3] = ((closureN)self_735496)->elements[3];
c_739719.elements[4] = cp_73550_731619;
c_739719.elements[5] = ((closureN)self_735496)->elements[4];
c_739719.elements[6] = ((closureN)self_735496)->elements[5];
c_739719.elements[7] = ((closureN)self_735496)->elements[6];
c_739719.elements[8] = ((closureN)self_735496)->elements[7];


complex_num_type local_739761; 


return_direct_with_clo1(data,(closure)&c_739719,__lambda_379,  Cyc_fast_sum(data,&local_739761, obj_int2obj(1), car(((closureN)self_735496)->elements[6])));; 
}

static void __lambda_379(void *data, object self_735497, int argc, object *args) /* object self_735497, object r_732651 */
 {
 object r_732651 = args[0];
  
closureN_type c_739721;
object e_739754 [8];
c_739721.hdr.mark = gc_color_red;
 c_739721.hdr.grayed = 0;
c_739721.tag = closureN_tag;
 c_739721.fn = (function_type)__lambda_380;
c_739721.num_args = 1;
c_739721.num_elements = 8;
c_739721.elements = (object *)e_739754;
c_739721.elements[0] = ((closureN)self_735497)->elements[0];
c_739721.elements[1] = ((closureN)self_735497)->elements[1];
c_739721.elements[2] = ((closureN)self_735497)->elements[2];
c_739721.elements[3] = ((closureN)self_735497)->elements[3];
c_739721.elements[4] = ((closureN)self_735497)->elements[4];
c_739721.elements[5] = ((closureN)self_735497)->elements[5];
c_739721.elements[6] = ((closureN)self_735497)->elements[6];
c_739721.elements[7] = ((closureN)self_735497)->elements[8];



return_direct_with_clo1(data,(closure)&c_739721,__lambda_380,  Cyc_set_cell(data, ((closureN)self_735497)->elements[7], r_732651));; 
}

static void __lambda_380(void *data, object self_735498, int argc, object *args) /* object self_735498, object r_732646 */
 {

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


pair_type local_739749; 


return_direct_with_clo1(data,(closure)&c_739723,__lambda_381,  set_pair_as_expr(&local_739749, ((closureN)self_735498)->elements[4], car(((closureN)self_735498)->elements[5])));; 
}

static void __lambda_381(void *data, object self_735499, int argc, object *args) /* object self_735499, object r_732650 */
 {
 object r_732650 = args[0];
  
closureN_type c_739725;
object e_739742 [7];
c_739725.hdr.mark = gc_color_red;
 c_739725.hdr.grayed = 0;
c_739725.tag = closureN_tag;
 c_739725.fn = (function_type)__lambda_382;
c_739725.num_args = 1;
c_739725.num_elements = 7;
c_739725.elements = (object *)e_739742;
c_739725.elements[0] = ((closureN)self_735499)->elements[0];
c_739725.elements[1] = ((closureN)self_735499)->elements[1];
c_739725.elements[2] = ((closureN)self_735499)->elements[2];
c_739725.elements[3] = ((closureN)self_735499)->elements[3];
c_739725.elements[4] = ((closureN)self_735499)->elements[4];
c_739725.elements[5] = ((closureN)self_735499)->elements[6];
c_739725.elements[6] = ((closureN)self_735499)->elements[7];



return_direct_with_clo1(data,(closure)&c_739725,__lambda_382,  Cyc_set_cell(data, ((closureN)self_735499)->elements[5], r_732650));; 
}

static void __lambda_382(void *data, object self_735500, int argc, object *args) /* object self_735500, object r_732647 */
 {

  


closureN_type c_739730;
object e_739735 [3];
c_739730.hdr.mark = gc_color_red;
 c_739730.hdr.grayed = 0;
c_739730.tag = closureN_tag;
 c_739730.fn = (function_type)__lambda_383;
c_739730.num_args = 1;
c_739730.num_elements = 3;
c_739730.elements = (object *)e_739735;
c_739730.elements[0] = ((closureN)self_735500)->elements[4];
c_739730.elements[1] = ((closureN)self_735500)->elements[5];
c_739730.elements[2] = ((closureN)self_735500)->elements[6];




make_utf8_string_with_len(c_739740, ", ", 2, 2);
return_closcall5(data,  car(((closureN)self_735500)->elements[0]),  &c_739730, Cyc_cdr(data, ((closureN)self_735500)->elements[2]), ((closureN)self_735500)->elements[1], &c_739740, ((closureN)self_735500)->elements[3]);; 
}

static void __lambda_383(void *data, object self_735501, int argc, object *args) /* object self_735501, object r_732648 */
 {
 object r_732648 = args[0];
  return_direct_with_clo4(data,  __glo_c_117append_95prefix_scheme_cyclone_cgen, (((closure)  __glo_c_117append_95prefix_scheme_cyclone_cgen)->fn),  ((closureN)self_735501)->elements[1], ((closureN)self_735501)->elements[2], ((closureN)self_735501)->elements[0], r_732648);; 
}

static void __lambda_372(void *data, object self_735502, int argc, object *args) /* object self_735502, object r_732642 */
 {
 object r_732642 = args[0];
  
closureN_type c_739679;
object e_739708 [8];
c_739679.hdr.mark = gc_color_red;
 c_739679.hdr.grayed = 0;
c_739679.tag = closureN_tag;
 c_739679.fn = (function_type)__lambda_373;
c_739679.num_args = 1;
c_739679.num_elements = 8;
c_739679.elements = (object *)e_739708;
c_739679.elements[0] = ((closureN)self_735502)->elements[0];
c_739679.elements[1] = ((closureN)self_735502)->elements[1];
c_739679.elements[2] = ((closureN)self_735502)->elements[2];
c_739679.elements[3] = ((closureN)self_735502)->elements[3];
c_739679.elements[4] = ((closureN)self_735502)->elements[4];
c_739679.elements[5] = ((closureN)self_735502)->elements[5];
c_739679.elements[6] = ((closureN)self_735502)->elements[6];
c_739679.elements[7] = ((closureN)self_735502)->elements[7];



return_direct_with_clo1(data,(closure)&c_739679,__lambda_373,  Cyc_set_cell(data, ((closureN)self_735502)->elements[0], r_732642));; 
}

static void __lambda_373(void *data, object self_735503, int argc, object *args) /* object self_735503, object r_732638 */
 {

  


closureN_type c_739684;
object e_739703 [3];
c_739684.hdr.mark = gc_color_red;
 c_739684.hdr.grayed = 0;
c_739684.tag = closureN_tag;
 c_739684.fn = (function_type)__lambda_374;
c_739684.num_args = 1;
c_739684.num_elements = 3;
c_739684.elements = (object *)e_739703;
c_739684.elements[0] = ((closureN)self_735503)->elements[4];
c_739684.elements[1] = ((closureN)self_735503)->elements[5];
c_739684.elements[2] = ((closureN)self_735503)->elements[6];

return_closcall5(data,  car(((closureN)self_735503)->elements[0]),  &c_739684, ((closureN)self_735503)->elements[2], ((closureN)self_735503)->elements[1], ((closureN)self_735503)->elements[7], ((closureN)self_735503)->elements[3]);; 
}

static void __lambda_374(void *data, object self_735504, int argc, object *args) /* object self_735504, object r_732641 */
 {
 object r_732641 = args[0];
  
closureN_type c_739686;
object e_739696 [2];
c_739686.hdr.mark = gc_color_red;
 c_739686.hdr.grayed = 0;
c_739686.tag = closureN_tag;
 c_739686.fn = (function_type)__lambda_375;
c_739686.num_args = 1;
c_739686.num_elements = 2;
c_739686.elements = (object *)e_739696;
c_739686.elements[0] = ((closureN)self_735504)->elements[0];
c_739686.elements[1] = ((closureN)self_735504)->elements[1];


pair_type local_739699; 


return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_739686, r_732641, set_cell_as_expr(&local_739699, car(((closureN)self_735504)->elements[2])));; 
}

static void __lambda_375(void *data, object self_735505, int argc, object *args) /* object self_735505, object r_732639_735145 */
 {
 object r_732639_735145 = args[0];
  
closureN_type c_739688;
object e_739692 [2];
c_739688.hdr.mark = gc_color_red;
 c_739688.hdr.grayed = 0;
c_739688.tag = closureN_tag;
 c_739688.fn = (function_type)__lambda_376;
c_739688.num_args = 1;
c_739688.num_elements = 2;
c_739688.elements = (object *)e_739692;
c_739688.elements[0] = ((closureN)self_735505)->elements[1];
c_739688.elements[1] = r_732639_735145;



return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_739688, car(((closureN)self_735505)->elements[0]));; 
}

static void __lambda_376(void *data, object self_735506, int argc, object *args) /* object self_735506, object r_732640_735146 */
 {
 object r_732640_735146 = args[0];
  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  ((closureN)self_735506)->elements[0], ((closureN)self_735506)->elements[1], r_732640_735146);; 
}

static void __lambda_364(void *data, object _, int argc, object *args) /* closure _,object k_732629, object exp_73531_731604 */
 {
object k_732629 = args[0]; object exp_73531_731604 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-ref");

closureN_type c_739645;
object e_739658 [1];
c_739645.hdr.mark = gc_color_red;
 c_739645.hdr.grayed = 0;
c_739645.tag = closureN_tag;
 c_739645.fn = (function_type)__lambda_365;
c_739645.num_args = 0;
c_739645.num_elements = 1;
c_739645.elements = (object *)e_739658;
c_739645.elements[0] = exp_73531_731604;


closureN_type c_739659;
object e_739662 [1];
c_739659.hdr.mark = gc_color_red;
 c_739659.hdr.grayed = 0;
c_739659.tag = closureN_tag;
 c_739659.fn = (function_type)__lambda_367;
c_739659.num_args = 1;
c_739659.num_elements = 1;
c_739659.elements = (object *)e_739662;
c_739659.elements[0] = k_732629;

return_direct_with_clo1(data,(closure)&c_739645,__lambda_365,  &c_739659);; 
}

static void __lambda_367(void *data, object self_735486, int argc, object *args) /* object self_735486, object r_732630 */
 {
 object r_732630 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735486)->elements[0], r_732630);; 
}

static void __lambda_365(void *data, object self_735487, int argc, object *args) /* object self_735487, object k_732631 */
 {
 object k_732631 = args[0];
  
closureN_type c_739647;
object e_739654 [2];
c_739647.hdr.mark = gc_color_red;
 c_739647.hdr.grayed = 0;
c_739647.tag = closureN_tag;
 c_739647.fn = (function_type)__lambda_366;
c_739647.num_args = 1;
c_739647.num_elements = 2;
c_739647.elements = (object *)e_739654;
c_739647.elements[0] = ((closureN)self_735487)->elements[0];
c_739647.elements[1] = k_732631;



return_direct_with_clo1(data,(closure)&c_739647,__lambda_366,  memberp(data, ((closureN)self_735487)->elements[0], __glo__85global_91syms_85_scheme_cyclone_cgen));; 
}

static void __lambda_366(void *data, object self_735488, int argc, object *args) /* object self_735488, object r_732632 */
 {
 object r_732632 = args[0];
  if( (boolean_f != r_732632) ){ 
  return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  ((closureN)self_735488)->elements[1], ((closureN)self_735488)->elements[0]);
} else { 
  return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  ((closureN)self_735488)->elements[1], ((closureN)self_735488)->elements[0]);}
;; 
}

static void __lambda_363(void *data, object _, int argc, object *args) /* closure _,object k_732612, object ast_73487_731594, object self_73488_731595, object closure_91index_73489_731596 */
 {
object k_732612 = args[0]; object ast_73487_731594 = args[1]; object self_73488_731595 = args[2]; object closure_91index_73489_731596 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:self-closure-call?");
  complex_num_type local_739606; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739606, quote__75closure_91ref, ast_73487_731594)) ){ 
    complex_num_type local_739609; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739609, quote_cell_91get, Cyc_cadr(data, ast_73487_731594))) ){ 
    
if( (boolean_f != Cyc_cadadr(data, ast_73487_731594)) ){ 
    complex_num_type local_739616; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739616, quote__75closure_91ref, Cyc_cadadr(data, ast_73487_731594))) ){ 
    
  
  
if( (boolean_f != equalp(self_73488_731595, Cyc_cadr(data, Cyc_cadadr(data, ast_73487_731594)))) ){ 
    
  
if( (boolean_f != equalp(obj_int2obj(0), Cyc_caddr(data, ast_73487_731594))) ){ 
    
  
  
if( (boolean_f != equalp(closure_91index_73489_731596, Cyc_caddr(data, Cyc_cadadr(data, ast_73487_731594)))) ){ 
  return_direct_with_clo1(data,  k_732612, (((closure)  k_732612)->fn),  boolean_t);
} else { 
  return_direct_with_clo1(data,  k_732612, (((closure)  k_732612)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732612, (((closure)  k_732612)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732612, (((closure)  k_732612)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732612, (((closure)  k_732612)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732612, (((closure)  k_732612)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732612, (((closure)  k_732612)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732612, (((closure)  k_732612)->fn),  boolean_f);}
;; 
}

static void __lambda_304(void *data, object _, int argc, object *args) /* closure _,object k_732536, object p_73383_731573, object cont_73384_731574, object ast_91id_73385_731575 */
 {
object k_732536 = args[0]; object p_73383_731573 = args[1]; object cont_73384_731574 = args[2]; object ast_91id_73385_731575 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-prim");

closureN_type c_739191;
object e_739602 [3];
c_739191.hdr.mark = gc_color_red;
 c_739191.hdr.grayed = 0;
c_739191.tag = closureN_tag;
 c_739191.fn = (function_type)__lambda_305;
c_739191.num_args = 1;
c_739191.num_elements = 3;
c_739191.elements = (object *)e_739602;
c_739191.elements[0] = cont_73384_731574;
c_739191.elements[1] = k_732536;
c_739191.elements[2] = p_73383_731573;

return_direct_with_clo3(data,  __glo_alloca_127_scheme_cyclone_cgen, (((closure)  __glo_alloca_127_scheme_cyclone_cgen)->fn),  &c_739191, ast_91id_73385_731575, boolean_f);; 
}

static void __lambda_305(void *data, object self_735428, int argc, object *args) /* object self_735428, object use_91alloca_127_73388_731576 */
 {
 object use_91alloca_127_73388_731576 = args[0];
  
closureN_type c_739193;
object e_739213 [2];
c_739193.hdr.mark = gc_color_red;
 c_739193.hdr.grayed = 0;
c_739193.tag = closureN_tag;
 c_739193.fn = (function_type)__lambda_306;
c_739193.num_args = 0;
c_739193.num_elements = 2;
c_739193.elements = (object *)e_739213;
c_739193.elements[0] = ((closureN)self_735428)->elements[2];
c_739193.elements[1] = use_91alloca_127_73388_731576;


closureN_type c_739214;
object e_739601 [4];
c_739214.hdr.mark = gc_color_red;
 c_739214.hdr.grayed = 0;
c_739214.tag = closureN_tag;
 c_739214.fn = (function_type)__lambda_309;
c_739214.num_args = 1;
c_739214.num_elements = 4;
c_739214.elements = (object *)e_739601;
c_739214.elements[0] = ((closureN)self_735428)->elements[0];
c_739214.elements[1] = ((closureN)self_735428)->elements[1];
c_739214.elements[2] = ((closureN)self_735428)->elements[2];
c_739214.elements[3] = use_91alloca_127_73388_731576;

return_direct_with_clo1(data,(closure)&c_739193,__lambda_306,  &c_739214);; 
}

static void __lambda_309(void *data, object self_735429, int argc, object *args) /* object self_735429, object c_91func_73391_731577 */
 {
 object c_91func_73391_731577 = args[0];
  
closureN_type c_739216;
object e_739600 [5];
c_739216.hdr.mark = gc_color_red;
 c_739216.hdr.grayed = 0;
c_739216.tag = closureN_tag;
 c_739216.fn = (function_type)__lambda_310;
c_739216.num_args = 1;
c_739216.num_elements = 5;
c_739216.elements = (object *)e_739600;
c_739216.elements[0] = c_91func_73391_731577;
c_739216.elements[1] = ((closureN)self_735429)->elements[0];
c_739216.elements[2] = ((closureN)self_735429)->elements[1];
c_739216.elements[3] = ((closureN)self_735429)->elements[2];
c_739216.elements[4] = ((closureN)self_735429)->elements[3];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739216, quote_c);; 
}

static void __lambda_310(void *data, object self_735430, int argc, object *args) /* object self_735430, object r_732605 */
 {
 object r_732605 = args[0];
  
closureN_type c_739218;
object e_739599 [5];
c_739218.hdr.mark = gc_color_red;
 c_739218.hdr.grayed = 0;
c_739218.tag = closureN_tag;
 c_739218.fn = (function_type)__lambda_311;
c_739218.num_args = 1;
c_739218.num_elements = 5;
c_739218.elements = (object *)e_739599;
c_739218.elements[0] = ((closureN)self_735430)->elements[0];
c_739218.elements[1] = ((closureN)self_735430)->elements[1];
c_739218.elements[2] = ((closureN)self_735430)->elements[2];
c_739218.elements[3] = ((closureN)self_735430)->elements[3];
c_739218.elements[4] = ((closureN)self_735430)->elements[4];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_739218, r_732605);; 
}

static void __lambda_311(void *data, object self_735431, int argc, object *args) /* object self_735431, object closure_91sym_73394_731578 */
 {
 object closure_91sym_73394_731578 = args[0];
  
closureN_type c_739220;
object e_739263 [3];
c_739220.hdr.mark = gc_color_red;
 c_739220.hdr.grayed = 0;
c_739220.tag = closureN_tag;
 c_739220.fn = (function_type)__lambda_312;
c_739220.num_args = 0;
c_739220.num_elements = 3;
c_739220.elements = (object *)e_739263;
c_739220.elements[0] = closure_91sym_73394_731578;
c_739220.elements[1] = ((closureN)self_735431)->elements[1];
c_739220.elements[2] = ((closureN)self_735431)->elements[3];


closureN_type c_739264;
object e_739598 [6];
c_739264.hdr.mark = gc_color_red;
 c_739264.hdr.grayed = 0;
c_739264.tag = closureN_tag;
 c_739264.fn = (function_type)__lambda_317;
c_739264.num_args = 1;
c_739264.num_elements = 6;
c_739264.elements = (object *)e_739598;
c_739264.elements[0] = ((closureN)self_735431)->elements[0];
c_739264.elements[1] = closure_91sym_73394_731578;
c_739264.elements[2] = ((closureN)self_735431)->elements[1];
c_739264.elements[3] = ((closureN)self_735431)->elements[2];
c_739264.elements[4] = ((closureN)self_735431)->elements[3];
c_739264.elements[5] = ((closureN)self_735431)->elements[4];

return_direct_with_clo1(data,(closure)&c_739220,__lambda_312,  &c_739264);; 
}

static void __lambda_317(void *data, object self_735432, int argc, object *args) /* object self_735432, object closure_91def_73397_731579 */
 {
 object closure_91def_73397_731579 = args[0];
  
closureN_type c_739266;
object e_739277 [1];
c_739266.hdr.mark = gc_color_red;
 c_739266.hdr.grayed = 0;
c_739266.tag = closureN_tag;
 c_739266.fn = (function_type)__lambda_318;
c_739266.num_args = 0;
c_739266.num_elements = 1;
c_739266.elements = (object *)e_739277;
c_739266.elements[0] = ((closureN)self_735432)->elements[4];


closureN_type c_739278;
object e_739597 [7];
c_739278.hdr.mark = gc_color_red;
 c_739278.hdr.grayed = 0;
c_739278.tag = closureN_tag;
 c_739278.fn = (function_type)__lambda_320;
c_739278.num_args = 1;
c_739278.num_elements = 7;
c_739278.elements = (object *)e_739597;
c_739278.elements[0] = ((closureN)self_735432)->elements[0];
c_739278.elements[1] = closure_91def_73397_731579;
c_739278.elements[2] = ((closureN)self_735432)->elements[1];
c_739278.elements[3] = ((closureN)self_735432)->elements[2];
c_739278.elements[4] = ((closureN)self_735432)->elements[3];
c_739278.elements[5] = ((closureN)self_735432)->elements[4];
c_739278.elements[6] = ((closureN)self_735432)->elements[5];

return_direct_with_clo1(data,(closure)&c_739266,__lambda_318,  &c_739278);; 
}

static void __lambda_320(void *data, object self_735433, int argc, object *args) /* object self_735433, object tdata_73400_731580 */
 {
 object tdata_73400_731580 = args[0];
  object tdata_91comma_73403_731581;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, tdata_73400_731580), obj_int2obj(0))) ){ 
  object c_739285;
 alloc_string(data,c_739285, 1, 1);
char tmp_739286[] = ",";
memcpy(((string_type *)c_739285)->str, tmp_739286,1);
((string_type *)c_739285)->str[1] = '\0';
  tdata_91comma_73403_731581 = c_739285;
} else { 
  object c_739288;
 alloc_string(data,c_739288, 0, 0);
char tmp_739289[] = "";
memcpy(((string_type *)c_739288)->str, tmp_739289,0);
((string_type *)c_739288)->str[0] = '\0';
  tdata_91comma_73403_731581 = c_739288;}
;
closureN_type c_739291;
object e_739595 [9];
c_739291.hdr.mark = gc_color_red;
 c_739291.hdr.grayed = 0;
c_739291.tag = closureN_tag;
 c_739291.fn = (function_type)__lambda_321;
c_739291.num_args = 1;
c_739291.num_elements = 9;
c_739291.elements = (object *)e_739595;
c_739291.elements[0] = ((closureN)self_735433)->elements[0];
c_739291.elements[1] = ((closureN)self_735433)->elements[1];
c_739291.elements[2] = ((closureN)self_735433)->elements[2];
c_739291.elements[3] = ((closureN)self_735433)->elements[3];
c_739291.elements[4] = ((closureN)self_735433)->elements[4];
c_739291.elements[5] = ((closureN)self_735433)->elements[5];
c_739291.elements[6] = tdata_73400_731580;
c_739291.elements[7] = tdata_91comma_73403_731581;
c_739291.elements[8] = ((closureN)self_735433)->elements[6];

return_direct_with_clo2(data,  __glo_prim_95c_91var_91pointer_scheme_cyclone_primitives, (((closure)  __glo_prim_95c_91var_91pointer_scheme_cyclone_primitives)->fn),  &c_739291, ((closureN)self_735433)->elements[5]);; 
}

static void __lambda_321(void *data, object self_735434, int argc, object *args) /* object self_735434, object tptr_91type_73406_731582 */
 {
 object tptr_91type_73406_731582 = args[0];
  
closureN_type c_739293;
object e_739317 [3];
c_739293.hdr.mark = gc_color_red;
 c_739293.hdr.grayed = 0;
c_739293.tag = closureN_tag;
 c_739293.fn = (function_type)__lambda_322;
c_739293.num_args = 0;
c_739293.num_elements = 3;
c_739293.elements = (object *)e_739317;
c_739293.elements[0] = ((closureN)self_735434)->elements[7];
c_739293.elements[1] = tptr_91type_73406_731582;
c_739293.elements[2] = ((closureN)self_735434)->elements[8];


closureN_type c_739318;
object e_739594 [10];
c_739318.hdr.mark = gc_color_red;
 c_739318.hdr.grayed = 0;
c_739318.tag = closureN_tag;
 c_739318.fn = (function_type)__lambda_325;
c_739318.num_args = 1;
c_739318.num_elements = 10;
c_739318.elements = (object *)e_739594;
c_739318.elements[0] = ((closureN)self_735434)->elements[0];
c_739318.elements[1] = ((closureN)self_735434)->elements[1];
c_739318.elements[2] = ((closureN)self_735434)->elements[2];
c_739318.elements[3] = ((closureN)self_735434)->elements[3];
c_739318.elements[4] = ((closureN)self_735434)->elements[4];
c_739318.elements[5] = ((closureN)self_735434)->elements[5];
c_739318.elements[6] = ((closureN)self_735434)->elements[6];
c_739318.elements[7] = ((closureN)self_735434)->elements[7];
c_739318.elements[8] = tptr_91type_73406_731582;
c_739318.elements[9] = ((closureN)self_735434)->elements[8];

return_direct_with_clo1(data,(closure)&c_739293,__lambda_322,  &c_739318);; 
}

static void __lambda_325(void *data, object self_735435, int argc, object *args) /* object self_735435, object tptr_91comma_73409_731583 */
 {
 object tptr_91comma_73409_731583 = args[0];
  
closureN_type c_739320;
object e_739329 [1];
c_739320.hdr.mark = gc_color_red;
 c_739320.hdr.grayed = 0;
c_739320.tag = closureN_tag;
 c_739320.fn = (function_type)__lambda_326;
c_739320.num_args = 0;
c_739320.num_elements = 1;
c_739320.elements = (object *)e_739329;
c_739320.elements[0] = ((closureN)self_735435)->elements[8];


closureN_type c_739330;
object e_739593 [11];
c_739330.hdr.mark = gc_color_red;
 c_739330.hdr.grayed = 0;
c_739330.tag = closureN_tag;
 c_739330.fn = (function_type)__lambda_328;
c_739330.num_args = 1;
c_739330.num_elements = 11;
c_739330.elements = (object *)e_739593;
c_739330.elements[0] = ((closureN)self_735435)->elements[0];
c_739330.elements[1] = ((closureN)self_735435)->elements[1];
c_739330.elements[2] = ((closureN)self_735435)->elements[2];
c_739330.elements[3] = ((closureN)self_735435)->elements[3];
c_739330.elements[4] = ((closureN)self_735435)->elements[4];
c_739330.elements[5] = ((closureN)self_735435)->elements[5];
c_739330.elements[6] = ((closureN)self_735435)->elements[6];
c_739330.elements[7] = ((closureN)self_735435)->elements[7];
c_739330.elements[8] = tptr_91comma_73409_731583;
c_739330.elements[9] = ((closureN)self_735435)->elements[8];
c_739330.elements[10] = ((closureN)self_735435)->elements[9];

return_direct_with_clo1(data,(closure)&c_739320,__lambda_326,  &c_739330);; 
}

static void __lambda_328(void *data, object self_735436, int argc, object *args) /* object self_735436, object tptr_73412_731584 */
 {
 object tptr_73412_731584 = args[0];
  
closureN_type c_739332;
object e_739365 [3];
c_739332.hdr.mark = gc_color_red;
 c_739332.hdr.grayed = 0;
c_739332.tag = closureN_tag;
 c_739332.fn = (function_type)__lambda_329;
c_739332.num_args = 0;
c_739332.num_elements = 3;
c_739332.elements = (object *)e_739365;
c_739332.elements[0] = tptr_73412_731584;
c_739332.elements[1] = ((closureN)self_735436)->elements[9];
c_739332.elements[2] = ((closureN)self_735436)->elements[10];


closureN_type c_739366;
object e_739592 [11];
c_739366.hdr.mark = gc_color_red;
 c_739366.hdr.grayed = 0;
c_739366.tag = closureN_tag;
 c_739366.fn = (function_type)__lambda_332;
c_739366.num_args = 1;
c_739366.num_elements = 11;
c_739366.elements = (object *)e_739592;
c_739366.elements[0] = ((closureN)self_735436)->elements[0];
c_739366.elements[1] = ((closureN)self_735436)->elements[1];
c_739366.elements[2] = ((closureN)self_735436)->elements[2];
c_739366.elements[3] = ((closureN)self_735436)->elements[3];
c_739366.elements[4] = ((closureN)self_735436)->elements[4];
c_739366.elements[5] = ((closureN)self_735436)->elements[5];
c_739366.elements[6] = ((closureN)self_735436)->elements[6];
c_739366.elements[7] = ((closureN)self_735436)->elements[7];
c_739366.elements[8] = tptr_73412_731584;
c_739366.elements[9] = ((closureN)self_735436)->elements[8];
c_739366.elements[10] = ((closureN)self_735436)->elements[10];

return_direct_with_clo1(data,(closure)&c_739332,__lambda_329,  &c_739366);; 
}

static void __lambda_332(void *data, object self_735437, int argc, object *args) /* object self_735437, object tptr_91decl_73415_731585 */
 {
 object tptr_91decl_73415_731585 = args[0];
  
closureN_type c_739368;
object e_739461 [9];
c_739368.hdr.mark = gc_color_red;
 c_739368.hdr.grayed = 0;
c_739368.tag = closureN_tag;
 c_739368.fn = (function_type)__lambda_333;
c_739368.num_args = 1;
c_739368.num_elements = 9;
c_739368.elements = (object *)e_739461;
c_739368.elements[0] = ((closureN)self_735437)->elements[0];
c_739368.elements[1] = ((closureN)self_735437)->elements[4];
c_739368.elements[2] = ((closureN)self_735437)->elements[5];
c_739368.elements[3] = ((closureN)self_735437)->elements[6];
c_739368.elements[4] = ((closureN)self_735437)->elements[7];
c_739368.elements[5] = ((closureN)self_735437)->elements[8];
c_739368.elements[6] = ((closureN)self_735437)->elements[9];
c_739368.elements[7] = tptr_91decl_73415_731585;
c_739368.elements[8] = ((closureN)self_735437)->elements[10];


closureN_type c_739462;
object e_739591 [10];
c_739462.hdr.mark = gc_color_red;
 c_739462.hdr.grayed = 0;
c_739462.tag = closureN_tag;
 c_739462.fn = (function_type)__lambda_346;
c_739462.num_args = 1;
c_739462.num_elements = 10;
c_739462.elements = (object *)e_739591;
c_739462.elements[0] = ((closureN)self_735437)->elements[0];
c_739462.elements[1] = ((closureN)self_735437)->elements[1];
c_739462.elements[2] = ((closureN)self_735437)->elements[2];
c_739462.elements[3] = ((closureN)self_735437)->elements[3];
c_739462.elements[4] = ((closureN)self_735437)->elements[5];
c_739462.elements[5] = ((closureN)self_735437)->elements[6];
c_739462.elements[6] = ((closureN)self_735437)->elements[8];
c_739462.elements[7] = ((closureN)self_735437)->elements[9];
c_739462.elements[8] = tptr_91decl_73415_731585;
c_739462.elements[9] = ((closureN)self_735437)->elements[10];

return_direct_with_clo1(data,(closure)&c_739368,__lambda_333,  &c_739462);; 
}

static void __lambda_346(void *data, object self_735438, int argc, object *args) /* object self_735438, object k_732563, object type_73432_731589 */
 {
 object k_732563 = args[0]; object type_73432_731589 = args[1];
  
closureN_type c_739464;
object e_739590 [12];
c_739464.hdr.mark = gc_color_red;
 c_739464.hdr.grayed = 0;
c_739464.tag = closureN_tag;
 c_739464.fn = (function_type)__lambda_347;
c_739464.num_args = 1;
c_739464.num_elements = 12;
c_739464.elements = (object *)e_739590;
c_739464.elements[0] = ((closureN)self_735438)->elements[0];
c_739464.elements[1] = ((closureN)self_735438)->elements[1];
c_739464.elements[2] = ((closureN)self_735438)->elements[2];
c_739464.elements[3] = ((closureN)self_735438)->elements[3];
c_739464.elements[4] = k_732563;
c_739464.elements[5] = ((closureN)self_735438)->elements[4];
c_739464.elements[6] = ((closureN)self_735438)->elements[5];
c_739464.elements[7] = ((closureN)self_735438)->elements[6];
c_739464.elements[8] = ((closureN)self_735438)->elements[7];
c_739464.elements[9] = ((closureN)self_735438)->elements[8];
c_739464.elements[10] = type_73432_731589;
c_739464.elements[11] = ((closureN)self_735438)->elements[9];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739464, quote_c);; 
}

static void __lambda_347(void *data, object self_735439, int argc, object *args) /* object self_735439, object r_732581 */
 {
 object r_732581 = args[0];
  
closureN_type c_739466;
object e_739589 [12];
c_739466.hdr.mark = gc_color_red;
 c_739466.hdr.grayed = 0;
c_739466.tag = closureN_tag;
 c_739466.fn = (function_type)__lambda_348;
c_739466.num_args = 1;
c_739466.num_elements = 12;
c_739466.elements = (object *)e_739589;
c_739466.elements[0] = ((closureN)self_735439)->elements[0];
c_739466.elements[1] = ((closureN)self_735439)->elements[1];
c_739466.elements[2] = ((closureN)self_735439)->elements[2];
c_739466.elements[3] = ((closureN)self_735439)->elements[3];
c_739466.elements[4] = ((closureN)self_735439)->elements[4];
c_739466.elements[5] = ((closureN)self_735439)->elements[5];
c_739466.elements[6] = ((closureN)self_735439)->elements[6];
c_739466.elements[7] = ((closureN)self_735439)->elements[7];
c_739466.elements[8] = ((closureN)self_735439)->elements[8];
c_739466.elements[9] = ((closureN)self_735439)->elements[9];
c_739466.elements[10] = ((closureN)self_735439)->elements[10];
c_739466.elements[11] = ((closureN)self_735439)->elements[11];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_739466, r_732581);; 
}

static void __lambda_348(void *data, object self_735440, int argc, object *args) /* object self_735440, object cv_91name_73433_731590 */
 {
 object cv_91name_73433_731590 = args[0];
  
closureN_type c_739468;
object e_739509 [2];
c_739468.hdr.mark = gc_color_red;
 c_739468.hdr.grayed = 0;
c_739468.tag = closureN_tag;
 c_739468.fn = (function_type)__lambda_349;
c_739468.num_args = 0;
c_739468.num_elements = 2;
c_739468.elements = (object *)e_739509;
c_739468.elements[0] = ((closureN)self_735440)->elements[5];
c_739468.elements[1] = ((closureN)self_735440)->elements[11];


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

return_direct_with_clo1(data,(closure)&c_739468,__lambda_349,  &c_739510);; 
}

static void __lambda_355(void *data, object self_735441, int argc, object *args) /* object self_735441, object r_732573 */
 {
 object r_732573 = args[0];
  
closureN_type c_739512;
object e_739583 [12];
c_739512.hdr.mark = gc_color_red;
 c_739512.hdr.grayed = 0;
c_739512.tag = closureN_tag;
 c_739512.fn = (function_type)__lambda_356;
c_739512.num_args = 1;
c_739512.num_elements = 12;
c_739512.elements = (object *)e_739583;
c_739512.elements[0] = ((closureN)self_735441)->elements[0];
c_739512.elements[1] = ((closureN)self_735441)->elements[1];
c_739512.elements[2] = ((closureN)self_735441)->elements[2];
c_739512.elements[3] = ((closureN)self_735441)->elements[3];
c_739512.elements[4] = ((closureN)self_735441)->elements[4];
c_739512.elements[5] = ((closureN)self_735441)->elements[5];
c_739512.elements[6] = ((closureN)self_735441)->elements[6];
c_739512.elements[7] = ((closureN)self_735441)->elements[7];
c_739512.elements[8] = ((closureN)self_735441)->elements[8];
c_739512.elements[9] = ((closureN)self_735441)->elements[9];
c_739512.elements[10] = ((closureN)self_735441)->elements[10];
c_739512.elements[11] = ((closureN)self_735441)->elements[11];


object c_739586 = Cyc_string_append(data,(closure)&c_739512,2,r_732573, ((closureN)self_735441)->elements[4]);
return_closcall1(data,(closure)&c_739512,  c_739586);; 
}

static void __lambda_356(void *data, object self_735442, int argc, object *args) /* object self_735442, object r_732565 */
 {
 object r_732565 = args[0];
  
closureN_type c_739514;
object e_739520 [1];
c_739514.hdr.mark = gc_color_red;
 c_739514.hdr.grayed = 0;
c_739514.tag = closureN_tag;
 c_739514.fn = (function_type)__lambda_357;
c_739514.num_args = 0;
c_739514.num_elements = 1;
c_739514.elements = (object *)e_739520;
c_739514.elements[0] = ((closureN)self_735442)->elements[1];


closureN_type c_739521;
object e_739582 [13];
c_739521.hdr.mark = gc_color_red;
 c_739521.hdr.grayed = 0;
c_739521.tag = closureN_tag;
 c_739521.fn = (function_type)__lambda_358;
c_739521.num_args = 1;
c_739521.num_elements = 13;
c_739521.elements = (object *)e_739582;
c_739521.elements[0] = ((closureN)self_735442)->elements[0];
c_739521.elements[1] = ((closureN)self_735442)->elements[1];
c_739521.elements[2] = ((closureN)self_735442)->elements[2];
c_739521.elements[3] = ((closureN)self_735442)->elements[3];
c_739521.elements[4] = ((closureN)self_735442)->elements[4];
c_739521.elements[5] = ((closureN)self_735442)->elements[5];
c_739521.elements[6] = ((closureN)self_735442)->elements[6];
c_739521.elements[7] = r_732565;
c_739521.elements[8] = ((closureN)self_735442)->elements[7];
c_739521.elements[9] = ((closureN)self_735442)->elements[8];
c_739521.elements[10] = ((closureN)self_735442)->elements[9];
c_739521.elements[11] = ((closureN)self_735442)->elements[10];
c_739521.elements[12] = ((closureN)self_735442)->elements[11];

return_direct_with_clo1(data,(closure)&c_739514,__lambda_357,  &c_739521);; 
}

static void __lambda_358(void *data, object self_735443, int argc, object *args) /* object self_735443, object r_732568 */
 {
 object r_732568 = args[0];
  
closureN_type c_739523;
object e_739556 [7];
c_739523.hdr.mark = gc_color_red;
 c_739523.hdr.grayed = 0;
c_739523.tag = closureN_tag;
 c_739523.fn = (function_type)__lambda_359;
c_739523.num_args = 0;
c_739523.num_elements = 7;
c_739523.elements = (object *)e_739556;
c_739523.elements[0] = ((closureN)self_735443)->elements[1];
c_739523.elements[1] = ((closureN)self_735443)->elements[2];
c_739523.elements[2] = ((closureN)self_735443)->elements[3];
c_739523.elements[3] = ((closureN)self_735443)->elements[6];
c_739523.elements[4] = ((closureN)self_735443)->elements[8];
c_739523.elements[5] = ((closureN)self_735443)->elements[9];
c_739523.elements[6] = ((closureN)self_735443)->elements[10];


closureN_type c_739557;
object e_739581 [7];
c_739557.hdr.mark = gc_color_red;
 c_739557.hdr.grayed = 0;
c_739557.tag = closureN_tag;
 c_739557.fn = (function_type)__lambda_361;
c_739557.num_args = 1;
c_739557.num_elements = 7;
c_739557.elements = (object *)e_739581;
c_739557.elements[0] = ((closureN)self_735443)->elements[0];
c_739557.elements[1] = ((closureN)self_735443)->elements[4];
c_739557.elements[2] = ((closureN)self_735443)->elements[5];
c_739557.elements[3] = ((closureN)self_735443)->elements[7];
c_739557.elements[4] = r_732568;
c_739557.elements[5] = ((closureN)self_735443)->elements[11];
c_739557.elements[6] = ((closureN)self_735443)->elements[12];

return_direct_with_clo1(data,(closure)&c_739523,__lambda_359,  &c_739557);; 
}

static void __lambda_361(void *data, object self_735444, int argc, object *args) /* object self_735444, object r_732569 */
 {
 object r_732569 = args[0];
  
closureN_type c_739559;
object e_739569 [2];
c_739559.hdr.mark = gc_color_red;
 c_739559.hdr.grayed = 0;
c_739559.tag = closureN_tag;
 c_739559.fn = (function_type)__lambda_362;
c_739559.num_args = 1;
c_739559.num_elements = 2;
c_739559.elements = (object *)e_739569;
c_739559.elements[0] = ((closureN)self_735444)->elements[2];
c_739559.elements[1] = ((closureN)self_735444)->elements[3];


make_utf8_string_with_len(c_739576, " ", 1, 1);

make_utf8_string_with_len(c_739578, " = ", 3, 3);

make_utf8_string_with_len(c_739580, "(", 1, 1);

object c_739572 = Cyc_string_append(data,(closure)&c_739559,9,((closureN)self_735444)->elements[4], ((closureN)self_735444)->elements[5], ((closureN)self_735444)->elements[6], &c_739576, ((closureN)self_735444)->elements[1], &c_739578, ((closureN)self_735444)->elements[0], &c_739580, r_732569);
return_closcall1(data,(closure)&c_739559,  c_739572);; 
}

static void __lambda_362(void *data, object self_735445, int argc, object *args) /* object self_735445, object r_732567 */
 {
 object r_732567 = args[0];
  
list_2_type local_739564; 

pair_type local_739568; 
return_direct_with_clo1(data,  ((closureN)self_735445)->elements[0], (((closure)  ((closureN)self_735445)->elements[0])->fn),  Cyc_fast_list_2(&local_739564, ((closureN)self_735445)->elements[1], set_cell_as_expr(&local_739568, r_732567)));; 
}

static void __lambda_359(void *data, object self_735446, int argc, object *args) /* object self_735446, object k_732570 */
 {
 object k_732570 = args[0];
  if( (boolean_f != ((closureN)self_735446)->elements[0]) ){ 
  
make_utf8_string_with_len(c_739532, ",&", 2, 2);

object c_739528 = Cyc_string_append(data,  k_732570,5,((closureN)self_735446)->elements[4], ((closureN)self_735446)->elements[6], ((closureN)self_735446)->elements[5], &c_739532, ((closureN)self_735446)->elements[1]);
return_direct_with_clo1(data,  k_732570, (((closure)  k_732570)->fn),  c_739528);
} else { 
  
closureN_type c_739535;
object e_739554 [5];
c_739535.hdr.mark = gc_color_red;
 c_739535.hdr.grayed = 0;
c_739535.tag = closureN_tag;
 c_739535.fn = (function_type)__lambda_360;
c_739535.num_args = 1;
c_739535.num_elements = 5;
c_739535.elements = (object *)e_739554;
c_739535.elements[0] = ((closureN)self_735446)->elements[2];
c_739535.elements[1] = k_732570;
c_739535.elements[2] = ((closureN)self_735446)->elements[4];
c_739535.elements[3] = ((closureN)self_735446)->elements[5];
c_739535.elements[4] = ((closureN)self_735446)->elements[6];

return_direct_with_clo2(data,  __glo_prim_117cont_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117cont_127_scheme_cyclone_primitives)->fn),  &c_739535, ((closureN)self_735446)->elements[3]);}
;; 
}

static void __lambda_360(void *data, object self_735447, int argc, object *args) /* object self_735447, object r_732571 */
 {
 object r_732571 = args[0];
  if( (boolean_f != r_732571) ){ 
  
make_utf8_string_with_len(c_739544, ",", 1, 1);

object c_739540 = Cyc_string_append(data,  ((closureN)self_735447)->elements[1],5,((closureN)self_735447)->elements[2], ((closureN)self_735447)->elements[4], ((closureN)self_735447)->elements[3], &c_739544, ((closureN)self_735447)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_735447)->elements[1], (((closure)  ((closureN)self_735447)->elements[1])->fn),  c_739540);
} else { 
  
object c_739550 = Cyc_string_append(data,  ((closureN)self_735447)->elements[1],3,((closureN)self_735447)->elements[2], ((closureN)self_735447)->elements[4], ((closureN)self_735447)->elements[3]);
return_direct_with_clo1(data,  ((closureN)self_735447)->elements[1], (((closure)  ((closureN)self_735447)->elements[1])->fn),  c_739550);}
;; 
}

static void __lambda_357(void *data, object self_735448, int argc, object *args) /* object self_735448, object k_732572 */
 {
 object k_732572 = args[0];
  if( (boolean_f != ((closureN)self_735448)->elements[0]) ){ 
  return_direct_with_clo1(data,  k_732572,__lambda_358,  ((closureN)self_735448)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_739519, "", 0, 0);
return_direct_with_clo1(data,  k_732572,__lambda_358,  &c_739519);}
;; 
}

static void __lambda_349(void *data, object self_735449, int argc, object *args) /* object self_735449, object k_732574 */
 {
 object k_732574 = args[0];
  
closureN_type c_739470;
object e_739507 [3];
c_739470.hdr.mark = gc_color_red;
 c_739470.hdr.grayed = 0;
c_739470.tag = closureN_tag;
 c_739470.fn = (function_type)__lambda_350;
c_739470.num_args = 1;
c_739470.num_elements = 3;
c_739470.elements = (object *)e_739507;
c_739470.elements[0] = k_732574;
c_739470.elements[1] = ((closureN)self_735449)->elements[0];
c_739470.elements[2] = ((closureN)self_735449)->elements[1];

return_direct_with_clo2(data,  __glo_prim_117cont_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117cont_127_scheme_cyclone_primitives)->fn),  &c_739470, ((closureN)self_735449)->elements[0]);; 
}

static void __lambda_350(void *data, object self_735450, int argc, object *args) /* object self_735450, object tmp_73435_73437_731591 */
 {
 object tmp_73435_73437_731591 = args[0];
  
closureN_type c_739472;
object e_739498 [3];
c_739472.hdr.mark = gc_color_red;
 c_739472.hdr.grayed = 0;
c_739472.tag = closureN_tag;
 c_739472.fn = (function_type)__lambda_351;
c_739472.num_args = 0;
c_739472.num_elements = 3;
c_739472.elements = (object *)e_739498;
c_739472.elements[0] = ((closureN)self_735450)->elements[1];
c_739472.elements[1] = tmp_73435_73437_731591;
c_739472.elements[2] = ((closureN)self_735450)->elements[2];


closureN_type c_739499;
object e_739506 [1];
c_739499.hdr.mark = gc_color_red;
 c_739499.hdr.grayed = 0;
c_739499.tag = closureN_tag;
 c_739499.fn = (function_type)__lambda_354;
c_739499.num_args = 1;
c_739499.num_elements = 1;
c_739499.elements = (object *)e_739506;
c_739499.elements[0] = ((closureN)self_735450)->elements[0];

return_direct_with_clo1(data,(closure)&c_739472,__lambda_351,  &c_739499);; 
}

static void __lambda_354(void *data, object self_735451, int argc, object *args) /* object self_735451, object r_732575 */
 {
 object r_732575 = args[0];
  if( (boolean_f != r_732575) ){ 
  
make_utf8_string_with_len(c_739502, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735451)->elements[0], (((closure)  ((closureN)self_735451)->elements[0])->fn),  &c_739502);
} else { 
  
make_utf8_string_with_len(c_739505, "&", 1, 1);
return_direct_with_clo1(data,  ((closureN)self_735451)->elements[0], (((closure)  ((closureN)self_735451)->elements[0])->fn),  &c_739505);}
;; 
}

static void __lambda_351(void *data, object self_735452, int argc, object *args) /* object self_735452, object k_732577 */
 {
 object k_732577 = args[0];
  if( (boolean_f != ((closureN)self_735452)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_732577, (((closure)  k_732577)->fn),  ((closureN)self_735452)->elements[1]);
} else { 
  
closureN_type c_739477;
object e_739496 [3];
c_739477.hdr.mark = gc_color_red;
 c_739477.hdr.grayed = 0;
c_739477.tag = closureN_tag;
 c_739477.fn = (function_type)__lambda_352;
c_739477.num_args = 1;
c_739477.num_elements = 3;
c_739477.elements = (object *)e_739496;
c_739477.elements[0] = k_732577;
c_739477.elements[1] = ((closureN)self_735452)->elements[0];
c_739477.elements[2] = ((closureN)self_735452)->elements[2];

return_direct_with_clo2(data,  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives, (((closure)  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives)->fn),  &c_739477, ((closureN)self_735452)->elements[0]);}
;; 
}

static void __lambda_352(void *data, object self_735453, int argc, object *args) /* object self_735453, object r_732580 */
 {
 object r_732580 = args[0];
    
  make_utf8_string_with_len(c_739480, "object", 6, 6);
if( (boolean_f != equalp(r_732580, &c_739480)) ){ 
  


make_utf8_string_with_len(c_739485, "object", 6, 6);
return_direct_with_clo1(data,  ((closureN)self_735453)->elements[0], (((closure)  ((closureN)self_735453)->elements[0])->fn),  equalp(r_732580, &c_739485));
} else { 
  
closureN_type c_739487;
object e_739494 [3];
c_739487.hdr.mark = gc_color_red;
 c_739487.hdr.grayed = 0;
c_739487.tag = closureN_tag;
 c_739487.fn = (function_type)__lambda_353;
c_739487.num_args = 1;
c_739487.num_elements = 3;
c_739487.elements = (object *)e_739494;
c_739487.elements[0] = ((closureN)self_735453)->elements[0];
c_739487.elements[1] = ((closureN)self_735453)->elements[1];
c_739487.elements[2] = ((closureN)self_735453)->elements[2];

return_direct_with_clo2(data,  __glo_prim_95c_91var_91pointer_scheme_cyclone_primitives, (((closure)  __glo_prim_95c_91var_91pointer_scheme_cyclone_primitives)->fn),  &c_739487, ((closureN)self_735453)->elements[1]);}
;; 
}

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

static void __lambda_333(void *data, object self_735455, int argc, object *args) /* object self_735455, object c_91var_91assign_73418_731586 */
 {
 object c_91var_91assign_73418_731586 = args[0];
  
closureN_type c_739370;
object e_739459 [10];
c_739370.hdr.mark = gc_color_red;
 c_739370.hdr.grayed = 0;
c_739370.tag = closureN_tag;
 c_739370.fn = (function_type)__lambda_334;
c_739370.num_args = 1;
c_739370.num_elements = 10;
c_739370.elements = (object *)e_739459;
c_739370.elements[0] = ((closureN)self_735455)->elements[0];
c_739370.elements[1] = c_91var_91assign_73418_731586;
c_739370.elements[2] = ((closureN)self_735455)->elements[1];
c_739370.elements[3] = ((closureN)self_735455)->elements[2];
c_739370.elements[4] = ((closureN)self_735455)->elements[3];
c_739370.elements[5] = ((closureN)self_735455)->elements[4];
c_739370.elements[6] = ((closureN)self_735455)->elements[5];
c_739370.elements[7] = ((closureN)self_735455)->elements[6];
c_739370.elements[8] = ((closureN)self_735455)->elements[7];
c_739370.elements[9] = ((closureN)self_735455)->elements[8];

return_direct_with_clo2(data,  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives, (((closure)  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives)->fn),  &c_739370, ((closureN)self_735455)->elements[2]);; 
}

static void __lambda_334(void *data, object self_735456, int argc, object *args) /* object self_735456, object r_732548 */
 {
 object r_732548 = args[0];
  if( (boolean_f != r_732548) ){ 
  
closureN_type c_739372;
object e_739376 [2];
c_739372.hdr.mark = gc_color_red;
 c_739372.hdr.grayed = 0;
c_739372.tag = closureN_tag;
 c_739372.fn = (function_type)__lambda_335;
c_739372.num_args = 1;
c_739372.num_elements = 2;
c_739372.elements = (object *)e_739376;
c_739372.elements[0] = ((closureN)self_735456)->elements[1];
c_739372.elements[1] = ((closureN)self_735456)->elements[2];

return_direct_with_clo2(data,  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives, (((closure)  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives)->fn),  &c_739372, ((closureN)self_735456)->elements[3]);
} else { 
  
closureN_type c_739379;
object e_739457 [9];
c_739379.hdr.mark = gc_color_red;
 c_739379.hdr.grayed = 0;
c_739379.tag = closureN_tag;
 c_739379.fn = (function_type)__lambda_336;
c_739379.num_args = 1;
c_739379.num_elements = 9;
c_739379.elements = (object *)e_739457;
c_739379.elements[0] = ((closureN)self_735456)->elements[0];
c_739379.elements[1] = ((closureN)self_735456)->elements[2];
c_739379.elements[2] = ((closureN)self_735456)->elements[3];
c_739379.elements[3] = ((closureN)self_735456)->elements[4];
c_739379.elements[4] = ((closureN)self_735456)->elements[5];
c_739379.elements[5] = ((closureN)self_735456)->elements[6];
c_739379.elements[6] = ((closureN)self_735456)->elements[7];
c_739379.elements[7] = ((closureN)self_735456)->elements[8];
c_739379.elements[8] = ((closureN)self_735456)->elements[9];

return_direct_with_clo2(data,  __glo_prim_95cvar_127_scheme_cyclone_primitives, (((closure)  __glo_prim_95cvar_127_scheme_cyclone_primitives)->fn),  &c_739379, ((closureN)self_735456)->elements[3]);}
;; 
}

static void __lambda_336(void *data, object self_735458, int argc, object *args) /* object self_735458, object r_732550 */
 {
 object r_732550 = args[0];
  if( (boolean_f != r_732550) ){ 
  
closureN_type c_739381;
object e_739436 [6];
c_739381.hdr.mark = gc_color_red;
 c_739381.hdr.grayed = 0;
c_739381.tag = closureN_tag;
 c_739381.fn = (function_type)__lambda_337;
c_739381.num_args = 1;
c_739381.num_elements = 6;
c_739381.elements = (object *)e_739436;
c_739381.elements[0] = ((closureN)self_735458)->elements[0];
c_739381.elements[1] = ((closureN)self_735458)->elements[1];
c_739381.elements[2] = ((closureN)self_735458)->elements[2];
c_739381.elements[3] = ((closureN)self_735458)->elements[3];
c_739381.elements[4] = ((closureN)self_735458)->elements[4];
c_739381.elements[5] = ((closureN)self_735458)->elements[8];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739381, quote_c);
} else { 
  
closureN_type c_739438;
object e_739448 [2];
c_739438.hdr.mark = gc_color_red;
 c_739438.hdr.grayed = 0;
c_739438.tag = closureN_tag;
 c_739438.fn = (function_type)__lambda_345;
c_739438.num_args = 1;
c_739438.num_elements = 2;
c_739438.elements = (object *)e_739448;
c_739438.elements[0] = ((closureN)self_735458)->elements[1];
c_739438.elements[1] = ((closureN)self_735458)->elements[7];


make_utf8_string_with_len(c_739453, "(", 1, 1);

object c_739451 = Cyc_string_append(data,(closure)&c_739438,5,((closureN)self_735458)->elements[0], &c_739453, ((closureN)self_735458)->elements[3], ((closureN)self_735458)->elements[6], ((closureN)self_735458)->elements[5]);
return_closcall1(data,(closure)&c_739438,  c_739451);}
;; 
}

static void __lambda_345(void *data, object self_735467, int argc, object *args) /* object self_735467, object r_732561 */
 {
 object r_732561 = args[0];
  
list_2_type local_739443; 

pair_type local_739446; 
return_direct_with_clo1(data,  ((closureN)self_735467)->elements[0], (((closure)  ((closureN)self_735467)->elements[0])->fn),  Cyc_fast_list_2(&local_739443, r_732561, set_cell_as_expr(&local_739446, ((closureN)self_735467)->elements[1])));; 
}

static void __lambda_337(void *data, object self_735459, int argc, object *args) /* object self_735459, object r_732559 */
 {
 object r_732559 = args[0];
  
closureN_type c_739383;
object e_739435 [6];
c_739383.hdr.mark = gc_color_red;
 c_739383.hdr.grayed = 0;
c_739383.tag = closureN_tag;
 c_739383.fn = (function_type)__lambda_338;
c_739383.num_args = 1;
c_739383.num_elements = 6;
c_739383.elements = (object *)e_739435;
c_739383.elements[0] = ((closureN)self_735459)->elements[0];
c_739383.elements[1] = ((closureN)self_735459)->elements[1];
c_739383.elements[2] = ((closureN)self_735459)->elements[2];
c_739383.elements[3] = ((closureN)self_735459)->elements[3];
c_739383.elements[4] = ((closureN)self_735459)->elements[4];
c_739383.elements[5] = ((closureN)self_735459)->elements[5];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_739383, r_732559);; 
}

static void __lambda_338(void *data, object self_735460, int argc, object *args) /* object self_735460, object cv_91name_73426_731587 */
 {
 object cv_91name_73426_731587 = args[0];
  
closureN_type c_739385;
object e_739412 [3];
c_739385.hdr.mark = gc_color_red;
 c_739385.hdr.grayed = 0;
c_739385.tag = closureN_tag;
 c_739385.fn = (function_type)__lambda_339;
c_739385.num_args = 0;
c_739385.num_elements = 3;
c_739385.elements = (object *)e_739412;
c_739385.elements[0] = cv_91name_73426_731587;
c_739385.elements[1] = ((closureN)self_735460)->elements[2];
c_739385.elements[2] = ((closureN)self_735460)->elements[5];


closureN_type c_739413;
object e_739434 [5];
c_739413.hdr.mark = gc_color_red;
 c_739413.hdr.grayed = 0;
c_739413.tag = closureN_tag;
 c_739413.fn = (function_type)__lambda_343;
c_739413.num_args = 1;
c_739413.num_elements = 5;
c_739413.elements = (object *)e_739434;
c_739413.elements[0] = ((closureN)self_735460)->elements[0];
c_739413.elements[1] = cv_91name_73426_731587;
c_739413.elements[2] = ((closureN)self_735460)->elements[1];
c_739413.elements[3] = ((closureN)self_735460)->elements[3];
c_739413.elements[4] = ((closureN)self_735460)->elements[4];

return_direct_with_clo1(data,(closure)&c_739385,__lambda_339,  &c_739413);; 
}

static void __lambda_343(void *data, object self_735461, int argc, object *args) /* object self_735461, object r_732552 */
 {
 object r_732552 = args[0];
  
closureN_type c_739415;
object e_739425 [2];
c_739415.hdr.mark = gc_color_red;
 c_739415.hdr.grayed = 0;
c_739415.tag = closureN_tag;
 c_739415.fn = (function_type)__lambda_344;
c_739415.num_args = 1;
c_739415.num_elements = 2;
c_739415.elements = (object *)e_739425;
c_739415.elements[0] = ((closureN)self_735461)->elements[2];
c_739415.elements[1] = r_732552;


make_utf8_string_with_len(c_739430, "(", 1, 1);

object c_739428 = Cyc_string_append(data,(closure)&c_739415,5,((closureN)self_735461)->elements[0], &c_739430, ((closureN)self_735461)->elements[1], ((closureN)self_735461)->elements[4], ((closureN)self_735461)->elements[3]);
return_closcall1(data,(closure)&c_739415,  c_739428);; 
}

static void __lambda_344(void *data, object self_735462, int argc, object *args) /* object self_735462, object r_732554 */
 {
 object r_732554 = args[0];
  
list_2_type local_739420; 

pair_type local_739424; 
return_direct_with_clo1(data,  ((closureN)self_735462)->elements[0], (((closure)  ((closureN)self_735462)->elements[0])->fn),  Cyc_fast_list_2(&local_739420, ((closureN)self_735462)->elements[1], set_cell_as_expr(&local_739424, r_732554)));; 
}

static void __lambda_339(void *data, object self_735463, int argc, object *args) /* object self_735463, object k_732555 */
 {
 object k_732555 = args[0];
  
closureN_type c_739387;
object e_739409 [4];
c_739387.hdr.mark = gc_color_red;
 c_739387.hdr.grayed = 0;
c_739387.tag = closureN_tag;
 c_739387.fn = (function_type)__lambda_340;
c_739387.num_args = 1;
c_739387.num_elements = 4;
c_739387.elements = (object *)e_739409;
c_739387.elements[0] = ((closureN)self_735463)->elements[0];
c_739387.elements[1] = k_732555;
c_739387.elements[2] = ((closureN)self_735463)->elements[1];
c_739387.elements[3] = ((closureN)self_735463)->elements[2];

return_direct_with_clo3(data,  __glo_prim_117allocates_91object_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117allocates_91object_127_scheme_cyclone_primitives)->fn),  &c_739387, ((closureN)self_735463)->elements[1], ((closureN)self_735463)->elements[2]);; 
}

static void __lambda_340(void *data, object self_735464, int argc, object *args) /* object self_735464, object tmp_73428_73430_731588 */
 {
 object tmp_73428_73430_731588 = args[0];
  
closureN_type c_739389;
object e_739396 [3];
c_739389.hdr.mark = gc_color_red;
 c_739389.hdr.grayed = 0;
c_739389.tag = closureN_tag;
 c_739389.fn = (function_type)__lambda_341;
c_739389.num_args = 0;
c_739389.num_elements = 3;
c_739389.elements = (object *)e_739396;
c_739389.elements[0] = ((closureN)self_735464)->elements[2];
c_739389.elements[1] = tmp_73428_73430_731588;
c_739389.elements[2] = ((closureN)self_735464)->elements[3];


closureN_type c_739397;
object e_739408 [2];
c_739397.hdr.mark = gc_color_red;
 c_739397.hdr.grayed = 0;
c_739397.tag = closureN_tag;
 c_739397.fn = (function_type)__lambda_342;
c_739397.num_args = 1;
c_739397.num_elements = 2;
c_739397.elements = (object *)e_739408;
c_739397.elements[0] = ((closureN)self_735464)->elements[0];
c_739397.elements[1] = ((closureN)self_735464)->elements[1];

return_direct_with_clo1(data,(closure)&c_739389,__lambda_341,  &c_739397);; 
}

static void __lambda_342(void *data, object self_735465, int argc, object *args) /* object self_735465, object r_732556 */
 {
 object r_732556 = args[0];
  if( (boolean_f != r_732556) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735465)->elements[1], (((closure)  ((closureN)self_735465)->elements[1])->fn),  ((closureN)self_735465)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_739406, "&", 1, 1);

object c_739405 = Cyc_string_append(data,  ((closureN)self_735465)->elements[1],2,&c_739406, ((closureN)self_735465)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_735465)->elements[1], (((closure)  ((closureN)self_735465)->elements[1])->fn),  c_739405);}
;; 
}

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

static void __lambda_335(void *data, object self_735457, int argc, object *args) /* object self_735457, object r_732549 */
 {
 object r_732549 = args[0];
  return_closcall2(data,  ((closureN)self_735457)->elements[0],  ((closureN)self_735457)->elements[1], r_732549);; 
}

static void __lambda_329(void *data, object self_735468, int argc, object *args) /* object self_735468, object k_732583 */
 {
 object k_732583 = args[0];
  
closureN_type c_739334;
object e_739339 [2];
c_739334.hdr.mark = gc_color_red;
 c_739334.hdr.grayed = 0;
c_739334.tag = closureN_tag;
 c_739334.fn = (function_type)__lambda_330;
c_739334.num_args = 0;
c_739334.num_elements = 2;
c_739334.elements = (object *)e_739339;
c_739334.elements[0] = ((closureN)self_735468)->elements[1];
c_739334.elements[1] = ((closureN)self_735468)->elements[2];


closureN_type c_739340;
object e_739364 [3];
c_739340.hdr.mark = gc_color_red;
 c_739340.hdr.grayed = 0;
c_739340.tag = closureN_tag;
 c_739340.fn = (function_type)__lambda_331;
c_739340.num_args = 1;
c_739340.num_elements = 3;
c_739340.elements = (object *)e_739364;
c_739340.elements[0] = k_732583;
c_739340.elements[1] = ((closureN)self_735468)->elements[0];
c_739340.elements[2] = ((closureN)self_735468)->elements[1];

return_direct_with_clo1(data,(closure)&c_739334,__lambda_330,  &c_739340);; 
}

static void __lambda_331(void *data, object self_735469, int argc, object *args) /* object self_735469, object r_732584 */
 {
 object r_732584 = args[0];
  if( (boolean_f != r_732584) ){ 
  
make_utf8_string_with_len(c_739346, "object ", 7, 7);

make_utf8_string_with_len(c_739348, " = alloca(sizeof(", 17, 17);

make_utf8_string_with_len(c_739350, ")); ", 4, 4);

object c_739345 = Cyc_string_append(data,  ((closureN)self_735469)->elements[0],5,&c_739346, ((closureN)self_735469)->elements[1], &c_739348, ((closureN)self_735469)->elements[2], &c_739350);
return_direct_with_clo1(data,  ((closureN)self_735469)->elements[0], (((closure)  ((closureN)self_735469)->elements[0])->fn),  c_739345);
} else { 
  if( (boolean_f != ((closureN)self_735469)->elements[2]) ){ 
  
make_utf8_string_with_len(c_739358, " ", 1, 1);

make_utf8_string_with_len(c_739360, "; ", 2, 2);

object c_739356 = Cyc_string_append(data,  ((closureN)self_735469)->elements[0],4,((closureN)self_735469)->elements[2], &c_739358, ((closureN)self_735469)->elements[1], &c_739360);
return_direct_with_clo1(data,  ((closureN)self_735469)->elements[0], (((closure)  ((closureN)self_735469)->elements[0])->fn),  c_739356);
} else { 
  
make_utf8_string_with_len(c_739363, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735469)->elements[0], (((closure)  ((closureN)self_735469)->elements[0])->fn),  &c_739363);}
;}
;; 
}

static void __lambda_330(void *data, object self_735470, int argc, object *args) /* object self_735470, object k_732585 */
 {
 object k_732585 = args[0];
  if( (boolean_f != ((closureN)self_735470)->elements[0]) ){ 
  return_direct_with_clo1(data,  k_732585,__lambda_331,  ((closureN)self_735470)->elements[1]);
} else { 
  return_direct_with_clo1(data,  k_732585,__lambda_331,  boolean_f);}
;; 
}

static void __lambda_326(void *data, object self_735471, int argc, object *args) /* object self_735471, object k_732586 */
 {
 object k_732586 = args[0];
  if( (boolean_f != ((closureN)self_735471)->elements[0]) ){ 
  
closureN_type c_739323;
object e_739326 [1];
c_739323.hdr.mark = gc_color_red;
 c_739323.hdr.grayed = 0;
c_739323.tag = closureN_tag;
 c_739323.fn = (function_type)__lambda_327;
c_739323.num_args = 1;
c_739323.num_elements = 1;
c_739323.elements = (object *)e_739326;
c_739323.elements[0] = k_732586;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739323, quote_local);
} else { 
  
make_utf8_string_with_len(c_739328, "", 0, 0);
return_direct_with_clo1(data,  k_732586, (((closure)  k_732586)->fn),  &c_739328);}
;; 
}

static void __lambda_327(void *data, object self_735472, int argc, object *args) /* object self_735472, object r_732587 */
 {
 object r_732587 = args[0];
  return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  ((closureN)self_735472)->elements[0], r_732587);; 
}

static void __lambda_322(void *data, object self_735473, int argc, object *args) /* object self_735473, object k_732589 */
 {
 object k_732589 = args[0];
  
closureN_type c_739295;
object e_739300 [2];
c_739295.hdr.mark = gc_color_red;
 c_739295.hdr.grayed = 0;
c_739295.tag = closureN_tag;
 c_739295.fn = (function_type)__lambda_323;
c_739295.num_args = 0;
c_739295.num_elements = 2;
c_739295.elements = (object *)e_739300;
c_739295.elements[0] = ((closureN)self_735473)->elements[1];
c_739295.elements[1] = ((closureN)self_735473)->elements[2];


closureN_type c_739301;
object e_739316 [3];
c_739301.hdr.mark = gc_color_red;
 c_739301.hdr.grayed = 0;
c_739301.tag = closureN_tag;
 c_739301.fn = (function_type)__lambda_324;
c_739301.num_args = 1;
c_739301.num_elements = 3;
c_739301.elements = (object *)e_739316;
c_739301.elements[0] = k_732589;
c_739301.elements[1] = ((closureN)self_735473)->elements[0];
c_739301.elements[2] = ((closureN)self_735473)->elements[1];

return_direct_with_clo1(data,(closure)&c_739295,__lambda_323,  &c_739301);; 
}

static void __lambda_324(void *data, object self_735474, int argc, object *args) /* object self_735474, object r_732590 */
 {
 object r_732590 = args[0];
  if( (boolean_f != r_732590) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735474)->elements[0], (((closure)  ((closureN)self_735474)->elements[0])->fn),  ((closureN)self_735474)->elements[1]);
} else { 
  if( (boolean_f != ((closureN)self_735474)->elements[2]) ){ 
  
make_utf8_string_with_len(c_739312, "&", 1, 1);

object c_739310 = Cyc_string_append(data,  ((closureN)self_735474)->elements[0],2,((closureN)self_735474)->elements[1], &c_739312);
return_direct_with_clo1(data,  ((closureN)self_735474)->elements[0], (((closure)  ((closureN)self_735474)->elements[0])->fn),  c_739310);
} else { 
  
make_utf8_string_with_len(c_739315, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735474)->elements[0], (((closure)  ((closureN)self_735474)->elements[0])->fn),  &c_739315);}
;}
;; 
}

static void __lambda_323(void *data, object self_735475, int argc, object *args) /* object self_735475, object k_732591 */
 {
 object k_732591 = args[0];
  if( (boolean_f != ((closureN)self_735475)->elements[0]) ){ 
  return_direct_with_clo1(data,  k_732591,__lambda_324,  ((closureN)self_735475)->elements[1]);
} else { 
  return_direct_with_clo1(data,  k_732591,__lambda_324,  boolean_f);}
;; 
}

static void __lambda_318(void *data, object self_735476, int argc, object *args) /* object self_735476, object k_732595 */
 {
 object k_732595 = args[0];
  
closureN_type c_739268;
object e_739275 [1];
c_739268.hdr.mark = gc_color_red;
 c_739268.hdr.grayed = 0;
c_739268.tag = closureN_tag;
 c_739268.fn = (function_type)__lambda_319;
c_739268.num_args = 1;
c_739268.num_elements = 1;
c_739268.elements = (object *)e_739275;
c_739268.elements[0] = k_732595;

return_direct_with_clo2(data,  __glo_prim_95data_91arg_127_scheme_cyclone_primitives, (((closure)  __glo_prim_95data_91arg_127_scheme_cyclone_primitives)->fn),  &c_739268, ((closureN)self_735476)->elements[0]);; 
}

static void __lambda_319(void *data, object self_735477, int argc, object *args) /* object self_735477, object r_732596 */
 {
 object r_732596 = args[0];
  if( (boolean_f != r_732596) ){ 
  
make_utf8_string_with_len(c_739271, "data", 4, 4);
return_direct_with_clo1(data,  ((closureN)self_735477)->elements[0], (((closure)  ((closureN)self_735477)->elements[0])->fn),  &c_739271);
} else { 
  
make_utf8_string_with_len(c_739274, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735477)->elements[0], (((closure)  ((closureN)self_735477)->elements[0])->fn),  &c_739274);}
;; 
}

static void __lambda_312(void *data, object self_735478, int argc, object *args) /* object self_735478, object k_732597 */
 {
 object k_732597 = args[0];
  
closureN_type c_739222;
object e_739248 [2];
c_739222.hdr.mark = gc_color_red;
 c_739222.hdr.grayed = 0;
c_739222.tag = closureN_tag;
 c_739222.fn = (function_type)__lambda_313;
c_739222.num_args = 0;
c_739222.num_elements = 2;
c_739222.elements = (object *)e_739248;
c_739222.elements[0] = ((closureN)self_735478)->elements[1];
c_739222.elements[1] = ((closureN)self_735478)->elements[2];


closureN_type c_739249;
object e_739262 [3];
c_739249.hdr.mark = gc_color_red;
 c_739249.hdr.grayed = 0;
c_739249.tag = closureN_tag;
 c_739249.fn = (function_type)__lambda_316;
c_739249.num_args = 1;
c_739249.num_elements = 3;
c_739249.elements = (object *)e_739262;
c_739249.elements[0] = ((closureN)self_735478)->elements[0];
c_739249.elements[1] = ((closureN)self_735478)->elements[1];
c_739249.elements[2] = k_732597;

return_direct_with_clo1(data,(closure)&c_739222,__lambda_313,  &c_739249);; 
}

static void __lambda_316(void *data, object self_735479, int argc, object *args) /* object self_735479, object r_732598 */
 {
 object r_732598 = args[0];
  if( (boolean_f != r_732598) ){ 
  
make_utf8_string_with_len(c_739255, "mclosure0(", 10, 10);

make_utf8_string_with_len(c_739257, ",", 1, 1);

make_utf8_string_with_len(c_739259, "); ", 3, 3);

object c_739254 = Cyc_string_append(data,  ((closureN)self_735479)->elements[2],5,&c_739255, ((closureN)self_735479)->elements[0], &c_739257, ((closureN)self_735479)->elements[1], &c_739259);
return_direct_with_clo1(data,  ((closureN)self_735479)->elements[2], (((closure)  ((closureN)self_735479)->elements[2])->fn),  c_739254);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735479)->elements[2], (((closure)  ((closureN)self_735479)->elements[2])->fn),  boolean_f);}
;; 
}

static void __lambda_313(void *data, object self_735480, int argc, object *args) /* object self_735480, object k_732599 */
 {
 object k_732599 = args[0];
  
closureN_type c_739224;
object e_739246 [2];
c_739224.hdr.mark = gc_color_red;
 c_739224.hdr.grayed = 0;
c_739224.tag = closureN_tag;
 c_739224.fn = (function_type)__lambda_314;
c_739224.num_args = 1;
c_739224.num_elements = 2;
c_739224.elements = (object *)e_739246;
c_739224.elements[0] = ((closureN)self_735480)->elements[0];
c_739224.elements[1] = k_732599;

return_direct_with_clo2(data,  __glo_prim_117cont_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117cont_127_scheme_cyclone_primitives)->fn),  &c_739224, ((closureN)self_735480)->elements[1]);; 
}

static void __lambda_314(void *data, object self_735481, int argc, object *args) /* object self_735481, object r_732600 */
 {
 object r_732600 = args[0];
  if( (boolean_f != r_732600) ){ 
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, ((closureN)self_735481)->elements[0]), obj_int2obj(9))) ){ 
  
closureN_type c_739231;
object e_739237 [1];
c_739231.hdr.mark = gc_color_red;
 c_739231.hdr.grayed = 0;
c_739231.tag = closureN_tag;
 c_739231.fn = (function_type)__lambda_315;
c_739231.num_args = 1;
c_739231.num_elements = 1;
c_739231.elements = (object *)e_739237;
c_739231.elements[0] = ((closureN)self_735481)->elements[1];


object c_739240 = Cyc_substring(data,(closure)&c_739231,((closureN)self_735481)->elements[0], obj_int2obj(0), obj_int2obj(9));
return_closcall1(data,(closure)&c_739231,  c_739240);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735481)->elements[1], (((closure)  ((closureN)self_735481)->elements[1])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735481)->elements[1], (((closure)  ((closureN)self_735481)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_315(void *data, object self_735482, int argc, object *args) /* object self_735482, object r_732602 */
 {
 object r_732602 = args[0];
  


make_utf8_string_with_len(c_739236, "__lambda_", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_735482)->elements[0], (((closure)  ((closureN)self_735482)->elements[0])->fn),  equalp(r_732602, &c_739236));; 
}

static void __lambda_306(void *data, object self_735483, int argc, object *args) /* object self_735483, object k_732607 */
 {
 object k_732607 = args[0];
  
closureN_type c_739195;
object e_739211 [3];
c_739195.hdr.mark = gc_color_red;
 c_739195.hdr.grayed = 0;
c_739195.tag = closureN_tag;
 c_739195.fn = (function_type)__lambda_307;
c_739195.num_args = 1;
c_739195.num_elements = 3;
c_739195.elements = (object *)e_739211;
c_739195.elements[0] = k_732607;
c_739195.elements[1] = ((closureN)self_735483)->elements[0];
c_739195.elements[2] = ((closureN)self_735483)->elements[1];

return_direct_with_clo2(data,  __glo_prim_117udf_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117udf_127_scheme_cyclone_primitives)->fn),  &c_739195, ((closureN)self_735483)->elements[0]);; 
}

static void __lambda_307(void *data, object self_735484, int argc, object *args) /* object self_735484, object r_732608 */
 {
 object r_732608 = args[0];
  if( (boolean_f != r_732608) ){ 
  
closureN_type c_739197;
object e_739205 [1];
c_739197.hdr.mark = gc_color_red;
 c_739197.hdr.grayed = 0;
c_739197.tag = closureN_tag;
 c_739197.fn = (function_type)__lambda_308;
c_739197.num_args = 1;
c_739197.num_elements = 1;
c_739197.elements = (object *)e_739205;
c_739197.elements[0] = ((closureN)self_735484)->elements[0];

return_direct_with_clo2(data,  __glo_cgen_117mangle_91global_scheme_cyclone_cgen, (((closure)  __glo_cgen_117mangle_91global_scheme_cyclone_cgen)->fn),  &c_739197, ((closureN)self_735484)->elements[1]);
} else { 
  return_direct_with_clo4(data,  __glo_prim_91_125c_91func_scheme_cyclone_primitives, (((closure)  __glo_prim_91_125c_91func_scheme_cyclone_primitives)->fn),  ((closureN)self_735484)->elements[0], ((closureN)self_735484)->elements[1], ((closureN)self_735484)->elements[2], __glo__85cgen_117use_91unsafe_91prims_85_scheme_cyclone_cgen);}
;; 
}

static void __lambda_308(void *data, object self_735485, int argc, object *args) /* object self_735485, object r_732609 */
 {
 object r_732609 = args[0];
  
make_utf8_string_with_len(c_739203, "((inline_function_type)\n                   ((closure)", 53, 53);

make_utf8_string_with_len(c_739204, ")->fn)", 6, 6);

object c_739202 = Cyc_string_append(data,  ((closureN)self_735485)->elements[0],3,&c_739203, r_732609, &c_739204);
return_direct_with_clo1(data,  ((closureN)self_735485)->elements[0], (((closure)  ((closureN)self_735485)->elements[0])->fn),  c_739202);; 
}

static void __lambda_298(void *data, object _, int argc, object *args) /* closure _,object k_732525, object ast_91id_73369_731568, object trace_73370_731569 */
 {
object k_732525 = args[0]; object ast_91id_73369_731568 = args[1]; object trace_73370_731569 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:alloca?");

closureN_type c_739150;
object e_739188 [3];
c_739150.hdr.mark = gc_color_red;
 c_739150.hdr.grayed = 0;
c_739150.tag = closureN_tag;
 c_739150.fn = (function_type)__lambda_299;
c_739150.num_args = 1;
c_739150.num_elements = 3;
c_739150.elements = (object *)e_739188;
c_739150.elements[0] = ast_91id_73369_731568;
c_739150.elements[1] = k_732525;
c_739150.elements[2] = trace_73370_731569;

return_direct_with_clo1(data,(closure)&c_739150,__lambda_299,  __glo__85use_91alloca_85_scheme_cyclone_cgen);; 
}

static void __lambda_299(void *data, object self_735423, int argc, object *args) /* object self_735423, object tmp_73372_73374_731570 */
 {
 object tmp_73372_73374_731570 = args[0];
  if( (boolean_f != tmp_73372_73374_731570) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735423)->elements[1], (((closure)  ((closureN)self_735423)->elements[1])->fn),  tmp_73372_73374_731570);
} else { 
  
closureN_type c_739154;
object e_739186 [2];
c_739154.hdr.mark = gc_color_red;
 c_739154.hdr.grayed = 0;
c_739154.tag = closureN_tag;
 c_739154.fn = (function_type)__lambda_300;
c_739154.num_args = 1;
c_739154.num_elements = 2;
c_739154.elements = (object *)e_739186;
c_739154.elements[0] = ((closureN)self_735423)->elements[1];
c_739154.elements[1] = ((closureN)self_735423)->elements[2];

return_direct_with_clo3(data,  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_95default_scheme_cyclone_cps_91optimizations)->fn),  &c_739154, ((closureN)self_735423)->elements[0], boolean_f);}
;; 
}

static void __lambda_300(void *data, object self_735424, int argc, object *args) /* object self_735424, object adbf_117fnc_73375_731571 */
 {
 object adbf_117fnc_73375_731571 = args[0];
  
closureN_type c_739156;
object e_739161 [1];
c_739156.hdr.mark = gc_color_red;
 c_739156.hdr.grayed = 0;
c_739156.tag = closureN_tag;
 c_739156.fn = (function_type)__lambda_301;
c_739156.num_args = 0;
c_739156.num_elements = 1;
c_739156.elements = (object *)e_739161;
c_739156.elements[0] = adbf_117fnc_73375_731571;


closureN_type c_739162;
object e_739185 [2];
c_739162.hdr.mark = gc_color_red;
 c_739162.hdr.grayed = 0;
c_739162.tag = closureN_tag;
 c_739162.fn = (function_type)__lambda_302;
c_739162.num_args = 1;
c_739162.num_elements = 2;
c_739162.elements = (object *)e_739185;
c_739162.elements[0] = ((closureN)self_735424)->elements[0];
c_739162.elements[1] = ((closureN)self_735424)->elements[1];

return_direct_with_clo1(data,(closure)&c_739156,__lambda_301,  &c_739162);; 
}

static void __lambda_302(void *data, object self_735425, int argc, object *args) /* object self_735425, object tmp_73377_73379_731572 */
 {
 object tmp_73377_73379_731572 = args[0];
  if( (boolean_f != tmp_73377_73379_731572) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735425)->elements[0], (((closure)  ((closureN)self_735425)->elements[0])->fn),  tmp_73377_73379_731572);
} else { 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_735425)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_735425)->elements[1]))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735425)->elements[0], (((closure)  ((closureN)self_735425)->elements[0])->fn),  boolean_f);
} else { 
  
closureN_type c_739176;
object e_739179 [1];
c_739176.hdr.mark = gc_color_red;
 c_739176.hdr.grayed = 0;
c_739176.tag = closureN_tag;
 c_739176.fn = (function_type)__lambda_303;
c_739176.num_args = 1;
c_739176.num_elements = 1;
c_739176.elements = (object *)e_739179;
c_739176.elements[0] = ((closureN)self_735425)->elements[0];



return_direct_with_clo2(data,  __glo_adb_117get_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adb_117get_scheme_cyclone_cps_91optimizations)->fn),  &c_739176, Cyc_cdr(data, ((closureN)self_735425)->elements[1]));}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735425)->elements[0], (((closure)  ((closureN)self_735425)->elements[0])->fn),  boolean_f);}
;}
;; 
}

static void __lambda_303(void *data, object self_735426, int argc, object *args) /* object self_735426, object r_732530 */
 {
 object r_732530 = args[0];
  return_direct_with_clo2(data,  __glo_adbv_117direct_91rec_91call_127_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbv_117direct_91rec_91call_127_scheme_cyclone_cps_91optimizations)->fn),  ((closureN)self_735426)->elements[0], r_732530);; 
}

static void __lambda_301(void *data, object self_735427, int argc, object *args) /* object self_735427, object k_732533 */
 {
 object k_732533 = args[0];
  if( (boolean_f != ((closureN)self_735427)->elements[0]) ){ 
  return_direct_with_clo2(data,  __glo_adbf_117calls_91self_127_scheme_cyclone_cps_91optimizations, (((closure)  __glo_adbf_117calls_91self_127_scheme_cyclone_cps_91optimizations)->fn),  k_732533, ((closureN)self_735427)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_732533, (((closure)  k_732533)->fn),  boolean_f);}
;; 
}

static void __lambda_297(void *data, object _, int argc, object *args) /* closure _,object k_732522, object v_73368_731567 */
 {
object k_732522 = args[0]; object v_73368_731567 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:set-use-alloca!");

object c_739147 = global_set_cps_id(data,  k_732522,"__glo__85use_91alloca_85_scheme_cyclone_cgen", __glo__85use_91alloca_85_scheme_cyclone_cgen, v_73368_731567);
return_direct_with_clo1(data,  k_732522, (((closure)  k_732522)->fn),  c_739147);; 
}

static void __lambda_295(void *data, object _, int argc, object *args) /* closure _,object k_732513, object str_73364_731564, object end_73365_731565 */
 {
object k_732513 = args[0]; object str_73364_731564 = args[1]; object end_73365_731565 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:str-ending?");
  
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, str_73364_731564), obj_int2obj(0))) ){ 
  
closureN_type c_739125;
object e_739131 [2];
c_739125.hdr.mark = gc_color_red;
 c_739125.hdr.grayed = 0;
c_739125.tag = closureN_tag;
 c_739125.fn = (function_type)__lambda_296;
c_739125.num_args = 1;
c_739125.num_elements = 2;
c_739125.elements = (object *)e_739131;
c_739125.elements[0] = end_73365_731565;
c_739125.elements[1] = k_732513;


complex_num_type local_739137; 





object c_739134 = Cyc_substring(data,(closure)&c_739125,str_73364_731564, Cyc_fast_sub(data,&local_739137, Cyc_string_length(data, str_73364_731564), obj_int2obj(1)), Cyc_string_length(data, str_73364_731564));
return_closcall1(data,(closure)&c_739125,  c_739134);
} else { 
  return_direct_with_clo1(data,  k_732513, (((closure)  k_732513)->fn),  boolean_f);}
;; 
}

static void __lambda_296(void *data, object self_735422, int argc, object *args) /* object self_735422, object r_732516 */
 {
 object r_732516 = args[0];
  

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

static void __lambda_1341(void *data, object _, int argc, object *args) {object k = args[0];object s = args[1]; return_closcall1(data, k, Cyc_string_byte_length(data, s));  }
static void __lambda_293(void *data, object _, int argc, object *args) /* closure _,object k_732509, object str_73363_731563 */
 {
object k_732509 = args[0]; object str_73363_731563 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:->cstr");

closureN_type c_739109;
object e_739117 [1];
c_739109.hdr.mark = gc_color_red;
 c_739109.hdr.grayed = 0;
c_739109.tag = closureN_tag;
 c_739109.fn = (function_type)__lambda_294;
c_739109.num_args = 1;
c_739109.num_elements = 1;
c_739109.elements = (object *)e_739117;
c_739109.elements[0] = k_732509;

return_direct_with_clo2(data,  __glo_cstr_117escape_91chars_scheme_cyclone_cgen, (((closure)  __glo_cstr_117escape_91chars_scheme_cyclone_cgen)->fn),  &c_739109, str_73363_731563);; 
}

static void __lambda_294(void *data, object self_735421, int argc, object *args) /* object self_735421, object r_732510 */
 {
 object r_732510 = args[0];
  
make_utf8_string_with_len(c_739115, "\"", 1, 1);

make_utf8_string_with_len(c_739116, "\"", 1, 1);

object c_739114 = Cyc_string_append(data,  ((closureN)self_735421)->elements[0],3,&c_739115, r_732510, &c_739116);
return_direct_with_clo1(data,  ((closureN)self_735421)->elements[0], (((closure)  ((closureN)self_735421)->elements[0])->fn),  c_739114);; 
}

static void __lambda_244(void *data, object _, int argc, object *args) /* closure _,object k_732438, object exp_73275_731547, object use_91alloca_73276_731548, object immutable_73277_731549 */
 {
object k_732438 = args[0]; object exp_73275_731547 = args[1]; object use_91alloca_73276_731548 = args[2]; object immutable_73277_731549 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-const");
  
if( (boolean_f != Cyc_is_null(exp_73275_731547)) ){ 
  
make_utf8_string_with_len(c_738715, "NULL", 4, 4);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  k_732438, &c_738715);
} else { 
  
closureN_type c_738717;
object e_739101 [4];
c_738717.hdr.mark = gc_color_red;
 c_738717.hdr.grayed = 0;
c_738717.tag = closureN_tag;
 c_738717.fn = (function_type)__lambda_245;
c_738717.num_args = 1;
c_738717.num_elements = 4;
c_738717.elements = (object *)e_739101;
c_738717.elements[0] = exp_73275_731547;
c_738717.elements[1] = immutable_73277_731549;
c_738717.elements[2] = k_732438;
c_738717.elements[3] = use_91alloca_73276_731548;




complex_num_type local_739106; 
return_direct_with_clo1(data,(closure)&c_738717,__lambda_245,  Cyc_eq(((inline_function_type)
                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_739106), exp_73275_731547));}
;; 
}

static void __lambda_245(void *data, object self_735373, int argc, object *args) /* object self_735373, object r_732440 */
 {
 object r_732440 = args[0];
  if( (boolean_f != r_732440) ){ 
  
make_utf8_string_with_len(c_738720, "Cyc_VOID", 8, 8);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735373)->elements[2], &c_738720);
} else { 
  
closureN_type c_738722;
object e_739094 [4];
c_738722.hdr.mark = gc_color_red;
 c_738722.hdr.grayed = 0;
c_738722.tag = closureN_tag;
 c_738722.fn = (function_type)__lambda_246;
c_738722.num_args = 1;
c_738722.num_elements = 4;
c_738722.elements = (object *)e_739094;
c_738722.elements[0] = ((closureN)self_735373)->elements[0];
c_738722.elements[1] = ((closureN)self_735373)->elements[1];
c_738722.elements[2] = ((closureN)self_735373)->elements[2];
c_738722.elements[3] = ((closureN)self_735373)->elements[3];




complex_num_type local_739099; 
return_direct_with_clo1(data,(closure)&c_738722,__lambda_246,  Cyc_eq(((inline_function_type)
                   ((closure)__glo_make_91record_91marker_191_191inline_191_191_scheme_base)->fn)(data,&local_739099), ((closureN)self_735373)->elements[0]));}
;; 
}

static void __lambda_246(void *data, object self_735374, int argc, object *args) /* object self_735374, object r_732441 */
 {
 object r_732441 = args[0];
  if( (boolean_f != r_732441) ){ 
  
make_utf8_string_with_len(c_738725, "Cyc_RECORD_MARKER", 17, 17);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735374)->elements[2], &c_738725);
} else { 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_735374)->elements[0])) ){ 
  return_direct_with_clo4(data,  __glo_c_91compile_91scalars_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91scalars_scheme_cyclone_cgen)->fn),  ((closureN)self_735374)->elements[2], ((closureN)self_735374)->elements[0], ((closureN)self_735374)->elements[3], ((closureN)self_735374)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_735374)->elements[0])) ){ 
  return_direct_with_clo4(data,  __glo_c_91compile_91vector_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91vector_scheme_cyclone_cgen)->fn),  ((closureN)self_735374)->elements[2], ((closureN)self_735374)->elements[0], ((closureN)self_735374)->elements[3], ((closureN)self_735374)->elements[1]);
} else { 
  
closureN_type c_738743;
object e_739090 [4];
c_738743.hdr.mark = gc_color_red;
 c_738743.hdr.grayed = 0;
c_738743.tag = closureN_tag;
 c_738743.fn = (function_type)__lambda_247;
c_738743.num_args = 1;
c_738743.num_elements = 4;
c_738743.elements = (object *)e_739090;
c_738743.elements[0] = ((closureN)self_735374)->elements[0];
c_738743.elements[1] = ((closureN)self_735374)->elements[1];
c_738743.elements[2] = ((closureN)self_735374)->elements[2];
c_738743.elements[3] = ((closureN)self_735374)->elements[3];



return_direct_with_clo1(data,(closure)&c_738743,__lambda_247,  Cyc_is_bytevector(((closureN)self_735374)->elements[0]));}
;}
;}
;; 
}

static void __lambda_247(void *data, object self_735375, int argc, object *args) /* object self_735375, object r_732444 */
 {
 object r_732444 = args[0];
  if( (boolean_f != r_732444) ){ 
  return_direct_with_clo4(data,  __glo_c_91compile_91bytevector_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91bytevector_scheme_cyclone_cgen)->fn),  ((closureN)self_735375)->elements[2], ((closureN)self_735375)->elements[0], ((closureN)self_735375)->elements[3], ((closureN)self_735375)->elements[1]);
} else { 
  
closureN_type c_738750;
object e_739088 [4];
c_738750.hdr.mark = gc_color_red;
 c_738750.hdr.grayed = 0;
c_738750.tag = closureN_tag;
 c_738750.fn = (function_type)__lambda_248;
c_738750.num_args = 1;
c_738750.num_elements = 4;
c_738750.elements = (object *)e_739088;
c_738750.elements[0] = ((closureN)self_735375)->elements[0];
c_738750.elements[1] = ((closureN)self_735375)->elements[1];
c_738750.elements[2] = ((closureN)self_735375)->elements[2];
c_738750.elements[3] = ((closureN)self_735375)->elements[3];

return_direct_with_clo2(data,  __glo_bignum_127_scheme_base, (((closure)  __glo_bignum_127_scheme_base)->fn),  &c_738750, ((closureN)self_735375)->elements[0]);}
;; 
}

static void __lambda_248(void *data, object self_735376, int argc, object *args) /* object self_735376, object r_732445 */
 {
 object r_732445 = args[0];
  if( (boolean_f != r_732445) ){ 
  
closureN_type c_738752;
object e_738797 [2];
c_738752.hdr.mark = gc_color_red;
 c_738752.hdr.grayed = 0;
c_738752.tag = closureN_tag;
 c_738752.fn = (function_type)__lambda_249;
c_738752.num_args = 1;
c_738752.num_elements = 2;
c_738752.elements = (object *)e_738797;
c_738752.elements[0] = ((closureN)self_735376)->elements[0];
c_738752.elements[1] = ((closureN)self_735376)->elements[2];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738752, quote_c);
} else { 
  
closureN_type c_738799;
object e_739083 [4];
c_738799.hdr.mark = gc_color_red;
 c_738799.hdr.grayed = 0;
c_738799.tag = closureN_tag;
 c_738799.fn = (function_type)__lambda_255;
c_738799.num_args = 1;
c_738799.num_elements = 4;
c_738799.elements = (object *)e_739083;
c_738799.elements[0] = ((closureN)self_735376)->elements[0];
c_738799.elements[1] = ((closureN)self_735376)->elements[1];
c_738799.elements[2] = ((closureN)self_735376)->elements[2];
c_738799.elements[3] = ((closureN)self_735376)->elements[3];


complex_num_type local_739086; 
return_direct_with_clo1(data,(closure)&c_738799,__lambda_255,  ((inline_function_type)
                   ((closure)__glo_complex_127_191_191inline_191_191_scheme_base)->fn)(data,&local_739086, ((closureN)self_735376)->elements[0]));}
;; 
}

static void __lambda_255(void *data, object self_735383, int argc, object *args) /* object self_735383, object r_732453 */
 {
 object r_732453 = args[0];
  if( (boolean_f != r_732453) ){ 
  
closureN_type c_738801;
object e_738893 [3];
c_738801.hdr.mark = gc_color_red;
 c_738801.hdr.grayed = 0;
c_738801.tag = closureN_tag;
 c_738801.fn = (function_type)__lambda_256;
c_738801.num_args = 1;
c_738801.num_elements = 3;
c_738801.elements = (object *)e_738893;
c_738801.elements[0] = ((closureN)self_735383)->elements[0];
c_738801.elements[1] = ((closureN)self_735383)->elements[2];
c_738801.elements[2] = ((closureN)self_735383)->elements[3];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738801, quote_c);
} else { 
  object r_732472;
    
if( (boolean_f != Cyc_is_integer(((closureN)self_735383)->elements[0])) ){ 
  object local_738901 = alloca(sizeof(complex_num_type)); 
  r_732472 = ((inline_function_type)
                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_738901, ((closureN)self_735383)->elements[0]);
} else { 
  r_732472 = boolean_f;}
;if( (boolean_f != r_732472) ){ 
  
closureN_type c_738905;
object e_738916 [1];
c_738905.hdr.mark = gc_color_red;
 c_738905.hdr.grayed = 0;
c_738905.tag = closureN_tag;
 c_738905.fn = (function_type)__lambda_270;
c_738905.num_args = 1;
c_738905.num_elements = 1;
c_738905.elements = (object *)e_738916;
c_738905.elements[0] = ((closureN)self_735383)->elements[2];


object c_738919 = Cyc_number2string2(data,(closure)&c_738905,1,((closureN)self_735383)->elements[0]);
return_closcall1(data,(closure)&c_738905,  c_738919);
} else { 
    
if( (boolean_f != Cyc_is_real(((closureN)self_735383)->elements[0])) ){ 
  
closureN_type c_738925;
object e_739007 [3];
c_738925.hdr.mark = gc_color_red;
 c_738925.hdr.grayed = 0;
c_738925.tag = closureN_tag;
 c_738925.fn = (function_type)__lambda_272;
c_738925.num_args = 1;
c_738925.num_elements = 3;
c_738925.elements = (object *)e_739007;
c_738925.elements[0] = ((closureN)self_735383)->elements[0];
c_738925.elements[1] = ((closureN)self_735383)->elements[2];
c_738925.elements[2] = ((closureN)self_735383)->elements[3];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738925, quote_c);
} else { 
    
if( (boolean_f != Cyc_is_boolean(((closureN)self_735383)->elements[0])) ){ 
  
closureN_type c_739012;
object e_739018 [1];
c_739012.hdr.mark = gc_color_red;
 c_739012.hdr.grayed = 0;
c_739012.tag = closureN_tag;
 c_739012.fn = (function_type)__lambda_285;
c_739012.num_args = 0;
c_739012.num_elements = 1;
c_739012.elements = (object *)e_739018;
c_739012.elements[0] = ((closureN)self_735383)->elements[0];


closureN_type c_739019;
object e_739028 [1];
c_739019.hdr.mark = gc_color_red;
 c_739019.hdr.grayed = 0;
c_739019.tag = closureN_tag;
 c_739019.fn = (function_type)__lambda_286;
c_739019.num_args = 1;
c_739019.num_elements = 1;
c_739019.elements = (object *)e_739028;
c_739019.elements[0] = ((closureN)self_735383)->elements[2];

return_direct_with_clo1(data,(closure)&c_739012,__lambda_285,  &c_739019);
} else { 
    
if( (boolean_f != Cyc_is_char(((closureN)self_735383)->elements[0])) ){ 
  
closureN_type c_739033;
object e_739044 [1];
c_739033.hdr.mark = gc_color_red;
 c_739033.hdr.grayed = 0;
c_739033.tag = closureN_tag;
 c_739033.fn = (function_type)__lambda_288;
c_739033.num_args = 1;
c_739033.num_elements = 1;
c_739033.elements = (object *)e_739044;
c_739033.elements[0] = ((closureN)self_735383)->elements[2];




object c_739047 = Cyc_number2string2(data,(closure)&c_739033,1,Cyc_char2integer(((closureN)self_735383)->elements[0]));
return_closcall1(data,(closure)&c_739033,  c_739047);
} else { 
    
if( (boolean_f != Cyc_is_string(((closureN)self_735383)->elements[0])) ){ 
  return_direct_with_clo4(data,  __glo_c_91compile_91string_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91string_scheme_cyclone_cgen)->fn),  ((closureN)self_735383)->elements[2], ((closureN)self_735383)->elements[0], ((closureN)self_735383)->elements[3], ((closureN)self_735383)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_is_symbol(((closureN)self_735383)->elements[0])) ){ 
  
closureN_type c_739063;
object e_739077 [2];
c_739063.hdr.mark = gc_color_red;
 c_739063.hdr.grayed = 0;
c_739063.tag = closureN_tag;
 c_739063.fn = (function_type)__lambda_290;
c_739063.num_args = 1;
c_739063.num_elements = 2;
c_739063.elements = (object *)e_739077;
c_739063.elements[0] = ((closureN)self_735383)->elements[0];
c_739063.elements[1] = ((closureN)self_735383)->elements[2];

return_direct_with_clo2(data,  __glo_allocate_91symbol_scheme_cyclone_cgen, (((closure)  __glo_allocate_91symbol_scheme_cyclone_cgen)->fn),  &c_739063, ((closureN)self_735383)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_739081, "unknown constant: ", 18, 18);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735383)->elements[2], &c_739081, ((closureN)self_735383)->elements[0]);}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_290(void *data, object self_735418, int argc, object *args) /* object self_735418, object r_732500 */
 {

  
closureN_type c_739065;
object e_739075 [1];
c_739065.hdr.mark = gc_color_red;
 c_739065.hdr.grayed = 0;
c_739065.tag = closureN_tag;
 c_739065.fn = (function_type)__lambda_291;
c_739065.num_args = 1;
c_739065.num_elements = 1;
c_739065.elements = (object *)e_739075;
c_739065.elements[0] = ((closureN)self_735418)->elements[1];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_739065, ((closureN)self_735418)->elements[0]);; 
}

static void __lambda_291(void *data, object self_735419, int argc, object *args) /* object self_735419, object r_732502 */
 {
 object r_732502 = args[0];
  
closureN_type c_739067;
object e_739070 [1];
c_739067.hdr.mark = gc_color_red;
 c_739067.hdr.grayed = 0;
c_739067.tag = closureN_tag;
 c_739067.fn = (function_type)__lambda_292;
c_739067.num_args = 1;
c_739067.num_elements = 1;
c_739067.elements = (object *)e_739070;
c_739067.elements[0] = ((closureN)self_735419)->elements[0];


make_utf8_string_with_len(c_739074, "quote_", 6, 6);

object c_739073 = Cyc_string_append(data,(closure)&c_739067,2,&c_739074, r_732502);
return_closcall1(data,(closure)&c_739067,  c_739073);; 
}

static void __lambda_292(void *data, object self_735420, int argc, object *args) /* object self_735420, object r_732501 */
 {
 object r_732501 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735420)->elements[0], r_732501);; 
}

static void __lambda_288(void *data, object self_735416, int argc, object *args) /* object self_735416, object r_732496 */
 {
 object r_732496 = args[0];
  
closureN_type c_739035;
object e_739038 [1];
c_739035.hdr.mark = gc_color_red;
 c_739035.hdr.grayed = 0;
c_739035.tag = closureN_tag;
 c_739035.fn = (function_type)__lambda_289;
c_739035.num_args = 1;
c_739035.num_elements = 1;
c_739035.elements = (object *)e_739038;
c_739035.elements[0] = ((closureN)self_735416)->elements[0];


make_utf8_string_with_len(c_739042, "obj_char2obj(", 13, 13);

make_utf8_string_with_len(c_739043, ")", 1, 1);

object c_739041 = Cyc_string_append(data,(closure)&c_739035,3,&c_739042, r_732496, &c_739043);
return_closcall1(data,(closure)&c_739035,  c_739041);; 
}

static void __lambda_289(void *data, object self_735417, int argc, object *args) /* object self_735417, object r_732495 */
 {
 object r_732495 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735417)->elements[0], r_732495);; 
}

static void __lambda_286(void *data, object self_735413, int argc, object *args) /* object self_735413, object r_732492 */
 {
 object r_732492 = args[0];
  
closureN_type c_739021;
object e_739024 [1];
c_739021.hdr.mark = gc_color_red;
 c_739021.hdr.grayed = 0;
c_739021.tag = closureN_tag;
 c_739021.fn = (function_type)__lambda_287;
c_739021.num_args = 1;
c_739021.num_elements = 1;
c_739021.elements = (object *)e_739024;
c_739021.elements[0] = ((closureN)self_735413)->elements[0];


object c_739027 = Cyc_string_append(data,(closure)&c_739021,1,r_732492);
return_closcall1(data,(closure)&c_739021,  c_739027);; 
}

static void __lambda_287(void *data, object self_735414, int argc, object *args) /* object self_735414, object r_732491 */
 {
 object r_732491 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735414)->elements[0], r_732491);; 
}

static void __lambda_285(void *data, object self_735415, int argc, object *args) /* object self_735415, object k_732493 */
 {
 object k_732493 = args[0];
  if( (boolean_f != ((closureN)self_735415)->elements[0]) ){ 
  
make_utf8_string_with_len(c_739015, "boolean_t", 9, 9);
return_direct_with_clo1(data,  k_732493,__lambda_286,  &c_739015);
} else { 
  
make_utf8_string_with_len(c_739017, "boolean_f", 9, 9);
return_direct_with_clo1(data,  k_732493,__lambda_286,  &c_739017);}
;; 
}

static void __lambda_272(void *data, object self_735400, int argc, object *args) /* object self_735400, object r_732488 */
 {
 object r_732488 = args[0];
  
closureN_type c_738927;
object e_739006 [3];
c_738927.hdr.mark = gc_color_red;
 c_738927.hdr.grayed = 0;
c_738927.tag = closureN_tag;
 c_738927.fn = (function_type)__lambda_273;
c_738927.num_args = 1;
c_738927.num_elements = 3;
c_738927.elements = (object *)e_739006;
c_738927.elements[0] = ((closureN)self_735400)->elements[0];
c_738927.elements[1] = ((closureN)self_735400)->elements[1];
c_738927.elements[2] = ((closureN)self_735400)->elements[2];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_738927, r_732488);; 
}

static void __lambda_273(void *data, object self_735401, int argc, object *args) /* object self_735401, object r_732476 */
 {
 object r_732476 = args[0];
  
closureN_type c_738929;
object e_738950 [1];
c_738929.hdr.mark = gc_color_red;
 c_738929.hdr.grayed = 0;
c_738929.tag = closureN_tag;
 c_738929.fn = (function_type)__lambda_274;
c_738929.num_args = 0;
c_738929.num_elements = 1;
c_738929.elements = (object *)e_738950;
c_738929.elements[0] = ((closureN)self_735401)->elements[0];


closureN_type c_738951;
object e_739005 [3];
c_738951.hdr.mark = gc_color_red;
 c_738951.hdr.grayed = 0;
c_738951.tag = closureN_tag;
 c_738951.fn = (function_type)__lambda_277;
c_738951.num_args = 1;
c_738951.num_elements = 3;
c_738951.elements = (object *)e_739005;
c_738951.elements[0] = ((closureN)self_735401)->elements[1];
c_738951.elements[1] = r_732476;
c_738951.elements[2] = ((closureN)self_735401)->elements[2];

return_direct_with_clo1(data,(closure)&c_738929,__lambda_274,  &c_738951);; 
}

static void __lambda_277(void *data, object self_735402, int argc, object *args) /* object self_735402, object r_732477 */
 {
 object r_732477 = args[0];
  
closureN_type c_738953;
object e_738959 [1];
c_738953.hdr.mark = gc_color_red;
 c_738953.hdr.grayed = 0;
c_738953.tag = closureN_tag;
 c_738953.fn = (function_type)__lambda_278;
c_738953.num_args = 0;
c_738953.num_elements = 1;
c_738953.elements = (object *)e_738959;
c_738953.elements[0] = ((closureN)self_735402)->elements[2];


closureN_type c_738960;
object e_739004 [4];
c_738960.hdr.mark = gc_color_red;
 c_738960.hdr.grayed = 0;
c_738960.tag = closureN_tag;
 c_738960.fn = (function_type)__lambda_279;
c_738960.num_args = 1;
c_738960.num_elements = 4;
c_738960.elements = (object *)e_739004;
c_738960.elements[0] = ((closureN)self_735402)->elements[0];
c_738960.elements[1] = ((closureN)self_735402)->elements[1];
c_738960.elements[2] = r_732477;
c_738960.elements[3] = ((closureN)self_735402)->elements[2];

return_direct_with_clo1(data,(closure)&c_738953,__lambda_278,  &c_738960);; 
}

static void __lambda_279(void *data, object self_735403, int argc, object *args) /* object self_735403, object r_732478 */
 {
 object r_732478 = args[0];
  
closureN_type c_738962;
object e_738968 [1];
c_738962.hdr.mark = gc_color_red;
 c_738962.hdr.grayed = 0;
c_738962.tag = closureN_tag;
 c_738962.fn = (function_type)__lambda_280;
c_738962.num_args = 0;
c_738962.num_elements = 1;
c_738962.elements = (object *)e_738968;
c_738962.elements[0] = ((closureN)self_735403)->elements[3];


closureN_type c_738969;
object e_739003 [4];
c_738969.hdr.mark = gc_color_red;
 c_738969.hdr.grayed = 0;
c_738969.tag = closureN_tag;
 c_738969.fn = (function_type)__lambda_281;
c_738969.num_args = 1;
c_738969.num_elements = 4;
c_738969.elements = (object *)e_739003;
c_738969.elements[0] = ((closureN)self_735403)->elements[0];
c_738969.elements[1] = ((closureN)self_735403)->elements[1];
c_738969.elements[2] = ((closureN)self_735403)->elements[2];
c_738969.elements[3] = r_732478;

return_direct_with_clo1(data,(closure)&c_738962,__lambda_280,  &c_738969);; 
}

static void __lambda_281(void *data, object self_735404, int argc, object *args) /* object self_735404, object r_732479 */
 {
 object r_732479 = args[0];
  
closureN_type c_738971;
object e_738999 [1];
c_738971.hdr.mark = gc_color_red;
 c_738971.hdr.grayed = 0;
c_738971.tag = closureN_tag;
 c_738971.fn = (function_type)__lambda_282;
c_738971.num_args = 4;
c_738971.num_elements = 1;
c_738971.elements = (object *)e_738999;
c_738971.elements[0] = ((closureN)self_735404)->elements[0];

return_direct_with_clo4(data,(closure)&c_738971,__lambda_282,  ((closureN)self_735404)->elements[1], ((closureN)self_735404)->elements[2], ((closureN)self_735404)->elements[3], r_732479);; 
}

static void __lambda_282(void *data, object self_735405, int argc, object *args) /* object self_735405, object cvar_91name_73339_731559, object num2str_73340_731560, object addr_91op_73341_731561, object c_91make_91macro_73342_731562 */
 {
 object cvar_91name_73339_731559 = args[0]; object num2str_73340_731560 = args[1]; object addr_91op_73341_731561 = args[2]; object c_91make_91macro_73342_731562 = args[3];
  
closureN_type c_738973;
object e_738995 [4];
c_738973.hdr.mark = gc_color_red;
 c_738973.hdr.grayed = 0;
c_738973.tag = closureN_tag;
 c_738973.fn = (function_type)__lambda_283;
c_738973.num_args = 1;
c_738973.num_elements = 4;
c_738973.elements = (object *)e_738995;
c_738973.elements[0] = c_91make_91macro_73342_731562;
c_738973.elements[1] = cvar_91name_73339_731559;
c_738973.elements[2] = ((closureN)self_735405)->elements[0];
c_738973.elements[3] = num2str_73340_731560;


object c_738998 = Cyc_string_append(data,(closure)&c_738973,2,addr_91op_73341_731561, cvar_91name_73339_731559);
return_closcall1(data,(closure)&c_738973,  c_738998);; 
}

static void __lambda_283(void *data, object self_735406, int argc, object *args) /* object self_735406, object r_732480 */
 {
 object r_732480 = args[0];
  
closureN_type c_738975;
object e_738985 [2];
c_738975.hdr.mark = gc_color_red;
 c_738975.hdr.grayed = 0;
c_738975.tag = closureN_tag;
 c_738975.fn = (function_type)__lambda_284;
c_738975.num_args = 1;
c_738975.num_elements = 2;
c_738975.elements = (object *)e_738985;
c_738975.elements[0] = ((closureN)self_735406)->elements[2];
c_738975.elements[1] = r_732480;


make_utf8_string_with_len(c_738990, "(", 1, 1);

make_utf8_string_with_len(c_738992, ", ", 2, 2);

make_utf8_string_with_len(c_738994, ");", 2, 2);

object c_738988 = Cyc_string_append(data,(closure)&c_738975,6,((closureN)self_735406)->elements[0], &c_738990, ((closureN)self_735406)->elements[1], &c_738992, ((closureN)self_735406)->elements[3], &c_738994);
return_closcall1(data,(closure)&c_738975,  c_738988);; 
}

static void __lambda_284(void *data, object self_735407, int argc, object *args) /* object self_735407, object r_732482 */
 {
 object r_732482 = args[0];
  
list_2_type local_738980; 

pair_type local_738984; 
return_direct_with_clo1(data,  ((closureN)self_735407)->elements[0], (((closure)  ((closureN)self_735407)->elements[0])->fn),  Cyc_fast_list_2(&local_738980, ((closureN)self_735407)->elements[1], set_cell_as_expr(&local_738984, r_732482)));; 
}

static void __lambda_280(void *data, object self_735408, int argc, object *args) /* object self_735408, object k_732483 */
 {
 object k_732483 = args[0];
  if( (boolean_f != ((closureN)self_735408)->elements[0]) ){ 
  
make_utf8_string_with_len(c_738965, "alloca_double", 13, 13);
return_direct_with_clo1(data,  k_732483,__lambda_281,  &c_738965);
} else { 
  
make_utf8_string_with_len(c_738967, "make_double", 11, 11);
return_direct_with_clo1(data,  k_732483,__lambda_281,  &c_738967);}
;; 
}

static void __lambda_278(void *data, object self_735409, int argc, object *args) /* object self_735409, object k_732484 */
 {
 object k_732484 = args[0];
  if( (boolean_f != ((closureN)self_735409)->elements[0]) ){ 
  
make_utf8_string_with_len(c_738956, "", 0, 0);
return_direct_with_clo1(data,  k_732484,__lambda_279,  &c_738956);
} else { 
  
make_utf8_string_with_len(c_738958, "&", 1, 1);
return_direct_with_clo1(data,  k_732484,__lambda_279,  &c_738958);}
;; 
}

static void __lambda_274(void *data, object self_735410, int argc, object *args) /* object self_735410, object k_732485 */
 {
 object k_732485 = args[0];
  
closureN_type c_738931;
object e_738948 [2];
c_738931.hdr.mark = gc_color_red;
 c_738931.hdr.grayed = 0;
c_738931.tag = closureN_tag;
 c_738931.fn = (function_type)__lambda_275;
c_738931.num_args = 1;
c_738931.num_elements = 2;
c_738931.elements = (object *)e_738948;
c_738931.elements[0] = ((closureN)self_735410)->elements[0];
c_738931.elements[1] = k_732485;

return_direct_with_clo2(data,  __glo_nan_127_scheme_inexact, (((closure)  __glo_nan_127_scheme_inexact)->fn),  &c_738931, ((closureN)self_735410)->elements[0]);; 
}

static void __lambda_275(void *data, object self_735411, int argc, object *args) /* object self_735411, object r_732486 */
 {
 object r_732486 = args[0];
  if( (boolean_f != r_732486) ){ 
  
make_utf8_string_with_len(c_738934, "(0./0.)", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_735411)->elements[1], (((closure)  ((closureN)self_735411)->elements[1])->fn),  &c_738934);
} else { 
  
closureN_type c_738936;
object e_738946 [2];
c_738936.hdr.mark = gc_color_red;
 c_738936.hdr.grayed = 0;
c_738936.tag = closureN_tag;
 c_738936.fn = (function_type)__lambda_276;
c_738936.num_args = 1;
c_738936.num_elements = 2;
c_738936.elements = (object *)e_738946;
c_738936.elements[0] = ((closureN)self_735411)->elements[0];
c_738936.elements[1] = ((closureN)self_735411)->elements[1];

return_direct_with_clo2(data,  __glo_infinite_127_scheme_inexact, (((closure)  __glo_infinite_127_scheme_inexact)->fn),  &c_738936, ((closureN)self_735411)->elements[0]);}
;; 
}

static void __lambda_276(void *data, object self_735412, int argc, object *args) /* object self_735412, object r_732487 */
 {
 object r_732487 = args[0];
  if( (boolean_f != r_732487) ){ 
  
make_utf8_string_with_len(c_738939, "(1./0.)", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_735412)->elements[1], (((closure)  ((closureN)self_735412)->elements[1])->fn),  &c_738939);
} else { 
  
object c_738944 = Cyc_number2string2(data,  ((closureN)self_735412)->elements[1],1,((closureN)self_735412)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_735412)->elements[1], (((closure)  ((closureN)self_735412)->elements[1])->fn),  c_738944);}
;; 
}

static void __lambda_270(void *data, object self_735398, int argc, object *args) /* object self_735398, object r_732474 */
 {
 object r_732474 = args[0];
  
closureN_type c_738907;
object e_738910 [1];
c_738907.hdr.mark = gc_color_red;
 c_738907.hdr.grayed = 0;
c_738907.tag = closureN_tag;
 c_738907.fn = (function_type)__lambda_271;
c_738907.num_args = 1;
c_738907.num_elements = 1;
c_738907.elements = (object *)e_738910;
c_738907.elements[0] = ((closureN)self_735398)->elements[0];


make_utf8_string_with_len(c_738914, "obj_int2obj(", 12, 12);

make_utf8_string_with_len(c_738915, ")", 1, 1);

object c_738913 = Cyc_string_append(data,(closure)&c_738907,3,&c_738914, r_732474, &c_738915);
return_closcall1(data,(closure)&c_738907,  c_738913);; 
}

static void __lambda_271(void *data, object self_735399, int argc, object *args) /* object self_735399, object r_732473 */
 {
 object r_732473 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735399)->elements[0], r_732473);; 
}

static void __lambda_256(void *data, object self_735384, int argc, object *args) /* object self_735384, object r_732470 */
 {
 object r_732470 = args[0];
  
closureN_type c_738803;
object e_738892 [3];
c_738803.hdr.mark = gc_color_red;
 c_738803.hdr.grayed = 0;
c_738803.tag = closureN_tag;
 c_738803.fn = (function_type)__lambda_257;
c_738803.num_args = 1;
c_738803.num_elements = 3;
c_738803.elements = (object *)e_738892;
c_738803.elements[0] = ((closureN)self_735384)->elements[0];
c_738803.elements[1] = ((closureN)self_735384)->elements[1];
c_738803.elements[2] = ((closureN)self_735384)->elements[2];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_738803, r_732470);; 
}

static void __lambda_257(void *data, object self_735385, int argc, object *args) /* object self_735385, object cvar_91name_73307_731552 */
 {
 object cvar_91name_73307_731552 = args[0];
  
closureN_type c_738805;
object e_738871 [4];
c_738805.hdr.mark = gc_color_red;
 c_738805.hdr.grayed = 0;
c_738805.tag = closureN_tag;
 c_738805.fn = (function_type)__lambda_258;
c_738805.num_args = 1;
c_738805.num_elements = 4;
c_738805.elements = (object *)e_738871;
c_738805.elements[0] = cvar_91name_73307_731552;
c_738805.elements[1] = ((closureN)self_735385)->elements[0];
c_738805.elements[2] = ((closureN)self_735385)->elements[1];
c_738805.elements[3] = ((closureN)self_735385)->elements[2];


mclosure0(c_738872, (function_type)__lambda_267);c_738872.num_args = 1;
return_direct_with_clo1(data,(closure)&c_738805,__lambda_258,  &c_738872);; 
}

static void __lambda_267(void *data, object self_735386, int argc, object *args) /* object self_735386, object k_732467, object n_73324_731558 */
 {
 object k_732467 = args[0]; object n_73324_731558 = args[1];
  
closureN_type c_738874;
object e_738891 [2];
c_738874.hdr.mark = gc_color_red;
 c_738874.hdr.grayed = 0;
c_738874.tag = closureN_tag;
 c_738874.fn = (function_type)__lambda_268;
c_738874.num_args = 1;
c_738874.num_elements = 2;
c_738874.elements = (object *)e_738891;
c_738874.elements[0] = k_732467;
c_738874.elements[1] = n_73324_731558;

return_direct_with_clo2(data,  __glo_nan_127_scheme_inexact, (((closure)  __glo_nan_127_scheme_inexact)->fn),  &c_738874, n_73324_731558);; 
}

static void __lambda_268(void *data, object self_735387, int argc, object *args) /* object self_735387, object r_732468 */
 {
 object r_732468 = args[0];
  if( (boolean_f != r_732468) ){ 
  
make_utf8_string_with_len(c_738877, "(0./0.)", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_735387)->elements[0], (((closure)  ((closureN)self_735387)->elements[0])->fn),  &c_738877);
} else { 
  
closureN_type c_738879;
object e_738889 [2];
c_738879.hdr.mark = gc_color_red;
 c_738879.hdr.grayed = 0;
c_738879.tag = closureN_tag;
 c_738879.fn = (function_type)__lambda_269;
c_738879.num_args = 1;
c_738879.num_elements = 2;
c_738879.elements = (object *)e_738889;
c_738879.elements[0] = ((closureN)self_735387)->elements[0];
c_738879.elements[1] = ((closureN)self_735387)->elements[1];

return_direct_with_clo2(data,  __glo_infinite_127_scheme_inexact, (((closure)  __glo_infinite_127_scheme_inexact)->fn),  &c_738879, ((closureN)self_735387)->elements[1]);}
;; 
}

static void __lambda_269(void *data, object self_735388, int argc, object *args) /* object self_735388, object r_732469 */
 {
 object r_732469 = args[0];
  if( (boolean_f != r_732469) ){ 
  
make_utf8_string_with_len(c_738882, "(1./0.)", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_735388)->elements[0], (((closure)  ((closureN)self_735388)->elements[0])->fn),  &c_738882);
} else { 
  
object c_738887 = Cyc_number2string2(data,  ((closureN)self_735388)->elements[0],1,((closureN)self_735388)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_735388)->elements[0], (((closure)  ((closureN)self_735388)->elements[0])->fn),  c_738887);}
;; 
}

static void __lambda_258(void *data, object self_735389, int argc, object *args) /* object self_735389, object num2str_73310_731553 */
 {
 object num2str_73310_731553 = args[0];
  
closureN_type c_738807;
object e_738869 [5];
c_738807.hdr.mark = gc_color_red;
 c_738807.hdr.grayed = 0;
c_738807.tag = closureN_tag;
 c_738807.fn = (function_type)__lambda_259;
c_738807.num_args = 1;
c_738807.num_elements = 5;
c_738807.elements = (object *)e_738869;
c_738807.elements[0] = ((closureN)self_735389)->elements[0];
c_738807.elements[1] = ((closureN)self_735389)->elements[1];
c_738807.elements[2] = ((closureN)self_735389)->elements[2];
c_738807.elements[3] = num2str_73310_731553;
c_738807.elements[4] = ((closureN)self_735389)->elements[3];

return_direct_with_clo2(data,  __glo_real_91part_scheme_complex, (((closure)  __glo_real_91part_scheme_complex)->fn),  &c_738807, ((closureN)self_735389)->elements[1]);; 
}

static void __lambda_259(void *data, object self_735390, int argc, object *args) /* object self_735390, object r_732466 */
 {
 object r_732466 = args[0];
  
closureN_type c_738810;
object e_738868 [5];
c_738810.hdr.mark = gc_color_red;
 c_738810.hdr.grayed = 0;
c_738810.tag = closureN_tag;
 c_738810.fn = (function_type)__lambda_260;
c_738810.num_args = 1;
c_738810.num_elements = 5;
c_738810.elements = (object *)e_738868;
c_738810.elements[0] = ((closureN)self_735390)->elements[0];
c_738810.elements[1] = ((closureN)self_735390)->elements[1];
c_738810.elements[2] = ((closureN)self_735390)->elements[2];
c_738810.elements[3] = ((closureN)self_735390)->elements[3];
c_738810.elements[4] = ((closureN)self_735390)->elements[4];

return_closcall2(data,  ((closureN)self_735390)->elements[3],  &c_738810, r_732466);; 
}

static void __lambda_260(void *data, object self_735391, int argc, object *args) /* object self_735391, object rnum_73313_731554 */
 {
 object rnum_73313_731554 = args[0];
  
closureN_type c_738812;
object e_738866 [5];
c_738812.hdr.mark = gc_color_red;
 c_738812.hdr.grayed = 0;
c_738812.tag = closureN_tag;
 c_738812.fn = (function_type)__lambda_261;
c_738812.num_args = 1;
c_738812.num_elements = 5;
c_738812.elements = (object *)e_738866;
c_738812.elements[0] = ((closureN)self_735391)->elements[0];
c_738812.elements[1] = ((closureN)self_735391)->elements[2];
c_738812.elements[2] = ((closureN)self_735391)->elements[3];
c_738812.elements[3] = rnum_73313_731554;
c_738812.elements[4] = ((closureN)self_735391)->elements[4];

return_direct_with_clo2(data,  __glo_imag_91part_scheme_complex, (((closure)  __glo_imag_91part_scheme_complex)->fn),  &c_738812, ((closureN)self_735391)->elements[1]);; 
}

static void __lambda_261(void *data, object self_735392, int argc, object *args) /* object self_735392, object r_732465 */
 {
 object r_732465 = args[0];
  
closureN_type c_738815;
object e_738865 [4];
c_738815.hdr.mark = gc_color_red;
 c_738815.hdr.grayed = 0;
c_738815.tag = closureN_tag;
 c_738815.fn = (function_type)__lambda_262;
c_738815.num_args = 1;
c_738815.num_elements = 4;
c_738815.elements = (object *)e_738865;
c_738815.elements[0] = ((closureN)self_735392)->elements[0];
c_738815.elements[1] = ((closureN)self_735392)->elements[1];
c_738815.elements[2] = ((closureN)self_735392)->elements[3];
c_738815.elements[3] = ((closureN)self_735392)->elements[4];

return_closcall2(data,  ((closureN)self_735392)->elements[2],  &c_738815, r_732465);; 
}

static void __lambda_262(void *data, object self_735393, int argc, object *args) /* object self_735393, object inum_73316_731555 */
 {
 object inum_73316_731555 = args[0];
  object addr_91op_73319_731556;
  if( (boolean_f != ((closureN)self_735393)->elements[3]) ){ 
  object c_738819;
 alloc_string(data,c_738819, 0, 0);
char tmp_738820[] = "";
memcpy(((string_type *)c_738819)->str, tmp_738820,0);
((string_type *)c_738819)->str[0] = '\0';
  addr_91op_73319_731556 = c_738819;
} else { 
  object c_738822;
 alloc_string(data,c_738822, 1, 1);
char tmp_738823[] = "&";
memcpy(((string_type *)c_738822)->str, tmp_738823,1);
((string_type *)c_738822)->str[1] = '\0';
  addr_91op_73319_731556 = c_738822;}
;
closureN_type c_738825;
object e_738831 [1];
c_738825.hdr.mark = gc_color_red;
 c_738825.hdr.grayed = 0;
c_738825.tag = closureN_tag;
 c_738825.fn = (function_type)__lambda_263;
c_738825.num_args = 0;
c_738825.num_elements = 1;
c_738825.elements = (object *)e_738831;
c_738825.elements[0] = ((closureN)self_735393)->elements[3];


closureN_type c_738832;
object e_738864 [5];
c_738832.hdr.mark = gc_color_red;
 c_738832.hdr.grayed = 0;
c_738832.tag = closureN_tag;
 c_738832.fn = (function_type)__lambda_264;
c_738832.num_args = 1;
c_738832.num_elements = 5;
c_738832.elements = (object *)e_738864;
c_738832.elements[0] = addr_91op_73319_731556;
c_738832.elements[1] = ((closureN)self_735393)->elements[0];
c_738832.elements[2] = inum_73316_731555;
c_738832.elements[3] = ((closureN)self_735393)->elements[1];
c_738832.elements[4] = ((closureN)self_735393)->elements[2];

return_direct_with_clo1(data,(closure)&c_738825,__lambda_263,  &c_738832);; 
}

static void __lambda_264(void *data, object self_735394, int argc, object *args) /* object self_735394, object c_91make_91macro_73322_731557 */
 {
 object c_91make_91macro_73322_731557 = args[0];
  
closureN_type c_738834;
object e_738858 [5];
c_738834.hdr.mark = gc_color_red;
 c_738834.hdr.grayed = 0;
c_738834.tag = closureN_tag;
 c_738834.fn = (function_type)__lambda_265;
c_738834.num_args = 1;
c_738834.num_elements = 5;
c_738834.elements = (object *)e_738858;
c_738834.elements[0] = c_91make_91macro_73322_731557;
c_738834.elements[1] = ((closureN)self_735394)->elements[1];
c_738834.elements[2] = ((closureN)self_735394)->elements[2];
c_738834.elements[3] = ((closureN)self_735394)->elements[3];
c_738834.elements[4] = ((closureN)self_735394)->elements[4];


object c_738861 = Cyc_string_append(data,(closure)&c_738834,2,((closureN)self_735394)->elements[0], ((closureN)self_735394)->elements[1]);
return_closcall1(data,(closure)&c_738834,  c_738861);; 
}

static void __lambda_265(void *data, object self_735395, int argc, object *args) /* object self_735395, object r_732460 */
 {
 object r_732460 = args[0];
  
closureN_type c_738836;
object e_738846 [2];
c_738836.hdr.mark = gc_color_red;
 c_738836.hdr.grayed = 0;
c_738836.tag = closureN_tag;
 c_738836.fn = (function_type)__lambda_266;
c_738836.num_args = 1;
c_738836.num_elements = 2;
c_738836.elements = (object *)e_738846;
c_738836.elements[0] = ((closureN)self_735395)->elements[3];
c_738836.elements[1] = r_732460;


make_utf8_string_with_len(c_738851, "(", 1, 1);

make_utf8_string_with_len(c_738853, ", ", 2, 2);

make_utf8_string_with_len(c_738855, ", ", 2, 2);

make_utf8_string_with_len(c_738857, ");", 2, 2);

object c_738849 = Cyc_string_append(data,(closure)&c_738836,8,((closureN)self_735395)->elements[0], &c_738851, ((closureN)self_735395)->elements[1], &c_738853, ((closureN)self_735395)->elements[4], &c_738855, ((closureN)self_735395)->elements[2], &c_738857);
return_closcall1(data,(closure)&c_738836,  c_738849);; 
}

static void __lambda_266(void *data, object self_735396, int argc, object *args) /* object self_735396, object r_732462 */
 {
 object r_732462 = args[0];
  
list_2_type local_738841; 

pair_type local_738845; 
return_direct_with_clo1(data,  ((closureN)self_735396)->elements[0], (((closure)  ((closureN)self_735396)->elements[0])->fn),  Cyc_fast_list_2(&local_738841, ((closureN)self_735396)->elements[1], set_cell_as_expr(&local_738845, r_732462)));; 
}

static void __lambda_263(void *data, object self_735397, int argc, object *args) /* object self_735397, object k_732463 */
 {
 object k_732463 = args[0];
  if( (boolean_f != ((closureN)self_735397)->elements[0]) ){ 
  
make_utf8_string_with_len(c_738828, "alloca_complex_num", 18, 18);
return_direct_with_clo1(data,  k_732463,__lambda_264,  &c_738828);
} else { 
  
make_utf8_string_with_len(c_738830, "make_complex_num", 16, 16);
return_direct_with_clo1(data,  k_732463,__lambda_264,  &c_738830);}
;; 
}

static void __lambda_249(void *data, object self_735377, int argc, object *args) /* object self_735377, object r_732451 */
 {
 object r_732451 = args[0];
  
closureN_type c_738754;
object e_738796 [2];
c_738754.hdr.mark = gc_color_red;
 c_738754.hdr.grayed = 0;
c_738754.tag = closureN_tag;
 c_738754.fn = (function_type)__lambda_250;
c_738754.num_args = 1;
c_738754.num_elements = 2;
c_738754.elements = (object *)e_738796;
c_738754.elements[0] = ((closureN)self_735377)->elements[0];
c_738754.elements[1] = ((closureN)self_735377)->elements[1];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_738754, r_732451);; 
}

static void __lambda_250(void *data, object self_735378, int argc, object *args) /* object self_735378, object r_732446 */
 {
 object r_732446 = args[0];
  
closureN_type c_738756;
object e_738791 [2];
c_738756.hdr.mark = gc_color_red;
 c_738756.hdr.grayed = 0;
c_738756.tag = closureN_tag;
 c_738756.fn = (function_type)__lambda_251;
c_738756.num_args = 1;
c_738756.num_elements = 2;
c_738756.elements = (object *)e_738791;
c_738756.elements[0] = ((closureN)self_735378)->elements[1];
c_738756.elements[1] = r_732446;


object c_738794 = Cyc_number2string2(data,(closure)&c_738756,1,((closureN)self_735378)->elements[0]);
return_closcall1(data,(closure)&c_738756,  c_738794);; 
}

static void __lambda_251(void *data, object self_735379, int argc, object *args) /* object self_735379, object r_732447 */
 {
 object r_732447 = args[0];
  
closureN_type c_738758;
object e_738789 [1];
c_738758.hdr.mark = gc_color_red;
 c_738758.hdr.grayed = 0;
c_738758.tag = closureN_tag;
 c_738758.fn = (function_type)__lambda_252;
c_738758.num_args = 2;
c_738758.num_elements = 1;
c_738758.elements = (object *)e_738789;
c_738758.elements[0] = ((closureN)self_735379)->elements[0];

return_direct_with_clo2(data,(closure)&c_738758,__lambda_252,  ((closureN)self_735379)->elements[1], r_732447);; 
}

static void __lambda_252(void *data, object self_735380, int argc, object *args) /* object self_735380, object cvar_91name_73299_731550, object num2str_73300_731551 */
 {
 object cvar_91name_73299_731550 = args[0]; object num2str_73300_731551 = args[1];
  
closureN_type c_738760;
object e_738784 [3];
c_738760.hdr.mark = gc_color_red;
 c_738760.hdr.grayed = 0;
c_738760.tag = closureN_tag;
 c_738760.fn = (function_type)__lambda_253;
c_738760.num_args = 1;
c_738760.num_elements = 3;
c_738760.elements = (object *)e_738784;
c_738760.elements[0] = cvar_91name_73299_731550;
c_738760.elements[1] = ((closureN)self_735380)->elements[0];
c_738760.elements[2] = num2str_73300_731551;


make_utf8_string_with_len(c_738788, "", 0, 0);

object c_738787 = Cyc_string_append(data,(closure)&c_738760,2,&c_738788, cvar_91name_73299_731550);
return_closcall1(data,(closure)&c_738760,  c_738787);; 
}

static void __lambda_253(void *data, object self_735381, int argc, object *args) /* object self_735381, object r_732448 */
 {
 object r_732448 = args[0];
  
closureN_type c_738762;
object e_738772 [2];
c_738762.hdr.mark = gc_color_red;
 c_738762.hdr.grayed = 0;
c_738762.tag = closureN_tag;
 c_738762.fn = (function_type)__lambda_254;
c_738762.num_args = 1;
c_738762.num_elements = 2;
c_738762.elements = (object *)e_738772;
c_738762.elements[0] = ((closureN)self_735381)->elements[1];
c_738762.elements[1] = r_732448;


make_utf8_string_with_len(c_738776, "alloc_bignum(data, ", 19, 19);

make_utf8_string_with_len(c_738778, "); ", 3, 3);

make_utf8_string_with_len(c_738779, "BIGNUM_CALL(mp_read_radix(&bignum_value(", 40, 40);

make_utf8_string_with_len(c_738781, "), \"", 4, 4);

make_utf8_string_with_len(c_738783, "\", 10));", 8, 8);

object c_738775 = Cyc_string_append(data,(closure)&c_738762,8,&c_738776, ((closureN)self_735381)->elements[0], &c_738778, &c_738779, ((closureN)self_735381)->elements[0], &c_738781, ((closureN)self_735381)->elements[2], &c_738783);
return_closcall1(data,(closure)&c_738762,  c_738775);; 
}

static void __lambda_254(void *data, object self_735382, int argc, object *args) /* object self_735382, object r_732450 */
 {
 object r_732450 = args[0];
  
list_2_type local_738767; 

pair_type local_738771; 
return_direct_with_clo1(data,  ((closureN)self_735382)->elements[0], (((closure)  ((closureN)self_735382)->elements[0])->fn),  Cyc_fast_list_2(&local_738767, ((closureN)self_735382)->elements[1], set_cell_as_expr(&local_738771, r_732450)));; 
}

static void __lambda_222(void *data, object _, int argc, object *args) /* closure _,object k_732410, object exp_73265_731541, object use_91alloca_73266_731542, object immutable_73267_731543 */
 {
object k_732410 = args[0]; object exp_73265_731541 = args[1]; object use_91alloca_73266_731542 = args[2]; object immutable_73267_731543 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-string");

closureN_type c_738545;
object e_738710 [4];
c_738545.hdr.mark = gc_color_red;
 c_738545.hdr.grayed = 0;
c_738545.tag = closureN_tag;
 c_738545.fn = (function_type)__lambda_223;
c_738545.num_args = 1;
c_738545.num_elements = 4;
c_738545.elements = (object *)e_738710;
c_738545.elements[0] = exp_73265_731541;
c_738545.elements[1] = immutable_73267_731543;
c_738545.elements[2] = k_732410;
c_738545.elements[3] = use_91alloca_73266_731542;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738545, quote_c);; 
}

static void __lambda_223(void *data, object self_735352, int argc, object *args) /* object self_735352, object r_732434 */
 {
 object r_732434 = args[0];
  
closureN_type c_738547;
object e_738709 [4];
c_738547.hdr.mark = gc_color_red;
 c_738547.hdr.grayed = 0;
c_738547.tag = closureN_tag;
 c_738547.fn = (function_type)__lambda_224;
c_738547.num_args = 1;
c_738547.num_elements = 4;
c_738547.elements = (object *)e_738709;
c_738547.elements[0] = ((closureN)self_735352)->elements[0];
c_738547.elements[1] = ((closureN)self_735352)->elements[1];
c_738547.elements[2] = ((closureN)self_735352)->elements[2];
c_738547.elements[3] = ((closureN)self_735352)->elements[3];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_738547, r_732434);; 
}

static void __lambda_224(void *data, object self_735353, int argc, object *args) /* object self_735353, object cvar_91name_73268_731544 */
 {
 object cvar_91name_73268_731544 = args[0];
  if( (boolean_f != ((closureN)self_735353)->elements[3]) ){ 
  
closureN_type c_738550;
object e_738648 [5];
c_738550.hdr.mark = gc_color_red;
 c_738550.hdr.grayed = 0;
c_738550.tag = closureN_tag;
 c_738550.fn = (function_type)__lambda_225;
c_738550.num_args = 1;
c_738550.num_elements = 5;
c_738550.elements = (object *)e_738648;
c_738550.elements[0] = cvar_91name_73268_731544;
c_738550.elements[1] = ((closureN)self_735353)->elements[0];
c_738550.elements[2] = ((closureN)self_735353)->elements[1];
c_738550.elements[3] = ((closureN)self_735353)->elements[2];
c_738550.elements[4] = ((closureN)self_735353)->elements[3];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738550, quote_tmp);
} else { 
  
closureN_type c_738650;
object e_738704 [5];
c_738650.hdr.mark = gc_color_red;
 c_738650.hdr.grayed = 0;
c_738650.tag = closureN_tag;
 c_738650.fn = (function_type)__lambda_237;
c_738650.num_args = 1;
c_738650.num_elements = 5;
c_738650.elements = (object *)e_738704;
c_738650.elements[0] = cvar_91name_73268_731544;
c_738650.elements[1] = ((closureN)self_735353)->elements[0];
c_738650.elements[2] = ((closureN)self_735353)->elements[1];
c_738650.elements[3] = ((closureN)self_735353)->elements[2];
c_738650.elements[4] = ((closureN)self_735353)->elements[3];


make_utf8_string_with_len(c_738708, "&", 1, 1);

object c_738707 = Cyc_string_append(data,(closure)&c_738650,2,&c_738708, cvar_91name_73268_731544);
return_closcall1(data,(closure)&c_738650,  c_738707);}
;; 
}

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

return_direct_with_clo2(data,  __glo__91_125cstr_scheme_cyclone_cgen, (((closure)  __glo__91_125cstr_scheme_cyclone_cgen)->fn),  &c_738652, ((closureN)self_735366)->elements[1]);; 
}

static void __lambda_238(void *data, object self_735367, int argc, object *args) /* object self_735367, object r_732428 */
 {
 object r_732428 = args[0];
  
closureN_type c_738654;
object e_738700 [7];
c_738654.hdr.mark = gc_color_red;
 c_738654.hdr.grayed = 0;
c_738654.tag = closureN_tag;
 c_738654.fn = (function_type)__lambda_239;
c_738654.num_args = 1;
c_738654.num_elements = 7;
c_738654.elements = (object *)e_738700;
c_738654.elements[0] = ((closureN)self_735367)->elements[0];
c_738654.elements[1] = ((closureN)self_735367)->elements[1];
c_738654.elements[2] = ((closureN)self_735367)->elements[2];
c_738654.elements[3] = ((closureN)self_735367)->elements[3];
c_738654.elements[4] = ((closureN)self_735367)->elements[4];
c_738654.elements[5] = r_732428;
c_738654.elements[6] = ((closureN)self_735367)->elements[5];

return_direct_with_clo2(data,  __glo_string_91byte_91length_scheme_cyclone_cgen, (((closure)  __glo_string_91byte_91length_scheme_cyclone_cgen)->fn),  &c_738654, ((closureN)self_735367)->elements[1]);; 
}

static void __lambda_239(void *data, object self_735368, int argc, object *args) /* object self_735368, object r_732433 */
 {
 object r_732433 = args[0];
  
closureN_type c_738656;
object e_738696 [7];
c_738656.hdr.mark = gc_color_red;
 c_738656.hdr.grayed = 0;
c_738656.tag = closureN_tag;
 c_738656.fn = (function_type)__lambda_240;
c_738656.num_args = 1;
c_738656.num_elements = 7;
c_738656.elements = (object *)e_738696;
c_738656.elements[0] = ((closureN)self_735368)->elements[0];
c_738656.elements[1] = ((closureN)self_735368)->elements[1];
c_738656.elements[2] = ((closureN)self_735368)->elements[2];
c_738656.elements[3] = ((closureN)self_735368)->elements[3];
c_738656.elements[4] = ((closureN)self_735368)->elements[4];
c_738656.elements[5] = ((closureN)self_735368)->elements[5];
c_738656.elements[6] = ((closureN)self_735368)->elements[6];


object c_738699 = Cyc_number2string2(data,(closure)&c_738656,1,r_732433);
return_closcall1(data,(closure)&c_738656,  c_738699);; 
}

static void __lambda_240(void *data, object self_735369, int argc, object *args) /* object self_735369, object r_732429 */
 {
 object r_732429 = args[0];
  
closureN_type c_738658;
object e_738689 [7];
c_738658.hdr.mark = gc_color_red;
 c_738658.hdr.grayed = 0;
c_738658.tag = closureN_tag;
 c_738658.fn = (function_type)__lambda_241;
c_738658.num_args = 1;
c_738658.num_elements = 7;
c_738658.elements = (object *)e_738689;
c_738658.elements[0] = ((closureN)self_735369)->elements[0];
c_738658.elements[1] = ((closureN)self_735369)->elements[2];
c_738658.elements[2] = ((closureN)self_735369)->elements[3];
c_738658.elements[3] = ((closureN)self_735369)->elements[4];
c_738658.elements[4] = ((closureN)self_735369)->elements[5];
c_738658.elements[5] = r_732429;
c_738658.elements[6] = ((closureN)self_735369)->elements[6];




object c_738692 = Cyc_number2string2(data,(closure)&c_738658,1,Cyc_string_length(data, ((closureN)self_735369)->elements[1]));
return_closcall1(data,(closure)&c_738658,  c_738692);; 
}

static void __lambda_241(void *data, object self_735370, int argc, object *args) /* object self_735370, object r_732430 */
 {
 object r_732430 = args[0];
  
closureN_type c_738660;
object e_738685 [6];
c_738660.hdr.mark = gc_color_red;
 c_738660.hdr.grayed = 0;
c_738660.tag = closureN_tag;
 c_738660.fn = (function_type)__lambda_242;
c_738660.num_args = 1;
c_738660.num_elements = 6;
c_738660.elements = (object *)e_738685;
c_738660.elements[0] = ((closureN)self_735370)->elements[0];
c_738660.elements[1] = ((closureN)self_735370)->elements[2];
c_738660.elements[2] = ((closureN)self_735370)->elements[3];
c_738660.elements[3] = ((closureN)self_735370)->elements[4];
c_738660.elements[4] = ((closureN)self_735370)->elements[5];
c_738660.elements[5] = r_732430;

return_direct_with_clo4(data,  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen, (((closure)  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen)->fn),  &c_738660, ((closureN)self_735370)->elements[0], ((closureN)self_735370)->elements[6], ((closureN)self_735370)->elements[1]);; 
}

static void __lambda_242(void *data, object self_735371, int argc, object *args) /* object self_735371, object r_732431 */
 {
 object r_732431 = args[0];
  
closureN_type c_738662;
object e_738672 [2];
c_738662.hdr.mark = gc_color_red;
 c_738662.hdr.grayed = 0;
c_738662.tag = closureN_tag;
 c_738662.fn = (function_type)__lambda_243;
c_738662.num_args = 1;
c_738662.num_elements = 2;
c_738662.elements = (object *)e_738672;
c_738662.elements[0] = ((closureN)self_735371)->elements[1];
c_738662.elements[1] = ((closureN)self_735371)->elements[2];


make_utf8_string_with_len(c_738676, "make_utf8_string_with_len(", 26, 26);

make_utf8_string_with_len(c_738678, ", ", 2, 2);

make_utf8_string_with_len(c_738680, ", ", 2, 2);

make_utf8_string_with_len(c_738682, ", ", 2, 2);

make_utf8_string_with_len(c_738684, ");", 2, 2);

object c_738675 = Cyc_string_append(data,(closure)&c_738662,10,&c_738676, ((closureN)self_735371)->elements[0], &c_738678, ((closureN)self_735371)->elements[3], &c_738680, ((closureN)self_735371)->elements[4], &c_738682, ((closureN)self_735371)->elements[5], &c_738684, r_732431);
return_closcall1(data,(closure)&c_738662,  c_738675);; 
}

static void __lambda_243(void *data, object self_735372, int argc, object *args) /* object self_735372, object r_732427 */
 {
 object r_732427 = args[0];
  
list_2_type local_738667; 

pair_type local_738671; 
return_direct_with_clo1(data,  ((closureN)self_735372)->elements[0], (((closure)  ((closureN)self_735372)->elements[0])->fn),  Cyc_fast_list_2(&local_738667, ((closureN)self_735372)->elements[1], set_cell_as_expr(&local_738671, r_732427)));; 
}

static void __lambda_225(void *data, object self_735354, int argc, object *args) /* object self_735354, object r_732423 */
 {
 object r_732423 = args[0];
  
closureN_type c_738552;
object e_738647 [5];
c_738552.hdr.mark = gc_color_red;
 c_738552.hdr.grayed = 0;
c_738552.tag = closureN_tag;
 c_738552.fn = (function_type)__lambda_226;
c_738552.num_args = 1;
c_738552.num_elements = 5;
c_738552.elements = (object *)e_738647;
c_738552.elements[0] = ((closureN)self_735354)->elements[0];
c_738552.elements[1] = ((closureN)self_735354)->elements[1];
c_738552.elements[2] = ((closureN)self_735354)->elements[2];
c_738552.elements[3] = ((closureN)self_735354)->elements[3];
c_738552.elements[4] = ((closureN)self_735354)->elements[4];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_738552, r_732423);; 
}

static void __lambda_226(void *data, object self_735355, int argc, object *args) /* object self_735355, object r_732412 */
 {
 object r_732412 = args[0];
  
closureN_type c_738554;
object e_738645 [6];
c_738554.hdr.mark = gc_color_red;
 c_738554.hdr.grayed = 0;
c_738554.tag = closureN_tag;
 c_738554.fn = (function_type)__lambda_227;
c_738554.num_args = 1;
c_738554.num_elements = 6;
c_738554.elements = (object *)e_738645;
c_738554.elements[0] = ((closureN)self_735355)->elements[0];
c_738554.elements[1] = ((closureN)self_735355)->elements[1];
c_738554.elements[2] = ((closureN)self_735355)->elements[2];
c_738554.elements[3] = ((closureN)self_735355)->elements[3];
c_738554.elements[4] = r_732412;
c_738554.elements[5] = ((closureN)self_735355)->elements[4];

return_direct_with_clo2(data,  __glo_string_91byte_91length_scheme_cyclone_cgen, (((closure)  __glo_string_91byte_91length_scheme_cyclone_cgen)->fn),  &c_738554, ((closureN)self_735355)->elements[1]);; 
}

static void __lambda_227(void *data, object self_735356, int argc, object *args) /* object self_735356, object r_732422 */
 {
 object r_732422 = args[0];
  
closureN_type c_738556;
object e_738641 [6];
c_738556.hdr.mark = gc_color_red;
 c_738556.hdr.grayed = 0;
c_738556.tag = closureN_tag;
 c_738556.fn = (function_type)__lambda_228;
c_738556.num_args = 1;
c_738556.num_elements = 6;
c_738556.elements = (object *)e_738641;
c_738556.elements[0] = ((closureN)self_735356)->elements[0];
c_738556.elements[1] = ((closureN)self_735356)->elements[1];
c_738556.elements[2] = ((closureN)self_735356)->elements[2];
c_738556.elements[3] = ((closureN)self_735356)->elements[3];
c_738556.elements[4] = ((closureN)self_735356)->elements[4];
c_738556.elements[5] = ((closureN)self_735356)->elements[5];


object c_738644 = Cyc_number2string2(data,(closure)&c_738556,1,r_732422);
return_closcall1(data,(closure)&c_738556,  c_738644);; 
}

static void __lambda_228(void *data, object self_735357, int argc, object *args) /* object self_735357, object r_732413 */
 {
 object r_732413 = args[0];
  
closureN_type c_738558;
object e_738639 [5];
c_738558.hdr.mark = gc_color_red;
 c_738558.hdr.grayed = 0;
c_738558.tag = closureN_tag;
 c_738558.fn = (function_type)__lambda_229;
c_738558.num_args = 2;
c_738558.num_elements = 5;
c_738558.elements = (object *)e_738639;
c_738558.elements[0] = ((closureN)self_735357)->elements[0];
c_738558.elements[1] = ((closureN)self_735357)->elements[1];
c_738558.elements[2] = ((closureN)self_735357)->elements[2];
c_738558.elements[3] = ((closureN)self_735357)->elements[3];
c_738558.elements[4] = ((closureN)self_735357)->elements[5];

return_direct_with_clo2(data,(closure)&c_738558,__lambda_229,  ((closureN)self_735357)->elements[4], r_732413);; 
}

static void __lambda_229(void *data, object self_735358, int argc, object *args) /* object self_735358, object tmp_91name_73272_731545, object blen_73273_731546 */
 {
 object tmp_91name_73272_731545 = args[0]; object blen_73273_731546 = args[1];
  
closureN_type c_738560;
object e_738633 [7];
c_738560.hdr.mark = gc_color_red;
 c_738560.hdr.grayed = 0;
c_738560.tag = closureN_tag;
 c_738560.fn = (function_type)__lambda_230;
c_738560.num_args = 1;
c_738560.num_elements = 7;
c_738560.elements = (object *)e_738633;
c_738560.elements[0] = blen_73273_731546;
c_738560.elements[1] = ((closureN)self_735358)->elements[0];
c_738560.elements[2] = ((closureN)self_735358)->elements[1];
c_738560.elements[3] = ((closureN)self_735358)->elements[2];
c_738560.elements[4] = ((closureN)self_735358)->elements[3];
c_738560.elements[5] = tmp_91name_73272_731545;
c_738560.elements[6] = ((closureN)self_735358)->elements[4];


make_utf8_string_with_len(c_738637, "", 0, 0);

object c_738636 = Cyc_string_append(data,(closure)&c_738560,2,&c_738637, ((closureN)self_735358)->elements[0]);
return_closcall1(data,(closure)&c_738560,  c_738636);; 
}

static void __lambda_230(void *data, object self_735359, int argc, object *args) /* object self_735359, object r_732414 */
 {
 object r_732414 = args[0];
  
closureN_type c_738562;
object e_738629 [8];
c_738562.hdr.mark = gc_color_red;
 c_738562.hdr.grayed = 0;
c_738562.tag = closureN_tag;
 c_738562.fn = (function_type)__lambda_231;
c_738562.num_args = 1;
c_738562.num_elements = 8;
c_738562.elements = (object *)e_738629;
c_738562.elements[0] = ((closureN)self_735359)->elements[0];
c_738562.elements[1] = ((closureN)self_735359)->elements[1];
c_738562.elements[2] = ((closureN)self_735359)->elements[2];
c_738562.elements[3] = ((closureN)self_735359)->elements[3];
c_738562.elements[4] = ((closureN)self_735359)->elements[4];
c_738562.elements[5] = r_732414;
c_738562.elements[6] = ((closureN)self_735359)->elements[5];
c_738562.elements[7] = ((closureN)self_735359)->elements[6];



return_direct_with_clo1(data,(closure)&c_738562,__lambda_231,  Cyc_string_length(data, ((closureN)self_735359)->elements[2]));; 
}

static void __lambda_231(void *data, object self_735360, int argc, object *args) /* object self_735360, object r_732421 */
 {
 object r_732421 = args[0];
  
closureN_type c_738564;
object e_738625 [8];
c_738564.hdr.mark = gc_color_red;
 c_738564.hdr.grayed = 0;
c_738564.tag = closureN_tag;
 c_738564.fn = (function_type)__lambda_232;
c_738564.num_args = 1;
c_738564.num_elements = 8;
c_738564.elements = (object *)e_738625;
c_738564.elements[0] = ((closureN)self_735360)->elements[0];
c_738564.elements[1] = ((closureN)self_735360)->elements[1];
c_738564.elements[2] = ((closureN)self_735360)->elements[2];
c_738564.elements[3] = ((closureN)self_735360)->elements[3];
c_738564.elements[4] = ((closureN)self_735360)->elements[4];
c_738564.elements[5] = ((closureN)self_735360)->elements[5];
c_738564.elements[6] = ((closureN)self_735360)->elements[6];
c_738564.elements[7] = ((closureN)self_735360)->elements[7];


object c_738628 = Cyc_number2string2(data,(closure)&c_738564,1,r_732421);
return_closcall1(data,(closure)&c_738564,  c_738628);; 
}

static void __lambda_232(void *data, object self_735361, int argc, object *args) /* object self_735361, object r_732417 */
 {
 object r_732417 = args[0];
  
closureN_type c_738566;
object e_738623 [8];
c_738566.hdr.mark = gc_color_red;
 c_738566.hdr.grayed = 0;
c_738566.tag = closureN_tag;
 c_738566.fn = (function_type)__lambda_233;
c_738566.num_args = 1;
c_738566.num_elements = 8;
c_738566.elements = (object *)e_738623;
c_738566.elements[0] = ((closureN)self_735361)->elements[0];
c_738566.elements[1] = ((closureN)self_735361)->elements[1];
c_738566.elements[2] = ((closureN)self_735361)->elements[3];
c_738566.elements[3] = ((closureN)self_735361)->elements[4];
c_738566.elements[4] = ((closureN)self_735361)->elements[5];
c_738566.elements[5] = r_732417;
c_738566.elements[6] = ((closureN)self_735361)->elements[6];
c_738566.elements[7] = ((closureN)self_735361)->elements[7];

return_direct_with_clo2(data,  __glo__91_125cstr_scheme_cyclone_cgen, (((closure)  __glo__91_125cstr_scheme_cyclone_cgen)->fn),  &c_738566, ((closureN)self_735361)->elements[2]);; 
}

static void __lambda_233(void *data, object self_735362, int argc, object *args) /* object self_735362, object r_732418 */
 {
 object r_732418 = args[0];
  
closureN_type c_738568;
object e_738616 [9];
c_738568.hdr.mark = gc_color_red;
 c_738568.hdr.grayed = 0;
c_738568.tag = closureN_tag;
 c_738568.fn = (function_type)__lambda_234;
c_738568.num_args = 1;
c_738568.num_elements = 9;
c_738568.elements = (object *)e_738616;
c_738568.elements[0] = ((closureN)self_735362)->elements[0];
c_738568.elements[1] = ((closureN)self_735362)->elements[1];
c_738568.elements[2] = ((closureN)self_735362)->elements[2];
c_738568.elements[3] = ((closureN)self_735362)->elements[3];
c_738568.elements[4] = ((closureN)self_735362)->elements[4];
c_738568.elements[5] = ((closureN)self_735362)->elements[5];
c_738568.elements[6] = r_732418;
c_738568.elements[7] = ((closureN)self_735362)->elements[6];
c_738568.elements[8] = ((closureN)self_735362)->elements[7];


make_utf8_string_with_len(c_738620, "((string_type *)", 16, 16);

make_utf8_string_with_len(c_738622, ")", 1, 1);

object c_738619 = Cyc_string_append(data,(closure)&c_738568,3,&c_738620, ((closureN)self_735362)->elements[1], &c_738622);
return_closcall1(data,(closure)&c_738568,  c_738619);; 
}

static void __lambda_234(void *data, object self_735363, int argc, object *args) /* object self_735363, object r_732420 */
 {
 object r_732420 = args[0];
  
closureN_type c_738570;
object e_738613 [7];
c_738570.hdr.mark = gc_color_red;
 c_738570.hdr.grayed = 0;
c_738570.tag = closureN_tag;
 c_738570.fn = (function_type)__lambda_235;
c_738570.num_args = 1;
c_738570.num_elements = 7;
c_738570.elements = (object *)e_738613;
c_738570.elements[0] = ((closureN)self_735363)->elements[0];
c_738570.elements[1] = ((closureN)self_735363)->elements[1];
c_738570.elements[2] = ((closureN)self_735363)->elements[3];
c_738570.elements[3] = ((closureN)self_735363)->elements[4];
c_738570.elements[4] = ((closureN)self_735363)->elements[5];
c_738570.elements[5] = ((closureN)self_735363)->elements[6];
c_738570.elements[6] = ((closureN)self_735363)->elements[7];

return_direct_with_clo4(data,  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen, (((closure)  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen)->fn),  &c_738570, r_732420, ((closureN)self_735363)->elements[8], ((closureN)self_735363)->elements[2]);; 
}

static void __lambda_235(void *data, object self_735364, int argc, object *args) /* object self_735364, object r_732419 */
 {
 object r_732419 = args[0];
  
closureN_type c_738572;
object e_738582 [2];
c_738572.hdr.mark = gc_color_red;
 c_738572.hdr.grayed = 0;
c_738572.tag = closureN_tag;
 c_738572.fn = (function_type)__lambda_236;
c_738572.num_args = 1;
c_738572.num_elements = 2;
c_738572.elements = (object *)e_738582;
c_738572.elements[0] = ((closureN)self_735364)->elements[2];
c_738572.elements[1] = ((closureN)self_735364)->elements[3];


make_utf8_string_with_len(c_738586, "object ", 7, 7);

make_utf8_string_with_len(c_738588, ";\n ", 3, 3);

make_utf8_string_with_len(c_738589, "alloc_string(data,", 18, 18);

make_utf8_string_with_len(c_738591, ", ", 2, 2);

make_utf8_string_with_len(c_738593, ", ", 2, 2);

make_utf8_string_with_len(c_738595, ");\n", 3, 3);

make_utf8_string_with_len(c_738596, "char ", 5, 5);

make_utf8_string_with_len(c_738598, "[] = ", 5, 5);

make_utf8_string_with_len(c_738600, ";\n", 2, 2);

make_utf8_string_with_len(c_738601, "memcpy(((string_type *)", 23, 23);

make_utf8_string_with_len(c_738603, ")->str, ", 8, 8);

make_utf8_string_with_len(c_738605, ",", 1, 1);

make_utf8_string_with_len(c_738607, ");\n", 3, 3);

make_utf8_string_with_len(c_738608, "((string_type *)", 16, 16);

make_utf8_string_with_len(c_738610, ")->str[", 7, 7);

make_utf8_string_with_len(c_738612, "] = '\\0';", 9, 9);

object c_738585 = Cyc_string_append(data,(closure)&c_738572,28,&c_738586, ((closureN)self_735364)->elements[1], &c_738588, &c_738589, ((closureN)self_735364)->elements[1], &c_738591, ((closureN)self_735364)->elements[0], &c_738593, ((closureN)self_735364)->elements[4], &c_738595, &c_738596, ((closureN)self_735364)->elements[6], &c_738598, ((closureN)self_735364)->elements[5], &c_738600, &c_738601, ((closureN)self_735364)->elements[1], &c_738603, ((closureN)self_735364)->elements[6], &c_738605, ((closureN)self_735364)->elements[0], &c_738607, &c_738608, ((closureN)self_735364)->elements[1], &c_738610, ((closureN)self_735364)->elements[0], &c_738612, r_732419);
return_closcall1(data,(closure)&c_738572,  c_738585);; 
}

static void __lambda_236(void *data, object self_735365, int argc, object *args) /* object self_735365, object r_732416 */
 {
 object r_732416 = args[0];
  
list_2_type local_738577; 

pair_type local_738581; 
return_direct_with_clo1(data,  ((closureN)self_735365)->elements[0], (((closure)  ((closureN)self_735365)->elements[0])->fn),  Cyc_fast_list_2(&local_738577, ((closureN)self_735365)->elements[1], set_cell_as_expr(&local_738581, r_732416)));; 
}

static void __lambda_193(void *data, object _, int argc, object *args) /* closure _,object k_732366, object exp_73248_731528, object use_91alloca_73249_731529, object immutable_73250_731530 */
 {
object k_732366 = args[0]; object exp_73248_731528 = args[1]; object use_91alloca_73249_731529 = args[2]; object immutable_73250_731530 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-bytevector");

closureN_type c_738226;
object e_738542 [4];
c_738226.hdr.mark = gc_color_red;
 c_738226.hdr.grayed = 0;
c_738226.tag = closureN_tag;
 c_738226.fn = (function_type)__lambda_194;
c_738226.num_args = 6;
c_738226.num_elements = 4;
c_738226.elements = (object *)e_738542;
c_738226.elements[0] = exp_73248_731528;
c_738226.elements[1] = immutable_73250_731530;
c_738226.elements[2] = k_732366;
c_738226.elements[3] = use_91alloca_73249_731529;

return_direct_with_clo6(data,(closure)&c_738226,__lambda_194,  boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_194(void *data, object self_735318, int argc, object *args) /* object self_735318, object cvar_91name_73251_731531, object len_73252_731532, object addr_91op_73253_731533, object deref_91op_73254_731534, object c_91make_91macro_73255_731535, object loop_73256_731536 */
 {
 object cvar_91name_73251_731531 = args[0]; object len_73252_731532 = args[1]; object addr_91op_73253_731533 = args[2]; object deref_91op_73254_731534 = args[3]; object c_91make_91macro_73255_731535 = args[4]; object loop_73256_731536 = args[5];
  
closureN_type c_738228;
object e_738538 [9];
c_738228.hdr.mark = gc_color_red;
 c_738228.hdr.grayed = 0;
c_738228.tag = closureN_tag;
 c_738228.fn = (function_type)__lambda_1314;
c_738228.num_args = 1;
c_738228.num_elements = 9;
c_738228.elements = (object *)e_738538;
c_738228.elements[0] = addr_91op_73253_731533;
c_738228.elements[1] = c_91make_91macro_73255_731535;
c_738228.elements[2] = deref_91op_73254_731534;
c_738228.elements[3] = ((closureN)self_735318)->elements[0];
c_738228.elements[4] = ((closureN)self_735318)->elements[1];
c_738228.elements[5] = ((closureN)self_735318)->elements[2];
c_738228.elements[6] = len_73252_731532;
c_738228.elements[7] = loop_73256_731536;
c_738228.elements[8] = ((closureN)self_735318)->elements[3];


pair_type local_738541; 
return_direct_with_clo1(data,(closure)&c_738228,__lambda_1314,  set_cell_as_expr(&local_738541, cvar_91name_73251_731531));; 
}

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


pair_type local_738536; 
return_direct_with_clo1(data,(closure)&c_738230,__lambda_1313,  set_cell_as_expr(&local_738536, ((closureN)self_735319)->elements[6]));; 
}

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


pair_type local_738531; 
return_direct_with_clo1(data,(closure)&c_738232,__lambda_1312,  set_cell_as_expr(&local_738531, ((closureN)self_735320)->elements[0]));; 
}

static void __lambda_1312(void *data, object self_735321, int argc, object *args) /* object self_735321, object addr_91op_73253_731533 */
 {
 object addr_91op_73253_731533 = args[0];
  
closureN_type c_738234;
object e_738523 [9];
c_738234.hdr.mark = gc_color_red;
 c_738234.hdr.grayed = 0;
c_738234.tag = closureN_tag;
 c_738234.fn = (function_type)__lambda_1311;
c_738234.num_args = 1;
c_738234.num_elements = 9;
c_738234.elements = (object *)e_738523;
c_738234.elements[0] = addr_91op_73253_731533;
c_738234.elements[1] = ((closureN)self_735321)->elements[0];
c_738234.elements[2] = ((closureN)self_735321)->elements[1];
c_738234.elements[3] = ((closureN)self_735321)->elements[3];
c_738234.elements[4] = ((closureN)self_735321)->elements[4];
c_738234.elements[5] = ((closureN)self_735321)->elements[5];
c_738234.elements[6] = ((closureN)self_735321)->elements[6];
c_738234.elements[7] = ((closureN)self_735321)->elements[7];
c_738234.elements[8] = ((closureN)self_735321)->elements[8];


pair_type local_738526; 
return_direct_with_clo1(data,(closure)&c_738234,__lambda_1311,  set_cell_as_expr(&local_738526, ((closureN)self_735321)->elements[2]));; 
}

static void __lambda_1311(void *data, object self_735322, int argc, object *args) /* object self_735322, object deref_91op_73254_731534 */
 {
 object deref_91op_73254_731534 = args[0];
  
closureN_type c_738236;
object e_738518 [9];
c_738236.hdr.mark = gc_color_red;
 c_738236.hdr.grayed = 0;
c_738236.tag = closureN_tag;
 c_738236.fn = (function_type)__lambda_1310;
c_738236.num_args = 1;
c_738236.num_elements = 9;
c_738236.elements = (object *)e_738518;
c_738236.elements[0] = ((closureN)self_735322)->elements[0];
c_738236.elements[1] = ((closureN)self_735322)->elements[2];
c_738236.elements[2] = deref_91op_73254_731534;
c_738236.elements[3] = ((closureN)self_735322)->elements[3];
c_738236.elements[4] = ((closureN)self_735322)->elements[4];
c_738236.elements[5] = ((closureN)self_735322)->elements[5];
c_738236.elements[6] = ((closureN)self_735322)->elements[6];
c_738236.elements[7] = ((closureN)self_735322)->elements[7];
c_738236.elements[8] = ((closureN)self_735322)->elements[8];


pair_type local_738521; 
return_direct_with_clo1(data,(closure)&c_738236,__lambda_1310,  set_cell_as_expr(&local_738521, ((closureN)self_735322)->elements[1]));; 
}

static void __lambda_1310(void *data, object self_735323, int argc, object *args) /* object self_735323, object c_91make_91macro_73255_731535 */
 {
 object c_91make_91macro_73255_731535 = args[0];
  
closureN_type c_738238;
object e_738513 [9];
c_738238.hdr.mark = gc_color_red;
 c_738238.hdr.grayed = 0;
c_738238.tag = closureN_tag;
 c_738238.fn = (function_type)__lambda_1309;
c_738238.num_args = 1;
c_738238.num_elements = 9;
c_738238.elements = (object *)e_738513;
c_738238.elements[0] = ((closureN)self_735323)->elements[0];
c_738238.elements[1] = c_91make_91macro_73255_731535;
c_738238.elements[2] = ((closureN)self_735323)->elements[1];
c_738238.elements[3] = ((closureN)self_735323)->elements[2];
c_738238.elements[4] = ((closureN)self_735323)->elements[3];
c_738238.elements[5] = ((closureN)self_735323)->elements[4];
c_738238.elements[6] = ((closureN)self_735323)->elements[5];
c_738238.elements[7] = ((closureN)self_735323)->elements[6];
c_738238.elements[8] = ((closureN)self_735323)->elements[8];


pair_type local_738516; 
return_direct_with_clo1(data,(closure)&c_738238,__lambda_1309,  set_cell_as_expr(&local_738516, ((closureN)self_735323)->elements[7]));; 
}

static void __lambda_1309(void *data, object self_735324, int argc, object *args) /* object self_735324, object loop_73256_731536 */
 {
 object loop_73256_731536 = args[0];
  
closureN_type c_738240;
object e_738512 [10];
c_738240.hdr.mark = gc_color_red;
 c_738240.hdr.grayed = 0;
c_738240.tag = closureN_tag;
 c_738240.fn = (function_type)__lambda_195;
c_738240.num_args = 1;
c_738240.num_elements = 10;
c_738240.elements = (object *)e_738512;
c_738240.elements[0] = ((closureN)self_735324)->elements[0];
c_738240.elements[1] = ((closureN)self_735324)->elements[1];
c_738240.elements[2] = ((closureN)self_735324)->elements[2];
c_738240.elements[3] = ((closureN)self_735324)->elements[3];
c_738240.elements[4] = ((closureN)self_735324)->elements[4];
c_738240.elements[5] = ((closureN)self_735324)->elements[5];
c_738240.elements[6] = ((closureN)self_735324)->elements[6];
c_738240.elements[7] = ((closureN)self_735324)->elements[7];
c_738240.elements[8] = loop_73256_731536;
c_738240.elements[9] = ((closureN)self_735324)->elements[8];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738240, quote_vec);; 
}

static void __lambda_195(void *data, object self_735325, int argc, object *args) /* object self_735325, object r_732406 */
 {
 object r_732406 = args[0];
  
closureN_type c_738242;
object e_738511 [10];
c_738242.hdr.mark = gc_color_red;
 c_738242.hdr.grayed = 0;
c_738242.tag = closureN_tag;
 c_738242.fn = (function_type)__lambda_196;
c_738242.num_args = 1;
c_738242.num_elements = 10;
c_738242.elements = (object *)e_738511;
c_738242.elements[0] = ((closureN)self_735325)->elements[0];
c_738242.elements[1] = ((closureN)self_735325)->elements[1];
c_738242.elements[2] = ((closureN)self_735325)->elements[2];
c_738242.elements[3] = ((closureN)self_735325)->elements[3];
c_738242.elements[4] = ((closureN)self_735325)->elements[4];
c_738242.elements[5] = ((closureN)self_735325)->elements[5];
c_738242.elements[6] = ((closureN)self_735325)->elements[6];
c_738242.elements[7] = ((closureN)self_735325)->elements[7];
c_738242.elements[8] = ((closureN)self_735325)->elements[8];
c_738242.elements[9] = ((closureN)self_735325)->elements[9];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_738242, r_732406);; 
}

static void __lambda_196(void *data, object self_735326, int argc, object *args) /* object self_735326, object r_732405 */
 {
 object r_732405 = args[0];
  
closureN_type c_738244;
object e_738507 [10];
c_738244.hdr.mark = gc_color_red;
 c_738244.hdr.grayed = 0;
c_738244.tag = closureN_tag;
 c_738244.fn = (function_type)__lambda_197;
c_738244.num_args = 1;
c_738244.num_elements = 10;
c_738244.elements = (object *)e_738507;
c_738244.elements[0] = ((closureN)self_735326)->elements[0];
c_738244.elements[1] = ((closureN)self_735326)->elements[1];
c_738244.elements[2] = ((closureN)self_735326)->elements[2];
c_738244.elements[3] = ((closureN)self_735326)->elements[3];
c_738244.elements[4] = ((closureN)self_735326)->elements[4];
c_738244.elements[5] = ((closureN)self_735326)->elements[5];
c_738244.elements[6] = ((closureN)self_735326)->elements[6];
c_738244.elements[7] = ((closureN)self_735326)->elements[7];
c_738244.elements[8] = ((closureN)self_735326)->elements[8];
c_738244.elements[9] = ((closureN)self_735326)->elements[9];



return_direct_with_clo1(data,(closure)&c_738244,__lambda_197,  Cyc_set_cell(data, ((closureN)self_735326)->elements[2], r_732405));; 
}

static void __lambda_197(void *data, object self_735327, int argc, object *args) /* object self_735327, object r_732367 */
 {

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





return_direct_with_clo1(data,(closure)&c_738246,__lambda_198,  Cyc_set_cell(data, ((closureN)self_735327)->elements[7], Cyc_bytevector_length(data, ((closureN)self_735327)->elements[4])));; 
}

static void __lambda_198(void *data, object self_735328, int argc, object *args) /* object self_735328, object r_732368 */
 {

  object r_732402;
  if( (boolean_f != ((closureN)self_735328)->elements[9]) ){ 
  object c_738250;
 alloc_string(data,c_738250, 0, 0);
char tmp_738251[] = "";
memcpy(((string_type *)c_738250)->str, tmp_738251,0);
((string_type *)c_738250)->str[0] = '\0';
  r_732402 = c_738250;
} else { 
  object c_738253;
 alloc_string(data,c_738253, 1, 1);
char tmp_738254[] = "&";
memcpy(((string_type *)c_738253)->str, tmp_738254,1);
((string_type *)c_738253)->str[1] = '\0';
  r_732402 = c_738253;}
;
closureN_type c_738256;
object e_738496 [10];
c_738256.hdr.mark = gc_color_red;
 c_738256.hdr.grayed = 0;
c_738256.tag = closureN_tag;
 c_738256.fn = (function_type)__lambda_199;
c_738256.num_args = 1;
c_738256.num_elements = 10;
c_738256.elements = (object *)e_738496;
c_738256.elements[0] = ((closureN)self_735328)->elements[0];
c_738256.elements[1] = ((closureN)self_735328)->elements[1];
c_738256.elements[2] = ((closureN)self_735328)->elements[2];
c_738256.elements[3] = ((closureN)self_735328)->elements[3];
c_738256.elements[4] = ((closureN)self_735328)->elements[4];
c_738256.elements[5] = ((closureN)self_735328)->elements[5];
c_738256.elements[6] = ((closureN)self_735328)->elements[6];
c_738256.elements[7] = ((closureN)self_735328)->elements[7];
c_738256.elements[8] = ((closureN)self_735328)->elements[8];
c_738256.elements[9] = ((closureN)self_735328)->elements[9];



return_direct_with_clo1(data,(closure)&c_738256,__lambda_199,  Cyc_set_cell(data, ((closureN)self_735328)->elements[0], r_732402));; 
}

static void __lambda_199(void *data, object self_735329, int argc, object *args) /* object self_735329, object r_732369 */
 {

  
closureN_type c_738258;
object e_738264 [1];
c_738258.hdr.mark = gc_color_red;
 c_738258.hdr.grayed = 0;
c_738258.tag = closureN_tag;
 c_738258.fn = (function_type)__lambda_200;
c_738258.num_args = 0;
c_738258.num_elements = 1;
c_738258.elements = (object *)e_738264;
c_738258.elements[0] = ((closureN)self_735329)->elements[9];


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

return_direct_with_clo1(data,(closure)&c_738258,__lambda_200,  &c_738265);; 
}

static void __lambda_201(void *data, object self_735330, int argc, object *args) /* object self_735330, object r_732400 */
 {
 object r_732400 = args[0];
  
closureN_type c_738267;
object e_738491 [10];
c_738267.hdr.mark = gc_color_red;
 c_738267.hdr.grayed = 0;
c_738267.tag = closureN_tag;
 c_738267.fn = (function_type)__lambda_202;
c_738267.num_args = 1;
c_738267.num_elements = 10;
c_738267.elements = (object *)e_738491;
c_738267.elements[0] = ((closureN)self_735330)->elements[0];
c_738267.elements[1] = ((closureN)self_735330)->elements[1];
c_738267.elements[2] = ((closureN)self_735330)->elements[2];
c_738267.elements[3] = ((closureN)self_735330)->elements[3];
c_738267.elements[4] = ((closureN)self_735330)->elements[4];
c_738267.elements[5] = ((closureN)self_735330)->elements[5];
c_738267.elements[6] = ((closureN)self_735330)->elements[6];
c_738267.elements[7] = ((closureN)self_735330)->elements[7];
c_738267.elements[8] = ((closureN)self_735330)->elements[8];
c_738267.elements[9] = ((closureN)self_735330)->elements[9];



return_direct_with_clo1(data,(closure)&c_738267,__lambda_202,  Cyc_set_cell(data, ((closureN)self_735330)->elements[3], r_732400));; 
}

static void __lambda_202(void *data, object self_735331, int argc, object *args) /* object self_735331, object r_732370 */
 {

  
closureN_type c_738269;
object e_738275 [1];
c_738269.hdr.mark = gc_color_red;
 c_738269.hdr.grayed = 0;
c_738269.tag = closureN_tag;
 c_738269.fn = (function_type)__lambda_203;
c_738269.num_args = 0;
c_738269.num_elements = 1;
c_738269.elements = (object *)e_738275;
c_738269.elements[0] = ((closureN)self_735331)->elements[9];


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

return_direct_with_clo1(data,(closure)&c_738269,__lambda_203,  &c_738276);; 
}

static void __lambda_204(void *data, object self_735332, int argc, object *args) /* object self_735332, object r_732398 */
 {
 object r_732398 = args[0];
  
closureN_type c_738278;
object e_738486 [10];
c_738278.hdr.mark = gc_color_red;
 c_738278.hdr.grayed = 0;
c_738278.tag = closureN_tag;
 c_738278.fn = (function_type)__lambda_205;
c_738278.num_args = 1;
c_738278.num_elements = 10;
c_738278.elements = (object *)e_738486;
c_738278.elements[0] = ((closureN)self_735332)->elements[0];
c_738278.elements[1] = ((closureN)self_735332)->elements[1];
c_738278.elements[2] = ((closureN)self_735332)->elements[2];
c_738278.elements[3] = ((closureN)self_735332)->elements[3];
c_738278.elements[4] = ((closureN)self_735332)->elements[4];
c_738278.elements[5] = ((closureN)self_735332)->elements[5];
c_738278.elements[6] = ((closureN)self_735332)->elements[6];
c_738278.elements[7] = ((closureN)self_735332)->elements[7];
c_738278.elements[8] = ((closureN)self_735332)->elements[8];
c_738278.elements[9] = ((closureN)self_735332)->elements[9];



return_direct_with_clo1(data,(closure)&c_738278,__lambda_205,  Cyc_set_cell(data, ((closureN)self_735332)->elements[1], r_732398));; 
}

static void __lambda_205(void *data, object self_735333, int argc, object *args) /* object self_735333, object r_732371 */
 {

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


closureN_type c_738419;
object e_738485 [5];
c_738419.hdr.mark = gc_color_red;
 c_738419.hdr.grayed = 0;
c_738419.tag = closureN_tag;
 c_738419.fn = (function_type)__lambda_216;
c_738419.num_args = 2;
c_738419.num_elements = 5;
c_738419.elements = (object *)e_738485;
c_738419.elements[0] = ((closureN)self_735333)->elements[2];
c_738419.elements[1] = ((closureN)self_735333)->elements[3];
c_738419.elements[2] = ((closureN)self_735333)->elements[4];
c_738419.elements[3] = ((closureN)self_735333)->elements[7];
c_738419.elements[4] = ((closureN)self_735333)->elements[8];

return_direct_with_clo1(data,(closure)&c_738280,__lambda_206,  &c_738419);; 
}

static void __lambda_216(void *data, object self_735334, int argc, object *args) /* object self_735334, object k_732386, object i_73257_731537, object code_73258_731538 */
 {
 object k_732386 = args[0]; object i_73257_731537 = args[1]; object code_73258_731538 = args[2];
    
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73257_731537, car(((closureN)self_735334)->elements[3]))) ){ 
  return_direct_with_clo1(data,  k_732386, (((closure)  k_732386)->fn),  code_73258_731538);
} else { 
  
closureN_type c_738427;
object e_738481 [6];
c_738427.hdr.mark = gc_color_red;
 c_738427.hdr.grayed = 0;
c_738427.tag = closureN_tag;
 c_738427.fn = (function_type)__lambda_217;
c_738427.num_args = 1;
c_738427.num_elements = 6;
c_738427.elements = (object *)e_738481;
c_738427.elements[0] = code_73258_731538;
c_738427.elements[1] = ((closureN)self_735334)->elements[0];
c_738427.elements[2] = ((closureN)self_735334)->elements[1];
c_738427.elements[3] = i_73257_731537;
c_738427.elements[4] = k_732386;
c_738427.elements[5] = ((closureN)self_735334)->elements[4];



return_closcall1(data,(closure)&c_738427,  Cyc_bytevector_u8_ref(data, ((closureN)self_735334)->elements[2], i_73257_731537));}
;; 
}

static void __lambda_217(void *data, object self_735335, int argc, object *args) /* object self_735335, object r_732397 */
 {
 object r_732397 = args[0];
  
closureN_type c_738429;
object e_738477 [6];
c_738429.hdr.mark = gc_color_red;
 c_738429.hdr.grayed = 0;
c_738429.tag = closureN_tag;
 c_738429.fn = (function_type)__lambda_218;
c_738429.num_args = 1;
c_738429.num_elements = 6;
c_738429.elements = (object *)e_738477;
c_738429.elements[0] = ((closureN)self_735335)->elements[0];
c_738429.elements[1] = ((closureN)self_735335)->elements[1];
c_738429.elements[2] = ((closureN)self_735335)->elements[2];
c_738429.elements[3] = ((closureN)self_735335)->elements[3];
c_738429.elements[4] = ((closureN)self_735335)->elements[4];
c_738429.elements[5] = ((closureN)self_735335)->elements[5];


object c_738480 = Cyc_number2string2(data,(closure)&c_738429,1,r_732397);
return_closcall1(data,(closure)&c_738429,  c_738480);; 
}

static void __lambda_218(void *data, object self_735336, int argc, object *args) /* object self_735336, object byte_91val_73259_731539 */
 {
 object byte_91val_73259_731539 = args[0];
  
closureN_type c_738431;
object e_738472 [7];
c_738431.hdr.mark = gc_color_red;
 c_738431.hdr.grayed = 0;
c_738431.tag = closureN_tag;
 c_738431.fn = (function_type)__lambda_219;
c_738431.num_args = 1;
c_738431.num_elements = 7;
c_738431.elements = (object *)e_738472;
c_738431.elements[0] = byte_91val_73259_731539;
c_738431.elements[1] = ((closureN)self_735336)->elements[0];
c_738431.elements[2] = ((closureN)self_735336)->elements[1];
c_738431.elements[3] = ((closureN)self_735336)->elements[2];
c_738431.elements[4] = ((closureN)self_735336)->elements[3];
c_738431.elements[5] = ((closureN)self_735336)->elements[4];
c_738431.elements[6] = ((closureN)self_735336)->elements[5];


object c_738475 = Cyc_number2string2(data,(closure)&c_738431,1,((closureN)self_735336)->elements[3]);
return_closcall1(data,(closure)&c_738431,  c_738475);; 
}

static void __lambda_219(void *data, object self_735337, int argc, object *args) /* object self_735337, object r_732396_734197_734202 */
 {
 object r_732396_734197_734202 = args[0];
  
closureN_type c_738433;
object e_738458 [4];
c_738433.hdr.mark = gc_color_red;
 c_738433.hdr.grayed = 0;
c_738433.tag = closureN_tag;
 c_738433.fn = (function_type)__lambda_220;
c_738433.num_args = 1;
c_738433.num_elements = 4;
c_738433.elements = (object *)e_738458;
c_738433.elements[0] = ((closureN)self_735337)->elements[1];
c_738433.elements[1] = ((closureN)self_735337)->elements[4];
c_738433.elements[2] = ((closureN)self_735337)->elements[5];
c_738433.elements[3] = ((closureN)self_735337)->elements[6];






make_utf8_string_with_len(c_738468, "data[", 5, 5);

make_utf8_string_with_len(c_738469, "] = (unsigned char)", 19, 19);

make_utf8_string_with_len(c_738471, ";", 1, 1);

object c_738461 = Cyc_string_append(data,(closure)&c_738433,7,car(((closureN)self_735337)->elements[2]), car(((closureN)self_735337)->elements[3]), &c_738468, r_732396_734197_734202, &c_738469, ((closureN)self_735337)->elements[0], &c_738471);
return_closcall1(data,(closure)&c_738433,  c_738461);; 
}

static void __lambda_220(void *data, object self_735338, int argc, object *args) /* object self_735338, object r_732395_734198_734203 */
 {
 object r_732395_734198_734203 = args[0];
  
closureN_type c_738435;
object e_738451 [4];
c_738435.hdr.mark = gc_color_red;
 c_738435.hdr.grayed = 0;
c_738435.tag = closureN_tag;
 c_738435.fn = (function_type)__lambda_221;
c_738435.num_args = 1;
c_738435.num_elements = 4;
c_738435.elements = (object *)e_738451;
c_738435.elements[0] = ((closureN)self_735338)->elements[0];
c_738435.elements[1] = ((closureN)self_735338)->elements[1];
c_738435.elements[2] = ((closureN)self_735338)->elements[2];
c_738435.elements[3] = ((closureN)self_735338)->elements[3];




pair_type local_738457; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_738435, Cyc_cadr(data, ((closureN)self_735338)->elements[0]), set_cell_as_expr(&local_738457, r_732395_734198_734203));; 
}

static void __lambda_221(void *data, object self_735339, int argc, object *args) /* object self_735339, object r_732392_734199_734204 */
 {
 object r_732392_734199_734204 = args[0];
  


complex_num_type local_738443; 

list_2_type local_738447; 


return_closcall3(data,  car(((closureN)self_735339)->elements[3]),  ((closureN)self_735339)->elements[2], Cyc_fast_sum(data,&local_738443, ((closureN)self_735339)->elements[1], obj_int2obj(1)), Cyc_fast_list_2(&local_738447, Cyc_car(data, ((closureN)self_735339)->elements[0]), r_732392_734199_734204));; 
}

static void __lambda_206(void *data, object self_735340, int argc, object *args) /* object self_735340, object r_732385 */
 {
 object r_732385 = args[0];
  
closureN_type c_738282;
object e_738414 [9];
c_738282.hdr.mark = gc_color_red;
 c_738282.hdr.grayed = 0;
c_738282.tag = closureN_tag;
 c_738282.fn = (function_type)__lambda_207;
c_738282.num_args = 1;
c_738282.num_elements = 9;
c_738282.elements = (object *)e_738414;
c_738282.elements[0] = ((closureN)self_735340)->elements[0];
c_738282.elements[1] = ((closureN)self_735340)->elements[1];
c_738282.elements[2] = ((closureN)self_735340)->elements[2];
c_738282.elements[3] = ((closureN)self_735340)->elements[3];
c_738282.elements[4] = ((closureN)self_735340)->elements[4];
c_738282.elements[5] = ((closureN)self_735340)->elements[5];
c_738282.elements[6] = ((closureN)self_735340)->elements[6];
c_738282.elements[7] = ((closureN)self_735340)->elements[7];
c_738282.elements[8] = ((closureN)self_735340)->elements[8];



return_direct_with_clo1(data,(closure)&c_738282,__lambda_207,  Cyc_set_cell(data, ((closureN)self_735340)->elements[7], r_732385));; 
}

static void __lambda_207(void *data, object self_735341, int argc, object *args) /* object self_735341, object r_732372 */
 {

    complex_num_type local_738285; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_738285, car(((closureN)self_735341)->elements[6]))) ){ 
  
closureN_type c_738290;
object e_738322 [5];
c_738290.hdr.mark = gc_color_red;
 c_738290.hdr.grayed = 0;
c_738290.tag = closureN_tag;
 c_738290.fn = (function_type)__lambda_208;
c_738290.num_args = 1;
c_738290.num_elements = 5;
c_738290.elements = (object *)e_738322;
c_738290.elements[0] = ((closureN)self_735341)->elements[1];
c_738290.elements[1] = ((closureN)self_735341)->elements[2];
c_738290.elements[2] = ((closureN)self_735341)->elements[4];
c_738290.elements[3] = ((closureN)self_735341)->elements[5];
c_738290.elements[4] = ((closureN)self_735341)->elements[8];






object c_738325 = Cyc_string_append(data,(closure)&c_738290,2,car(((closureN)self_735341)->elements[0]), car(((closureN)self_735341)->elements[2]));
return_closcall1(data,(closure)&c_738290,  c_738325);
} else { 
  
closureN_type c_738333;
object e_738404 [8];
c_738333.hdr.mark = gc_color_red;
 c_738333.hdr.grayed = 0;
c_738333.tag = closureN_tag;
 c_738333.fn = (function_type)__lambda_211;
c_738333.num_args = 1;
c_738333.num_elements = 8;
c_738333.elements = (object *)e_738404;
c_738333.elements[0] = ((closureN)self_735341)->elements[1];
c_738333.elements[1] = ((closureN)self_735341)->elements[2];
c_738333.elements[2] = ((closureN)self_735341)->elements[3];
c_738333.elements[3] = ((closureN)self_735341)->elements[4];
c_738333.elements[4] = ((closureN)self_735341)->elements[5];
c_738333.elements[5] = ((closureN)self_735341)->elements[6];
c_738333.elements[6] = ((closureN)self_735341)->elements[7];
c_738333.elements[7] = ((closureN)self_735341)->elements[8];






object c_738407 = Cyc_string_append(data,(closure)&c_738333,2,car(((closureN)self_735341)->elements[0]), car(((closureN)self_735341)->elements[2]));
return_closcall1(data,(closure)&c_738333,  c_738407);}
;; 
}

static void __lambda_211(void *data, object self_735345, int argc, object *args) /* object self_735345, object r_732379 */
 {
 object r_732379 = args[0];
  
closureN_type c_738335;
object e_738397 [9];
c_738335.hdr.mark = gc_color_red;
 c_738335.hdr.grayed = 0;
c_738335.tag = closureN_tag;
 c_738335.fn = (function_type)__lambda_212;
c_738335.num_args = 1;
c_738335.num_elements = 9;
c_738335.elements = (object *)e_738397;
c_738335.elements[0] = ((closureN)self_735345)->elements[0];
c_738335.elements[1] = ((closureN)self_735345)->elements[1];
c_738335.elements[2] = ((closureN)self_735345)->elements[2];
c_738335.elements[3] = ((closureN)self_735345)->elements[3];
c_738335.elements[4] = ((closureN)self_735345)->elements[4];
c_738335.elements[5] = ((closureN)self_735345)->elements[5];
c_738335.elements[6] = ((closureN)self_735345)->elements[6];
c_738335.elements[7] = r_732379;
c_738335.elements[8] = ((closureN)self_735345)->elements[7];




object c_738400 = Cyc_number2string2(data,(closure)&c_738335,1,car(((closureN)self_735345)->elements[5]));
return_closcall1(data,(closure)&c_738335,  c_738400);; 
}

static void __lambda_212(void *data, object self_735346, int argc, object *args) /* object self_735346, object r_732382 */
 {
 object r_732382 = args[0];
  
closureN_type c_738337;
object e_738390 [9];
c_738337.hdr.mark = gc_color_red;
 c_738337.hdr.grayed = 0;
c_738337.tag = closureN_tag;
 c_738337.fn = (function_type)__lambda_213;
c_738337.num_args = 1;
c_738337.num_elements = 9;
c_738337.elements = (object *)e_738390;
c_738337.elements[0] = ((closureN)self_735346)->elements[0];
c_738337.elements[1] = ((closureN)self_735346)->elements[1];
c_738337.elements[2] = ((closureN)self_735346)->elements[2];
c_738337.elements[3] = ((closureN)self_735346)->elements[3];
c_738337.elements[4] = ((closureN)self_735346)->elements[4];
c_738337.elements[5] = ((closureN)self_735346)->elements[6];
c_738337.elements[6] = ((closureN)self_735346)->elements[7];
c_738337.elements[7] = r_732382;
c_738337.elements[8] = ((closureN)self_735346)->elements[8];




object c_738393 = Cyc_number2string2(data,(closure)&c_738337,1,car(((closureN)self_735346)->elements[5]));
return_closcall1(data,(closure)&c_738337,  c_738393);; 
}

static void __lambda_213(void *data, object self_735347, int argc, object *args) /* object self_735347, object r_732383 */
 {
 object r_732383 = args[0];
  
closureN_type c_738339;
object e_738384 [8];
c_738339.hdr.mark = gc_color_red;
 c_738339.hdr.grayed = 0;
c_738339.tag = closureN_tag;
 c_738339.fn = (function_type)__lambda_214;
c_738339.num_args = 1;
c_738339.num_elements = 8;
c_738339.elements = (object *)e_738384;
c_738339.elements[0] = ((closureN)self_735347)->elements[0];
c_738339.elements[1] = ((closureN)self_735347)->elements[1];
c_738339.elements[2] = ((closureN)self_735347)->elements[2];
c_738339.elements[3] = ((closureN)self_735347)->elements[4];
c_738339.elements[4] = ((closureN)self_735347)->elements[5];
c_738339.elements[5] = ((closureN)self_735347)->elements[6];
c_738339.elements[6] = ((closureN)self_735347)->elements[7];
c_738339.elements[7] = r_732383;



return_direct_with_clo4(data,  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen, (((closure)  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen)->fn),  &c_738339, car(((closureN)self_735347)->elements[1]), ((closureN)self_735347)->elements[8], ((closureN)self_735347)->elements[3]);; 
}

static void __lambda_214(void *data, object self_735348, int argc, object *args) /* object self_735348, object r_732384 */
 {
 object r_732384 = args[0];
  
closureN_type c_738341;
object e_738354 [3];
c_738341.hdr.mark = gc_color_red;
 c_738341.hdr.grayed = 0;
c_738341.tag = closureN_tag;
 c_738341.fn = (function_type)__lambda_215;
c_738341.num_args = 1;
c_738341.num_elements = 3;
c_738341.elements = (object *)e_738354;
c_738341.elements[0] = ((closureN)self_735348)->elements[3];
c_738341.elements[1] = ((closureN)self_735348)->elements[4];
c_738341.elements[2] = ((closureN)self_735348)->elements[5];




make_utf8_string_with_len(c_738361, "(", 1, 1);



make_utf8_string_with_len(c_738365, ");", 2, 2);





make_utf8_string_with_len(c_738372, "len = ", 6, 6);

make_utf8_string_with_len(c_738374, ";", 1, 1);





make_utf8_string_with_len(c_738381, "data = alloca(sizeof(char) * ", 29, 29);

make_utf8_string_with_len(c_738383, ");", 2, 2);

object c_738357 = Cyc_string_append(data,(closure)&c_738341,15,car(((closureN)self_735348)->elements[0]), &c_738361, car(((closureN)self_735348)->elements[1]), &c_738365, car(((closureN)self_735348)->elements[1]), car(((closureN)self_735348)->elements[2]), &c_738372, ((closureN)self_735348)->elements[6], &c_738374, car(((closureN)self_735348)->elements[1]), car(((closureN)self_735348)->elements[2]), &c_738381, ((closureN)self_735348)->elements[7], &c_738383, r_732384);
return_closcall1(data,(closure)&c_738341,  c_738357);; 
}

static void __lambda_215(void *data, object self_735349, int argc, object *args) /* object self_735349, object r_732381 */
 {
 object r_732381 = args[0];
  


list_2_type local_738349; 

pair_type local_738353; 
return_closcall3(data,  car(((closureN)self_735349)->elements[1]),  ((closureN)self_735349)->elements[0], obj_int2obj(0), Cyc_fast_list_2(&local_738349, ((closureN)self_735349)->elements[2], set_cell_as_expr(&local_738353, r_732381)));; 
}

static void __lambda_208(void *data, object self_735342, int argc, object *args) /* object self_735342, object r_732374 */
 {
 object r_732374 = args[0];
  
closureN_type c_738292;
object e_738316 [4];
c_738292.hdr.mark = gc_color_red;
 c_738292.hdr.grayed = 0;
c_738292.tag = closureN_tag;
 c_738292.fn = (function_type)__lambda_209;
c_738292.num_args = 1;
c_738292.num_elements = 4;
c_738292.elements = (object *)e_738316;
c_738292.elements[0] = ((closureN)self_735342)->elements[0];
c_738292.elements[1] = ((closureN)self_735342)->elements[1];
c_738292.elements[2] = ((closureN)self_735342)->elements[3];
c_738292.elements[3] = r_732374;



return_direct_with_clo4(data,  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen, (((closure)  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen)->fn),  &c_738292, car(((closureN)self_735342)->elements[1]), ((closureN)self_735342)->elements[4], ((closureN)self_735342)->elements[2]);; 
}

static void __lambda_209(void *data, object self_735343, int argc, object *args) /* object self_735343, object r_732377 */
 {
 object r_732377 = args[0];
  
closureN_type c_738294;
object e_738304 [2];
c_738294.hdr.mark = gc_color_red;
 c_738294.hdr.grayed = 0;
c_738294.tag = closureN_tag;
 c_738294.fn = (function_type)__lambda_210;
c_738294.num_args = 1;
c_738294.num_elements = 2;
c_738294.elements = (object *)e_738304;
c_738294.elements[0] = ((closureN)self_735343)->elements[2];
c_738294.elements[1] = ((closureN)self_735343)->elements[3];




make_utf8_string_with_len(c_738311, "(", 1, 1);



make_utf8_string_with_len(c_738315, ");", 2, 2);

object c_738307 = Cyc_string_append(data,(closure)&c_738294,5,car(((closureN)self_735343)->elements[0]), &c_738311, car(((closureN)self_735343)->elements[1]), &c_738315, r_732377);
return_closcall1(data,(closure)&c_738294,  c_738307);; 
}

static void __lambda_210(void *data, object self_735344, int argc, object *args) /* object self_735344, object r_732376 */
 {
 object r_732376 = args[0];
  
list_2_type local_738299; 

pair_type local_738303; 
return_direct_with_clo1(data,  ((closureN)self_735344)->elements[0], (((closure)  ((closureN)self_735344)->elements[0])->fn),  Cyc_fast_list_2(&local_738299, ((closureN)self_735344)->elements[1], set_cell_as_expr(&local_738303, r_732376)));; 
}

static void __lambda_203(void *data, object self_735350, int argc, object *args) /* object self_735350, object k_732399 */
 {
 object k_732399 = args[0];
  if( (boolean_f != ((closureN)self_735350)->elements[0]) ){ 
  
make_utf8_string_with_len(c_738272, "alloca_empty_bytevector", 23, 23);
return_direct_with_clo1(data,  k_732399,__lambda_204,  &c_738272);
} else { 
  
make_utf8_string_with_len(c_738274, "make_empty_bytevector", 21, 21);
return_direct_with_clo1(data,  k_732399,__lambda_204,  &c_738274);}
;; 
}

static void __lambda_200(void *data, object self_735351, int argc, object *args) /* object self_735351, object k_732401 */
 {
 object k_732401 = args[0];
  if( (boolean_f != ((closureN)self_735351)->elements[0]) ){ 
  
make_utf8_string_with_len(c_738261, "->", 2, 2);
return_direct_with_clo1(data,  k_732401,__lambda_201,  &c_738261);
} else { 
  
make_utf8_string_with_len(c_738263, ".", 1, 1);
return_direct_with_clo1(data,  k_732401,__lambda_201,  &c_738263);}
;; 
}

static void __lambda_158(void *data, object _, int argc, object *args) /* closure _,object k_732312, object exp_73229_731513, object use_91alloca_73230_731514, object immutable_73231_731515 */
 {
object k_732312 = args[0]; object exp_73229_731513 = args[1]; object use_91alloca_73230_731514 = args[2]; object immutable_73231_731515 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-vector");

closureN_type c_737832;
object e_738223 [4];
c_737832.hdr.mark = gc_color_red;
 c_737832.hdr.grayed = 0;
c_737832.tag = closureN_tag;
 c_737832.fn = (function_type)__lambda_159;
c_737832.num_args = 8;
c_737832.num_elements = 4;
c_737832.elements = (object *)e_738223;
c_737832.elements[0] = exp_73229_731513;
c_737832.elements[1] = immutable_73231_731515;
c_737832.elements[2] = k_732312;
c_737832.elements[3] = use_91alloca_73230_731514;

return_direct_with_clo8(data,(closure)&c_737832,__lambda_159,  boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_159(void *data, object self_735276, int argc, object *args) /* object self_735276, object cvar_91name_73232_731516, object len_73233_731517, object ev_91name_73234_731518, object elem_91decl_73235_731519, object addr_91op_73236_731520, object deref_91op_73237_731521, object c_91make_91macro_73238_731522, object loop_73239_731523 */
 {
 object cvar_91name_73232_731516 = args[0]; object len_73233_731517 = args[1]; object ev_91name_73234_731518 = args[2]; object elem_91decl_73235_731519 = args[3]; object addr_91op_73236_731520 = args[4]; object deref_91op_73237_731521 = args[5]; object c_91make_91macro_73238_731522 = args[6]; object loop_73239_731523 = args[7];
  
closureN_type c_737834;
object e_738219 [11];
c_737834.hdr.mark = gc_color_red;
 c_737834.hdr.grayed = 0;
c_737834.tag = closureN_tag;
 c_737834.fn = (function_type)__lambda_1308;
c_737834.num_args = 1;
c_737834.num_elements = 11;
c_737834.elements = (object *)e_738219;
c_737834.elements[0] = addr_91op_73236_731520;
c_737834.elements[1] = c_91make_91macro_73238_731522;
c_737834.elements[2] = deref_91op_73237_731521;
c_737834.elements[3] = elem_91decl_73235_731519;
c_737834.elements[4] = ev_91name_73234_731518;
c_737834.elements[5] = ((closureN)self_735276)->elements[0];
c_737834.elements[6] = ((closureN)self_735276)->elements[1];
c_737834.elements[7] = ((closureN)self_735276)->elements[2];
c_737834.elements[8] = len_73233_731517;
c_737834.elements[9] = loop_73239_731523;
c_737834.elements[10] = ((closureN)self_735276)->elements[3];


pair_type local_738222; 
return_direct_with_clo1(data,(closure)&c_737834,__lambda_1308,  set_cell_as_expr(&local_738222, cvar_91name_73232_731516));; 
}

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


pair_type local_738217; 
return_direct_with_clo1(data,(closure)&c_737836,__lambda_1307,  set_cell_as_expr(&local_738217, ((closureN)self_735277)->elements[8]));; 
}

static void __lambda_1307(void *data, object self_735278, int argc, object *args) /* object self_735278, object len_73233_731517 */
 {
 object len_73233_731517 = args[0];
  
closureN_type c_737838;
object e_738209 [11];
c_737838.hdr.mark = gc_color_red;
 c_737838.hdr.grayed = 0;
c_737838.tag = closureN_tag;
 c_737838.fn = (function_type)__lambda_1306;
c_737838.num_args = 1;
c_737838.num_elements = 11;
c_737838.elements = (object *)e_738209;
c_737838.elements[0] = ((closureN)self_735278)->elements[0];
c_737838.elements[1] = ((closureN)self_735278)->elements[1];
c_737838.elements[2] = ((closureN)self_735278)->elements[2];
c_737838.elements[3] = ((closureN)self_735278)->elements[3];
c_737838.elements[4] = ((closureN)self_735278)->elements[4];
c_737838.elements[5] = ((closureN)self_735278)->elements[6];
c_737838.elements[6] = ((closureN)self_735278)->elements[7];
c_737838.elements[7] = ((closureN)self_735278)->elements[8];
c_737838.elements[8] = len_73233_731517;
c_737838.elements[9] = ((closureN)self_735278)->elements[9];
c_737838.elements[10] = ((closureN)self_735278)->elements[10];


pair_type local_738212; 
return_direct_with_clo1(data,(closure)&c_737838,__lambda_1306,  set_cell_as_expr(&local_738212, ((closureN)self_735278)->elements[5]));; 
}

static void __lambda_1306(void *data, object self_735279, int argc, object *args) /* object self_735279, object ev_91name_73234_731518 */
 {
 object ev_91name_73234_731518 = args[0];
  
closureN_type c_737840;
object e_738204 [11];
c_737840.hdr.mark = gc_color_red;
 c_737840.hdr.grayed = 0;
c_737840.tag = closureN_tag;
 c_737840.fn = (function_type)__lambda_1305;
c_737840.num_args = 1;
c_737840.num_elements = 11;
c_737840.elements = (object *)e_738204;
c_737840.elements[0] = ((closureN)self_735279)->elements[0];
c_737840.elements[1] = ((closureN)self_735279)->elements[1];
c_737840.elements[2] = ((closureN)self_735279)->elements[2];
c_737840.elements[3] = ((closureN)self_735279)->elements[3];
c_737840.elements[4] = ev_91name_73234_731518;
c_737840.elements[5] = ((closureN)self_735279)->elements[5];
c_737840.elements[6] = ((closureN)self_735279)->elements[6];
c_737840.elements[7] = ((closureN)self_735279)->elements[7];
c_737840.elements[8] = ((closureN)self_735279)->elements[8];
c_737840.elements[9] = ((closureN)self_735279)->elements[9];
c_737840.elements[10] = ((closureN)self_735279)->elements[10];


pair_type local_738207; 
return_direct_with_clo1(data,(closure)&c_737840,__lambda_1305,  set_cell_as_expr(&local_738207, ((closureN)self_735279)->elements[4]));; 
}

static void __lambda_1305(void *data, object self_735280, int argc, object *args) /* object self_735280, object elem_91decl_73235_731519 */
 {
 object elem_91decl_73235_731519 = args[0];
  
closureN_type c_737842;
object e_738199 [11];
c_737842.hdr.mark = gc_color_red;
 c_737842.hdr.grayed = 0;
c_737842.tag = closureN_tag;
 c_737842.fn = (function_type)__lambda_1304;
c_737842.num_args = 1;
c_737842.num_elements = 11;
c_737842.elements = (object *)e_738199;
c_737842.elements[0] = ((closureN)self_735280)->elements[1];
c_737842.elements[1] = ((closureN)self_735280)->elements[2];
c_737842.elements[2] = ((closureN)self_735280)->elements[3];
c_737842.elements[3] = elem_91decl_73235_731519;
c_737842.elements[4] = ((closureN)self_735280)->elements[4];
c_737842.elements[5] = ((closureN)self_735280)->elements[5];
c_737842.elements[6] = ((closureN)self_735280)->elements[6];
c_737842.elements[7] = ((closureN)self_735280)->elements[7];
c_737842.elements[8] = ((closureN)self_735280)->elements[8];
c_737842.elements[9] = ((closureN)self_735280)->elements[9];
c_737842.elements[10] = ((closureN)self_735280)->elements[10];


pair_type local_738202; 
return_direct_with_clo1(data,(closure)&c_737842,__lambda_1304,  set_cell_as_expr(&local_738202, ((closureN)self_735280)->elements[0]));; 
}

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


pair_type local_738197; 
return_direct_with_clo1(data,(closure)&c_737844,__lambda_1303,  set_cell_as_expr(&local_738197, ((closureN)self_735281)->elements[2]));; 
}

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


pair_type local_738192; 
return_direct_with_clo1(data,(closure)&c_737846,__lambda_1302,  set_cell_as_expr(&local_738192, ((closureN)self_735282)->elements[1]));; 
}

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


pair_type local_738187; 
return_direct_with_clo1(data,(closure)&c_737848,__lambda_1301,  set_cell_as_expr(&local_738187, ((closureN)self_735283)->elements[9]));; 
}

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

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_737850, quote_vec);; 
}

static void __lambda_160(void *data, object self_735285, int argc, object *args) /* object self_735285, object r_732362 */
 {
 object r_732362 = args[0];
  
closureN_type c_737852;
object e_738182 [12];
c_737852.hdr.mark = gc_color_red;
 c_737852.hdr.grayed = 0;
c_737852.tag = closureN_tag;
 c_737852.fn = (function_type)__lambda_161;
c_737852.num_args = 1;
c_737852.num_elements = 12;
c_737852.elements = (object *)e_738182;
c_737852.elements[0] = ((closureN)self_735285)->elements[0];
c_737852.elements[1] = ((closureN)self_735285)->elements[1];
c_737852.elements[2] = ((closureN)self_735285)->elements[2];
c_737852.elements[3] = ((closureN)self_735285)->elements[3];
c_737852.elements[4] = ((closureN)self_735285)->elements[4];
c_737852.elements[5] = ((closureN)self_735285)->elements[5];
c_737852.elements[6] = ((closureN)self_735285)->elements[6];
c_737852.elements[7] = ((closureN)self_735285)->elements[7];
c_737852.elements[8] = ((closureN)self_735285)->elements[8];
c_737852.elements[9] = ((closureN)self_735285)->elements[9];
c_737852.elements[10] = ((closureN)self_735285)->elements[10];
c_737852.elements[11] = ((closureN)self_735285)->elements[11];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_737852, r_732362);; 
}

static void __lambda_161(void *data, object self_735286, int argc, object *args) /* object self_735286, object r_732361 */
 {
 object r_732361 = args[0];
  
closureN_type c_737854;
object e_738178 [12];
c_737854.hdr.mark = gc_color_red;
 c_737854.hdr.grayed = 0;
c_737854.tag = closureN_tag;
 c_737854.fn = (function_type)__lambda_162;
c_737854.num_args = 1;
c_737854.num_elements = 12;
c_737854.elements = (object *)e_738178;
c_737854.elements[0] = ((closureN)self_735286)->elements[0];
c_737854.elements[1] = ((closureN)self_735286)->elements[1];
c_737854.elements[2] = ((closureN)self_735286)->elements[2];
c_737854.elements[3] = ((closureN)self_735286)->elements[3];
c_737854.elements[4] = ((closureN)self_735286)->elements[4];
c_737854.elements[5] = ((closureN)self_735286)->elements[5];
c_737854.elements[6] = ((closureN)self_735286)->elements[6];
c_737854.elements[7] = ((closureN)self_735286)->elements[7];
c_737854.elements[8] = ((closureN)self_735286)->elements[8];
c_737854.elements[9] = ((closureN)self_735286)->elements[9];
c_737854.elements[10] = ((closureN)self_735286)->elements[10];
c_737854.elements[11] = ((closureN)self_735286)->elements[11];



return_direct_with_clo1(data,(closure)&c_737854,__lambda_162,  Cyc_set_cell(data, ((closureN)self_735286)->elements[2], r_732361));; 
}

static void __lambda_162(void *data, object self_735287, int argc, object *args) /* object self_735287, object r_732313 */
 {

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





return_direct_with_clo1(data,(closure)&c_737856,__lambda_163,  Cyc_set_cell(data, ((closureN)self_735287)->elements[9], Cyc_vector_length(data, ((closureN)self_735287)->elements[6])));; 
}

static void __lambda_163(void *data, object self_735288, int argc, object *args) /* object self_735288, object r_732314 */
 {

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

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_737858, quote_e);; 
}

static void __lambda_164(void *data, object self_735289, int argc, object *args) /* object self_735289, object r_732358 */
 {
 object r_732358 = args[0];
  
closureN_type c_737860;
object e_738169 [12];
c_737860.hdr.mark = gc_color_red;
 c_737860.hdr.grayed = 0;
c_737860.tag = closureN_tag;
 c_737860.fn = (function_type)__lambda_165;
c_737860.num_args = 1;
c_737860.num_elements = 12;
c_737860.elements = (object *)e_738169;
c_737860.elements[0] = ((closureN)self_735289)->elements[0];
c_737860.elements[1] = ((closureN)self_735289)->elements[1];
c_737860.elements[2] = ((closureN)self_735289)->elements[2];
c_737860.elements[3] = ((closureN)self_735289)->elements[3];
c_737860.elements[4] = ((closureN)self_735289)->elements[4];
c_737860.elements[5] = ((closureN)self_735289)->elements[5];
c_737860.elements[6] = ((closureN)self_735289)->elements[6];
c_737860.elements[7] = ((closureN)self_735289)->elements[7];
c_737860.elements[8] = ((closureN)self_735289)->elements[8];
c_737860.elements[9] = ((closureN)self_735289)->elements[9];
c_737860.elements[10] = ((closureN)self_735289)->elements[10];
c_737860.elements[11] = ((closureN)self_735289)->elements[11];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_737860, r_732358);; 
}

static void __lambda_165(void *data, object self_735290, int argc, object *args) /* object self_735290, object r_732357 */
 {
 object r_732357 = args[0];
  
closureN_type c_737862;
object e_738165 [12];
c_737862.hdr.mark = gc_color_red;
 c_737862.hdr.grayed = 0;
c_737862.tag = closureN_tag;
 c_737862.fn = (function_type)__lambda_166;
c_737862.num_args = 1;
c_737862.num_elements = 12;
c_737862.elements = (object *)e_738165;
c_737862.elements[0] = ((closureN)self_735290)->elements[0];
c_737862.elements[1] = ((closureN)self_735290)->elements[1];
c_737862.elements[2] = ((closureN)self_735290)->elements[2];
c_737862.elements[3] = ((closureN)self_735290)->elements[3];
c_737862.elements[4] = ((closureN)self_735290)->elements[4];
c_737862.elements[5] = ((closureN)self_735290)->elements[5];
c_737862.elements[6] = ((closureN)self_735290)->elements[6];
c_737862.elements[7] = ((closureN)self_735290)->elements[7];
c_737862.elements[8] = ((closureN)self_735290)->elements[8];
c_737862.elements[9] = ((closureN)self_735290)->elements[9];
c_737862.elements[10] = ((closureN)self_735290)->elements[10];
c_737862.elements[11] = ((closureN)self_735290)->elements[11];



return_direct_with_clo1(data,(closure)&c_737862,__lambda_166,  Cyc_set_cell(data, ((closureN)self_735290)->elements[5], r_732357));; 
}

static void __lambda_166(void *data, object self_735291, int argc, object *args) /* object self_735291, object r_732315 */
 {

  
closureN_type c_737864;
object e_737906 [3];
c_737864.hdr.mark = gc_color_red;
 c_737864.hdr.grayed = 0;
c_737864.tag = closureN_tag;
 c_737864.fn = (function_type)__lambda_167;
c_737864.num_args = 0;
c_737864.num_elements = 3;
c_737864.elements = (object *)e_737906;
c_737864.elements[0] = ((closureN)self_735291)->elements[5];
c_737864.elements[1] = ((closureN)self_735291)->elements[9];
c_737864.elements[2] = ((closureN)self_735291)->elements[11];


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

return_direct_with_clo1(data,(closure)&c_737864,__lambda_167,  &c_737907);; 
}

static void __lambda_170(void *data, object self_735292, int argc, object *args) /* object self_735292, object r_732353 */
 {
 object r_732353 = args[0];
  
closureN_type c_737909;
object e_738160 [12];
c_737909.hdr.mark = gc_color_red;
 c_737909.hdr.grayed = 0;
c_737909.tag = closureN_tag;
 c_737909.fn = (function_type)__lambda_171;
c_737909.num_args = 1;
c_737909.num_elements = 12;
c_737909.elements = (object *)e_738160;
c_737909.elements[0] = ((closureN)self_735292)->elements[0];
c_737909.elements[1] = ((closureN)self_735292)->elements[1];
c_737909.elements[2] = ((closureN)self_735292)->elements[2];
c_737909.elements[3] = ((closureN)self_735292)->elements[3];
c_737909.elements[4] = ((closureN)self_735292)->elements[4];
c_737909.elements[5] = ((closureN)self_735292)->elements[5];
c_737909.elements[6] = ((closureN)self_735292)->elements[6];
c_737909.elements[7] = ((closureN)self_735292)->elements[7];
c_737909.elements[8] = ((closureN)self_735292)->elements[8];
c_737909.elements[9] = ((closureN)self_735292)->elements[9];
c_737909.elements[10] = ((closureN)self_735292)->elements[10];
c_737909.elements[11] = ((closureN)self_735292)->elements[11];



return_direct_with_clo1(data,(closure)&c_737909,__lambda_171,  Cyc_set_cell(data, ((closureN)self_735292)->elements[4], r_732353));; 
}

static void __lambda_171(void *data, object self_735293, int argc, object *args) /* object self_735293, object r_732316 */
 {

  object r_732351;
  if( (boolean_f != ((closureN)self_735293)->elements[11]) ){ 
  object c_737913;
 alloc_string(data,c_737913, 0, 0);
char tmp_737914[] = "";
memcpy(((string_type *)c_737913)->str, tmp_737914,0);
((string_type *)c_737913)->str[0] = '\0';
  r_732351 = c_737913;
} else { 
  object c_737916;
 alloc_string(data,c_737916, 1, 1);
char tmp_737917[] = "&";
memcpy(((string_type *)c_737916)->str, tmp_737917,1);
((string_type *)c_737916)->str[1] = '\0';
  r_732351 = c_737916;}
;
closureN_type c_737919;
object e_738156 [12];
c_737919.hdr.mark = gc_color_red;
 c_737919.hdr.grayed = 0;
c_737919.tag = closureN_tag;
 c_737919.fn = (function_type)__lambda_172;
c_737919.num_args = 1;
c_737919.num_elements = 12;
c_737919.elements = (object *)e_738156;
c_737919.elements[0] = ((closureN)self_735293)->elements[0];
c_737919.elements[1] = ((closureN)self_735293)->elements[1];
c_737919.elements[2] = ((closureN)self_735293)->elements[2];
c_737919.elements[3] = ((closureN)self_735293)->elements[3];
c_737919.elements[4] = ((closureN)self_735293)->elements[4];
c_737919.elements[5] = ((closureN)self_735293)->elements[5];
c_737919.elements[6] = ((closureN)self_735293)->elements[6];
c_737919.elements[7] = ((closureN)self_735293)->elements[7];
c_737919.elements[8] = ((closureN)self_735293)->elements[8];
c_737919.elements[9] = ((closureN)self_735293)->elements[9];
c_737919.elements[10] = ((closureN)self_735293)->elements[10];
c_737919.elements[11] = ((closureN)self_735293)->elements[11];



return_direct_with_clo1(data,(closure)&c_737919,__lambda_172,  Cyc_set_cell(data, ((closureN)self_735293)->elements[0], r_732351));; 
}

static void __lambda_172(void *data, object self_735294, int argc, object *args) /* object self_735294, object r_732317 */
 {

  
closureN_type c_737921;
object e_737927 [1];
c_737921.hdr.mark = gc_color_red;
 c_737921.hdr.grayed = 0;
c_737921.tag = closureN_tag;
 c_737921.fn = (function_type)__lambda_173;
c_737921.num_args = 0;
c_737921.num_elements = 1;
c_737921.elements = (object *)e_737927;
c_737921.elements[0] = ((closureN)self_735294)->elements[11];


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

return_direct_with_clo1(data,(closure)&c_737921,__lambda_173,  &c_737928);; 
}

static void __lambda_174(void *data, object self_735295, int argc, object *args) /* object self_735295, object r_732349 */
 {
 object r_732349 = args[0];
  
closureN_type c_737930;
object e_738151 [12];
c_737930.hdr.mark = gc_color_red;
 c_737930.hdr.grayed = 0;
c_737930.tag = closureN_tag;
 c_737930.fn = (function_type)__lambda_175;
c_737930.num_args = 1;
c_737930.num_elements = 12;
c_737930.elements = (object *)e_738151;
c_737930.elements[0] = ((closureN)self_735295)->elements[0];
c_737930.elements[1] = ((closureN)self_735295)->elements[1];
c_737930.elements[2] = ((closureN)self_735295)->elements[2];
c_737930.elements[3] = ((closureN)self_735295)->elements[3];
c_737930.elements[4] = ((closureN)self_735295)->elements[4];
c_737930.elements[5] = ((closureN)self_735295)->elements[5];
c_737930.elements[6] = ((closureN)self_735295)->elements[6];
c_737930.elements[7] = ((closureN)self_735295)->elements[7];
c_737930.elements[8] = ((closureN)self_735295)->elements[8];
c_737930.elements[9] = ((closureN)self_735295)->elements[9];
c_737930.elements[10] = ((closureN)self_735295)->elements[10];
c_737930.elements[11] = ((closureN)self_735295)->elements[11];



return_direct_with_clo1(data,(closure)&c_737930,__lambda_175,  Cyc_set_cell(data, ((closureN)self_735295)->elements[3], r_732349));; 
}

static void __lambda_175(void *data, object self_735296, int argc, object *args) /* object self_735296, object r_732318 */
 {

  
closureN_type c_737932;
object e_737938 [1];
c_737932.hdr.mark = gc_color_red;
 c_737932.hdr.grayed = 0;
c_737932.tag = closureN_tag;
 c_737932.fn = (function_type)__lambda_176;
c_737932.num_args = 0;
c_737932.num_elements = 1;
c_737932.elements = (object *)e_737938;
c_737932.elements[0] = ((closureN)self_735296)->elements[11];


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

return_direct_with_clo1(data,(closure)&c_737932,__lambda_176,  &c_737939);; 
}

static void __lambda_177(void *data, object self_735297, int argc, object *args) /* object self_735297, object r_732347 */
 {
 object r_732347 = args[0];
  
closureN_type c_737941;
object e_738146 [12];
c_737941.hdr.mark = gc_color_red;
 c_737941.hdr.grayed = 0;
c_737941.tag = closureN_tag;
 c_737941.fn = (function_type)__lambda_178;
c_737941.num_args = 1;
c_737941.num_elements = 12;
c_737941.elements = (object *)e_738146;
c_737941.elements[0] = ((closureN)self_735297)->elements[0];
c_737941.elements[1] = ((closureN)self_735297)->elements[1];
c_737941.elements[2] = ((closureN)self_735297)->elements[2];
c_737941.elements[3] = ((closureN)self_735297)->elements[3];
c_737941.elements[4] = ((closureN)self_735297)->elements[4];
c_737941.elements[5] = ((closureN)self_735297)->elements[5];
c_737941.elements[6] = ((closureN)self_735297)->elements[6];
c_737941.elements[7] = ((closureN)self_735297)->elements[7];
c_737941.elements[8] = ((closureN)self_735297)->elements[8];
c_737941.elements[9] = ((closureN)self_735297)->elements[9];
c_737941.elements[10] = ((closureN)self_735297)->elements[10];
c_737941.elements[11] = ((closureN)self_735297)->elements[11];



return_direct_with_clo1(data,(closure)&c_737941,__lambda_178,  Cyc_set_cell(data, ((closureN)self_735297)->elements[1], r_732347));; 
}

static void __lambda_178(void *data, object self_735298, int argc, object *args) /* object self_735298, object r_732319 */
 {

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


closureN_type c_738078;
object e_738145 [7];
c_738078.hdr.mark = gc_color_red;
 c_738078.hdr.grayed = 0;
c_738078.tag = closureN_tag;
 c_738078.fn = (function_type)__lambda_188;
c_738078.num_args = 2;
c_738078.num_elements = 7;
c_738078.elements = (object *)e_738145;
c_738078.elements[0] = ((closureN)self_735298)->elements[2];
c_738078.elements[1] = ((closureN)self_735298)->elements[3];
c_738078.elements[2] = ((closureN)self_735298)->elements[6];
c_738078.elements[3] = ((closureN)self_735298)->elements[7];
c_738078.elements[4] = ((closureN)self_735298)->elements[9];
c_738078.elements[5] = ((closureN)self_735298)->elements[10];
c_738078.elements[6] = ((closureN)self_735298)->elements[11];

return_direct_with_clo1(data,(closure)&c_737943,__lambda_179,  &c_738078);; 
}

static void __lambda_188(void *data, object self_735299, int argc, object *args) /* object self_735299, object k_732333, object i_73240_731524, object code_73241_731525 */
 {
 object k_732333 = args[0]; object i_73240_731524 = args[1]; object code_73241_731525 = args[2];
    
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73240_731524, car(((closureN)self_735299)->elements[4]))) ){ 
  return_direct_with_clo1(data,  k_732333, (((closure)  k_732333)->fn),  code_73241_731525);
} else { 
  
closureN_type c_738086;
object e_738139 [6];
c_738086.hdr.mark = gc_color_red;
 c_738086.hdr.grayed = 0;
c_738086.tag = closureN_tag;
 c_738086.fn = (function_type)__lambda_189;
c_738086.num_args = 1;
c_738086.num_elements = 6;
c_738086.elements = (object *)e_738139;
c_738086.elements[0] = code_73241_731525;
c_738086.elements[1] = ((closureN)self_735299)->elements[0];
c_738086.elements[2] = ((closureN)self_735299)->elements[1];
c_738086.elements[3] = i_73240_731524;
c_738086.elements[4] = k_732333;
c_738086.elements[5] = ((closureN)self_735299)->elements[5];



return_direct_with_clo4(data,  __glo_c_91compile_91const_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91const_scheme_cyclone_cgen)->fn),  &c_738086, Cyc_vector_ref(data, ((closureN)self_735299)->elements[2], i_73240_731524), ((closureN)self_735299)->elements[6], ((closureN)self_735299)->elements[3]);}
;; 
}

static void __lambda_189(void *data, object self_735300, int argc, object *args) /* object self_735300, object idx_91code_73242_731526 */
 {
 object idx_91code_73242_731526 = args[0];
  
closureN_type c_738088;
object e_738134 [7];
c_738088.hdr.mark = gc_color_red;
 c_738088.hdr.grayed = 0;
c_738088.tag = closureN_tag;
 c_738088.fn = (function_type)__lambda_190;
c_738088.num_args = 1;
c_738088.num_elements = 7;
c_738088.elements = (object *)e_738134;
c_738088.elements[0] = ((closureN)self_735300)->elements[0];
c_738088.elements[1] = ((closureN)self_735300)->elements[1];
c_738088.elements[2] = ((closureN)self_735300)->elements[2];
c_738088.elements[3] = ((closureN)self_735300)->elements[3];
c_738088.elements[4] = idx_91code_73242_731526;
c_738088.elements[5] = ((closureN)self_735300)->elements[4];
c_738088.elements[6] = ((closureN)self_735300)->elements[5];


object c_738137 = Cyc_number2string2(data,(closure)&c_738088,1,((closureN)self_735300)->elements[3]);
return_closcall1(data,(closure)&c_738088,  c_738137);; 
}

static void __lambda_190(void *data, object self_735301, int argc, object *args) /* object self_735301, object r_732344_734171_734178_734184 */
 {
 object r_732344_734171_734178_734184 = args[0];
  
closureN_type c_738090;
object e_738118 [5];
c_738090.hdr.mark = gc_color_red;
 c_738090.hdr.grayed = 0;
c_738090.tag = closureN_tag;
 c_738090.fn = (function_type)__lambda_191;
c_738090.num_args = 1;
c_738090.num_elements = 5;
c_738090.elements = (object *)e_738118;
c_738090.elements[0] = ((closureN)self_735301)->elements[0];
c_738090.elements[1] = ((closureN)self_735301)->elements[3];
c_738090.elements[2] = ((closureN)self_735301)->elements[4];
c_738090.elements[3] = ((closureN)self_735301)->elements[5];
c_738090.elements[4] = ((closureN)self_735301)->elements[6];






make_utf8_string_with_len(c_738128, "elements[", 9, 9);

make_utf8_string_with_len(c_738129, "] = ", 4, 4);



make_utf8_string_with_len(c_738133, ";", 1, 1);

object c_738121 = Cyc_string_append(data,(closure)&c_738090,7,car(((closureN)self_735301)->elements[1]), car(((closureN)self_735301)->elements[2]), &c_738128, r_732344_734171_734178_734184, &c_738129, Cyc_car(data, ((closureN)self_735301)->elements[4]), &c_738133);
return_closcall1(data,(closure)&c_738090,  c_738121);; 
}

static void __lambda_191(void *data, object self_735302, int argc, object *args) /* object self_735302, object r_732343_734173_734180_734186_734190 */
 {
 object r_732343_734173_734180_734186_734190 = args[0];
  
closureN_type c_738092;
object e_738108 [4];
c_738092.hdr.mark = gc_color_red;
 c_738092.hdr.grayed = 0;
c_738092.tag = closureN_tag;
 c_738092.fn = (function_type)__lambda_192;
c_738092.num_args = 1;
c_738092.num_elements = 4;
c_738092.elements = (object *)e_738108;
c_738092.elements[0] = ((closureN)self_735302)->elements[0];
c_738092.elements[1] = ((closureN)self_735302)->elements[1];
c_738092.elements[2] = ((closureN)self_735302)->elements[3];
c_738092.elements[3] = ((closureN)self_735302)->elements[4];






pair_type local_738117; 
return_direct_with_clo4(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_738092, Cyc_cadr(data, ((closureN)self_735302)->elements[0]), Cyc_cadr(data, ((closureN)self_735302)->elements[2]), set_cell_as_expr(&local_738117, r_732343_734173_734180_734186_734190));; 
}

static void __lambda_192(void *data, object self_735303, int argc, object *args) /* object self_735303, object r_732339_734174_734181_734187_734191 */
 {
 object r_732339_734174_734181_734187_734191 = args[0];
  


complex_num_type local_738100; 

list_2_type local_738104; 


return_closcall3(data,  car(((closureN)self_735303)->elements[3]),  ((closureN)self_735303)->elements[2], Cyc_fast_sum(data,&local_738100, ((closureN)self_735303)->elements[1], obj_int2obj(1)), Cyc_fast_list_2(&local_738104, Cyc_car(data, ((closureN)self_735303)->elements[0]), r_732339_734174_734181_734187_734191));; 
}

static void __lambda_179(void *data, object self_735304, int argc, object *args) /* object self_735304, object r_732332 */
 {
 object r_732332 = args[0];
  
closureN_type c_737945;
object e_738073 [11];
c_737945.hdr.mark = gc_color_red;
 c_737945.hdr.grayed = 0;
c_737945.tag = closureN_tag;
 c_737945.fn = (function_type)__lambda_180;
c_737945.num_args = 1;
c_737945.num_elements = 11;
c_737945.elements = (object *)e_738073;
c_737945.elements[0] = ((closureN)self_735304)->elements[0];
c_737945.elements[1] = ((closureN)self_735304)->elements[1];
c_737945.elements[2] = ((closureN)self_735304)->elements[2];
c_737945.elements[3] = ((closureN)self_735304)->elements[3];
c_737945.elements[4] = ((closureN)self_735304)->elements[4];
c_737945.elements[5] = ((closureN)self_735304)->elements[5];
c_737945.elements[6] = ((closureN)self_735304)->elements[6];
c_737945.elements[7] = ((closureN)self_735304)->elements[7];
c_737945.elements[8] = ((closureN)self_735304)->elements[8];
c_737945.elements[9] = ((closureN)self_735304)->elements[9];
c_737945.elements[10] = ((closureN)self_735304)->elements[10];



return_direct_with_clo1(data,(closure)&c_737945,__lambda_180,  Cyc_set_cell(data, ((closureN)self_735304)->elements[9], r_732332));; 
}

static void __lambda_180(void *data, object self_735305, int argc, object *args) /* object self_735305, object r_732320 */
 {

    complex_num_type local_737948; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_737948, car(((closureN)self_735305)->elements[8]))) ){ 
  
closureN_type c_737953;
object e_737985 [5];
c_737953.hdr.mark = gc_color_red;
 c_737953.hdr.grayed = 0;
c_737953.tag = closureN_tag;
 c_737953.fn = (function_type)__lambda_181;
c_737953.num_args = 1;
c_737953.num_elements = 5;
c_737953.elements = (object *)e_737985;
c_737953.elements[0] = ((closureN)self_735305)->elements[1];
c_737953.elements[1] = ((closureN)self_735305)->elements[2];
c_737953.elements[2] = ((closureN)self_735305)->elements[6];
c_737953.elements[3] = ((closureN)self_735305)->elements[7];
c_737953.elements[4] = ((closureN)self_735305)->elements[10];






object c_737988 = Cyc_string_append(data,(closure)&c_737953,2,car(((closureN)self_735305)->elements[0]), car(((closureN)self_735305)->elements[2]));
return_closcall1(data,(closure)&c_737953,  c_737988);
} else { 
  
closureN_type c_737996;
object e_738063 [10];
c_737996.hdr.mark = gc_color_red;
 c_737996.hdr.grayed = 0;
c_737996.tag = closureN_tag;
 c_737996.fn = (function_type)__lambda_184;
c_737996.num_args = 1;
c_737996.num_elements = 10;
c_737996.elements = (object *)e_738063;
c_737996.elements[0] = ((closureN)self_735305)->elements[1];
c_737996.elements[1] = ((closureN)self_735305)->elements[2];
c_737996.elements[2] = ((closureN)self_735305)->elements[3];
c_737996.elements[3] = ((closureN)self_735305)->elements[4];
c_737996.elements[4] = ((closureN)self_735305)->elements[5];
c_737996.elements[5] = ((closureN)self_735305)->elements[6];
c_737996.elements[6] = ((closureN)self_735305)->elements[7];
c_737996.elements[7] = ((closureN)self_735305)->elements[8];
c_737996.elements[8] = ((closureN)self_735305)->elements[9];
c_737996.elements[9] = ((closureN)self_735305)->elements[10];






object c_738066 = Cyc_string_append(data,(closure)&c_737996,2,car(((closureN)self_735305)->elements[0]), car(((closureN)self_735305)->elements[2]));
return_closcall1(data,(closure)&c_737996,  c_738066);}
;; 
}

static void __lambda_184(void *data, object self_735309, int argc, object *args) /* object self_735309, object r_732327 */
 {
 object r_732327 = args[0];
  
closureN_type c_737998;
object e_738056 [10];
c_737998.hdr.mark = gc_color_red;
 c_737998.hdr.grayed = 0;
c_737998.tag = closureN_tag;
 c_737998.fn = (function_type)__lambda_185;
c_737998.num_args = 1;
c_737998.num_elements = 10;
c_737998.elements = (object *)e_738056;
c_737998.elements[0] = ((closureN)self_735309)->elements[0];
c_737998.elements[1] = ((closureN)self_735309)->elements[1];
c_737998.elements[2] = ((closureN)self_735309)->elements[2];
c_737998.elements[3] = ((closureN)self_735309)->elements[3];
c_737998.elements[4] = ((closureN)self_735309)->elements[4];
c_737998.elements[5] = ((closureN)self_735309)->elements[5];
c_737998.elements[6] = ((closureN)self_735309)->elements[6];
c_737998.elements[7] = ((closureN)self_735309)->elements[8];
c_737998.elements[8] = r_732327;
c_737998.elements[9] = ((closureN)self_735309)->elements[9];




object c_738059 = Cyc_number2string2(data,(closure)&c_737998,1,car(((closureN)self_735309)->elements[7]));
return_closcall1(data,(closure)&c_737998,  c_738059);; 
}

static void __lambda_185(void *data, object self_735310, int argc, object *args) /* object self_735310, object r_732330 */
 {
 object r_732330 = args[0];
  
closureN_type c_738000;
object e_738050 [9];
c_738000.hdr.mark = gc_color_red;
 c_738000.hdr.grayed = 0;
c_738000.tag = closureN_tag;
 c_738000.fn = (function_type)__lambda_186;
c_738000.num_args = 1;
c_738000.num_elements = 9;
c_738000.elements = (object *)e_738050;
c_738000.elements[0] = ((closureN)self_735310)->elements[0];
c_738000.elements[1] = ((closureN)self_735310)->elements[1];
c_738000.elements[2] = ((closureN)self_735310)->elements[2];
c_738000.elements[3] = ((closureN)self_735310)->elements[3];
c_738000.elements[4] = ((closureN)self_735310)->elements[4];
c_738000.elements[5] = ((closureN)self_735310)->elements[6];
c_738000.elements[6] = ((closureN)self_735310)->elements[7];
c_738000.elements[7] = ((closureN)self_735310)->elements[8];
c_738000.elements[8] = r_732330;



return_direct_with_clo4(data,  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen, (((closure)  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen)->fn),  &c_738000, car(((closureN)self_735310)->elements[1]), ((closureN)self_735310)->elements[9], ((closureN)self_735310)->elements[5]);; 
}

static void __lambda_186(void *data, object self_735311, int argc, object *args) /* object self_735311, object r_732331 */
 {
 object r_732331 = args[0];
  
closureN_type c_738002;
object e_738015 [3];
c_738002.hdr.mark = gc_color_red;
 c_738002.hdr.grayed = 0;
c_738002.tag = closureN_tag;
 c_738002.fn = (function_type)__lambda_187;
c_738002.num_args = 1;
c_738002.num_elements = 3;
c_738002.elements = (object *)e_738015;
c_738002.elements[0] = ((closureN)self_735311)->elements[5];
c_738002.elements[1] = ((closureN)self_735311)->elements[6];
c_738002.elements[2] = ((closureN)self_735311)->elements[7];






make_utf8_string_with_len(c_738025, "(", 1, 1);



make_utf8_string_with_len(c_738029, ");", 2, 2);





make_utf8_string_with_len(c_738036, "num_elements = ", 15, 15);

make_utf8_string_with_len(c_738038, ";", 1, 1);





make_utf8_string_with_len(c_738045, "elements = (object *)", 21, 21);



make_utf8_string_with_len(c_738049, ";", 1, 1);

object c_738018 = Cyc_string_append(data,(closure)&c_738002,16,car(((closureN)self_735311)->elements[3]), car(((closureN)self_735311)->elements[0]), &c_738025, car(((closureN)self_735311)->elements[1]), &c_738029, car(((closureN)self_735311)->elements[1]), car(((closureN)self_735311)->elements[2]), &c_738036, ((closureN)self_735311)->elements[8], &c_738038, car(((closureN)self_735311)->elements[1]), car(((closureN)self_735311)->elements[2]), &c_738045, car(((closureN)self_735311)->elements[4]), &c_738049, r_732331);
return_closcall1(data,(closure)&c_738002,  c_738018);; 
}

static void __lambda_187(void *data, object self_735312, int argc, object *args) /* object self_735312, object r_732329 */
 {
 object r_732329 = args[0];
  


list_2_type local_738010; 

pair_type local_738014; 
return_closcall3(data,  car(((closureN)self_735312)->elements[1]),  ((closureN)self_735312)->elements[0], obj_int2obj(0), Cyc_fast_list_2(&local_738010, ((closureN)self_735312)->elements[2], set_cell_as_expr(&local_738014, r_732329)));; 
}

static void __lambda_181(void *data, object self_735306, int argc, object *args) /* object self_735306, object r_732322 */
 {
 object r_732322 = args[0];
  
closureN_type c_737955;
object e_737979 [4];
c_737955.hdr.mark = gc_color_red;
 c_737955.hdr.grayed = 0;
c_737955.tag = closureN_tag;
 c_737955.fn = (function_type)__lambda_182;
c_737955.num_args = 1;
c_737955.num_elements = 4;
c_737955.elements = (object *)e_737979;
c_737955.elements[0] = ((closureN)self_735306)->elements[0];
c_737955.elements[1] = ((closureN)self_735306)->elements[1];
c_737955.elements[2] = ((closureN)self_735306)->elements[3];
c_737955.elements[3] = r_732322;



return_direct_with_clo4(data,  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen, (((closure)  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen)->fn),  &c_737955, car(((closureN)self_735306)->elements[1]), ((closureN)self_735306)->elements[4], ((closureN)self_735306)->elements[2]);; 
}

static void __lambda_182(void *data, object self_735307, int argc, object *args) /* object self_735307, object r_732325 */
 {
 object r_732325 = args[0];
  
closureN_type c_737957;
object e_737967 [2];
c_737957.hdr.mark = gc_color_red;
 c_737957.hdr.grayed = 0;
c_737957.tag = closureN_tag;
 c_737957.fn = (function_type)__lambda_183;
c_737957.num_args = 1;
c_737957.num_elements = 2;
c_737957.elements = (object *)e_737967;
c_737957.elements[0] = ((closureN)self_735307)->elements[2];
c_737957.elements[1] = ((closureN)self_735307)->elements[3];




make_utf8_string_with_len(c_737974, "(", 1, 1);



make_utf8_string_with_len(c_737978, ");", 2, 2);

object c_737970 = Cyc_string_append(data,(closure)&c_737957,5,car(((closureN)self_735307)->elements[0]), &c_737974, car(((closureN)self_735307)->elements[1]), &c_737978, r_732325);
return_closcall1(data,(closure)&c_737957,  c_737970);; 
}

static void __lambda_183(void *data, object self_735308, int argc, object *args) /* object self_735308, object r_732324 */
 {
 object r_732324 = args[0];
  
list_2_type local_737962; 

pair_type local_737966; 
return_direct_with_clo1(data,  ((closureN)self_735308)->elements[0], (((closure)  ((closureN)self_735308)->elements[0])->fn),  Cyc_fast_list_2(&local_737962, ((closureN)self_735308)->elements[1], set_cell_as_expr(&local_737966, r_732324)));; 
}

static void __lambda_176(void *data, object self_735313, int argc, object *args) /* object self_735313, object k_732348 */
 {
 object k_732348 = args[0];
  if( (boolean_f != ((closureN)self_735313)->elements[0]) ){ 
  
make_utf8_string_with_len(c_737935, "alloca_empty_vector", 19, 19);
return_direct_with_clo1(data,  k_732348,__lambda_177,  &c_737935);
} else { 
  
make_utf8_string_with_len(c_737937, "make_empty_vector", 17, 17);
return_direct_with_clo1(data,  k_732348,__lambda_177,  &c_737937);}
;; 
}

static void __lambda_173(void *data, object self_735314, int argc, object *args) /* object self_735314, object k_732350 */
 {
 object k_732350 = args[0];
  if( (boolean_f != ((closureN)self_735314)->elements[0]) ){ 
  
make_utf8_string_with_len(c_737924, "->", 2, 2);
return_direct_with_clo1(data,  k_732350,__lambda_174,  &c_737924);
} else { 
  
make_utf8_string_with_len(c_737926, ".", 1, 1);
return_direct_with_clo1(data,  k_732350,__lambda_174,  &c_737926);}
;; 
}

static void __lambda_167(void *data, object self_735315, int argc, object *args) /* object self_735315, object k_732354 */
 {
 object k_732354 = args[0];
  if( (boolean_f != ((closureN)self_735315)->elements[2]) ){ 
  
closureN_type c_737867;
object e_737879 [2];
c_737867.hdr.mark = gc_color_red;
 c_737867.hdr.grayed = 0;
c_737867.tag = closureN_tag;
 c_737867.fn = (function_type)__lambda_168;
c_737867.num_args = 1;
c_737867.num_elements = 2;
c_737867.elements = (object *)e_737879;
c_737867.elements[0] = ((closureN)self_735315)->elements[0];
c_737867.elements[1] = k_732354;




object c_737882 = Cyc_number2string2(data,(closure)&c_737867,1,car(((closureN)self_735315)->elements[1]));
return_closcall1(data,(closure)&c_737867,  c_737882);
} else { 
  
closureN_type c_737887;
object e_737899 [2];
c_737887.hdr.mark = gc_color_red;
 c_737887.hdr.grayed = 0;
c_737887.tag = closureN_tag;
 c_737887.fn = (function_type)__lambda_169;
c_737887.num_args = 1;
c_737887.num_elements = 2;
c_737887.elements = (object *)e_737899;
c_737887.elements[0] = ((closureN)self_735315)->elements[0];
c_737887.elements[1] = k_732354;




object c_737902 = Cyc_number2string2(data,(closure)&c_737887,1,car(((closureN)self_735315)->elements[1]));
return_closcall1(data,(closure)&c_737887,  c_737902);}
;; 
}

static void __lambda_169(void *data, object self_735317, int argc, object *args) /* object self_735317, object r_732356 */
 {
 object r_732356 = args[0];
  
make_utf8_string_with_len(c_737893, "object ", 7, 7);



make_utf8_string_with_len(c_737897, " [", 2, 2);

make_utf8_string_with_len(c_737898, "];\n", 3, 3);

object c_737892 = Cyc_string_append(data,  ((closureN)self_735317)->elements[1],5,&c_737893, car(((closureN)self_735317)->elements[0]), &c_737897, r_732356, &c_737898);
return_direct_with_clo1(data,  ((closureN)self_735317)->elements[1], (((closure)  ((closureN)self_735317)->elements[1])->fn),  c_737892);; 
}

static void __lambda_168(void *data, object self_735316, int argc, object *args) /* object self_735316, object r_732355 */
 {
 object r_732355 = args[0];
  
make_utf8_string_with_len(c_737873, "object *", 8, 8);



make_utf8_string_with_len(c_737877, " = (object *)alloca(sizeof(object) * ", 37, 37);

make_utf8_string_with_len(c_737878, ");", 2, 2);

object c_737872 = Cyc_string_append(data,  ((closureN)self_735316)->elements[1],5,&c_737873, car(((closureN)self_735316)->elements[0]), &c_737877, r_732355, &c_737878);
return_direct_with_clo1(data,  ((closureN)self_735316)->elements[1], (((closure)  ((closureN)self_735316)->elements[1])->fn),  c_737872);; 
}

static void __lambda_131(void *data, object _, int argc, object *args) /* closure _,object k_732271, object args_73203_731499, object use_91alloca_73204_731500, object immutable_73205_731501 */
 {
object k_732271 = args[0]; object args_73203_731499 = args[1]; object use_91alloca_73204_731500 = args[2]; object immutable_73205_731501 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-scalars");

closureN_type c_737595;
object e_737829 [4];
c_737595.hdr.mark = gc_color_red;
 c_737595.hdr.grayed = 0;
c_737595.tag = closureN_tag;
 c_737595.fn = (function_type)__lambda_132;
c_737595.num_args = 5;
c_737595.num_elements = 4;
c_737595.elements = (object *)e_737829;
c_737595.elements[0] = args_73203_731499;
c_737595.elements[1] = immutable_73205_731501;
c_737595.elements[2] = k_732271;
c_737595.elements[3] = use_91alloca_73204_731500;

return_direct_with_clo5(data,(closure)&c_737595,__lambda_132,  boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_132(void *data, object self_735245, int argc, object *args) /* object self_735245, object addr_91op_73206_731502, object c_91make_91macro_73207_731503, object num_91args_73208_731504, object create_91cons_73209_731505, object _191c_91compile_91scalars_73210_731506 */
 {
 object addr_91op_73206_731502 = args[0]; object c_91make_91macro_73207_731503 = args[1]; object num_91args_73208_731504 = args[2]; object create_91cons_73209_731505 = args[3]; object _191c_91compile_91scalars_73210_731506 = args[4];
  
closureN_type c_737597;
object e_737825 [8];
c_737597.hdr.mark = gc_color_red;
 c_737597.hdr.grayed = 0;
c_737597.tag = closureN_tag;
 c_737597.fn = (function_type)__lambda_1300;
c_737597.num_args = 1;
c_737597.num_elements = 8;
c_737597.elements = (object *)e_737825;
c_737597.elements[0] = _191c_91compile_91scalars_73210_731506;
c_737597.elements[1] = ((closureN)self_735245)->elements[0];
c_737597.elements[2] = c_91make_91macro_73207_731503;
c_737597.elements[3] = create_91cons_73209_731505;
c_737597.elements[4] = ((closureN)self_735245)->elements[1];
c_737597.elements[5] = ((closureN)self_735245)->elements[2];
c_737597.elements[6] = num_91args_73208_731504;
c_737597.elements[7] = ((closureN)self_735245)->elements[3];


pair_type local_737828; 
return_direct_with_clo1(data,(closure)&c_737597,__lambda_1300,  set_cell_as_expr(&local_737828, addr_91op_73206_731502));; 
}

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


pair_type local_737823; 
return_direct_with_clo1(data,(closure)&c_737599,__lambda_1299,  set_cell_as_expr(&local_737823, ((closureN)self_735246)->elements[2]));; 
}

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


pair_type local_737818; 
return_direct_with_clo1(data,(closure)&c_737601,__lambda_1298,  set_cell_as_expr(&local_737818, ((closureN)self_735247)->elements[6]));; 
}

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


pair_type local_737813; 
return_direct_with_clo1(data,(closure)&c_737603,__lambda_1297,  set_cell_as_expr(&local_737813, ((closureN)self_735248)->elements[4]));; 
}

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


pair_type local_737808; 
return_direct_with_clo1(data,(closure)&c_737605,__lambda_1296,  set_cell_as_expr(&local_737808, ((closureN)self_735249)->elements[0]));; 
}

static void __lambda_1296(void *data, object self_735250, int argc, object *args) /* object self_735250, object _191c_91compile_91scalars_73210_731506 */
 {
 object _191c_91compile_91scalars_73210_731506 = args[0];
  object r_732308;
  if( (boolean_f != ((closureN)self_735250)->elements[7]) ){ 
  object c_737609;
 alloc_string(data,c_737609, 0, 0);
char tmp_737610[] = "";
memcpy(((string_type *)c_737609)->str, tmp_737610,0);
((string_type *)c_737609)->str[0] = '\0';
  r_732308 = c_737609;
} else { 
  object c_737612;
 alloc_string(data,c_737612, 1, 1);
char tmp_737613[] = "&";
memcpy(((string_type *)c_737612)->str, tmp_737613,1);
((string_type *)c_737612)->str[1] = '\0';
  r_732308 = c_737612;}
;
closureN_type c_737615;
object e_737801 [9];
c_737615.hdr.mark = gc_color_red;
 c_737615.hdr.grayed = 0;
c_737615.tag = closureN_tag;
 c_737615.fn = (function_type)__lambda_133;
c_737615.num_args = 1;
c_737615.num_elements = 9;
c_737615.elements = (object *)e_737801;
c_737615.elements[0] = _191c_91compile_91scalars_73210_731506;
c_737615.elements[1] = ((closureN)self_735250)->elements[0];
c_737615.elements[2] = ((closureN)self_735250)->elements[1];
c_737615.elements[3] = ((closureN)self_735250)->elements[2];
c_737615.elements[4] = ((closureN)self_735250)->elements[3];
c_737615.elements[5] = ((closureN)self_735250)->elements[4];
c_737615.elements[6] = ((closureN)self_735250)->elements[5];
c_737615.elements[7] = ((closureN)self_735250)->elements[6];
c_737615.elements[8] = ((closureN)self_735250)->elements[7];



return_direct_with_clo1(data,(closure)&c_737615,__lambda_133,  Cyc_set_cell(data, ((closureN)self_735250)->elements[0], r_732308));; 
}

static void __lambda_133(void *data, object self_735251, int argc, object *args) /* object self_735251, object r_732272 */
 {

  
closureN_type c_737617;
object e_737623 [1];
c_737617.hdr.mark = gc_color_red;
 c_737617.hdr.grayed = 0;
c_737617.tag = closureN_tag;
 c_737617.fn = (function_type)__lambda_134;
c_737617.num_args = 0;
c_737617.num_elements = 1;
c_737617.elements = (object *)e_737623;
c_737617.elements[0] = ((closureN)self_735251)->elements[8];


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

return_direct_with_clo1(data,(closure)&c_737617,__lambda_134,  &c_737624);; 
}

static void __lambda_135(void *data, object self_735252, int argc, object *args) /* object self_735252, object r_732306 */
 {
 object r_732306 = args[0];
  
closureN_type c_737626;
object e_737796 [9];
c_737626.hdr.mark = gc_color_red;
 c_737626.hdr.grayed = 0;
c_737626.tag = closureN_tag;
 c_737626.fn = (function_type)__lambda_136;
c_737626.num_args = 1;
c_737626.num_elements = 9;
c_737626.elements = (object *)e_737796;
c_737626.elements[0] = ((closureN)self_735252)->elements[0];
c_737626.elements[1] = ((closureN)self_735252)->elements[1];
c_737626.elements[2] = ((closureN)self_735252)->elements[2];
c_737626.elements[3] = ((closureN)self_735252)->elements[3];
c_737626.elements[4] = ((closureN)self_735252)->elements[4];
c_737626.elements[5] = ((closureN)self_735252)->elements[5];
c_737626.elements[6] = ((closureN)self_735252)->elements[6];
c_737626.elements[7] = ((closureN)self_735252)->elements[7];
c_737626.elements[8] = ((closureN)self_735252)->elements[8];



return_direct_with_clo1(data,(closure)&c_737626,__lambda_136,  Cyc_set_cell(data, ((closureN)self_735252)->elements[3], r_732306));; 
}

static void __lambda_136(void *data, object self_735253, int argc, object *args) /* object self_735253, object r_732273 */
 {

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



return_direct_with_clo1(data,(closure)&c_737628,__lambda_137,  Cyc_set_cell(data, ((closureN)self_735253)->elements[7], obj_int2obj(0)));; 
}

static void __lambda_137(void *data, object self_735254, int argc, object *args) /* object self_735254, object r_732274 */
 {

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


closureN_type c_737750;
object e_737791 [3];
c_737750.hdr.mark = gc_color_red;
 c_737750.hdr.grayed = 0;
c_737750.tag = closureN_tag;
 c_737750.fn = (function_type)__lambda_154;
c_737750.num_args = 3;
c_737750.num_elements = 3;
c_737750.elements = (object *)e_737791;
c_737750.elements[0] = ((closureN)self_735254)->elements[3];
c_737750.elements[1] = ((closureN)self_735254)->elements[5];
c_737750.elements[2] = ((closureN)self_735254)->elements[8];

return_direct_with_clo1(data,(closure)&c_737630,__lambda_138,  &c_737750);; 
}

static void __lambda_154(void *data, object self_735255, int argc, object *args) /* object self_735255, object k_732298, object cvar_73211_731507, object a_73212_731508, object b_73213_731509 */
 {
 object k_732298 = args[0]; object cvar_73211_731507 = args[1]; object a_73212_731508 = args[2]; object b_73213_731509 = args[3];
  
closureN_type c_737752;
object e_737788 [5];
c_737752.hdr.mark = gc_color_red;
 c_737752.hdr.grayed = 0;
c_737752.tag = closureN_tag;
 c_737752.fn = (function_type)__lambda_155;
c_737752.num_args = 1;
c_737752.num_elements = 5;
c_737752.elements = (object *)e_737788;
c_737752.elements[0] = a_73212_731508;
c_737752.elements[1] = b_73213_731509;
c_737752.elements[2] = ((closureN)self_735255)->elements[0];
c_737752.elements[3] = cvar_73211_731507;
c_737752.elements[4] = k_732298;

return_direct_with_clo4(data,  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen, (((closure)  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen)->fn),  &c_737752, cvar_73211_731507, ((closureN)self_735255)->elements[2], ((closureN)self_735255)->elements[1]);; 
}

static void __lambda_155(void *data, object self_735256, int argc, object *args) /* object self_735256, object r_732305_734151_734157 */
 {
 object r_732305_734151_734157 = args[0];
  
closureN_type c_737754;
object e_737770 [3];
c_737754.hdr.mark = gc_color_red;
 c_737754.hdr.grayed = 0;
c_737754.tag = closureN_tag;
 c_737754.fn = (function_type)__lambda_156;
c_737754.num_args = 1;
c_737754.num_elements = 3;
c_737754.elements = (object *)e_737770;
c_737754.elements[0] = ((closureN)self_735256)->elements[0];
c_737754.elements[1] = ((closureN)self_735256)->elements[1];
c_737754.elements[2] = ((closureN)self_735256)->elements[4];




make_utf8_string_with_len(c_737777, "(", 1, 1);

make_utf8_string_with_len(c_737779, ",", 1, 1);



make_utf8_string_with_len(c_737783, ",", 1, 1);



make_utf8_string_with_len(c_737787, ");", 2, 2);

object c_737773 = Cyc_string_append(data,(closure)&c_737754,9,car(((closureN)self_735256)->elements[2]), &c_737777, ((closureN)self_735256)->elements[3], &c_737779, Cyc_car(data, ((closureN)self_735256)->elements[0]), &c_737783, Cyc_car(data, ((closureN)self_735256)->elements[1]), &c_737787, r_732305_734151_734157);
return_closcall1(data,(closure)&c_737754,  c_737773);; 
}

static void __lambda_156(void *data, object self_735257, int argc, object *args) /* object self_735257, object r_732299_734152_734158 */
 {
 object r_732299_734152_734158 = args[0];
  
closureN_type c_737756;
object e_737763 [2];
c_737756.hdr.mark = gc_color_red;
 c_737756.hdr.grayed = 0;
c_737756.tag = closureN_tag;
 c_737756.fn = (function_type)__lambda_157;
c_737756.num_args = 1;
c_737756.num_elements = 2;
c_737756.elements = (object *)e_737763;
c_737756.elements[0] = ((closureN)self_735257)->elements[2];
c_737756.elements[1] = r_732299_734152_734158;





return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_737756, Cyc_cadr(data, ((closureN)self_735257)->elements[0]), Cyc_cadr(data, ((closureN)self_735257)->elements[1]));; 
}

static void __lambda_157(void *data, object self_735258, int argc, object *args) /* object self_735258, object r_732300_734155_734161_734164_734166 */
 {
 object r_732300_734155_734161_734164_734166 = args[0];
  
list_2_type local_737761; 
return_direct_with_clo1(data,  ((closureN)self_735258)->elements[0], (((closure)  ((closureN)self_735258)->elements[0])->fn),  Cyc_fast_list_2(&local_737761, ((closureN)self_735258)->elements[1], r_732300_734155_734161_734164_734166));; 
}

static void __lambda_138(void *data, object self_735259, int argc, object *args) /* object self_735259, object r_732297 */
 {
 object r_732297 = args[0];
  
closureN_type c_737632;
object e_737745 [8];
c_737632.hdr.mark = gc_color_red;
 c_737632.hdr.grayed = 0;
c_737632.tag = closureN_tag;
 c_737632.fn = (function_type)__lambda_139;
c_737632.num_args = 1;
c_737632.num_elements = 8;
c_737632.elements = (object *)e_737745;
c_737632.elements[0] = ((closureN)self_735259)->elements[0];
c_737632.elements[1] = ((closureN)self_735259)->elements[1];
c_737632.elements[2] = ((closureN)self_735259)->elements[2];
c_737632.elements[3] = ((closureN)self_735259)->elements[3];
c_737632.elements[4] = ((closureN)self_735259)->elements[4];
c_737632.elements[5] = ((closureN)self_735259)->elements[5];
c_737632.elements[6] = ((closureN)self_735259)->elements[6];
c_737632.elements[7] = ((closureN)self_735259)->elements[7];



return_direct_with_clo1(data,(closure)&c_737632,__lambda_139,  Cyc_set_cell(data, ((closureN)self_735259)->elements[3], r_732297));; 
}

static void __lambda_139(void *data, object self_735260, int argc, object *args) /* object self_735260, object r_732275 */
 {

  
closureN_type c_737634;
object e_737656 [4];
c_737634.hdr.mark = gc_color_red;
 c_737634.hdr.grayed = 0;
c_737634.tag = closureN_tag;
 c_737634.fn = (function_type)__lambda_140;
c_737634.num_args = 1;
c_737634.num_elements = 4;
c_737634.elements = (object *)e_737656;
c_737634.elements[0] = ((closureN)self_735260)->elements[0];
c_737634.elements[1] = ((closureN)self_735260)->elements[2];
c_737634.elements[2] = ((closureN)self_735260)->elements[5];
c_737634.elements[3] = ((closureN)self_735260)->elements[6];


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

return_direct_with_clo1(data,(closure)&c_737634,__lambda_140,  &c_737657);; 
}

static void __lambda_143(void *data, object self_735261, int argc, object *args) /* object self_735261, object k_732279, object args_73214_731510 */
 {
 object k_732279 = args[0]; object args_73214_731510 = args[1];
    
if( (boolean_f != Cyc_is_null(args_73214_731510)) ){ 
  
make_utf8_string_with_len(c_737661, "NULL", 4, 4);
return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  k_732279, &c_737661);
} else { 
    
if( (boolean_f != Cyc_is_pair(args_73214_731510)) ){ 
  
closureN_type c_737665;
object e_737740 [8];
c_737665.hdr.mark = gc_color_red;
 c_737665.hdr.grayed = 0;
c_737665.tag = closureN_tag;
 c_737665.fn = (function_type)__lambda_144;
c_737665.num_args = 1;
c_737665.num_elements = 8;
c_737665.elements = (object *)e_737740;
c_737665.elements[0] = ((closureN)self_735261)->elements[0];
c_737665.elements[1] = ((closureN)self_735261)->elements[1];
c_737665.elements[2] = args_73214_731510;
c_737665.elements[3] = ((closureN)self_735261)->elements[2];
c_737665.elements[4] = ((closureN)self_735261)->elements[3];
c_737665.elements[5] = k_732279;
c_737665.elements[6] = ((closureN)self_735261)->elements[4];
c_737665.elements[7] = ((closureN)self_735261)->elements[5];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_737665, quote_c);
} else { 
  return_direct_with_clo4(data,  __glo_c_91compile_91const_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91const_scheme_cyclone_cgen)->fn),  k_732279, args_73214_731510, ((closureN)self_735261)->elements[5], ((closureN)self_735261)->elements[3]);}
;}
;; 
}

static void __lambda_144(void *data, object self_735262, int argc, object *args) /* object self_735262, object r_732295 */
 {
 object r_732295 = args[0];
  
closureN_type c_737667;
object e_737739 [8];
c_737667.hdr.mark = gc_color_red;
 c_737667.hdr.grayed = 0;
c_737667.tag = closureN_tag;
 c_737667.fn = (function_type)__lambda_145;
c_737667.num_args = 1;
c_737667.num_elements = 8;
c_737667.elements = (object *)e_737739;
c_737667.elements[0] = ((closureN)self_735262)->elements[0];
c_737667.elements[1] = ((closureN)self_735262)->elements[1];
c_737667.elements[2] = ((closureN)self_735262)->elements[2];
c_737667.elements[3] = ((closureN)self_735262)->elements[3];
c_737667.elements[4] = ((closureN)self_735262)->elements[4];
c_737667.elements[5] = ((closureN)self_735262)->elements[5];
c_737667.elements[6] = ((closureN)self_735262)->elements[6];
c_737667.elements[7] = ((closureN)self_735262)->elements[7];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_737667, r_732295);; 
}

static void __lambda_145(void *data, object self_735263, int argc, object *args) /* object self_735263, object cvar_91name_73224_731511 */
 {
 object cvar_91name_73224_731511 = args[0];
  
closureN_type c_737669;
object e_737733 [7];
c_737669.hdr.mark = gc_color_red;
 c_737669.hdr.grayed = 0;
c_737669.tag = closureN_tag;
 c_737669.fn = (function_type)__lambda_146;
c_737669.num_args = 1;
c_737669.num_elements = 7;
c_737669.elements = (object *)e_737733;
c_737669.elements[0] = ((closureN)self_735263)->elements[0];
c_737669.elements[1] = ((closureN)self_735263)->elements[1];
c_737669.elements[2] = ((closureN)self_735263)->elements[2];
c_737669.elements[3] = ((closureN)self_735263)->elements[3];
c_737669.elements[4] = cvar_91name_73224_731511;
c_737669.elements[5] = ((closureN)self_735263)->elements[5];
c_737669.elements[6] = ((closureN)self_735263)->elements[6];



return_direct_with_clo4(data,  __glo_c_91compile_91const_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91const_scheme_cyclone_cgen)->fn),  &c_737669, Cyc_car(data, ((closureN)self_735263)->elements[2]), ((closureN)self_735263)->elements[7], ((closureN)self_735263)->elements[4]);; 
}

static void __lambda_146(void *data, object self_735264, int argc, object *args) /* object self_735264, object r_732291 */
 {
 object r_732291 = args[0];
  
closureN_type c_737671;
object e_737729 [7];
c_737671.hdr.mark = gc_color_red;
 c_737671.hdr.grayed = 0;
c_737671.tag = closureN_tag;
 c_737671.fn = (function_type)__lambda_147;
c_737671.num_args = 1;
c_737671.num_elements = 7;
c_737671.elements = (object *)e_737729;
c_737671.elements[0] = ((closureN)self_735264)->elements[0];
c_737671.elements[1] = ((closureN)self_735264)->elements[1];
c_737671.elements[2] = ((closureN)self_735264)->elements[3];
c_737671.elements[3] = ((closureN)self_735264)->elements[4];
c_737671.elements[4] = ((closureN)self_735264)->elements[5];
c_737671.elements[5] = ((closureN)self_735264)->elements[6];
c_737671.elements[6] = r_732291;



return_direct_with_clo1(data,(closure)&c_737671,__lambda_147,  Cyc_cdr(data, ((closureN)self_735264)->elements[2]));; 
}

static void __lambda_147(void *data, object self_735265, int argc, object *args) /* object self_735265, object r_732293 */
 {
 object r_732293 = args[0];
  


closureN_type c_737676;
object e_737728 [6];
c_737676.hdr.mark = gc_color_red;
 c_737676.hdr.grayed = 0;
c_737676.tag = closureN_tag;
 c_737676.fn = (function_type)__lambda_148;
c_737676.num_args = 1;
c_737676.num_elements = 6;
c_737676.elements = (object *)e_737728;
c_737676.elements[0] = ((closureN)self_735265)->elements[1];
c_737676.elements[1] = ((closureN)self_735265)->elements[2];
c_737676.elements[2] = ((closureN)self_735265)->elements[3];
c_737676.elements[3] = ((closureN)self_735265)->elements[4];
c_737676.elements[4] = ((closureN)self_735265)->elements[5];
c_737676.elements[5] = ((closureN)self_735265)->elements[6];

return_closcall2(data,  car(((closureN)self_735265)->elements[0]),  &c_737676, r_732293);; 
}

static void __lambda_148(void *data, object self_735266, int argc, object *args) /* object self_735266, object r_732292 */
 {
 object r_732292 = args[0];
  


closureN_type c_737681;
object e_737725 [4];
c_737681.hdr.mark = gc_color_red;
 c_737681.hdr.grayed = 0;
c_737681.tag = closureN_tag;
 c_737681.fn = (function_type)__lambda_149;
c_737681.num_args = 1;
c_737681.num_elements = 4;
c_737681.elements = (object *)e_737725;
c_737681.elements[0] = ((closureN)self_735266)->elements[0];
c_737681.elements[1] = ((closureN)self_735266)->elements[2];
c_737681.elements[2] = ((closureN)self_735266)->elements[3];
c_737681.elements[3] = ((closureN)self_735266)->elements[4];

return_closcall4(data,  car(((closureN)self_735266)->elements[1]),  &c_737681, ((closureN)self_735266)->elements[2], ((closureN)self_735266)->elements[5], r_732292);; 
}

static void __lambda_149(void *data, object self_735267, int argc, object *args) /* object self_735267, object cell_73227_731512 */
 {
 object cell_73227_731512 = args[0];
  
closureN_type c_737683;
object e_737718 [5];
c_737683.hdr.mark = gc_color_red;
 c_737683.hdr.grayed = 0;
c_737683.tag = closureN_tag;
 c_737683.fn = (function_type)__lambda_150;
c_737683.num_args = 1;
c_737683.num_elements = 5;
c_737683.elements = (object *)e_737718;
c_737683.elements[0] = ((closureN)self_735267)->elements[0];
c_737683.elements[1] = cell_73227_731512;
c_737683.elements[2] = ((closureN)self_735267)->elements[1];
c_737683.elements[3] = ((closureN)self_735267)->elements[2];
c_737683.elements[4] = ((closureN)self_735267)->elements[3];


complex_num_type local_737721; 


return_direct_with_clo1(data,(closure)&c_737683,__lambda_150,  Cyc_fast_sum(data,&local_737721, obj_int2obj(1), car(((closureN)self_735267)->elements[3])));; 
}

static void __lambda_150(void *data, object self_735268, int argc, object *args) /* object self_735268, object r_732290 */
 {
 object r_732290 = args[0];
  
closureN_type c_737685;
object e_737714 [4];
c_737685.hdr.mark = gc_color_red;
 c_737685.hdr.grayed = 0;
c_737685.tag = closureN_tag;
 c_737685.fn = (function_type)__lambda_151;
c_737685.num_args = 1;
c_737685.num_elements = 4;
c_737685.elements = (object *)e_737714;
c_737685.elements[0] = ((closureN)self_735268)->elements[0];
c_737685.elements[1] = ((closureN)self_735268)->elements[1];
c_737685.elements[2] = ((closureN)self_735268)->elements[2];
c_737685.elements[3] = ((closureN)self_735268)->elements[3];



return_direct_with_clo1(data,(closure)&c_737685,__lambda_151,  Cyc_set_cell(data, ((closureN)self_735268)->elements[4], r_732290));; 
}

static void __lambda_151(void *data, object self_735269, int argc, object *args) /* object self_735269, object r_732284 */
 {

  
closureN_type c_737687;
object e_737706 [2];
c_737687.hdr.mark = gc_color_red;
 c_737687.hdr.grayed = 0;
c_737687.tag = closureN_tag;
 c_737687.fn = (function_type)__lambda_152;
c_737687.num_args = 1;
c_737687.num_elements = 2;
c_737687.elements = (object *)e_737706;
c_737687.elements[0] = ((closureN)self_735269)->elements[1];
c_737687.elements[1] = ((closureN)self_735269)->elements[3];




object c_737709 = Cyc_string_append(data,(closure)&c_737687,2,car(((closureN)self_735269)->elements[0]), ((closureN)self_735269)->elements[2]);
return_closcall1(data,(closure)&c_737687,  c_737709);; 
}

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




pair_type local_737702; 


return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_737689, Cyc_cadr(data, ((closureN)self_735270)->elements[0]), set_cell_as_expr(&local_737702, Cyc_car(data, ((closureN)self_735270)->elements[0])));; 
}

static void __lambda_153(void *data, object self_735271, int argc, object *args) /* object self_735271, object r_732286_734146_734148 */
 {
 object r_732286_734146_734148 = args[0];
  
list_2_type local_737694; 
return_direct_with_clo1(data,  ((closureN)self_735271)->elements[0], (((closure)  ((closureN)self_735271)->elements[0])->fn),  Cyc_fast_list_2(&local_737694, ((closureN)self_735271)->elements[1], r_732286_734146_734148));; 
}

static void __lambda_140(void *data, object self_735272, int argc, object *args) /* object self_735272, object r_732278 */
 {
 object r_732278 = args[0];
  
closureN_type c_737636;
object e_737652 [4];
c_737636.hdr.mark = gc_color_red;
 c_737636.hdr.grayed = 0;
c_737636.tag = closureN_tag;
 c_737636.fn = (function_type)__lambda_141;
c_737636.num_args = 1;
c_737636.num_elements = 4;
c_737636.elements = (object *)e_737652;
c_737636.elements[0] = ((closureN)self_735272)->elements[0];
c_737636.elements[1] = ((closureN)self_735272)->elements[1];
c_737636.elements[2] = ((closureN)self_735272)->elements[2];
c_737636.elements[3] = ((closureN)self_735272)->elements[3];



return_direct_with_clo1(data,(closure)&c_737636,__lambda_141,  Cyc_set_cell(data, ((closureN)self_735272)->elements[0], r_732278));; 
}

static void __lambda_141(void *data, object self_735273, int argc, object *args) /* object self_735273, object r_732276 */
 {

  


closureN_type c_737641;
object e_737650 [2];
c_737641.hdr.mark = gc_color_red;
 c_737641.hdr.grayed = 0;
c_737641.tag = closureN_tag;
 c_737641.fn = (function_type)__lambda_142;
c_737641.num_args = 1;
c_737641.num_elements = 2;
c_737641.elements = (object *)e_737650;
c_737641.elements[0] = ((closureN)self_735273)->elements[2];
c_737641.elements[1] = ((closureN)self_735273)->elements[3];

return_closcall2(data,  car(((closureN)self_735273)->elements[0]),  &c_737641, ((closureN)self_735273)->elements[1]);; 
}

static void __lambda_142(void *data, object self_735274, int argc, object *args) /* object self_735274, object r_732277 */
 {
 object r_732277 = args[0];
  
pair_type local_737646; 


return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  ((closureN)self_735274)->elements[0], r_732277, set_cell_as_expr(&local_737646, car(((closureN)self_735274)->elements[1])));; 
}

static void __lambda_134(void *data, object self_735275, int argc, object *args) /* object self_735275, object k_732307 */
 {
 object k_732307 = args[0];
  if( (boolean_f != ((closureN)self_735275)->elements[0]) ){ 
  
make_utf8_string_with_len(c_737620, "alloca_pair", 11, 11);
return_direct_with_clo1(data,  k_732307,__lambda_135,  &c_737620);
} else { 
  
make_utf8_string_with_len(c_737622, "make_pair", 9, 9);
return_direct_with_clo1(data,  k_732307,__lambda_135,  &c_737622);}
;; 
}

static void __lambda_128(void *data, object _, int argc, object *args) /* closure _,object k_732264, object cvar_73191_731496, object use_91alloca_73192_731497, object immutable_73193_731498 */
 {
object k_732264 = args[0]; object cvar_73191_731496 = args[1]; object use_91alloca_73192_731497 = args[2]; object immutable_73193_731498 = args[3];
  object r_732265;
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-set-immutable-field");
if( (boolean_f != immutable_73193_731498) ){ 
  r_732265 = use_91alloca_73192_731497;
} else { 
  r_732265 = boolean_f;}
;if( (boolean_f != r_732265) ){ 
  
make_utf8_string_with_len(c_737570, "->hdr.immutable = 1;", 20, 20);

object c_737569 = Cyc_string_append(data,  k_732264,2,cvar_73191_731496, &c_737570);
return_direct_with_clo1(data,  k_732264, (((closure)  k_732264)->fn),  c_737569);
} else { 
  
closureN_type c_737572;
object e_737580 [2];
c_737572.hdr.mark = gc_color_red;
 c_737572.hdr.grayed = 0;
c_737572.tag = closureN_tag;
 c_737572.fn = (function_type)__lambda_129;
c_737572.num_args = 0;
c_737572.num_elements = 2;
c_737572.elements = (object *)e_737580;
c_737572.elements[0] = immutable_73193_731498;
c_737572.elements[1] = use_91alloca_73192_731497;


closureN_type c_737581;
object e_737592 [2];
c_737581.hdr.mark = gc_color_red;
 c_737581.hdr.grayed = 0;
c_737581.tag = closureN_tag;
 c_737581.fn = (function_type)__lambda_130;
c_737581.num_args = 1;
c_737581.num_elements = 2;
c_737581.elements = (object *)e_737592;
c_737581.elements[0] = cvar_73191_731496;
c_737581.elements[1] = k_732264;

return_direct_with_clo1(data,(closure)&c_737572,__lambda_129,  &c_737581);}
;; 
}

static void __lambda_130(void *data, object self_735243, int argc, object *args) /* object self_735243, object r_732266 */
 {
 object r_732266 = args[0];
  if( (boolean_f != r_732266) ){ 
  
make_utf8_string_with_len(c_737588, ".hdr.immutable = 1;", 19, 19);

object c_737586 = Cyc_string_append(data,  ((closureN)self_735243)->elements[1],2,((closureN)self_735243)->elements[0], &c_737588);
return_direct_with_clo1(data,  ((closureN)self_735243)->elements[1], (((closure)  ((closureN)self_735243)->elements[1])->fn),  c_737586);
} else { 
  
make_utf8_string_with_len(c_737591, "", 0, 0);
return_direct_with_clo1(data,  ((closureN)self_735243)->elements[1], (((closure)  ((closureN)self_735243)->elements[1])->fn),  &c_737591);}
;; 
}

static void __lambda_129(void *data, object self_735244, int argc, object *args) /* object self_735244, object k_732267 */
 {
 object k_732267 = args[0];
  if( (boolean_f != ((closureN)self_735244)->elements[0]) ){ 
  
complex_num_type local_737577; 
return_direct_with_clo1(data,  k_732267,__lambda_130,  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737577, ((closureN)self_735244)->elements[1]));
} else { 
  return_direct_with_clo1(data,  k_732267,__lambda_130,  boolean_f);}
;; 
}

static void __lambda_127(void *data, object _, int argc, object *args) /* closure _,object k_732260, object qexp_73188_731493, object use_91alloca_73189_731494 */
 {
object k_732260 = args[0]; object qexp_73188_731493 = args[1]; object use_91alloca_73189_731494 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-quote");


return_direct_with_clo4(data,  __glo_c_91compile_91scalars_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91scalars_scheme_cyclone_cgen)->fn),  k_732260, Cyc_cadr(data, qexp_73188_731493), use_91alloca_73189_731494, boolean_t);; 
}

static void __lambda_112(void *data, object _, int argc, object *args) /* closure _,object k_732238, object exp_73148_731487, object append_91preamble_73149_731488, object cont_73150_731489, object ast_91id_73151_731490, object trace_73152_731491, object cps_127_73153_731492 */
 {
object k_732238 = args[0]; object exp_73148_731487 = args[1]; object append_91preamble_73149_731488 = args[2]; object cont_73150_731489 = args[3]; object ast_91id_73151_731490 = args[4]; object trace_73152_731491 = args[5]; object cps_127_73153_731492 = args[6];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-exp");

closureN_type c_737423;
object e_737557 [7];
c_737423.hdr.mark = gc_color_red;
 c_737423.hdr.grayed = 0;
c_737423.tag = closureN_tag;
 c_737423.fn = (function_type)__lambda_113;
c_737423.num_args = 1;
c_737423.num_elements = 7;
c_737423.elements = (object *)e_737557;
c_737423.elements[0] = append_91preamble_73149_731488;
c_737423.elements[1] = ast_91id_73151_731490;
c_737423.elements[2] = cont_73150_731489;
c_737423.elements[3] = cps_127_73153_731492;
c_737423.elements[4] = exp_73148_731487;
c_737423.elements[5] = k_732238;
c_737423.elements[6] = trace_73152_731491;

return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_737423, exp_73148_731487);; 
}

static void __lambda_113(void *data, object self_735229, int argc, object *args) /* object self_735229, object r_732239 */
 {
 object r_732239 = args[0];
  if( (boolean_f != r_732239) ){ 
  
pair_type local_737428; 

pair_type local_737431; 
return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  ((closureN)self_735229)->elements[5], set_pair_as_expr(&local_737428, quote__75closure, set_pair_as_expr(&local_737431, ((closureN)self_735229)->elements[4], NULL)), ((closureN)self_735229)->elements[0], ((closureN)self_735229)->elements[2], ((closureN)self_735229)->elements[1], ((closureN)self_735229)->elements[6], ((closureN)self_735229)->elements[3]);
} else { 
  
closureN_type c_737439;
object e_737555 [7];
c_737439.hdr.mark = gc_color_red;
 c_737439.hdr.grayed = 0;
c_737439.tag = closureN_tag;
 c_737439.fn = (function_type)__lambda_114;
c_737439.num_args = 1;
c_737439.num_elements = 7;
c_737439.elements = (object *)e_737555;
c_737439.elements[0] = ((closureN)self_735229)->elements[0];
c_737439.elements[1] = ((closureN)self_735229)->elements[1];
c_737439.elements[2] = ((closureN)self_735229)->elements[2];
c_737439.elements[3] = ((closureN)self_735229)->elements[3];
c_737439.elements[4] = ((closureN)self_735229)->elements[4];
c_737439.elements[5] = ((closureN)self_735229)->elements[5];
c_737439.elements[6] = ((closureN)self_735229)->elements[6];

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_737439, ((closureN)self_735229)->elements[4]);}
;; 
}

static void __lambda_114(void *data, object self_735230, int argc, object *args) /* object self_735230, object r_732244 */
 {
 object r_732244 = args[0];
  if( (boolean_f != r_732244) ){ 
  
closureN_type c_737441;
object e_737445 [2];
c_737441.hdr.mark = gc_color_red;
 c_737441.hdr.grayed = 0;
c_737441.tag = closureN_tag;
 c_737441.fn = (function_type)__lambda_115;
c_737441.num_args = 1;
c_737441.num_elements = 2;
c_737441.elements = (object *)e_737445;
c_737441.elements[0] = ((closureN)self_735230)->elements[4];
c_737441.elements[1] = ((closureN)self_735230)->elements[5];

return_direct_with_clo3(data,  __glo_alloca_127_scheme_cyclone_cgen, (((closure)  __glo_alloca_127_scheme_cyclone_cgen)->fn),  &c_737441, ((closureN)self_735230)->elements[1], ((closureN)self_735230)->elements[6]);
} else { 
  
closureN_type c_737449;
object e_737553 [7];
c_737449.hdr.mark = gc_color_red;
 c_737449.hdr.grayed = 0;
c_737449.tag = closureN_tag;
 c_737449.fn = (function_type)__lambda_116;
c_737449.num_args = 1;
c_737449.num_elements = 7;
c_737449.elements = (object *)e_737553;
c_737449.elements[0] = ((closureN)self_735230)->elements[0];
c_737449.elements[1] = ((closureN)self_735230)->elements[1];
c_737449.elements[2] = ((closureN)self_735230)->elements[2];
c_737449.elements[3] = ((closureN)self_735230)->elements[3];
c_737449.elements[4] = ((closureN)self_735230)->elements[4];
c_737449.elements[5] = ((closureN)self_735230)->elements[5];
c_737449.elements[6] = ((closureN)self_735230)->elements[6];

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_737449, ((closureN)self_735230)->elements[4]);}
;; 
}

static void __lambda_116(void *data, object self_735232, int argc, object *args) /* object self_735232, object r_732246 */
 {
 object r_732246 = args[0];
  if( (boolean_f != r_732246) ){ 
  
closureN_type c_737451;
object e_737461 [1];
c_737451.hdr.mark = gc_color_red;
 c_737451.hdr.grayed = 0;
c_737451.tag = closureN_tag;
 c_737451.fn = (function_type)__lambda_117;
c_737451.num_args = 1;
c_737451.num_elements = 1;
c_737451.elements = (object *)e_737461;
c_737451.elements[0] = ((closureN)self_735232)->elements[5];

return_direct_with_clo2(data,  __glo_mangle_scheme_cyclone_util, (((closure)  __glo_mangle_scheme_cyclone_util)->fn),  &c_737451, ((closureN)self_735232)->elements[4]);
} else { 
  
closureN_type c_737464;
object e_737548 [7];
c_737464.hdr.mark = gc_color_red;
 c_737464.hdr.grayed = 0;
c_737464.tag = closureN_tag;
 c_737464.fn = (function_type)__lambda_119;
c_737464.num_args = 1;
c_737464.num_elements = 7;
c_737464.elements = (object *)e_737548;
c_737464.elements[0] = ((closureN)self_735232)->elements[0];
c_737464.elements[1] = ((closureN)self_735232)->elements[1];
c_737464.elements[2] = ((closureN)self_735232)->elements[2];
c_737464.elements[3] = ((closureN)self_735232)->elements[3];
c_737464.elements[4] = ((closureN)self_735232)->elements[4];
c_737464.elements[5] = ((closureN)self_735232)->elements[5];
c_737464.elements[6] = ((closureN)self_735232)->elements[6];


complex_num_type local_737551; 
return_direct_with_clo1(data,(closure)&c_737464,__lambda_119,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737551, ((closureN)self_735232)->elements[4]));}
;; 
}

static void __lambda_119(void *data, object self_735235, int argc, object *args) /* object self_735235, object r_732249 */
 {
 object r_732249 = args[0];
  if( (boolean_f != r_732249) ){ 
  return_direct_with_clo2(data,  __glo_c_91compile_91ref_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91ref_scheme_cyclone_cgen)->fn),  ((closureN)self_735235)->elements[5], ((closureN)self_735235)->elements[4]);
} else { 
  
closureN_type c_737469;
object e_737546 [7];
c_737469.hdr.mark = gc_color_red;
 c_737469.hdr.grayed = 0;
c_737469.tag = closureN_tag;
 c_737469.fn = (function_type)__lambda_120;
c_737469.num_args = 1;
c_737469.num_elements = 7;
c_737469.elements = (object *)e_737546;
c_737469.elements[0] = ((closureN)self_735235)->elements[0];
c_737469.elements[1] = ((closureN)self_735235)->elements[1];
c_737469.elements[2] = ((closureN)self_735235)->elements[2];
c_737469.elements[3] = ((closureN)self_735235)->elements[3];
c_737469.elements[4] = ((closureN)self_735235)->elements[4];
c_737469.elements[5] = ((closureN)self_735235)->elements[5];
c_737469.elements[6] = ((closureN)self_735235)->elements[6];

return_direct_with_clo2(data,  __glo_quote_127_scheme_cyclone_util, (((closure)  __glo_quote_127_scheme_cyclone_util)->fn),  &c_737469, ((closureN)self_735235)->elements[4]);}
;; 
}

static void __lambda_120(void *data, object self_735236, int argc, object *args) /* object self_735236, object r_732250 */
 {
 object r_732250 = args[0];
  if( (boolean_f != r_732250) ){ 
  
closureN_type c_737471;
object e_737477 [2];
c_737471.hdr.mark = gc_color_red;
 c_737471.hdr.grayed = 0;
c_737471.tag = closureN_tag;
 c_737471.fn = (function_type)__lambda_121;
c_737471.num_args = 1;
c_737471.num_elements = 2;
c_737471.elements = (object *)e_737477;
c_737471.elements[0] = ((closureN)self_735236)->elements[4];
c_737471.elements[1] = ((closureN)self_735236)->elements[5];

return_direct_with_clo3(data,  __glo_alloca_127_scheme_cyclone_cgen, (((closure)  __glo_alloca_127_scheme_cyclone_cgen)->fn),  &c_737471, ((closureN)self_735236)->elements[1], ((closureN)self_735236)->elements[6]);
} else { 
  
closureN_type c_737481;
object e_737544 [7];
c_737481.hdr.mark = gc_color_red;
 c_737481.hdr.grayed = 0;
c_737481.tag = closureN_tag;
 c_737481.fn = (function_type)__lambda_122;
c_737481.num_args = 1;
c_737481.num_elements = 7;
c_737481.elements = (object *)e_737544;
c_737481.elements[0] = ((closureN)self_735236)->elements[0];
c_737481.elements[1] = ((closureN)self_735236)->elements[1];
c_737481.elements[2] = ((closureN)self_735236)->elements[2];
c_737481.elements[3] = ((closureN)self_735236)->elements[3];
c_737481.elements[4] = ((closureN)self_735236)->elements[4];
c_737481.elements[5] = ((closureN)self_735236)->elements[5];
c_737481.elements[6] = ((closureN)self_735236)->elements[6];

return_direct_with_clo2(data,  __glo_if_127_scheme_cyclone_util, (((closure)  __glo_if_127_scheme_cyclone_util)->fn),  &c_737481, ((closureN)self_735236)->elements[4]);}
;; 
}

static void __lambda_122(void *data, object self_735238, int argc, object *args) /* object self_735238, object r_732252 */
 {
 object r_732252 = args[0];
  if( (boolean_f != r_732252) ){ 
  return_direct_with_clo7(data,  __glo_c_91compile_91if_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91if_scheme_cyclone_cgen)->fn),  ((closureN)self_735238)->elements[5], ((closureN)self_735238)->elements[4], ((closureN)self_735238)->elements[0], ((closureN)self_735238)->elements[2], ((closureN)self_735238)->elements[1], ((closureN)self_735238)->elements[6], ((closureN)self_735238)->elements[3]);
} else { 
  
closureN_type c_737491;
object e_737539 [7];
c_737491.hdr.mark = gc_color_red;
 c_737491.hdr.grayed = 0;
c_737491.tag = closureN_tag;
 c_737491.fn = (function_type)__lambda_123;
c_737491.num_args = 1;
c_737491.num_elements = 7;
c_737491.elements = (object *)e_737539;
c_737491.elements[0] = ((closureN)self_735238)->elements[0];
c_737491.elements[1] = ((closureN)self_735238)->elements[1];
c_737491.elements[2] = ((closureN)self_735238)->elements[2];
c_737491.elements[3] = ((closureN)self_735238)->elements[3];
c_737491.elements[4] = ((closureN)self_735238)->elements[4];
c_737491.elements[5] = ((closureN)self_735238)->elements[5];
c_737491.elements[6] = ((closureN)self_735238)->elements[6];


complex_num_type local_737542; 
return_direct_with_clo1(data,(closure)&c_737491,__lambda_123,  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737542, quote__75closure, ((closureN)self_735238)->elements[4]));}
;; 
}

static void __lambda_123(void *data, object self_735239, int argc, object *args) /* object self_735239, object r_732253 */
 {
 object r_732253 = args[0];
  if( (boolean_f != r_732253) ){ 
  return_direct_with_clo7(data,  __glo_c_91compile_91closure_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91closure_scheme_cyclone_cgen)->fn),  ((closureN)self_735239)->elements[5], ((closureN)self_735239)->elements[4], ((closureN)self_735239)->elements[0], ((closureN)self_735239)->elements[2], ((closureN)self_735239)->elements[1], ((closureN)self_735239)->elements[6], ((closureN)self_735239)->elements[3]);
} else { 
  
closureN_type c_737501;
object e_737537 [7];
c_737501.hdr.mark = gc_color_red;
 c_737501.hdr.grayed = 0;
c_737501.tag = closureN_tag;
 c_737501.fn = (function_type)__lambda_124;
c_737501.num_args = 1;
c_737501.num_elements = 7;
c_737501.elements = (object *)e_737537;
c_737501.elements[0] = ((closureN)self_735239)->elements[0];
c_737501.elements[1] = ((closureN)self_735239)->elements[1];
c_737501.elements[2] = ((closureN)self_735239)->elements[2];
c_737501.elements[3] = ((closureN)self_735239)->elements[3];
c_737501.elements[4] = ((closureN)self_735239)->elements[4];
c_737501.elements[5] = ((closureN)self_735239)->elements[5];
c_737501.elements[6] = ((closureN)self_735239)->elements[6];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_737501, ((closureN)self_735239)->elements[4]);}
;; 
}

static void __lambda_124(void *data, object self_735240, int argc, object *args) /* object self_735240, object r_732254 */
 {
 object r_732254 = args[0];
  if( (boolean_f != r_732254) ){ 
  return_direct_with_clo5(data,  __glo_c_91compile_91global_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91global_scheme_cyclone_cgen)->fn),  ((closureN)self_735240)->elements[5], ((closureN)self_735240)->elements[4], ((closureN)self_735240)->elements[0], ((closureN)self_735240)->elements[2], ((closureN)self_735240)->elements[6]);
} else { 
  
closureN_type c_737509;
object e_737535 [7];
c_737509.hdr.mark = gc_color_red;
 c_737509.hdr.grayed = 0;
c_737509.tag = closureN_tag;
 c_737509.fn = (function_type)__lambda_125;
c_737509.num_args = 1;
c_737509.num_elements = 7;
c_737509.elements = (object *)e_737535;
c_737509.elements[0] = ((closureN)self_735240)->elements[0];
c_737509.elements[1] = ((closureN)self_735240)->elements[1];
c_737509.elements[2] = ((closureN)self_735240)->elements[2];
c_737509.elements[3] = ((closureN)self_735240)->elements[3];
c_737509.elements[4] = ((closureN)self_735240)->elements[4];
c_737509.elements[5] = ((closureN)self_735240)->elements[5];
c_737509.elements[6] = ((closureN)self_735240)->elements[6];

return_direct_with_clo2(data,  __glo_define_91c_127_scheme_cyclone_util, (((closure)  __glo_define_91c_127_scheme_cyclone_util)->fn),  &c_737509, ((closureN)self_735240)->elements[4]);}
;; 
}

static void __lambda_125(void *data, object self_735241, int argc, object *args) /* object self_735241, object r_732255 */
 {
 object r_732255 = args[0];
  if( (boolean_f != r_732255) ){ 
  return_direct_with_clo5(data,  __glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen)->fn),  ((closureN)self_735241)->elements[5], ((closureN)self_735241)->elements[4], ((closureN)self_735241)->elements[0], ((closureN)self_735241)->elements[2], ((closureN)self_735241)->elements[6]);
} else { 
  
closureN_type c_737517;
object e_737530 [7];
c_737517.hdr.mark = gc_color_red;
 c_737517.hdr.grayed = 0;
c_737517.tag = closureN_tag;
 c_737517.fn = (function_type)__lambda_126;
c_737517.num_args = 1;
c_737517.num_elements = 7;
c_737517.elements = (object *)e_737530;
c_737517.elements[0] = ((closureN)self_735241)->elements[0];
c_737517.elements[1] = ((closureN)self_735241)->elements[1];
c_737517.elements[2] = ((closureN)self_735241)->elements[2];
c_737517.elements[3] = ((closureN)self_735241)->elements[3];
c_737517.elements[4] = ((closureN)self_735241)->elements[4];
c_737517.elements[5] = ((closureN)self_735241)->elements[5];
c_737517.elements[6] = ((closureN)self_735241)->elements[6];


complex_num_type local_737533; 
return_direct_with_clo1(data,(closure)&c_737517,__lambda_126,  ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737533, ((closureN)self_735241)->elements[4]));}
;; 
}

static void __lambda_126(void *data, object self_735242, int argc, object *args) /* object self_735242, object r_732256 */
 {
 object r_732256 = args[0];
  if( (boolean_f != r_732256) ){ 
  return_direct_with_clo7(data,  __glo_c_91compile_91app_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91app_scheme_cyclone_cgen)->fn),  ((closureN)self_735242)->elements[5], ((closureN)self_735242)->elements[4], ((closureN)self_735242)->elements[0], ((closureN)self_735242)->elements[2], ((closureN)self_735242)->elements[1], ((closureN)self_735242)->elements[6], ((closureN)self_735242)->elements[3]);
} else { 
  
make_utf8_string_with_len(c_737528, "unknown exp in c-compile-exp: ", 30, 30);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735242)->elements[5], &c_737528, ((closureN)self_735242)->elements[4]);}
;; 
}

static void __lambda_121(void *data, object self_735237, int argc, object *args) /* object self_735237, object r_732251 */
 {
 object r_732251 = args[0];
  

return_direct_with_clo4(data,  __glo_c_91compile_91scalars_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91scalars_scheme_cyclone_cgen)->fn),  ((closureN)self_735237)->elements[1], Cyc_cadr(data, ((closureN)self_735237)->elements[0]), r_732251, boolean_t);; 
}

static void __lambda_117(void *data, object self_735233, int argc, object *args) /* object self_735233, object r_732248 */
 {
 object r_732248 = args[0];
  
closureN_type c_737453;
object e_737456 [1];
c_737453.hdr.mark = gc_color_red;
 c_737453.hdr.grayed = 0;
c_737453.tag = closureN_tag;
 c_737453.fn = (function_type)__lambda_118;
c_737453.num_args = 1;
c_737453.num_elements = 1;
c_737453.elements = (object *)e_737456;
c_737453.elements[0] = ((closureN)self_735233)->elements[0];


make_utf8_string_with_len(c_737460, "primitive_", 10, 10);

object c_737459 = Cyc_string_append(data,(closure)&c_737453,2,&c_737460, r_732248);
return_closcall1(data,(closure)&c_737453,  c_737459);; 
}

static void __lambda_118(void *data, object self_735234, int argc, object *args) /* object self_735234, object r_732247 */
 {
 object r_732247 = args[0];
  return_direct_with_clo2(data,  __glo_c_117code_scheme_cyclone_cgen, (((closure)  __glo_c_117code_scheme_cyclone_cgen)->fn),  ((closureN)self_735234)->elements[0], r_732247);; 
}

static void __lambda_115(void *data, object self_735231, int argc, object *args) /* object self_735231, object r_732245 */
 {
 object r_732245 = args[0];
  return_direct_with_clo4(data,  __glo_c_91compile_91const_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91const_scheme_cyclone_cgen)->fn),  ((closureN)self_735231)->elements[1], ((closureN)self_735231)->elements[0], r_732245, boolean_f);; 
}

static void __lambda_105(void *data, object _, int argc, object *args) /* closure _,object k_732229, object exp_73135_731481, object src_91file_73136_731482 */
 {
object k_732229 = args[0]; object exp_73135_731481 = args[1]; object src_91file_73136_731482 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-compile-program");

closureN_type c_737370;
object e_737419 [3];
c_737370.hdr.mark = gc_color_red;
 c_737370.hdr.grayed = 0;
c_737370.tag = closureN_tag;
 c_737370.fn = (function_type)__lambda_106;
c_737370.num_args = 1;
c_737370.num_elements = 3;
c_737370.elements = (object *)e_737419;
c_737370.elements[0] = exp_73135_731481;
c_737370.elements[1] = k_732229;
c_737370.elements[2] = src_91file_73136_731482;


make_utf8_string_with_len(c_737420, "", 0, 0);
return_direct_with_clo1(data,(closure)&c_737370,__lambda_106,  &c_737420);; 
}

static void __lambda_106(void *data, object self_735222, int argc, object *args) /* object self_735222, object preamble_73139_731483 */
 {
 object preamble_73139_731483 = args[0];
  
closureN_type c_737372;
object e_737415 [3];
c_737372.hdr.mark = gc_color_red;
 c_737372.hdr.grayed = 0;
c_737372.tag = closureN_tag;
 c_737372.fn = (function_type)__lambda_1295;
c_737372.num_args = 1;
c_737372.num_elements = 3;
c_737372.elements = (object *)e_737415;
c_737372.elements[0] = ((closureN)self_735222)->elements[0];
c_737372.elements[1] = ((closureN)self_735222)->elements[1];
c_737372.elements[2] = ((closureN)self_735222)->elements[2];


pair_type local_737418; 
return_direct_with_clo1(data,(closure)&c_737372,__lambda_1295,  set_cell_as_expr(&local_737418, preamble_73139_731483));; 
}

static void __lambda_1295(void *data, object self_735223, int argc, object *args) /* object self_735223, object preamble_73139_731483 */
 {
 object preamble_73139_731483 = args[0];
  
closureN_type c_737374;
object e_737396 [4];
c_737374.hdr.mark = gc_color_red;
 c_737374.hdr.grayed = 0;
c_737374.tag = closureN_tag;
 c_737374.fn = (function_type)__lambda_107;
c_737374.num_args = 1;
c_737374.num_elements = 4;
c_737374.elements = (object *)e_737396;
c_737374.elements[0] = ((closureN)self_735223)->elements[0];
c_737374.elements[1] = ((closureN)self_735223)->elements[1];
c_737374.elements[2] = preamble_73139_731483;
c_737374.elements[3] = ((closureN)self_735223)->elements[2];


closureN_type c_737397;
object e_737414 [1];
c_737397.hdr.mark = gc_color_red;
 c_737397.hdr.grayed = 0;
c_737397.tag = closureN_tag;
 c_737397.fn = (function_type)__lambda_110;
c_737397.num_args = 1;
c_737397.num_elements = 1;
c_737397.elements = (object *)e_737414;
c_737397.elements[0] = preamble_73139_731483;

return_direct_with_clo1(data,(closure)&c_737374,__lambda_107,  &c_737397);; 
}

static void __lambda_110(void *data, object self_735224, int argc, object *args) /* object self_735224, object k_732234, object s_73147_731486 */
 {
 object k_732234 = args[0]; object s_73147_731486 = args[1];
  
closureN_type c_737399;
object e_737405 [2];
c_737399.hdr.mark = gc_color_red;
 c_737399.hdr.grayed = 0;
c_737399.tag = closureN_tag;
 c_737399.fn = (function_type)__lambda_111;
c_737399.num_args = 1;
c_737399.num_elements = 2;
c_737399.elements = (object *)e_737405;
c_737399.elements[0] = k_732234;
c_737399.elements[1] = ((closureN)self_735224)->elements[0];




make_utf8_string_with_len(c_737412, "  ", 2, 2);

make_utf8_string_with_len(c_737413, "\n", 1, 1);

object c_737408 = Cyc_string_append(data,(closure)&c_737399,4,car(((closureN)self_735224)->elements[0]), &c_737412, s_73147_731486, &c_737413);
return_closcall1(data,(closure)&c_737399,  c_737408);; 
}

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

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

static void __lambda_107(void *data, object self_735226, int argc, object *args) /* object self_735226, object append_91preamble_73142_731484 */
 {
 object append_91preamble_73142_731484 = args[0];
  
closureN_type c_737376;
object e_737389 [2];
c_737376.hdr.mark = gc_color_red;
 c_737376.hdr.grayed = 0;
c_737376.tag = closureN_tag;
 c_737376.fn = (function_type)__lambda_108;
c_737376.num_args = 1;
c_737376.num_elements = 2;
c_737376.elements = (object *)e_737389;
c_737376.elements[0] = ((closureN)self_735226)->elements[1];
c_737376.elements[1] = ((closureN)self_735226)->elements[2];


make_utf8_string_with_len(c_737391, "cont", 4, 4);

pair_type local_737394; 
return_direct_with_clo7(data,  __glo_c_91compile_91exp_scheme_cyclone_cgen, (((closure)  __glo_c_91compile_91exp_scheme_cyclone_cgen)->fn),  &c_737376, ((closureN)self_735226)->elements[0], append_91preamble_73142_731484, &c_737391, obj_int2obj(-1), set_cell_as_expr(&local_737394, ((closureN)self_735226)->elements[3]), boolean_t);; 
}

static void __lambda_108(void *data, object self_735227, int argc, object *args) /* object self_735227, object body_73145_731485 */
 {
 object body_73145_731485 = args[0];
  
closureN_type c_737378;
object e_737387 [2];
c_737378.hdr.mark = gc_color_red;
 c_737378.hdr.grayed = 0;
c_737378.tag = closureN_tag;
 c_737378.fn = (function_type)__lambda_109;
c_737378.num_args = 1;
c_737378.num_elements = 2;
c_737378.elements = (object *)e_737387;
c_737378.elements[0] = ((closureN)self_735227)->elements[0];
c_737378.elements[1] = ((closureN)self_735227)->elements[1];


make_utf8_string_with_len(c_737388, "  ", 2, 2);
return_direct_with_clo3(data,  __glo_c_117serialize_scheme_cyclone_cgen, (((closure)  __glo_c_117serialize_scheme_cyclone_cgen)->fn),  &c_737378, body_73145_731485, &c_737388);; 
}

static void __lambda_109(void *data, object self_735228, int argc, object *args) /* object self_735228, object r_732232 */
 {
 object r_732232 = args[0];
  


object c_737383 = Cyc_string_append(data,  ((closureN)self_735228)->elements[0],2,car(((closureN)self_735228)->elements[1]), r_732232);
return_direct_with_clo1(data,  ((closureN)self_735228)->elements[0], (((closure)  ((closureN)self_735228)->elements[0])->fn),  c_737383);; 
}

static void __lambda_101(void *data, object _, int argc, object *args) /* closure _,object k_732214, object cp_73125_731477, object prefix_73126_731478 */
 {
object k_732214 = args[0]; object cp_73125_731477 = args[1]; object prefix_73126_731478 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:serialize");

closureN_type c_737317;
object e_737365 [3];
c_737317.hdr.mark = gc_color_red;
 c_737317.hdr.grayed = 0;
c_737317.tag = closureN_tag;
 c_737317.fn = (function_type)__lambda_102;
c_737317.num_args = 1;
c_737317.num_elements = 3;
c_737317.elements = (object *)e_737365;
c_737317.elements[0] = cp_73125_731477;
c_737317.elements[1] = k_732214;
c_737317.elements[2] = prefix_73126_731478;



return_direct_with_clo3(data,  __glo_c_117allocs_91_125str_scheme_cyclone_cgen, (((closure)  __glo_c_117allocs_91_125str_scheme_cyclone_cgen)->fn),  &c_737317, Cyc_cadr(data, cp_73125_731477), prefix_73126_731478);; 
}

static void __lambda_102(void *data, object self_735219, int argc, object *args) /* object self_735219, object r_732217_734133_734139 */
 {
 object r_732217_734133_734139 = args[0];
  
closureN_type c_737319;
object e_737352 [1];
c_737319.hdr.mark = gc_color_red;
 c_737319.hdr.grayed = 0;
c_737319.tag = closureN_tag;
 c_737319.fn = (function_type)__lambda_103;
c_737319.num_args = 0;
c_737319.num_elements = 1;
c_737319.elements = (object *)e_737352;
c_737319.elements[0] = ((closureN)self_735219)->elements[0];


closureN_type c_737353;
object e_737364 [4];
c_737353.hdr.mark = gc_color_red;
 c_737353.hdr.grayed = 0;
c_737353.tag = closureN_tag;
 c_737353.fn = (function_type)__lambda_104;
c_737353.num_args = 1;
c_737353.num_elements = 4;
c_737353.elements = (object *)e_737364;
c_737353.elements[0] = ((closureN)self_735219)->elements[0];
c_737353.elements[1] = ((closureN)self_735219)->elements[1];
c_737353.elements[2] = ((closureN)self_735219)->elements[2];
c_737353.elements[3] = r_732217_734133_734139;

return_direct_with_clo1(data,(closure)&c_737319,__lambda_103,  &c_737353);; 
}

static void __lambda_104(void *data, object self_735220, int argc, object *args) /* object self_735220, object r_732218_734137_734143 */
 {
 object r_732218_734137_734143 = args[0];
  


object c_737358 = Cyc_string_append(data,  ((closureN)self_735220)->elements[1],4,((closureN)self_735220)->elements[3], ((closureN)self_735220)->elements[2], Cyc_car(data, ((closureN)self_735220)->elements[0]), r_732218_734137_734143);
return_direct_with_clo1(data,  ((closureN)self_735220)->elements[1], (((closure)  ((closureN)self_735220)->elements[1])->fn),  c_737358);; 
}

static void __lambda_103(void *data, object self_735221, int argc, object *args) /* object self_735221, object k_732219_734134_734140 */
 {
 object k_732219_734134_734140 = args[0];
  object r_732220_734136_734142;
    
  
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, Cyc_car(data, ((closureN)self_735221)->elements[0])), obj_int2obj(0))) ){ 
  object local_737331 = alloca(sizeof(complex_num_type)); 
  
  
  
  object local_737341 = alloca(sizeof(complex_num_type)); 
  
  
  r_732220_734136_734142 = ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,local_737331, Cyc_eq(obj_char2obj(59), Cyc_string_ref(data, Cyc_car(data, ((closureN)self_735221)->elements[0]), Cyc_fast_sub(data,local_737341, Cyc_string_length(data, Cyc_car(data, ((closureN)self_735221)->elements[0])), obj_int2obj(1)))));
} else { 
  r_732220_734136_734142 = boolean_f;}
;if( (boolean_f != r_732220_734136_734142) ){ 
  
make_utf8_string_with_len(c_737349, ";", 1, 1);
return_direct_with_clo1(data,  k_732219_734134_734140,__lambda_104,  &c_737349);
} else { 
  
make_utf8_string_with_len(c_737351, "", 0, 0);
return_direct_with_clo1(data,  k_732219_734134_734140,__lambda_104,  &c_737351);}
;; 
}

static void __lambda_98(void *data, object _, int argc, object *args) /* closure _,object k_732205, object prefix_73122_731474, object cp1_73123_731475, object cp2_73124_731476 */
 {
object k_732205 = args[0]; object prefix_73122_731474 = args[1]; object cp1_73123_731475 = args[2]; object cp2_73124_731476 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:append/prefix");

closureN_type c_737291;
object e_737307 [3];
c_737291.hdr.mark = gc_color_red;
 c_737291.hdr.grayed = 0;
c_737291.tag = closureN_tag;
 c_737291.fn = (function_type)__lambda_99;
c_737291.num_args = 1;
c_737291.num_elements = 3;
c_737291.elements = (object *)e_737307;
c_737291.elements[0] = cp1_73123_731475;
c_737291.elements[1] = cp2_73124_731476;
c_737291.elements[2] = k_732205;






object c_737310 = Cyc_string_append(data,(closure)&c_737291,3,prefix_73122_731474, Cyc_car(data, cp1_73123_731475), Cyc_car(data, cp2_73124_731476));
return_closcall1(data,(closure)&c_737291,  c_737310);; 
}

static void __lambda_99(void *data, object self_735217, int argc, object *args) /* object self_735217, object r_732206_734117_734122 */
 {
 object r_732206_734117_734122 = args[0];
  
closureN_type c_737293;
object e_737300 [2];
c_737293.hdr.mark = gc_color_red;
 c_737293.hdr.grayed = 0;
c_737293.tag = closureN_tag;
 c_737293.fn = (function_type)__lambda_100;
c_737293.num_args = 1;
c_737293.num_elements = 2;
c_737293.elements = (object *)e_737300;
c_737293.elements[0] = ((closureN)self_735217)->elements[2];
c_737293.elements[1] = r_732206_734117_734122;





return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_737293, Cyc_cadr(data, ((closureN)self_735217)->elements[0]), Cyc_cadr(data, ((closureN)self_735217)->elements[1]));; 
}

static void __lambda_100(void *data, object self_735218, int argc, object *args) /* object self_735218, object r_732207_734120_734125_734128_734130 */
 {
 object r_732207_734120_734125_734128_734130 = args[0];
  
list_2_type local_737298; 
return_direct_with_clo1(data,  ((closureN)self_735218)->elements[0], (((closure)  ((closureN)self_735218)->elements[0])->fn),  Cyc_fast_list_2(&local_737298, ((closureN)self_735218)->elements[1], r_732207_734120_734125_734128_734130));; 
}

static void __lambda_95(void *data, object _, int argc, object *args) /* closure _,object k_732196, object cp1_73120_731472, object cp2_73121_731473 */
 {
object k_732196 = args[0]; object cp1_73120_731472 = args[1]; object cp2_73121_731473 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:append");

closureN_type c_737265;
object e_737281 [3];
c_737265.hdr.mark = gc_color_red;
 c_737265.hdr.grayed = 0;
c_737265.tag = closureN_tag;
 c_737265.fn = (function_type)__lambda_96;
c_737265.num_args = 1;
c_737265.num_elements = 3;
c_737265.elements = (object *)e_737281;
c_737265.elements[0] = cp1_73120_731472;
c_737265.elements[1] = cp2_73121_731473;
c_737265.elements[2] = k_732196;






object c_737284 = Cyc_string_append(data,(closure)&c_737265,2,Cyc_car(data, cp1_73120_731472), Cyc_car(data, cp2_73121_731473));
return_closcall1(data,(closure)&c_737265,  c_737284);; 
}

static void __lambda_96(void *data, object self_735215, int argc, object *args) /* object self_735215, object r_732197_734101_734106 */
 {
 object r_732197_734101_734106 = args[0];
  
closureN_type c_737267;
object e_737274 [2];
c_737267.hdr.mark = gc_color_red;
 c_737267.hdr.grayed = 0;
c_737267.tag = closureN_tag;
 c_737267.fn = (function_type)__lambda_97;
c_737267.num_args = 1;
c_737267.num_elements = 2;
c_737267.elements = (object *)e_737274;
c_737267.elements[0] = ((closureN)self_735215)->elements[2];
c_737267.elements[1] = r_732197_734101_734106;





return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_737267, Cyc_cadr(data, ((closureN)self_735215)->elements[0]), Cyc_cadr(data, ((closureN)self_735215)->elements[1]));; 
}

static void __lambda_97(void *data, object self_735216, int argc, object *args) /* object self_735216, object r_732198_734104_734109_734112_734114 */
 {
 object r_732198_734104_734109_734112_734114 = args[0];
  
list_2_type local_737272; 
return_direct_with_clo1(data,  ((closureN)self_735216)->elements[0], (((closure)  ((closureN)self_735216)->elements[0])->fn),  Cyc_fast_list_2(&local_737272, ((closureN)self_735216)->elements[1], r_732198_734104_734109_734112_734114));; 
}

static void __lambda_91(void *data, object _, int argc, object *args) /* closure _,object k_732190, object c_91allocs_73115_731467, object prefix_73116_731468, object suffix_73117_731469 */
 {
object k_732190 = args[0]; object c_91allocs_73115_731467 = args[1]; object prefix_73116_731468 = args[2]; object suffix_73117_731469 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:allocs->str2");

closureN_type c_737242;
object e_737247 [2];
c_737242.hdr.mark = gc_color_red;
 c_737242.hdr.grayed = 0;
c_737242.tag = closureN_tag;
 c_737242.fn = (function_type)__lambda_92;
c_737242.num_args = 1;
c_737242.num_elements = 2;
c_737242.elements = (object *)e_737247;
c_737242.elements[0] = c_91allocs_73115_731467;
c_737242.elements[1] = k_732190;


closureN_type c_737248;
object e_737262 [2];
c_737248.hdr.mark = gc_color_red;
 c_737248.hdr.grayed = 0;
c_737248.tag = closureN_tag;
 c_737248.fn = (function_type)__lambda_93;
c_737248.num_args = 2;
c_737248.num_elements = 2;
c_737248.elements = (object *)e_737262;
c_737248.elements[0] = prefix_73116_731468;
c_737248.elements[1] = suffix_73117_731469;

return_direct_with_clo1(data,(closure)&c_737242,__lambda_92,  &c_737248);; 
}

static void __lambda_93(void *data, object self_735212, int argc, object *args) /* object self_735212, object k_732192, object x_73118_731470, object y_73119_731471 */
 {
 object k_732192 = args[0]; object x_73118_731470 = args[1];
  
closureN_type c_737250;
object e_737256 [1];
c_737250.hdr.mark = gc_color_red;
 c_737250.hdr.grayed = 0;
c_737250.tag = closureN_tag;
 c_737250.fn = (function_type)__lambda_94;
c_737250.num_args = 1;
c_737250.num_elements = 1;
c_737250.elements = (object *)e_737256;
c_737250.elements[0] = k_732192;


object c_737259 = Cyc_string_append(data,(closure)&c_737250,3,((closureN)self_735212)->elements[0], x_73118_731470, ((closureN)self_735212)->elements[1]);
return_closcall1(data,(closure)&c_737250,  c_737259);; 
}

static void __lambda_94(void *data, object self_735213, int argc, object *args) /* object self_735213, object r_732193 */
 {
 object r_732193 = args[0];
  
object c_737255 = Cyc_string_append(data,  ((closureN)self_735213)->elements[0],1,r_732193);
return_direct_with_clo1(data,  ((closureN)self_735213)->elements[0], (((closure)  ((closureN)self_735213)->elements[0])->fn),  c_737255);; 
}

static void __lambda_92(void *data, object self_735214, int argc, object *args) /* object self_735214, object r_732191 */
 {
 object r_732191 = args[0];
  
make_utf8_string_with_len(c_737245, "", 0, 0);
return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_735214)->elements[1], r_732191, &c_737245, ((closureN)self_735214)->elements[0]);; 
}

static void __lambda_87(void *data, object _, int argc, object *args) /* closure _,object k_732181, object c_91allocs_73111_731463, object prefix_73112_731464_raw, ... */
 {
object k_732181 = args[0]; object c_91allocs_73111_731463 = args[1];
load_varargs(prefix_73112_731464, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:allocs->str");

closureN_type c_737208;
object e_737213 [2];
c_737208.hdr.mark = gc_color_red;
 c_737208.hdr.grayed = 0;
c_737208.tag = closureN_tag;
 c_737208.fn = (function_type)__lambda_88;
c_737208.num_args = 1;
c_737208.num_elements = 2;
c_737208.elements = (object *)e_737213;
c_737208.elements[0] = c_91allocs_73111_731463;
c_737208.elements[1] = k_732181;


closureN_type c_737214;
object e_737239 [1];
c_737214.hdr.mark = gc_color_red;
 c_737214.hdr.grayed = 0;
c_737214.tag = closureN_tag;
 c_737214.fn = (function_type)__lambda_89;
c_737214.num_args = 2;
c_737214.num_elements = 1;
c_737214.elements = (object *)e_737239;
c_737214.elements[0] = prefix_73112_731464;

return_direct_with_clo1(data,(closure)&c_737208,__lambda_88,  &c_737214);; 
}

static void __lambda_89(void *data, object self_735209, int argc, object *args) /* object self_735209, object k_732183, object x_73113_731465, object y_73114_731466 */
 {
 object k_732183 = args[0]; object x_73113_731465 = args[1]; object y_73114_731466 = args[2];
  object r_732185;
    
if( (boolean_f != Cyc_is_null(((closureN)self_735209)->elements[0])) ){ 
  object c_737220;
 alloc_string(data,c_737220, 0, 0);
char tmp_737221[] = "";
memcpy(((string_type *)c_737220)->str, tmp_737221,0);
((string_type *)c_737220)->str[0] = '\0';
  r_732185 = c_737220;
} else { 
  
  r_732185 = Cyc_car(data, ((closureN)self_735209)->elements[0]);}
;
closureN_type c_737227;
object e_737234 [2];
c_737227.hdr.mark = gc_color_red;
 c_737227.hdr.grayed = 0;
c_737227.tag = closureN_tag;
 c_737227.fn = (function_type)__lambda_90;
c_737227.num_args = 1;
c_737227.num_elements = 2;
c_737227.elements = (object *)e_737234;
c_737227.elements[0] = k_732183;
c_737227.elements[1] = y_73114_731466;


make_utf8_string_with_len(c_737238, "\n", 1, 1);

object c_737237 = Cyc_string_append(data,(closure)&c_737227,3,r_732185, x_73113_731465, &c_737238);
return_closcall1(data,(closure)&c_737227,  c_737237);; 
}

static void __lambda_90(void *data, object self_735210, int argc, object *args) /* object self_735210, object r_732184 */
 {
 object r_732184 = args[0];
  
object c_737232 = Cyc_string_append(data,  ((closureN)self_735210)->elements[0],2,r_732184, ((closureN)self_735210)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_735210)->elements[0], (((closure)  ((closureN)self_735210)->elements[0])->fn),  c_737232);; 
}

static void __lambda_88(void *data, object self_735211, int argc, object *args) /* object self_735211, object r_732182 */
 {
 object r_732182 = args[0];
  
make_utf8_string_with_len(c_737211, "", 0, 0);
return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_735211)->elements[1], r_732182, &c_737211, ((closureN)self_735211)->elements[0]);; 
}

static object __lambda_1340(void *data, object ptr,object c_91tuple_73110_731462) {

  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:num-args");


return_copy(ptr,  Cyc_caddr(data, c_91tuple_73110_731462));; 
}

static void __lambda_86(void *data, object _, int argc, object *args) /* closure _,object k_732178, object c_91tuple_73110_731462 */
 {
object k_732178 = args[0]; object c_91tuple_73110_731462 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:num-args");


return_direct_with_clo1(data,  k_732178, (((closure)  k_732178)->fn),  Cyc_caddr(data, c_91tuple_73110_731462));; 
}

static object __lambda_1339(void *data, object ptr,object c_91pair_73109_731461) {

  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:allocs");


return_copy(ptr,  Cyc_cadr(data, c_91pair_73109_731461));; 
}

static void __lambda_85(void *data, object _, int argc, object *args) /* closure _,object k_732175, object c_91pair_73109_731461 */
 {
object k_732175 = args[0]; object c_91pair_73109_731461 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:allocs");


return_direct_with_clo1(data,  k_732175, (((closure)  k_732175)->fn),  Cyc_cadr(data, c_91pair_73109_731461));; 
}

static void __lambda_84(void *data, object _, int argc, object *args) /* closure _,object k_732172, object c_91pair_73108_731460 */
 {
object k_732172 = args[0]; object c_91pair_73108_731460 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:body");


return_direct_with_clo1(data,  k_732172, (((closure)  k_732172)->fn),  Cyc_car(data, c_91pair_73108_731460));; 
}

static void __lambda_83(void *data, object _, int argc, object *args) /* closure _,object k_732168, object cp_73106_731458, object num_91args_73107_731459 */
 {
object k_732168 = args[0]; object cp_73106_731458 = args[1]; object num_91args_73107_731459 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:tuple/args");

pair_type local_737185; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  k_732168, cp_73106_731458, set_cell_as_expr(&local_737185, num_91args_73107_731459));; 
}

static void __lambda_81(void *data, object _, int argc, object *args) /* closure _,object k_732164, object str_73105_731457 */
 {
object k_732164 = args[0]; object str_73105_731457 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:code");

closureN_type c_737173;
object e_737180 [2];
c_737173.hdr.mark = gc_color_red;
 c_737173.hdr.grayed = 0;
c_737173.tag = closureN_tag;
 c_737173.fn = (function_type)__lambda_82;
c_737173.num_args = 1;
c_737173.num_elements = 2;
c_737173.elements = (object *)e_737180;
c_737173.elements[0] = k_732164;
c_737173.elements[1] = str_73105_731457;

return_direct_with_clo1(data,  __glo__list_scheme_base, (((closure)  __glo__list_scheme_base)->fn),  &c_737173);; 
}

static void __lambda_82(void *data, object self_735208, int argc, object *args) /* object self_735208, object r_732165 */
 {
 object r_732165 = args[0];
  
list_2_type local_737178; 
return_direct_with_clo1(data,  ((closureN)self_735208)->elements[0], (((closure)  ((closureN)self_735208)->elements[0])->fn),  Cyc_fast_list_2(&local_737178, ((closureN)self_735208)->elements[1], r_732165));; 
}

static void __lambda_80(void *data, object _, int argc, object *args) /* closure _,object k_732161, object str_73103_731455, object cvars_73104_731456 */
 {
object k_732161 = args[0]; object str_73103_731455 = args[1]; object cvars_73104_731456 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c:code/vars");

list_2_type local_737170; 
return_direct_with_clo1(data,  k_732161, (((closure)  k_732161)->fn),  Cyc_fast_list_2(&local_737170, str_73103_731455, cvars_73104_731456));; 
}

static object __lambda_1338(void *data, object ptr,object trace_73102_731454) {

  Cyc_st_add(data, "scheme/cyclone/cgen.sld:st:->var");


return_copy(ptr,  Cyc_cdr(data, trace_73102_731454));; 
}

static void __lambda_79(void *data, object _, int argc, object *args) /* closure _,object k_732158, object trace_73102_731454 */
 {
object k_732158 = args[0]; object trace_73102_731454 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:st:->var");


return_direct_with_clo1(data,  k_732158, (((closure)  k_732158)->fn),  Cyc_cdr(data, trace_73102_731454));; 
}

static void __lambda_77(void *data, object _, int argc, object *args) /* closure _,object k_732146, object trace_7393_731451 */
 {
object k_732146 = args[0]; object trace_7393_731451 = args[1];
  object r_732147;
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:st:->code");
  object local_737115 = alloca(sizeof(complex_num_type)); 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,local_737115, Cyc_is_pair(trace_7393_731451))) ){ 
  object local_737121 = alloca(sizeof(complex_num_type)); 
  
  r_732147 = ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,local_737121, Cyc_is_pair(trace_7393_731451));
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, trace_7393_731451))) ){ 
  
  
  r_732147 = Cyc_is_null(Cyc_cdr(data, trace_7393_731451));
} else { 
  object local_737136 = alloca(sizeof(complex_num_type)); 
  r_732147 = ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,local_737136, __glo__85cgen_117track_91call_91history_85_scheme_cyclone_cgen);}
;}
;if( (boolean_f != r_732147) ){ 
  
make_utf8_string_with_len(c_737138, "", 0, 0);
return_direct_with_clo1(data,  k_732146, (((closure)  k_732146)->fn),  &c_737138);
} else { 
  
closureN_type c_737140;
object e_737152 [2];
c_737140.hdr.mark = gc_color_red;
 c_737140.hdr.grayed = 0;
c_737140.tag = closureN_tag;
 c_737140.fn = (function_type)__lambda_78;
c_737140.num_args = 1;
c_737140.num_elements = 2;
c_737140.elements = (object *)e_737152;
c_737140.elements[0] = k_732146;
c_737140.elements[1] = trace_7393_731451;




object c_737155 = Cyc_symbol2string(data,(closure)&c_737140,Cyc_cdr(data, trace_7393_731451));
return_closcall1(data,(closure)&c_737140,  c_737155);}
;; 
}

static void __lambda_78(void *data, object self_735207, int argc, object *args) /* object self_735207, object r_732149 */
 {
 object r_732149 = args[0];
  
make_utf8_string_with_len(c_737146, "Cyc_st_add(data, \"", 18, 18);



make_utf8_string_with_len(c_737150, ":", 1, 1);

make_utf8_string_with_len(c_737151, "\");\n", 4, 4);

object c_737145 = Cyc_string_append(data,  ((closureN)self_735207)->elements[0],5,&c_737146, Cyc_car(data, ((closureN)self_735207)->elements[1]), &c_737150, r_732149, &c_737151);
return_direct_with_clo1(data,  ((closureN)self_735207)->elements[0], (((closure)  ((closureN)self_735207)->elements[0])->fn),  c_737145);; 
}

static void __lambda_76(void *data, object _, int argc, object *args) /* closure _,object k_732140, object trace_7391_731449, object fnc_7392_731450 */
 {
object k_732140 = args[0]; object trace_7391_731449 = args[1]; object fnc_7392_731450 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:st:add-function!");
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, trace_7391_731449))) ){ 
  
pair_type local_737107; 


return_direct_with_clo1(data,  k_732140, (((closure)  k_732140)->fn),  set_pair_as_expr(&local_737107, Cyc_car(data, trace_7391_731449), fnc_7392_731450));
} else { 
  return_direct_with_clo1(data,  k_732140, (((closure)  k_732140)->fn),  trace_7391_731449);}
;; 
}

static void __lambda_72(void *data, object _, int argc, object *args) /* closure _,object k_732131, object n_7388_731446, object prefix_7389_731447, object assign_7390_731448 */
 {
object k_732131 = args[0]; object n_7388_731446 = args[1]; object prefix_7389_731447 = args[2]; object assign_7390_731448 = args[3];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-macro-array-assign");
  
if( (boolean_f != Cyc_num_fast_gt_op(data, n_7388_731446, obj_int2obj(0))) ){ 
  
closureN_type c_737063;
object e_737093 [4];
c_737063.hdr.mark = gc_color_red;
 c_737063.hdr.grayed = 0;
c_737063.tag = closureN_tag;
 c_737063.fn = (function_type)__lambda_73;
c_737063.num_args = 1;
c_737063.num_elements = 4;
c_737063.elements = (object *)e_737093;
c_737063.elements[0] = assign_7390_731448;
c_737063.elements[1] = k_732131;
c_737063.elements[2] = n_7388_731446;
c_737063.elements[3] = prefix_7389_731447;


complex_num_type local_737096; 
return_direct_with_clo4(data,  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen)->fn),  &c_737063, Cyc_fast_sub(data,&local_737096, n_7388_731446, obj_int2obj(1)), prefix_7389_731447, assign_7390_731448);
} else { 
  
make_utf8_string_with_len(c_737098, "", 0, 0);
return_direct_with_clo1(data,  k_732131, (((closure)  k_732131)->fn),  &c_737098);}
;; 
}

static void __lambda_73(void *data, object self_735204, int argc, object *args) /* object self_735204, object r_732133 */
 {
 object r_732133 = args[0];
  
closureN_type c_737065;
object e_737085 [5];
c_737065.hdr.mark = gc_color_red;
 c_737065.hdr.grayed = 0;
c_737065.tag = closureN_tag;
 c_737065.fn = (function_type)__lambda_74;
c_737065.num_args = 1;
c_737065.num_elements = 5;
c_737065.elements = (object *)e_737085;
c_737065.elements[0] = ((closureN)self_735204)->elements[0];
c_737065.elements[1] = ((closureN)self_735204)->elements[1];
c_737065.elements[2] = ((closureN)self_735204)->elements[2];
c_737065.elements[3] = ((closureN)self_735204)->elements[3];
c_737065.elements[4] = r_732133;


complex_num_type local_737091; 

object c_737088 = Cyc_number2string2(data,(closure)&c_737065,1,Cyc_fast_sub(data,&local_737091, ((closureN)self_735204)->elements[2], obj_int2obj(1)));
return_closcall1(data,(closure)&c_737065,  c_737088);; 
}

static void __lambda_74(void *data, object self_735205, int argc, object *args) /* object self_735205, object r_732134 */
 {
 object r_732134 = args[0];
  
closureN_type c_737067;
object e_737080 [5];
c_737067.hdr.mark = gc_color_red;
 c_737067.hdr.grayed = 0;
c_737067.tag = closureN_tag;
 c_737067.fn = (function_type)__lambda_75;
c_737067.num_args = 1;
c_737067.num_elements = 5;
c_737067.elements = (object *)e_737080;
c_737067.elements[0] = ((closureN)self_735205)->elements[0];
c_737067.elements[1] = ((closureN)self_735205)->elements[1];
c_737067.elements[2] = ((closureN)self_735205)->elements[3];
c_737067.elements[3] = ((closureN)self_735205)->elements[4];
c_737067.elements[4] = r_732134;


object c_737083 = Cyc_number2string2(data,(closure)&c_737067,1,((closureN)self_735205)->elements[2]);
return_closcall1(data,(closure)&c_737067,  c_737083);; 
}

static void __lambda_75(void *data, object self_735206, int argc, object *args) /* object self_735206, object r_732135 */
 {
 object r_732135 = args[0];
  
make_utf8_string_with_len(c_737075, "[", 1, 1);

make_utf8_string_with_len(c_737077, "] = ", 4, 4);

make_utf8_string_with_len(c_737079, ";", 1, 1);

object c_737072 = Cyc_string_append(data,  ((closureN)self_735206)->elements[1],8,((closureN)self_735206)->elements[3], ((closureN)self_735206)->elements[2], &c_737075, ((closureN)self_735206)->elements[4], &c_737077, ((closureN)self_735206)->elements[0], r_732135, &c_737079);
return_direct_with_clo1(data,  ((closureN)self_735206)->elements[1], (((closure)  ((closureN)self_735206)->elements[1])->fn),  c_737072);; 
}

static void __lambda_68(void *data, object _, int argc, object *args) /* closure _,object k_732123, object n_7386_731444, object prefix_7387_731445 */
 {
object k_732123 = args[0]; object n_7386_731444 = args[1]; object prefix_7387_731445 = args[2];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-macro-n-prefix");
  
if( (boolean_f != Cyc_num_fast_gt_op(data, n_7386_731444, obj_int2obj(0))) ){ 
  
closureN_type c_737032;
object e_737053 [3];
c_737032.hdr.mark = gc_color_red;
 c_737032.hdr.grayed = 0;
c_737032.tag = closureN_tag;
 c_737032.fn = (function_type)__lambda_69;
c_737032.num_args = 1;
c_737032.num_elements = 3;
c_737032.elements = (object *)e_737053;
c_737032.elements[0] = k_732123;
c_737032.elements[1] = n_7386_731444;
c_737032.elements[2] = prefix_7387_731445;


complex_num_type local_737056; 
return_direct_with_clo3(data,  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen)->fn),  &c_737032, Cyc_fast_sub(data,&local_737056, n_7386_731444, obj_int2obj(1)), prefix_7387_731445);
} else { 
  
make_utf8_string_with_len(c_737058, "", 0, 0);
return_direct_with_clo1(data,  k_732123, (((closure)  k_732123)->fn),  &c_737058);}
;; 
}

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


object c_737051 = Cyc_number2string2(data,(closure)&c_737034,1,((closureN)self_735201)->elements[1]);
return_closcall1(data,(closure)&c_737034,  c_737051);; 
}

static void __lambda_70(void *data, object self_735202, int argc, object *args) /* object self_735202, object r_732127 */
 {
 object r_732127 = args[0];
  
closureN_type c_737036;
object e_737043 [2];
c_737036.hdr.mark = gc_color_red;
 c_737036.hdr.grayed = 0;
c_737036.tag = closureN_tag;
 c_737036.fn = (function_type)__lambda_71;
c_737036.num_args = 1;
c_737036.num_elements = 2;
c_737036.elements = (object *)e_737043;
c_737036.elements[0] = ((closureN)self_735202)->elements[0];
c_737036.elements[1] = ((closureN)self_735202)->elements[2];


object c_737046 = Cyc_string_append(data,(closure)&c_737036,2,((closureN)self_735202)->elements[1], r_732127);
return_closcall1(data,(closure)&c_737036,  c_737046);; 
}

static void __lambda_71(void *data, object self_735203, int argc, object *args) /* object self_735203, object r_732126 */
 {
 object r_732126 = args[0];
  
object c_737041 = Cyc_string_append(data,  ((closureN)self_735203)->elements[0],2,((closureN)self_735203)->elements[1], r_732126);
return_direct_with_clo1(data,  ((closureN)self_735203)->elements[0], (((closure)  ((closureN)self_735203)->elements[0])->fn),  c_737041);; 
}

static void __lambda_57(void *data, object _, int argc, object *args) /* closure _,object k_732107, object num_91args_7380_731438 */
 {
object k_732107 = args[0]; object num_91args_7380_731438 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-macro-closcall");

closureN_type c_736948;
object e_737026 [2];
c_736948.hdr.mark = gc_color_red;
 c_736948.hdr.grayed = 0;
c_736948.tag = closureN_tag;
 c_736948.fn = (function_type)__lambda_58;
c_736948.num_args = 1;
c_736948.num_elements = 2;
c_736948.elements = (object *)e_737026;
c_736948.elements[0] = k_732107;
c_736948.elements[1] = num_91args_7380_731438;


make_utf8_string_with_len(c_737027, ",a", 2, 2);
return_direct_with_clo3(data,  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen)->fn),  &c_736948, num_91args_7380_731438, &c_737027);; 
}

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


object c_737024 = Cyc_number2string2(data,(closure)&c_736950,1,((closureN)self_735191)->elements[1]);
return_closcall1(data,(closure)&c_736950,  c_737024);; 
}

static void __lambda_59(void *data, object self_735192, int argc, object *args) /* object self_735192, object r_732109 */
 {
 object r_732109 = args[0];
  object r_732118;
    
if( (boolean_f != Cyc_num_fast_gt_op(data, ((closureN)self_735192)->elements[1], obj_int2obj(0))) ){ 
  object local_736958 = alloca(sizeof(complex_num_type)); 
  r_732118 = Cyc_fast_sub(data,local_736958, ((closureN)self_735192)->elements[1], obj_int2obj(1));
} else { 
  r_732118 = obj_int2obj(0);}
;
closureN_type c_736962;
object e_737017 [4];
c_736962.hdr.mark = gc_color_red;
 c_736962.hdr.grayed = 0;
c_736962.tag = closureN_tag;
 c_736962.fn = (function_type)__lambda_60;
c_736962.num_args = 1;
c_736962.num_elements = 4;
c_736962.elements = (object *)e_737017;
c_736962.elements[0] = ((closureN)self_735192)->elements[0];
c_736962.elements[1] = ((closureN)self_735192)->elements[1];
c_736962.elements[2] = ((closureN)self_735192)->elements[2];
c_736962.elements[3] = r_732109;


object c_737020 = Cyc_number2string2(data,(closure)&c_736962,1,r_732118);
return_closcall1(data,(closure)&c_736962,  c_737020);; 
}

static void __lambda_60(void *data, object self_735193, int argc, object *args) /* object self_735193, object r_732110 */
 {
 object r_732110 = args[0];
  
closureN_type c_736964;
object e_737008 [4];
c_736964.hdr.mark = gc_color_red;
 c_736964.hdr.grayed = 0;
c_736964.tag = closureN_tag;
 c_736964.fn = (function_type)__lambda_61;
c_736964.num_args = 1;
c_736964.num_elements = 4;
c_736964.elements = (object *)e_737008;
c_736964.elements[0] = ((closureN)self_735193)->elements[0];
c_736964.elements[1] = ((closureN)self_735193)->elements[2];
c_736964.elements[2] = ((closureN)self_735193)->elements[3];
c_736964.elements[3] = r_732110;


closureN_type c_737009;
object e_737016 [1];
c_737009.hdr.mark = gc_color_red;
 c_737009.hdr.grayed = 0;
c_737009.tag = closureN_tag;
 c_737009.fn = (function_type)__lambda_67;
c_737009.num_args = 1;
c_737009.num_elements = 1;
c_737009.elements = (object *)e_737016;
c_737009.elements[0] = ((closureN)self_735193)->elements[1];

return_direct_with_clo1(data,(closure)&c_736964,__lambda_61,  &c_737009);; 
}

static void __lambda_67(void *data, object self_735194, int argc, object *args) /* object self_735194, object k_732116, object s_7385_731443 */
 {
 object k_732116 = args[0]; object s_7385_731443 = args[1];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, ((closureN)self_735194)->elements[0], obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  k_732116, (((closure)  k_732116)->fn),  s_7385_731443);
} else { 
  
make_utf8_string_with_len(c_737015, "", 0, 0);
return_direct_with_clo1(data,  k_732116, (((closure)  k_732116)->fn),  &c_737015);}
;; 
}

static void __lambda_61(void *data, object self_735195, int argc, object *args) /* object self_735195, object r_732111 */
 {
 object r_732111 = args[0];
  
closureN_type c_736966;
object e_737004 [1];
c_736966.hdr.mark = gc_color_red;
 c_736966.hdr.grayed = 0;
c_736966.tag = closureN_tag;
 c_736966.fn = (function_type)__lambda_62;
c_736966.num_args = 4;
c_736966.num_elements = 1;
c_736966.elements = (object *)e_737004;
c_736966.elements[0] = ((closureN)self_735195)->elements[0];

return_direct_with_clo4(data,(closure)&c_736966,__lambda_62,  ((closureN)self_735195)->elements[1], ((closureN)self_735195)->elements[2], ((closureN)self_735195)->elements[3], r_732111);; 
}

static void __lambda_62(void *data, object self_735196, int argc, object *args) /* object self_735196, object args_7381_731439, object n_7382_731440, object n_911_7383_731441, object wrap_7384_731442 */
 {
 object n_7382_731440 = args[1]; object wrap_7384_731442 = args[3];
  
closureN_type c_736968;
object e_736996 [3];
c_736968.hdr.mark = gc_color_red;
 c_736968.hdr.grayed = 0;
c_736968.tag = closureN_tag;
 c_736968.fn = (function_type)__lambda_63;
c_736968.num_args = 1;
c_736968.num_elements = 3;
c_736968.elements = (object *)e_736996;
c_736968.elements[0] = ((closureN)self_735196)->elements[0];
c_736968.elements[1] = n_7382_731440;
c_736968.elements[2] = wrap_7384_731442;


make_utf8_string_with_len(c_737000, "if (obj_is_not_closure(clo)) { \\\n", 33, 33);

make_utf8_string_with_len(c_737001, "   Cyc_apply(td, clo, ", 22, 22);

make_utf8_string_with_len(c_737002, ", buf ); \\\n", 11, 11);

make_utf8_string_with_len(c_737003, "}", 1, 1);

object c_736999 = Cyc_string_append(data,(closure)&c_736968,5,&c_737000, &c_737001, n_7382_731440, &c_737002, &c_737003);
return_closcall1(data,(closure)&c_736968,  c_736999);; 
}

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

return_closcall2(data,  ((closureN)self_735197)->elements[2],  &c_736971, r_732115);; 
}

static void __lambda_64(void *data, object self_735198, int argc, object *args) /* object self_735198, object r_732112 */
 {
 object r_732112 = args[0];
  
closureN_type c_736974;
object e_736993 [4];
c_736974.hdr.mark = gc_color_red;
 c_736974.hdr.grayed = 0;
c_736974.tag = closureN_tag;
 c_736974.fn = (function_type)__lambda_65;
c_736974.num_args = 1;
c_736974.num_elements = 4;
c_736974.elements = (object *)e_736993;
c_736974.elements[0] = ((closureN)self_735198)->elements[0];
c_736974.elements[1] = ((closureN)self_735198)->elements[1];
c_736974.elements[2] = r_732112;
c_736974.elements[3] = ((closureN)self_735198)->elements[2];


make_utf8_string_with_len(c_736994, " else { \\\n", 10, 10);
return_closcall2(data,  ((closureN)self_735198)->elements[2],  &c_736974, &c_736994);; 
}

static void __lambda_65(void *data, object self_735199, int argc, object *args) /* object self_735199, object r_732113 */
 {
 object r_732113 = args[0];
  
closureN_type c_736977;
object e_736991 [4];
c_736977.hdr.mark = gc_color_red;
 c_736977.hdr.grayed = 0;
c_736977.tag = closureN_tag;
 c_736977.fn = (function_type)__lambda_66;
c_736977.num_args = 1;
c_736977.num_elements = 4;
c_736977.elements = (object *)e_736991;
c_736977.elements[0] = ((closureN)self_735199)->elements[0];
c_736977.elements[1] = ((closureN)self_735199)->elements[1];
c_736977.elements[2] = ((closureN)self_735199)->elements[2];
c_736977.elements[3] = r_732113;


make_utf8_string_with_len(c_736992, ";\\\n}", 4, 4);
return_closcall2(data,  ((closureN)self_735199)->elements[3],  &c_736977, &c_736992);; 
}

static void __lambda_66(void *data, object self_735200, int argc, object *args) /* object self_735200, object r_732114 */
 {
 object r_732114 = args[0];
  
make_utf8_string_with_len(c_736983, "#define closcall", 16, 16);

make_utf8_string_with_len(c_736985, "(td, clo, buf) \\\n", 17, 17);

make_utf8_string_with_len(c_736988, "   ((clo)->fn)(td, clo, ", 24, 24);

make_utf8_string_with_len(c_736990, ", buf); \\\n", 10, 10);

object c_736982 = Cyc_string_append(data,  ((closureN)self_735200)->elements[0],9,&c_736983, ((closureN)self_735200)->elements[1], &c_736985, ((closureN)self_735200)->elements[2], ((closureN)self_735200)->elements[3], &c_736988, ((closureN)self_735200)->elements[1], &c_736990, r_732114);
return_direct_with_clo1(data,  ((closureN)self_735200)->elements[0], (((closure)  ((closureN)self_735200)->elements[0])->fn),  c_736982);; 
}

static void __lambda_52(void *data, object _, int argc, object *args) /* closure _,object k_732101, object num_91args_7376_731434 */
 {
object k_732101 = args[0]; object num_91args_7376_731434 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-macro-return-direct-with-object");

closureN_type c_736904;
object e_736944 [2];
c_736904.hdr.mark = gc_color_red;
 c_736904.hdr.grayed = 0;
c_736904.tag = closureN_tag;
 c_736904.fn = (function_type)__lambda_53;
c_736904.num_args = 1;
c_736904.num_elements = 2;
c_736904.elements = (object *)e_736944;
c_736904.elements[0] = k_732101;
c_736904.elements[1] = num_91args_7376_731434;


make_utf8_string_with_len(c_736945, ",a", 2, 2);
return_direct_with_clo3(data,  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen)->fn),  &c_736904, num_91args_7376_731434, &c_736945);; 
}

static void __lambda_53(void *data, object self_735187, int argc, object *args) /* object self_735187, object r_732102 */
 {
 object r_732102 = args[0];
  
closureN_type c_736906;
object e_736939 [3];
c_736906.hdr.mark = gc_color_red;
 c_736906.hdr.grayed = 0;
c_736906.tag = closureN_tag;
 c_736906.fn = (function_type)__lambda_54;
c_736906.num_args = 1;
c_736906.num_elements = 3;
c_736906.elements = (object *)e_736939;
c_736906.elements[0] = ((closureN)self_735187)->elements[0];
c_736906.elements[1] = ((closureN)self_735187)->elements[1];
c_736906.elements[2] = r_732102;


object c_736942 = Cyc_number2string2(data,(closure)&c_736906,1,((closureN)self_735187)->elements[1]);
return_closcall1(data,(closure)&c_736906,  c_736942);; 
}

static void __lambda_54(void *data, object self_735188, int argc, object *args) /* object self_735188, object r_732103 */
 {
 object r_732103 = args[0];
  
closureN_type c_736908;
object e_736935 [3];
c_736908.hdr.mark = gc_color_red;
 c_736908.hdr.grayed = 0;
c_736908.tag = closureN_tag;
 c_736908.fn = (function_type)__lambda_55;
c_736908.num_args = 1;
c_736908.num_elements = 3;
c_736908.elements = (object *)e_736935;
c_736908.elements[0] = ((closureN)self_735188)->elements[0];
c_736908.elements[1] = ((closureN)self_735188)->elements[2];
c_736908.elements[2] = r_732103;


make_utf8_string_with_len(c_736937, "buf", 3, 3);

make_utf8_string_with_len(c_736938, "a", 1, 1);
return_direct_with_clo4(data,  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen)->fn),  &c_736908, ((closureN)self_735188)->elements[1], &c_736937, &c_736938);; 
}

static void __lambda_55(void *data, object self_735189, int argc, object *args) /* object self_735189, object r_732104 */
 {
 object r_732104 = args[0];
  
closureN_type c_736910;
object e_736932 [1];
c_736910.hdr.mark = gc_color_red;
 c_736910.hdr.grayed = 0;
c_736910.tag = closureN_tag;
 c_736910.fn = (function_type)__lambda_56;
c_736910.num_args = 3;
c_736910.num_elements = 1;
c_736910.elements = (object *)e_736932;
c_736910.elements[0] = ((closureN)self_735189)->elements[0];

return_direct_with_clo3(data,(closure)&c_736910,__lambda_56,  ((closureN)self_735189)->elements[1], ((closureN)self_735189)->elements[2], r_732104);; 
}

static void __lambda_56(void *data, object self_735190, int argc, object *args) /* object self_735190, object args_7377_731435, object n_7378_731436, object arry_91assign_7379_731437 */
 {
 object args_7377_731435 = args[0]; object n_7378_731436 = args[1]; object arry_91assign_7379_731437 = args[2];
  
make_utf8_string_with_len(c_736916, "#define return_direct_with_obj", 30, 30);

make_utf8_string_with_len(c_736917, "(td, clo, _clo_fn, _fn", 22, 22);

make_utf8_string_with_len(c_736918, ") { \\\n", 6, 6);

make_utf8_string_with_len(c_736919, " char top; \\\n", 13, 13);

make_utf8_string_with_len(c_736920, " object buf[", 12, 12);

make_utf8_string_with_len(c_736921, "]; ", 3, 3);

make_utf8_string_with_len(c_736922, "\\\n", 2, 2);

make_utf8_string_with_len(c_736923, " if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \\\n", 72, 72);

make_utf8_string_with_len(c_736924, "     mclosure1(c1, (function_type) _clo_fn, clo); \\\n", 52, 52);

make_utf8_string_with_len(c_736925, "     GC(td, (closure)(&c1), buf, ", 33, 33);

make_utf8_string_with_len(c_736926, "); \\\n", 5, 5);

make_utf8_string_with_len(c_736927, "     return; \\\n", 15, 15);

make_utf8_string_with_len(c_736928, " } else { \\\n", 12, 12);

make_utf8_string_with_len(c_736929, "     (_fn)(td, (closure)(clo), ", 31, 31);

make_utf8_string_with_len(c_736930, ", buf); \\\n", 10, 10);

make_utf8_string_with_len(c_736931, " }}\n", 4, 4);

object c_736915 = Cyc_string_append(data,  ((closureN)self_735190)->elements[0],22,&c_736916, n_7378_731436, &c_736917, args_7377_731435, &c_736918, &c_736919, &c_736920, n_7378_731436, &c_736921, arry_91assign_7379_731437, &c_736922, &c_736923, &c_736924, &c_736925, n_7378_731436, &c_736926, &c_736927, &c_736928, &c_736929, n_7378_731436, &c_736930, &c_736931);
return_direct_with_clo1(data,  ((closureN)self_735190)->elements[0], (((closure)  ((closureN)self_735190)->elements[0])->fn),  c_736915);; 
}

static void __lambda_47(void *data, object _, int argc, object *args) /* closure _,object k_732095, object num_91args_7372_731430 */
 {
object k_732095 = args[0]; object num_91args_7372_731430 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-macro-return-direct-with-closure");

closureN_type c_736861;
object e_736900 [2];
c_736861.hdr.mark = gc_color_red;
 c_736861.hdr.grayed = 0;
c_736861.tag = closureN_tag;
 c_736861.fn = (function_type)__lambda_48;
c_736861.num_args = 1;
c_736861.num_elements = 2;
c_736861.elements = (object *)e_736900;
c_736861.elements[0] = k_732095;
c_736861.elements[1] = num_91args_7372_731430;


make_utf8_string_with_len(c_736901, ",a", 2, 2);
return_direct_with_clo3(data,  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen)->fn),  &c_736861, num_91args_7372_731430, &c_736901);; 
}

static void __lambda_48(void *data, object self_735183, int argc, object *args) /* object self_735183, object r_732096 */
 {
 object r_732096 = args[0];
  
closureN_type c_736863;
object e_736895 [3];
c_736863.hdr.mark = gc_color_red;
 c_736863.hdr.grayed = 0;
c_736863.tag = closureN_tag;
 c_736863.fn = (function_type)__lambda_49;
c_736863.num_args = 1;
c_736863.num_elements = 3;
c_736863.elements = (object *)e_736895;
c_736863.elements[0] = ((closureN)self_735183)->elements[0];
c_736863.elements[1] = ((closureN)self_735183)->elements[1];
c_736863.elements[2] = r_732096;


object c_736898 = Cyc_number2string2(data,(closure)&c_736863,1,((closureN)self_735183)->elements[1]);
return_closcall1(data,(closure)&c_736863,  c_736898);; 
}

static void __lambda_49(void *data, object self_735184, int argc, object *args) /* object self_735184, object r_732097 */
 {
 object r_732097 = args[0];
  
closureN_type c_736865;
object e_736891 [3];
c_736865.hdr.mark = gc_color_red;
 c_736865.hdr.grayed = 0;
c_736865.tag = closureN_tag;
 c_736865.fn = (function_type)__lambda_50;
c_736865.num_args = 1;
c_736865.num_elements = 3;
c_736865.elements = (object *)e_736891;
c_736865.elements[0] = ((closureN)self_735184)->elements[0];
c_736865.elements[1] = ((closureN)self_735184)->elements[2];
c_736865.elements[2] = r_732097;


make_utf8_string_with_len(c_736893, "buf", 3, 3);

make_utf8_string_with_len(c_736894, "a", 1, 1);
return_direct_with_clo4(data,  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen)->fn),  &c_736865, ((closureN)self_735184)->elements[1], &c_736893, &c_736894);; 
}

static void __lambda_50(void *data, object self_735185, int argc, object *args) /* object self_735185, object r_732098 */
 {
 object r_732098 = args[0];
  
closureN_type c_736867;
object e_736888 [1];
c_736867.hdr.mark = gc_color_red;
 c_736867.hdr.grayed = 0;
c_736867.tag = closureN_tag;
 c_736867.fn = (function_type)__lambda_51;
c_736867.num_args = 3;
c_736867.num_elements = 1;
c_736867.elements = (object *)e_736888;
c_736867.elements[0] = ((closureN)self_735185)->elements[0];

return_direct_with_clo3(data,(closure)&c_736867,__lambda_51,  ((closureN)self_735185)->elements[1], ((closureN)self_735185)->elements[2], r_732098);; 
}

static void __lambda_51(void *data, object self_735186, int argc, object *args) /* object self_735186, object args_7373_731431, object n_7374_731432, object arry_91assign_7375_731433 */
 {
 object args_7373_731431 = args[0]; object n_7374_731432 = args[1]; object arry_91assign_7375_731433 = args[2];
  
make_utf8_string_with_len(c_736873, "#define return_direct_with_clo", 30, 30);

make_utf8_string_with_len(c_736874, "(td, clo, _fn", 13, 13);

make_utf8_string_with_len(c_736875, ") { \\\n", 6, 6);

make_utf8_string_with_len(c_736876, " char top; \\\n", 13, 13);

make_utf8_string_with_len(c_736877, " object buf[", 12, 12);

make_utf8_string_with_len(c_736878, "]; ", 3, 3);

make_utf8_string_with_len(c_736879, "\\\n", 2, 2);

make_utf8_string_with_len(c_736880, " if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \\\n", 72, 72);

make_utf8_string_with_len(c_736881, "     GC(td, clo, buf, ", 22, 22);

make_utf8_string_with_len(c_736882, "); \\\n", 5, 5);

make_utf8_string_with_len(c_736883, "     return; \\\n", 15, 15);

make_utf8_string_with_len(c_736884, " } else { \\\n", 12, 12);

make_utf8_string_with_len(c_736885, "     (_fn)(td, (closure)(clo), ", 31, 31);

make_utf8_string_with_len(c_736886, ", buf); \\\n", 10, 10);

make_utf8_string_with_len(c_736887, " }}\n", 4, 4);

object c_736872 = Cyc_string_append(data,  ((closureN)self_735186)->elements[0],21,&c_736873, n_7374_731432, &c_736874, args_7373_731431, &c_736875, &c_736876, &c_736877, n_7374_731432, &c_736878, arry_91assign_7375_731433, &c_736879, &c_736880, &c_736881, n_7374_731432, &c_736882, &c_736883, &c_736884, &c_736885, n_7374_731432, &c_736886, &c_736887);
return_direct_with_clo1(data,  ((closureN)self_735186)->elements[0], (((closure)  ((closureN)self_735186)->elements[0])->fn),  c_736872);; 
}

static void __lambda_42(void *data, object _, int argc, object *args) /* closure _,object k_732089, object num_91args_7368_731426 */
 {
object k_732089 = args[0]; object num_91args_7368_731426 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-macro-return-direct");

closureN_type c_736817;
object e_736857 [2];
c_736817.hdr.mark = gc_color_red;
 c_736817.hdr.grayed = 0;
c_736817.tag = closureN_tag;
 c_736817.fn = (function_type)__lambda_43;
c_736817.num_args = 1;
c_736817.num_elements = 2;
c_736817.elements = (object *)e_736857;
c_736817.elements[0] = k_732089;
c_736817.elements[1] = num_91args_7368_731426;


make_utf8_string_with_len(c_736858, ",a", 2, 2);
return_direct_with_clo3(data,  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen)->fn),  &c_736817, num_91args_7368_731426, &c_736858);; 
}

static void __lambda_43(void *data, object self_735179, int argc, object *args) /* object self_735179, object r_732090 */
 {
 object r_732090 = args[0];
  
closureN_type c_736819;
object e_736852 [3];
c_736819.hdr.mark = gc_color_red;
 c_736819.hdr.grayed = 0;
c_736819.tag = closureN_tag;
 c_736819.fn = (function_type)__lambda_44;
c_736819.num_args = 1;
c_736819.num_elements = 3;
c_736819.elements = (object *)e_736852;
c_736819.elements[0] = ((closureN)self_735179)->elements[0];
c_736819.elements[1] = ((closureN)self_735179)->elements[1];
c_736819.elements[2] = r_732090;


object c_736855 = Cyc_number2string2(data,(closure)&c_736819,1,((closureN)self_735179)->elements[1]);
return_closcall1(data,(closure)&c_736819,  c_736855);; 
}

static void __lambda_44(void *data, object self_735180, int argc, object *args) /* object self_735180, object r_732091 */
 {
 object r_732091 = args[0];
  
closureN_type c_736821;
object e_736848 [3];
c_736821.hdr.mark = gc_color_red;
 c_736821.hdr.grayed = 0;
c_736821.tag = closureN_tag;
 c_736821.fn = (function_type)__lambda_45;
c_736821.num_args = 1;
c_736821.num_elements = 3;
c_736821.elements = (object *)e_736848;
c_736821.elements[0] = ((closureN)self_735180)->elements[0];
c_736821.elements[1] = ((closureN)self_735180)->elements[2];
c_736821.elements[2] = r_732091;


make_utf8_string_with_len(c_736850, "buf", 3, 3);

make_utf8_string_with_len(c_736851, "a", 1, 1);
return_direct_with_clo4(data,  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen)->fn),  &c_736821, ((closureN)self_735180)->elements[1], &c_736850, &c_736851);; 
}

static void __lambda_45(void *data, object self_735181, int argc, object *args) /* object self_735181, object r_732092 */
 {
 object r_732092 = args[0];
  
closureN_type c_736823;
object e_736845 [1];
c_736823.hdr.mark = gc_color_red;
 c_736823.hdr.grayed = 0;
c_736823.tag = closureN_tag;
 c_736823.fn = (function_type)__lambda_46;
c_736823.num_args = 3;
c_736823.num_elements = 1;
c_736823.elements = (object *)e_736845;
c_736823.elements[0] = ((closureN)self_735181)->elements[0];

return_direct_with_clo3(data,(closure)&c_736823,__lambda_46,  ((closureN)self_735181)->elements[1], ((closureN)self_735181)->elements[2], r_732092);; 
}

static void __lambda_46(void *data, object self_735182, int argc, object *args) /* object self_735182, object args_7369_731427, object n_7370_731428, object arry_91assign_7371_731429 */
 {
 object args_7369_731427 = args[0]; object n_7370_731428 = args[1]; object arry_91assign_7371_731429 = args[2];
  
make_utf8_string_with_len(c_736829, "#define return_direct", 21, 21);

make_utf8_string_with_len(c_736830, "(td, _fn", 8, 8);

make_utf8_string_with_len(c_736831, ") { \\\n", 6, 6);

make_utf8_string_with_len(c_736832, " char top; \\\n", 13, 13);

make_utf8_string_with_len(c_736833, " object buf[", 12, 12);

make_utf8_string_with_len(c_736834, "]; ", 3, 3);

make_utf8_string_with_len(c_736835, " \\\n", 3, 3);

make_utf8_string_with_len(c_736836, " if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \\\n", 72, 72);

make_utf8_string_with_len(c_736837, "     mclosure0(c1, (function_type) _fn); \\\n", 43, 43);

make_utf8_string_with_len(c_736838, "     GC(td, &c1, buf, ", 22, 22);

make_utf8_string_with_len(c_736839, "); \\\n", 5, 5);

make_utf8_string_with_len(c_736840, "     return; \\\n", 15, 15);

make_utf8_string_with_len(c_736841, " } else { \\\n", 12, 12);

make_utf8_string_with_len(c_736842, "     (_fn)(td, (closure)_fn, ", 29, 29);

make_utf8_string_with_len(c_736843, ", buf); \\\n", 10, 10);

make_utf8_string_with_len(c_736844, " }}\n", 4, 4);

object c_736828 = Cyc_string_append(data,  ((closureN)self_735182)->elements[0],22,&c_736829, n_7370_731428, &c_736830, args_7369_731427, &c_736831, &c_736832, &c_736833, n_7370_731428, &c_736834, arry_91assign_7371_731429, &c_736835, &c_736836, &c_736837, &c_736838, n_7370_731428, &c_736839, &c_736840, &c_736841, &c_736842, n_7370_731428, &c_736843, &c_736844);
return_direct_with_clo1(data,  ((closureN)self_735182)->elements[0], (((closure)  ((closureN)self_735182)->elements[0])->fn),  c_736828);; 
}

static void __lambda_37(void *data, object _, int argc, object *args) /* closure _,object k_732083, object num_91args_7364_731422 */
 {
object k_732083 = args[0]; object num_91args_7364_731422 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-macro-continue-or-gc");

closureN_type c_736774;
object e_736813 [2];
c_736774.hdr.mark = gc_color_red;
 c_736774.hdr.grayed = 0;
c_736774.tag = closureN_tag;
 c_736774.fn = (function_type)__lambda_38;
c_736774.num_args = 1;
c_736774.num_elements = 2;
c_736774.elements = (object *)e_736813;
c_736774.elements[0] = k_732083;
c_736774.elements[1] = num_91args_7364_731422;


make_utf8_string_with_len(c_736814, ",a", 2, 2);
return_direct_with_clo3(data,  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen)->fn),  &c_736774, num_91args_7364_731422, &c_736814);; 
}

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


object c_736811 = Cyc_number2string2(data,(closure)&c_736776,1,((closureN)self_735175)->elements[1]);
return_closcall1(data,(closure)&c_736776,  c_736811);; 
}

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


make_utf8_string_with_len(c_736806, "buf", 3, 3);

make_utf8_string_with_len(c_736807, "a", 1, 1);
return_direct_with_clo4(data,  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen)->fn),  &c_736778, ((closureN)self_735176)->elements[1], &c_736806, &c_736807);; 
}

static void __lambda_40(void *data, object self_735177, int argc, object *args) /* object self_735177, object r_732086 */
 {
 object r_732086 = args[0];
  
closureN_type c_736780;
object e_736801 [1];
c_736780.hdr.mark = gc_color_red;
 c_736780.hdr.grayed = 0;
c_736780.tag = closureN_tag;
 c_736780.fn = (function_type)__lambda_41;
c_736780.num_args = 3;
c_736780.num_elements = 1;
c_736780.elements = (object *)e_736801;
c_736780.elements[0] = ((closureN)self_735177)->elements[0];

return_direct_with_clo3(data,(closure)&c_736780,__lambda_41,  ((closureN)self_735177)->elements[1], ((closureN)self_735177)->elements[2], r_732086);; 
}

static void __lambda_41(void *data, object self_735178, int argc, object *args) /* object self_735178, object args_7365_731423, object n_7366_731424, object arry_91assign_7367_731425 */
 {
 object args_7365_731423 = args[0]; object n_7366_731424 = args[1]; object arry_91assign_7367_731425 = args[2];
  
make_utf8_string_with_len(c_736786, "#define continue_or_gc", 22, 22);

make_utf8_string_with_len(c_736787, "(td, clo", 8, 8);

make_utf8_string_with_len(c_736788, ") { \\\n", 6, 6);

make_utf8_string_with_len(c_736789, " char *top = alloca(sizeof(char)); \\\n", 37, 37);

make_utf8_string_with_len(c_736790, " if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \\\n", 71, 71);

make_utf8_string_with_len(c_736791, "     object buf[", 16, 16);

make_utf8_string_with_len(c_736792, "]; ", 3, 3);

make_utf8_string_with_len(c_736793, "\\\n", 2, 2);

make_utf8_string_with_len(c_736794, "     GC(td, clo, buf, ", 22, 22);

make_utf8_string_with_len(c_736795, "); \\\n", 5, 5);

make_utf8_string_with_len(c_736796, "     return; \\\n", 15, 15);

make_utf8_string_with_len(c_736797, " } else {\\\n", 11, 11);

make_utf8_string_with_len(c_736798, "     continue;\\\n", 16, 16);

make_utf8_string_with_len(c_736799, " } \\\n", 5, 5);

make_utf8_string_with_len(c_736800, "}\n", 2, 2);

object c_736785 = Cyc_string_append(data,  ((closureN)self_735178)->elements[0],20,&c_736786, n_7366_731424, &c_736787, args_7365_731423, &c_736788, &c_736789, &c_736790, &c_736791, n_7366_731424, &c_736792, arry_91assign_7367_731425, &c_736793, &c_736794, n_7366_731424, &c_736795, &c_736796, &c_736797, &c_736798, &c_736799, &c_736800);
return_direct_with_clo1(data,  ((closureN)self_735178)->elements[0], (((closure)  ((closureN)self_735178)->elements[0])->fn),  c_736785);; 
}

static void __lambda_32(void *data, object _, int argc, object *args) /* closure _,object k_732077, object num_91args_7360_731418 */
 {
object k_732077 = args[0]; object num_91args_7360_731418 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:c-macro-return-closcall");

closureN_type c_736729;
object e_736770 [2];
c_736729.hdr.mark = gc_color_red;
 c_736729.hdr.grayed = 0;
c_736729.tag = closureN_tag;
 c_736729.fn = (function_type)__lambda_33;
c_736729.num_args = 1;
c_736729.num_elements = 2;
c_736729.elements = (object *)e_736770;
c_736729.elements[0] = k_732077;
c_736729.elements[1] = num_91args_7360_731418;


make_utf8_string_with_len(c_736771, ",a", 2, 2);
return_direct_with_clo3(data,  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen)->fn),  &c_736729, num_91args_7360_731418, &c_736771);; 
}

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


object c_736768 = Cyc_number2string2(data,(closure)&c_736731,1,((closureN)self_735171)->elements[1]);
return_closcall1(data,(closure)&c_736731,  c_736768);; 
}

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


make_utf8_string_with_len(c_736763, "buf", 3, 3);

make_utf8_string_with_len(c_736764, "a", 1, 1);
return_direct_with_clo4(data,  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen)->fn),  &c_736733, ((closureN)self_735172)->elements[1], &c_736763, &c_736764);; 
}

static void __lambda_35(void *data, object self_735173, int argc, object *args) /* object self_735173, object r_732080 */
 {
 object r_732080 = args[0];
  
closureN_type c_736735;
object e_736758 [1];
c_736735.hdr.mark = gc_color_red;
 c_736735.hdr.grayed = 0;
c_736735.tag = closureN_tag;
 c_736735.fn = (function_type)__lambda_36;
c_736735.num_args = 3;
c_736735.num_elements = 1;
c_736735.elements = (object *)e_736758;
c_736735.elements[0] = ((closureN)self_735173)->elements[0];

return_direct_with_clo3(data,(closure)&c_736735,__lambda_36,  ((closureN)self_735173)->elements[1], ((closureN)self_735173)->elements[2], r_732080);; 
}

static void __lambda_36(void *data, object self_735174, int argc, object *args) /* object self_735174, object args_7361_731419, object n_7362_731420, object arry_91assign_7363_731421 */
 {
 object args_7361_731419 = args[0]; object n_7362_731420 = args[1]; object arry_91assign_7363_731421 = args[2];
  
make_utf8_string_with_len(c_736741, "#define return_closcall", 23, 23);

make_utf8_string_with_len(c_736742, "(td, clo", 8, 8);

make_utf8_string_with_len(c_736743, ") { \\\n", 6, 6);

make_utf8_string_with_len(c_736744, " char top; \\\n", 13, 13);

make_utf8_string_with_len(c_736745, " object buf[", 12, 12);

make_utf8_string_with_len(c_736746, "]; ", 3, 3);

make_utf8_string_with_len(c_736747, "\\\n", 2, 2);

make_utf8_string_with_len(c_736748, " if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \\\n", 72, 72);

make_utf8_string_with_len(c_736749, "     GC(td, clo, buf, ", 22, 22);

make_utf8_string_with_len(c_736750, "); \\\n", 5, 5);

make_utf8_string_with_len(c_736751, "     return; \\\n", 15, 15);

make_utf8_string_with_len(c_736752, " } else {\\\n", 11, 11);

make_utf8_string_with_len(c_736753, "     closcall", 13, 13);

make_utf8_string_with_len(c_736754, "(td, (closure) (clo), buf); \\\n", 30, 30);

make_utf8_string_with_len(c_736755, "     return;\\\n", 14, 14);

make_utf8_string_with_len(c_736756, " } \\\n", 5, 5);

make_utf8_string_with_len(c_736757, "}\n", 2, 2);

object c_736740 = Cyc_string_append(data,  ((closureN)self_735174)->elements[0],23,&c_736741, n_7362_731420, &c_736742, args_7361_731419, &c_736743, &c_736744, &c_736745, n_7362_731420, &c_736746, arry_91assign_7363_731421, &c_736747, &c_736748, &c_736749, n_7362_731420, &c_736750, &c_736751, &c_736752, &c_736753, n_7362_731420, &c_736754, &c_736755, &c_736756, &c_736757);
return_direct_with_clo1(data,  ((closureN)self_735174)->elements[0], (((closure)  ((closureN)self_735174)->elements[0])->fn),  c_736740);; 
}

static void __lambda_18(void *data, object _, int argc, object *args) /* closure _,object k_732055, object arity_7348_731415 */
 {
object k_732055 = args[0]; object arity_7348_731415 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:emit-c-arity-macros");
  
if( (boolean_f != Cyc_num_fast_lte_op(data, arity_7348_731415, __glo__85c_91call_91max_91args_85_scheme_cyclone_cgen)) ){ 
  
closureN_type c_736653;
object e_736717 [1];
c_736653.hdr.mark = gc_color_red;
 c_736653.hdr.grayed = 0;
c_736653.tag = closureN_tag;
 c_736653.fn = (function_type)__lambda_19;
c_736653.num_args = 0;
c_736653.num_elements = 1;
c_736653.elements = (object *)e_736717;
c_736653.elements[0] = arity_7348_731415;


closureN_type c_736718;
object e_736725 [2];
c_736718.hdr.mark = gc_color_red;
 c_736718.hdr.grayed = 0;
c_736718.tag = closureN_tag;
 c_736718.fn = (function_type)__lambda_31;
c_736718.num_args = 1;
c_736718.num_elements = 2;
c_736718.elements = (object *)e_736725;
c_736718.elements[0] = arity_7348_731415;
c_736718.elements[1] = k_732055;

return_direct_with_clo1(data,(closure)&c_736653,__lambda_19,  &c_736718);
} else { 
  return_direct_with_clo1(data,  k_732055, (((closure)  k_732055)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_31(void *data, object self_735158, int argc, object *args) /* object self_735158, object r_732057 */
 {

  
complex_num_type local_736723; 
return_direct_with_clo2(data,  __glo_emit_91c_91arity_91macros_scheme_cyclone_cgen, (((closure)  __glo_emit_91c_91arity_91macros_scheme_cyclone_cgen)->fn),  ((closureN)self_735158)->elements[1], Cyc_fast_sum(data,&local_736723, ((closureN)self_735158)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_19(void *data, object self_735159, int argc, object *args) /* object self_735159, object k_732059 */
 {
 object k_732059 = args[0];
  object r_732060;
    
if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_735159)->elements[0], obj_int2obj(1))) ){ 
  
  r_732060 = Cyc_num_fast_eq_op(data, ((closureN)self_735159)->elements[0], obj_int2obj(1));
} else { 
    
if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_735159)->elements[0], obj_int2obj(2))) ){ 
  
  r_732060 = Cyc_num_fast_eq_op(data, ((closureN)self_735159)->elements[0], obj_int2obj(2));
} else { 
  
  r_732060 = Cyc_vector_ref(data, __glo__85c_91call_91arity_85_scheme_cyclone_cgen, ((closureN)self_735159)->elements[0]);}
;}
;if( (boolean_f != r_732060) ){ 
  
closureN_type c_736674;
object e_736714 [2];
c_736674.hdr.mark = gc_color_red;
 c_736674.hdr.grayed = 0;
c_736674.tag = closureN_tag;
 c_736674.fn = (function_type)__lambda_20;
c_736674.num_args = 1;
c_736674.num_elements = 2;
c_736674.elements = (object *)e_736714;
c_736674.elements[0] = ((closureN)self_735159)->elements[0];
c_736674.elements[1] = k_732059;

return_direct_with_clo2(data,  __glo_c_91macro_91closcall_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91closcall_scheme_cyclone_cgen)->fn),  &c_736674, ((closureN)self_735159)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_732059, (((closure)  k_732059)->fn),  boolean_f);}
;; 
}

static void __lambda_20(void *data, object self_735160, int argc, object *args) /* object self_735160, object r_732071 */
 {
 object r_732071 = args[0];
  
closureN_type c_736676;
object e_736713 [2];
c_736676.hdr.mark = gc_color_red;
 c_736676.hdr.grayed = 0;
c_736676.tag = closureN_tag;
 c_736676.fn = (function_type)__lambda_21;
c_736676.num_args = 1;
c_736676.num_elements = 2;
c_736676.elements = (object *)e_736713;
c_736676.elements[0] = ((closureN)self_735160)->elements[0];
c_736676.elements[1] = ((closureN)self_735160)->elements[1];

return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_736676, r_732071);; 
}

static void __lambda_21(void *data, object self_735161, int argc, object *args) /* object self_735161, object r_732061 */
 {

  
closureN_type c_736678;
object e_736711 [2];
c_736678.hdr.mark = gc_color_red;
 c_736678.hdr.grayed = 0;
c_736678.tag = closureN_tag;
 c_736678.fn = (function_type)__lambda_22;
c_736678.num_args = 1;
c_736678.num_elements = 2;
c_736678.elements = (object *)e_736711;
c_736678.elements[0] = ((closureN)self_735161)->elements[0];
c_736678.elements[1] = ((closureN)self_735161)->elements[1];

return_direct_with_clo2(data,  __glo_c_91macro_91return_91closcall_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91return_91closcall_scheme_cyclone_cgen)->fn),  &c_736678, ((closureN)self_735161)->elements[0]);; 
}

static void __lambda_22(void *data, object self_735162, int argc, object *args) /* object self_735162, object r_732070 */
 {
 object r_732070 = args[0];
  
closureN_type c_736680;
object e_736710 [2];
c_736680.hdr.mark = gc_color_red;
 c_736680.hdr.grayed = 0;
c_736680.tag = closureN_tag;
 c_736680.fn = (function_type)__lambda_23;
c_736680.num_args = 1;
c_736680.num_elements = 2;
c_736680.elements = (object *)e_736710;
c_736680.elements[0] = ((closureN)self_735162)->elements[0];
c_736680.elements[1] = ((closureN)self_735162)->elements[1];

return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_736680, r_732070);; 
}

static void __lambda_23(void *data, object self_735163, int argc, object *args) /* object self_735163, object r_732062 */
 {

  
closureN_type c_736682;
object e_736708 [2];
c_736682.hdr.mark = gc_color_red;
 c_736682.hdr.grayed = 0;
c_736682.tag = closureN_tag;
 c_736682.fn = (function_type)__lambda_24;
c_736682.num_args = 1;
c_736682.num_elements = 2;
c_736682.elements = (object *)e_736708;
c_736682.elements[0] = ((closureN)self_735163)->elements[0];
c_736682.elements[1] = ((closureN)self_735163)->elements[1];

return_direct_with_clo2(data,  __glo_c_91macro_91continue_91or_91gc_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91continue_91or_91gc_scheme_cyclone_cgen)->fn),  &c_736682, ((closureN)self_735163)->elements[0]);; 
}

static void __lambda_24(void *data, object self_735164, int argc, object *args) /* object self_735164, object r_732069 */
 {
 object r_732069 = args[0];
  
closureN_type c_736684;
object e_736707 [2];
c_736684.hdr.mark = gc_color_red;
 c_736684.hdr.grayed = 0;
c_736684.tag = closureN_tag;
 c_736684.fn = (function_type)__lambda_25;
c_736684.num_args = 1;
c_736684.num_elements = 2;
c_736684.elements = (object *)e_736707;
c_736684.elements[0] = ((closureN)self_735164)->elements[0];
c_736684.elements[1] = ((closureN)self_735164)->elements[1];

return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_736684, r_732069);; 
}

static void __lambda_25(void *data, object self_735165, int argc, object *args) /* object self_735165, object r_732063 */
 {

  
closureN_type c_736686;
object e_736705 [2];
c_736686.hdr.mark = gc_color_red;
 c_736686.hdr.grayed = 0;
c_736686.tag = closureN_tag;
 c_736686.fn = (function_type)__lambda_26;
c_736686.num_args = 1;
c_736686.num_elements = 2;
c_736686.elements = (object *)e_736705;
c_736686.elements[0] = ((closureN)self_735165)->elements[0];
c_736686.elements[1] = ((closureN)self_735165)->elements[1];

return_direct_with_clo2(data,  __glo_c_91macro_91return_91direct_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91return_91direct_scheme_cyclone_cgen)->fn),  &c_736686, ((closureN)self_735165)->elements[0]);; 
}

static void __lambda_26(void *data, object self_735166, int argc, object *args) /* object self_735166, object r_732068 */
 {
 object r_732068 = args[0];
  
closureN_type c_736688;
object e_736704 [2];
c_736688.hdr.mark = gc_color_red;
 c_736688.hdr.grayed = 0;
c_736688.tag = closureN_tag;
 c_736688.fn = (function_type)__lambda_27;
c_736688.num_args = 1;
c_736688.num_elements = 2;
c_736688.elements = (object *)e_736704;
c_736688.elements[0] = ((closureN)self_735166)->elements[0];
c_736688.elements[1] = ((closureN)self_735166)->elements[1];

return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_736688, r_732068);; 
}

static void __lambda_27(void *data, object self_735167, int argc, object *args) /* object self_735167, object r_732064 */
 {

  
closureN_type c_736690;
object e_736702 [2];
c_736690.hdr.mark = gc_color_red;
 c_736690.hdr.grayed = 0;
c_736690.tag = closureN_tag;
 c_736690.fn = (function_type)__lambda_28;
c_736690.num_args = 1;
c_736690.num_elements = 2;
c_736690.elements = (object *)e_736702;
c_736690.elements[0] = ((closureN)self_735167)->elements[0];
c_736690.elements[1] = ((closureN)self_735167)->elements[1];

return_direct_with_clo2(data,  __glo_c_91macro_91return_91direct_91with_91closure_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91return_91direct_91with_91closure_scheme_cyclone_cgen)->fn),  &c_736690, ((closureN)self_735167)->elements[0]);; 
}

static void __lambda_28(void *data, object self_735168, int argc, object *args) /* object self_735168, object r_732067 */
 {
 object r_732067 = args[0];
  
closureN_type c_736692;
object e_736701 [2];
c_736692.hdr.mark = gc_color_red;
 c_736692.hdr.grayed = 0;
c_736692.tag = closureN_tag;
 c_736692.fn = (function_type)__lambda_29;
c_736692.num_args = 1;
c_736692.num_elements = 2;
c_736692.elements = (object *)e_736701;
c_736692.elements[0] = ((closureN)self_735168)->elements[0];
c_736692.elements[1] = ((closureN)self_735168)->elements[1];

return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  &c_736692, r_732067);; 
}

static void __lambda_29(void *data, object self_735169, int argc, object *args) /* object self_735169, object r_732065 */
 {

  if( (boolean_f != __glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen) ){ 
  
closureN_type c_736694;
object e_736697 [1];
c_736694.hdr.mark = gc_color_red;
 c_736694.hdr.grayed = 0;
c_736694.tag = closureN_tag;
 c_736694.fn = (function_type)__lambda_30;
c_736694.num_args = 1;
c_736694.num_elements = 1;
c_736694.elements = (object *)e_736697;
c_736694.elements[0] = ((closureN)self_735169)->elements[1];

return_direct_with_clo2(data,  __glo_c_91macro_91return_91direct_91with_91object_scheme_cyclone_cgen, (((closure)  __glo_c_91macro_91return_91direct_91with_91object_scheme_cyclone_cgen)->fn),  &c_736694, ((closureN)self_735169)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735169)->elements[1], (((closure)  ((closureN)self_735169)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_30(void *data, object self_735170, int argc, object *args) /* object self_735170, object r_732066 */
 {
 object r_732066 = args[0];
  return_direct_with_clo2(data,  __glo_emit_scheme_cyclone_cgen, (((closure)  __glo_emit_scheme_cyclone_cgen)->fn),  ((closureN)self_735170)->elements[0], r_732066);; 
}

static void __lambda_15(void *data, object _, int argc, object *args) /* closure _,object k_732036, object arity_7337_731414 */
 {
object k_732036 = args[0]; object arity_7337_731414 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:set-c-call-arity!");
  
if( (boolean_f != Cyc_is_number(arity_7337_731414)) ){ 
    
if( (boolean_f != Cyc_num_fast_gt_op(data, arity_7337_731414, __glo__85c_91call_91max_91args_85_scheme_cyclone_cgen)) ){ 
  
closureN_type c_736610;
object e_736622 [2];
c_736610.hdr.mark = gc_color_red;
 c_736610.hdr.grayed = 0;
c_736610.tag = closureN_tag;
 c_736610.fn = (function_type)__lambda_16;
c_736610.num_args = 1;
c_736610.num_elements = 2;
c_736610.elements = (object *)e_736622;
c_736610.elements[0] = arity_7337_731414;
c_736610.elements[1] = k_732036;


object c_736625 = Cyc_number2string2(data,(closure)&c_736610,1,__glo__85c_91call_91max_91args_85_scheme_cyclone_cgen);
return_closcall1(data,(closure)&c_736610,  c_736625);
} else { 
  
object c_736629 = Cyc_vector_set_cps(data,  k_732036,__glo__85c_91call_91arity_85_scheme_cyclone_cgen, arity_7337_731414, boolean_t);
return_direct_with_clo1(data,  k_732036, (((closure)  k_732036)->fn),  c_736629);}
;
} else { 
  
pair_type local_736633; 

pair_type local_736636; 

pair_type local_736639; 

pair_type local_736642; 

pair_type local_736645; 

pair_type local_736648; 
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_732036, set_pair_as_expr(&local_736633, quote_Non_91numeric, set_pair_as_expr(&local_736636, quote_number, set_pair_as_expr(&local_736639, quote_of, set_pair_as_expr(&local_736642, quote_arguments, set_pair_as_expr(&local_736645, quote_received, set_pair_as_expr(&local_736648, arity_7337_731414, NULL)))))));}
;; 
}

static void __lambda_16(void *data, object self_735156, int argc, object *args) /* object self_735156, object r_732040 */
 {
 object r_732040 = args[0];
  
closureN_type c_736612;
object e_736616 [2];
c_736612.hdr.mark = gc_color_red;
 c_736612.hdr.grayed = 0;
c_736612.tag = closureN_tag;
 c_736612.fn = (function_type)__lambda_17;
c_736612.num_args = 1;
c_736612.num_elements = 2;
c_736612.elements = (object *)e_736616;
c_736612.elements[0] = ((closureN)self_735156)->elements[0];
c_736612.elements[1] = ((closureN)self_735156)->elements[1];


make_utf8_string_with_len(c_736620, "Only support up to ", 19, 19);

make_utf8_string_with_len(c_736621, " arguments. Received: ", 22, 22);

object c_736619 = Cyc_string_append(data,(closure)&c_736612,3,&c_736620, r_732040, &c_736621);
return_closcall1(data,(closure)&c_736612,  c_736619);; 
}

static void __lambda_17(void *data, object self_735157, int argc, object *args) /* object self_735157, object r_732039 */
 {
 object r_732039 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735157)->elements[1], r_732039, ((closureN)self_735157)->elements[0]);; 
}

static void __lambda_8(void *data, object _, int argc, object *args) /* closure _,object k_731977, object str_735_731410 */
 {
object k_731977 = args[0]; object str_735_731410 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:cstr:escape-chars");

closureN_type c_736426;
object e_736602 [2];
c_736426.hdr.mark = gc_color_red;
 c_736426.hdr.grayed = 0;
c_736426.tag = closureN_tag;
 c_736426.fn = (function_type)__lambda_9;
c_736426.num_args = 1;
c_736426.num_elements = 2;
c_736426.elements = (object *)e_736602;
c_736426.elements[0] = k_731977;
c_736426.elements[1] = str_735_731410;

return_direct_with_clo1(data,(closure)&c_736426,__lambda_9,  boolean_f);; 
}

static void __lambda_9(void *data, object self_735149, int argc, object *args) /* object self_735149, object next_736_731411 */
 {
 object next_736_731411 = args[0];
  
closureN_type c_736428;
object e_736598 [2];
c_736428.hdr.mark = gc_color_red;
 c_736428.hdr.grayed = 0;
c_736428.tag = closureN_tag;
 c_736428.fn = (function_type)__lambda_1294;
c_736428.num_args = 1;
c_736428.num_elements = 2;
c_736428.elements = (object *)e_736598;
c_736428.elements[0] = ((closureN)self_735149)->elements[0];
c_736428.elements[1] = ((closureN)self_735149)->elements[1];


pair_type local_736601; 
return_direct_with_clo1(data,(closure)&c_736428,__lambda_1294,  set_cell_as_expr(&local_736601, next_736_731411));; 
}

static void __lambda_1294(void *data, object self_735150, int argc, object *args) /* object self_735150, object next_736_731411 */
 {
 object next_736_731411 = args[0];
  
closureN_type c_736430;
object e_736446 [3];
c_736430.hdr.mark = gc_color_red;
 c_736430.hdr.grayed = 0;
c_736430.tag = closureN_tag;
 c_736430.fn = (function_type)__lambda_10;
c_736430.num_args = 1;
c_736430.num_elements = 3;
c_736430.elements = (object *)e_736446;
c_736430.elements[0] = ((closureN)self_735150)->elements[0];
c_736430.elements[1] = next_736_731411;
c_736430.elements[2] = ((closureN)self_735150)->elements[1];


closureN_type c_736447;
object e_736597 [1];
c_736447.hdr.mark = gc_color_red;
 c_736447.hdr.grayed = 0;
c_736447.tag = closureN_tag;
 c_736447.fn = (function_type)__lambda_13;
c_736447.num_args = 2;
c_736447.num_elements = 1;
c_736447.elements = (object *)e_736597;
c_736447.elements[0] = next_736_731411;

return_direct_with_clo1(data,(closure)&c_736430,__lambda_10,  &c_736447);; 
}

static void __lambda_13(void *data, object self_735151, int argc, object *args) /* object self_735151, object k_731982, object head_737_731412, object tail_738_731413 */
 {
 object k_731982 = args[0]; object head_737_731412 = args[1]; object tail_738_731413 = args[2];
    
if( (boolean_f != Cyc_is_null(head_737_731412)) ){ 
  
closureN_type c_736451;
object e_736457 [1];
c_736451.hdr.mark = gc_color_red;
 c_736451.hdr.grayed = 0;
c_736451.tag = closureN_tag;
 c_736451.fn = (function_type)__lambda_14;
c_736451.num_args = 1;
c_736451.num_elements = 1;
c_736451.elements = (object *)e_736457;
c_736451.elements[0] = k_731982;

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_736451, tail_738_731413);
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, head_737_731412), obj_char2obj(63))) ){ 
  




pair_type local_736470; 

pair_type local_736473; 
return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736470, obj_char2obj(63), set_pair_as_expr(&local_736473, obj_char2obj(92), tail_738_731413)));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, head_737_731412), obj_char2obj(34))) ){ 
  




pair_type local_736486; 

pair_type local_736489; 
return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736486, obj_char2obj(34), set_pair_as_expr(&local_736489, obj_char2obj(92), tail_738_731413)));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, head_737_731412), obj_char2obj(92))) ){ 
  




pair_type local_736502; 

pair_type local_736505; 
return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736502, obj_char2obj(92), set_pair_as_expr(&local_736505, obj_char2obj(92), tail_738_731413)));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, head_737_731412), obj_char2obj(10))) ){ 
  




pair_type local_736518; 

pair_type local_736521; 
return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736518, obj_char2obj(110), set_pair_as_expr(&local_736521, obj_char2obj(92), tail_738_731413)));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, head_737_731412), obj_char2obj(7))) ){ 
  




pair_type local_736534; 

pair_type local_736537; 
return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736534, obj_char2obj(97), set_pair_as_expr(&local_736537, obj_char2obj(92), tail_738_731413)));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, head_737_731412), obj_char2obj(8))) ){ 
  




pair_type local_736550; 

pair_type local_736553; 
return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736550, obj_char2obj(98), set_pair_as_expr(&local_736553, obj_char2obj(92), tail_738_731413)));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, head_737_731412), obj_char2obj(13))) ){ 
  




pair_type local_736566; 

pair_type local_736569; 
return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736566, obj_char2obj(114), set_pair_as_expr(&local_736569, obj_char2obj(92), tail_738_731413)));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, head_737_731412), obj_char2obj(9))) ){ 
  




pair_type local_736582; 

pair_type local_736585; 
return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736582, obj_char2obj(116), set_pair_as_expr(&local_736585, obj_char2obj(92), tail_738_731413)));
} else { 
  




pair_type local_736594; 


return_closcall3(data,  car(((closureN)self_735151)->elements[0]),  k_731982, Cyc_cdr(data, head_737_731412), set_pair_as_expr(&local_736594, Cyc_car(data, head_737_731412), tail_738_731413));}
;}
;}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_14(void *data, object self_735152, int argc, object *args) /* object self_735152, object r_731984 */
 {
 object r_731984 = args[0];
  
object c_736456 = Cyc_list2string(data,  ((closureN)self_735152)->elements[0],r_731984);
return_direct_with_clo1(data,  ((closureN)self_735152)->elements[0], (((closure)  ((closureN)self_735152)->elements[0])->fn),  c_736456);; 
}

static void __lambda_10(void *data, object self_735153, int argc, object *args) /* object self_735153, object r_731981 */
 {
 object r_731981 = args[0];
  
closureN_type c_736432;
object e_736442 [3];
c_736432.hdr.mark = gc_color_red;
 c_736432.hdr.grayed = 0;
c_736432.tag = closureN_tag;
 c_736432.fn = (function_type)__lambda_11;
c_736432.num_args = 1;
c_736432.num_elements = 3;
c_736432.elements = (object *)e_736442;
c_736432.elements[0] = ((closureN)self_735153)->elements[0];
c_736432.elements[1] = ((closureN)self_735153)->elements[1];
c_736432.elements[2] = ((closureN)self_735153)->elements[2];



return_direct_with_clo1(data,(closure)&c_736432,__lambda_11,  Cyc_set_cell(data, ((closureN)self_735153)->elements[1], r_731981));; 
}

static void __lambda_11(void *data, object self_735154, int argc, object *args) /* object self_735154, object r_731978 */
 {

  
closureN_type c_736434;
object e_736440 [2];
c_736434.hdr.mark = gc_color_red;
 c_736434.hdr.grayed = 0;
c_736434.tag = closureN_tag;
 c_736434.fn = (function_type)__lambda_12;
c_736434.num_args = 1;
c_736434.num_elements = 2;
c_736434.elements = (object *)e_736440;
c_736434.elements[0] = ((closureN)self_735154)->elements[0];
c_736434.elements[1] = ((closureN)self_735154)->elements[1];

return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_736434, ((closureN)self_735154)->elements[2]);; 
}

static void __lambda_12(void *data, object self_735155, int argc, object *args) /* object self_735155, object r_731979 */
 {
 object r_731979 = args[0];
  

return_closcall3(data,  car(((closureN)self_735155)->elements[1]),  ((closureN)self_735155)->elements[0], r_731979, NULL);; 
}

static void __lambda_7(void *data, object _, int argc, object *args) /* closure _,object k_731974 */
 {
object k_731974 = args[0];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:emit-newline");
return_direct_with_clo1(data,  __glo_newline_scheme_base, (((closure)  __glo_newline_scheme_base)->fn),  k_731974);; 
}

static void __lambda_6(void *data, object _, int argc, object *args) /* closure _,object k_731971, object strs_734_731409_raw, ... */
 {
object k_731971 = args[0];
load_varargs(strs_734_731409, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:emits*");
return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  k_731971, __glo_emits_scheme_cyclone_cgen, strs_734_731409);; 
}

static void __lambda_5(void *data, object _, int argc, object *args) /* closure _,object k_731968, object str_733_731408 */
 {
object k_731968 = args[0]; object str_733_731408 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:emits");
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  k_731968, str_733_731408);; 
}

static void __lambda_3(void *data, object _, int argc, object *args) /* closure _,object k_731964, object strs_732_731407_raw, ... */
 {
object k_731964 = args[0];
load_varargs(strs_732_731407, args, 1, argc - 1);
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:emit*");

closureN_type c_736414;
object e_736417 [1];
c_736414.hdr.mark = gc_color_red;
 c_736414.hdr.grayed = 0;
c_736414.tag = closureN_tag;
 c_736414.fn = (function_type)__lambda_4;
c_736414.num_args = 1;
c_736414.num_elements = 1;
c_736414.elements = (object *)e_736417;
c_736414.elements[0] = k_731964;

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_736414, __glo_emits_scheme_cyclone_cgen, strs_732_731407);; 
}

static void __lambda_4(void *data, object self_735148, int argc, object *args) /* object self_735148, object r_731965 */
 {

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

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_731960, object line_731_731406 */
 {
object k_731960 = args[0]; object line_731_731406 = args[1];
  Cyc_st_add(data, "scheme/cyclone/cgen.sld:emit");

closureN_type c_736408;
object e_736411 [1];
c_736408.hdr.mark = gc_color_red;
 c_736408.hdr.grayed = 0;
c_736408.tag = closureN_tag;
 c_736408.fn = (function_type)__lambda_2;
c_736408.num_args = 1;
c_736408.num_elements = 1;
c_736408.elements = (object *)e_736411;
c_736408.elements[0] = k_731960;

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_736408, line_731_731406);; 
}

static void __lambda_2(void *data, object self_735147, int argc, object *args) /* object self_735147, object r_731961 */
 {

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

void c_schemecyclonecgen_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
make_pair(pair_7316191, find_or_add_symbol("global-not-lambda?"), find_or_add_symbol("global-not-lambda?__inline__"));
make_pair(pair_7316192, find_or_add_symbol("global-lambda?"), find_or_add_symbol("global-lambda?__inline__"));
make_pair(pair_7316193, find_or_add_symbol("c:num-args"), find_or_add_symbol("c:num-args__inline__"));
make_pair(pair_7316194, find_or_add_symbol("c:allocs"), find_or_add_symbol("c:allocs__inline__"));
make_pair(pair_7316195, find_or_add_symbol("st:->var"), find_or_add_symbol("st:->var__inline__"));
make_pair(c_7316200, &pair_7316191, NULL);
make_pair(c_7316199, &pair_7316192, &c_7316200);
make_pair(c_7316198, &pair_7316193, &c_7316199);
make_pair(c_7316197, &pair_7316194, &c_7316198);
make_pair(c_7316196, &pair_7316195, &c_7316197);
object buf[1]; object cont = args[0];
buf[0] = &c_7316196; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_schemecyclonecgen_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote__85c_91call_91arity_85 = find_or_add_symbol("*c-call-arity*");
  quote_quote = find_or_add_symbol("quote");
  quote__list = find_or_add_symbol("list");
  quote__85ref_91table_85 = find_or_add_symbol("*ref-table*");
  quote__85global_91syms_85 = find_or_add_symbol("*global-syms*");
  quote_track_91call_91history = find_or_add_symbol("track-call-history");
  quote__85cgen_117track_91call_91history_85 = find_or_add_symbol("*cgen:track-call-history*");
  quote_use_91unsafe_91prims = find_or_add_symbol("use-unsafe-prims");
  quote__85cgen_117use_91unsafe_91prims_85 = find_or_add_symbol("*cgen:use-unsafe-prims*");
  quote_cgen_117mangle_91global = find_or_add_symbol("cgen:mangle-global");
  quote_cvar = find_or_add_symbol("cvar");
  quote_clo = find_or_add_symbol("clo");
  quote_pair = find_or_add_symbol("pair");
  quote_importing = find_or_add_symbol("importing");
  quote_library = find_or_add_symbol("library");
  quote_a = find_or_add_symbol("a");
  quote_find = find_or_add_symbol("find");
  quote_to = find_or_add_symbol("to");
  quote_Unable = find_or_add_symbol("Unable");
  quote_args_117fixed = find_or_add_symbol("args:fixed");
  quote_call_95cc = find_or_add_symbol("call/cc");
  quote_args_117fixed_91with_91varargs = find_or_add_symbol("args:fixed-with-varargs");
  quote_args_117varargs = find_or_add_symbol("args:varargs");
  quote_unused = find_or_add_symbol("unused");
  quote_lambdas = find_or_add_symbol("lambdas");
  quote_inline_91lambdas = find_or_add_symbol("inline-lambdas");
  quote_num_91lambdas = find_or_add_symbol("num-lambdas");
  quote__85symbols_85 = find_or_add_symbol("*symbols*");
  quote_define_91c = find_or_add_symbol("define-c");
  quote_precompiled_91lambda = find_or_add_symbol("precompiled-lambda");
  quote_precompiled_91inline_91lambda = find_or_add_symbol("precompiled-inline-lambda");
  quote__85globals_85 = find_or_add_symbol("*globals*");
  quote__85global_91inlines_85 = find_or_add_symbol("*global-inlines*");
  quote_Cyc_91foreign_91code = find_or_add_symbol("Cyc-foreign-code");
  quote_Cyc_91foreign_91value = find_or_add_symbol("Cyc-foreign-value");
  quote_application = find_or_add_symbol("application");
  quote_function = find_or_add_symbol("function");
  quote_Unsupported = find_or_add_symbol("Unsupported");
  quote_let = find_or_add_symbol("let");
  quote_Cyc_91local_91set_67 = find_or_add_symbol("Cyc-local-set!");
  quote_Cyc_91seq = find_or_add_symbol("Cyc-seq");
  quote_set_91global_67 = find_or_add_symbol("set-global!");
  quote_c_91void = find_or_add_symbol("c-void");
  quote_opaque = find_or_add_symbol("opaque");
  quote_bytevector = find_or_add_symbol("bytevector");
  quote_string = find_or_add_symbol("string");
  quote__char = find_or_add_symbol("char");
  quote_bool = find_or_add_symbol("bool");
  quote_bigint = find_or_add_symbol("bigint");
  quote_bignum = find_or_add_symbol("bignum");
  quote_var = find_or_add_symbol("var");
  quote__double = find_or_add_symbol("double");
  quote__float = find_or_add_symbol("float");
  quote_integer = find_or_add_symbol("integer");
  quote__int = find_or_add_symbol("int");
  quote_cell_91get = find_or_add_symbol("cell-get");
  quote__75closure_91ref = find_or_add_symbol("%closure-ref");
  quote_local = find_or_add_symbol("local");
  quote__85use_91alloca_85 = find_or_add_symbol("*use-alloca*");
  quote_tmp = find_or_add_symbol("tmp");
  quote_vec = find_or_add_symbol("vec");
  quote_e = find_or_add_symbol("e");
  quote_c = find_or_add_symbol("c");
  quote__75closure = find_or_add_symbol("%closure");
  quote_received = find_or_add_symbol("received");
  quote_arguments = find_or_add_symbol("arguments");
  quote_of = find_or_add_symbol("of");
  quote_number = find_or_add_symbol("number");
  quote_Non_91numeric = find_or_add_symbol("Non-numeric");

  add_global("__glo_lib_91init_117schemecyclonecgen_scheme_cyclone_cgen", (object *) &__glo_lib_91init_117schemecyclonecgen_scheme_cyclone_cgen);
  add_global("__glo_autogen_117primitive_91procedures_scheme_cyclone_cgen", (object *) &__glo_autogen_117primitive_91procedures_scheme_cyclone_cgen);
  add_global("__glo_autogen_117defprimitives_scheme_cyclone_cgen", (object *) &__glo_autogen_117defprimitives_scheme_cyclone_cgen);
  add_global("__glo_autogen_scheme_cyclone_cgen", (object *) &__glo_autogen_scheme_cyclone_cgen);
  add_global("__glo_filter_91invalid_91chars_scheme_cyclone_cgen", (object *) &__glo_filter_91invalid_91chars_scheme_cyclone_cgen);
  add_global("__glo_c_117old_91c_91args_91_125new_91decls_91from_91args_scheme_cyclone_cgen", (object *) &__glo_c_117old_91c_91args_91_125new_91decls_91from_91args_scheme_cyclone_cgen);
  add_global("__glo_mta_117code_91gen_scheme_cyclone_cgen", (object *) &__glo_mta_117code_91gen_scheme_cyclone_cgen);
  add_global("__glo_mangle_91exported_91ident_scheme_cyclone_cgen", (object *) &__glo_mangle_91exported_91ident_scheme_cyclone_cgen);
  add_global("__glo_import_91_125string_scheme_cyclone_cgen", (object *) &__glo_import_91_125string_scheme_cyclone_cgen);
  add_global("__glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen", (object *) &__glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen);
  add_global("__glo_ast_117lambda_91varargs_91var_scheme_cyclone_cgen", (object *) &__glo_ast_117lambda_91varargs_91var_scheme_cyclone_cgen);
  add_global("__glo_cgen_117mangle_91global_scheme_cyclone_cgen", (object *) &__glo_cgen_117mangle_91global_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91lambda_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91lambda_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91formals_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91formals_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91closure_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91closure_scheme_cyclone_cgen);
  add_global("__glo_find_91closure_91assigned_91var_91index_67_scheme_cyclone_cgen", (object *) &__glo_find_91closure_91assigned_91var_91index_67_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen);
  add_global("__glo_fl_95cont_127_scheme_cyclone_cgen", (object *) &__glo_fl_95cont_127_scheme_cyclone_cgen);
  add_global("__glo_fl_95closure_127_scheme_cyclone_cgen", (object *) &__glo_fl_95closure_127_scheme_cyclone_cgen);
  add_global("__glo_ast_117lambda_91num_91args_scheme_cyclone_cgen", (object *) &__glo_ast_117lambda_91num_91args_scheme_cyclone_cgen);
  add_global("__glo_compute_91num_91args_scheme_cyclone_cgen", (object *) &__glo_compute_91num_91args_scheme_cyclone_cgen);
  add_global("__glo_lambda_91_125env_scheme_cyclone_cgen", (object *) &__glo_lambda_91_125env_scheme_cyclone_cgen);
  add_global("__glo_allocate_91lambda_scheme_cyclone_cgen", (object *) &__glo_allocate_91lambda_scheme_cyclone_cgen);
  add_global("__glo_inline_91lambdas_scheme_cyclone_cgen", (object *) &__glo_inline_91lambdas_scheme_cyclone_cgen);
  add_global("__glo_lambdas_scheme_cyclone_cgen", (object *) &__glo_lambdas_scheme_cyclone_cgen);
  add_global("__glo_num_91lambdas_scheme_cyclone_cgen", (object *) &__glo_num_91lambdas_scheme_cyclone_cgen);
  add_global("__glo_allocate_91symbol_scheme_cyclone_cgen", (object *) &__glo_allocate_91symbol_scheme_cyclone_cgen);
  add_global("__glo__85symbols_85_scheme_cyclone_cgen", (object *) &__glo__85symbols_85_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91global_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91global_scheme_cyclone_cgen);
  add_global("__glo_add_91global_scheme_cyclone_cgen", (object *) &__glo_add_91global_scheme_cyclone_cgen);
  add_global("__glo_global_91not_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen", (object *) &__glo_global_91not_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen);
  add_global("__glo_global_91not_91lambda_127_scheme_cyclone_cgen", (object *) &__glo_global_91not_91lambda_127_scheme_cyclone_cgen);
  add_global("__glo_global_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen", (object *) &__glo_global_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen);
  add_global("__glo_global_91lambda_127_scheme_cyclone_cgen", (object *) &__glo_global_91lambda_127_scheme_cyclone_cgen);
  add_global("__glo__85global_91syms_85_scheme_cyclone_cgen", (object *) &__glo__85global_91syms_85_scheme_cyclone_cgen);
  add_global("__glo__85globals_85_scheme_cyclone_cgen", (object *) &__glo__85globals_85_scheme_cyclone_cgen);
  add_global("__glo_add_91global_91inline_scheme_cyclone_cgen", (object *) &__glo_add_91global_91inline_scheme_cyclone_cgen);
  add_global("__glo__85global_91inlines_85_scheme_cyclone_cgen", (object *) &__glo__85global_91inlines_85_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91if_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91if_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91app_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91app_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91args_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91args_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91ref_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91ref_scheme_cyclone_cgen);
  add_global("__glo_self_91closure_91call_127_scheme_cyclone_cgen", (object *) &__glo_self_91closure_91call_127_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91prim_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91prim_scheme_cyclone_cgen);
  add_global("__glo_alloca_127_scheme_cyclone_cgen", (object *) &__glo_alloca_127_scheme_cyclone_cgen);
  add_global("__glo_set_91use_91alloca_67_scheme_cyclone_cgen", (object *) &__glo_set_91use_91alloca_67_scheme_cyclone_cgen);
  add_global("__glo__85use_91alloca_85_scheme_cyclone_cgen", (object *) &__glo__85use_91alloca_85_scheme_cyclone_cgen);
  add_global("__glo_str_91ending_127_scheme_cyclone_cgen", (object *) &__glo_str_91ending_127_scheme_cyclone_cgen);
  add_global("__glo_string_91byte_91length_scheme_cyclone_cgen", (object *) &__glo_string_91byte_91length_scheme_cyclone_cgen);
  add_global("__glo__91_125cstr_scheme_cyclone_cgen", (object *) &__glo__91_125cstr_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91const_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91const_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91string_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91string_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91bytevector_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91bytevector_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91vector_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91vector_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91scalars_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91scalars_scheme_cyclone_cgen);
  add_global("__glo_c_91set_91immutable_91field_scheme_cyclone_cgen", (object *) &__glo_c_91set_91immutable_91field_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91quote_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91quote_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91exp_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91exp_scheme_cyclone_cgen);
  add_global("__glo_c_91compile_91program_scheme_cyclone_cgen", (object *) &__glo_c_91compile_91program_scheme_cyclone_cgen);
  add_global("__glo_c_117serialize_scheme_cyclone_cgen", (object *) &__glo_c_117serialize_scheme_cyclone_cgen);
  add_global("__glo_c_117append_95prefix_scheme_cyclone_cgen", (object *) &__glo_c_117append_95prefix_scheme_cyclone_cgen);
  add_global("__glo_c_117append_scheme_cyclone_cgen", (object *) &__glo_c_117append_scheme_cyclone_cgen);
  add_global("__glo_c_117allocs_91_125str2_scheme_cyclone_cgen", (object *) &__glo_c_117allocs_91_125str2_scheme_cyclone_cgen);
  add_global("__glo_c_117allocs_91_125str_scheme_cyclone_cgen", (object *) &__glo_c_117allocs_91_125str_scheme_cyclone_cgen);
  add_global("__glo_c_117num_91args_191_191inline_191_191_scheme_cyclone_cgen", (object *) &__glo_c_117num_91args_191_191inline_191_191_scheme_cyclone_cgen);
  add_global("__glo_c_117num_91args_scheme_cyclone_cgen", (object *) &__glo_c_117num_91args_scheme_cyclone_cgen);
  add_global("__glo_c_117allocs_191_191inline_191_191_scheme_cyclone_cgen", (object *) &__glo_c_117allocs_191_191inline_191_191_scheme_cyclone_cgen);
  add_global("__glo_c_117allocs_scheme_cyclone_cgen", (object *) &__glo_c_117allocs_scheme_cyclone_cgen);
  add_global("__glo_c_117body_scheme_cyclone_cgen", (object *) &__glo_c_117body_scheme_cyclone_cgen);
  add_global("__glo_c_117tuple_95args_scheme_cyclone_cgen", (object *) &__glo_c_117tuple_95args_scheme_cyclone_cgen);
  add_global("__glo_c_117code_scheme_cyclone_cgen", (object *) &__glo_c_117code_scheme_cyclone_cgen);
  add_global("__glo_c_117code_95vars_scheme_cyclone_cgen", (object *) &__glo_c_117code_95vars_scheme_cyclone_cgen);
  add_global("__glo_st_117_91_125var_191_191inline_191_191_scheme_cyclone_cgen", (object *) &__glo_st_117_91_125var_191_191inline_191_191_scheme_cyclone_cgen);
  add_global("__glo_st_117_91_125var_scheme_cyclone_cgen", (object *) &__glo_st_117_91_125var_scheme_cyclone_cgen);
  add_global("__glo_st_117_91_125code_scheme_cyclone_cgen", (object *) &__glo_st_117_91_125code_scheme_cyclone_cgen);
  add_global("__glo_st_117add_91function_67_scheme_cyclone_cgen", (object *) &__glo_st_117add_91function_67_scheme_cyclone_cgen);
  add_global("__glo_c_91macro_91array_91assign_scheme_cyclone_cgen", (object *) &__glo_c_91macro_91array_91assign_scheme_cyclone_cgen);
  add_global("__glo_c_91macro_91n_91prefix_scheme_cyclone_cgen", (object *) &__glo_c_91macro_91n_91prefix_scheme_cyclone_cgen);
  add_global("__glo_c_91macro_91closcall_scheme_cyclone_cgen", (object *) &__glo_c_91macro_91closcall_scheme_cyclone_cgen);
  add_global("__glo_c_91macro_91return_91direct_91with_91object_scheme_cyclone_cgen", (object *) &__glo_c_91macro_91return_91direct_91with_91object_scheme_cyclone_cgen);
  add_global("__glo_c_91macro_91return_91direct_91with_91closure_scheme_cyclone_cgen", (object *) &__glo_c_91macro_91return_91direct_91with_91closure_scheme_cyclone_cgen);
  add_global("__glo_c_91macro_91return_91direct_scheme_cyclone_cgen", (object *) &__glo_c_91macro_91return_91direct_scheme_cyclone_cgen);
  add_global("__glo_c_91macro_91continue_91or_91gc_scheme_cyclone_cgen", (object *) &__glo_c_91macro_91continue_91or_91gc_scheme_cyclone_cgen);
  add_global("__glo_c_91macro_91return_91closcall_scheme_cyclone_cgen", (object *) &__glo_c_91macro_91return_91closcall_scheme_cyclone_cgen);
  add_global("__glo_emit_91c_91arity_91macros_scheme_cyclone_cgen", (object *) &__glo_emit_91c_91arity_91macros_scheme_cyclone_cgen);
  add_global("__glo_set_91c_91call_91arity_67_scheme_cyclone_cgen", (object *) &__glo_set_91c_91call_91arity_67_scheme_cyclone_cgen);
  add_global("__glo__85c_91call_91arity_85_scheme_cyclone_cgen", (object *) &__glo__85c_91call_91arity_85_scheme_cyclone_cgen);
  add_global("__glo__85c_91call_91max_91args_85_scheme_cyclone_cgen", (object *) &__glo__85c_91call_91max_91args_85_scheme_cyclone_cgen);
  add_global("__glo__85c_91main_91function_85_scheme_cyclone_cgen", (object *) &__glo__85c_91main_91function_85_scheme_cyclone_cgen);
  add_global("__glo_cstr_117escape_91chars_scheme_cyclone_cgen", (object *) &__glo_cstr_117escape_91chars_scheme_cyclone_cgen);
  add_global("__glo_emit_91newline_scheme_cyclone_cgen", (object *) &__glo_emit_91newline_scheme_cyclone_cgen);
  add_global("__glo_emits_85_scheme_cyclone_cgen", (object *) &__glo_emits_85_scheme_cyclone_cgen);
  add_global("__glo_emits_scheme_cyclone_cgen", (object *) &__glo_emits_scheme_cyclone_cgen);
  add_global("__glo_emit_85_scheme_cyclone_cgen", (object *) &__glo_emit_85_scheme_cyclone_cgen);
  add_global("__glo_emit_scheme_cyclone_cgen", (object *) &__glo_emit_scheme_cyclone_cgen);
  add_global("__glo__85ref_91table_85_scheme_cyclone_cgen", (object *) &__glo__85ref_91table_85_scheme_cyclone_cgen);
  add_global("__glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen", (object *) &__glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen);
  add_global("__glo__85cgen_117use_91unsafe_91prims_85_scheme_cyclone_cgen", (object *) &__glo__85cgen_117use_91unsafe_91prims_85_scheme_cyclone_cgen);
  add_global("__glo__85cgen_117track_91call_91history_85_scheme_cyclone_cgen", (object *) &__glo__85cgen_117track_91call_91history_85_scheme_cyclone_cgen);
  mclosure0(c_7316140, (function_type)__lambda_1286);c_7316140.num_args = 0; 
  __glo_lib_91init_117schemecyclonecgen_scheme_cyclone_cgen = &c_7316140; 
  mclosure0(c_7316110, (function_type)__lambda_1282);c_7316110.num_args = 1; 
  __glo_autogen_117primitive_91procedures_scheme_cyclone_cgen = &c_7316110; 
  mclosure0(c_7316055, (function_type)__lambda_1272);c_7316055.num_args = 1; 
  __glo_autogen_117defprimitives_scheme_cyclone_cgen = &c_7316055; 
  mclosure0(c_7316036, (function_type)__lambda_1268);c_7316036.num_args = 1; 
  __glo_autogen_scheme_cyclone_cgen = &c_7316036; 
  mclosure0(c_7316005, (function_type)__lambda_1262);c_7316005.num_args = 1; 
  __glo_filter_91invalid_91chars_scheme_cyclone_cgen = &c_7316005; 
  mclosure0(c_7315906, (function_type)__lambda_1246);c_7315906.num_args = 1; 
  __glo_c_117old_91c_91args_91_125new_91decls_91from_91args_scheme_cyclone_cgen = &c_7315906; 
  mclosure0(c_7314144, (function_type)__lambda_972);c_7314144.num_args = 10; 
  __glo_mta_117code_91gen_scheme_cyclone_cgen = &c_7314144; 
  mclosure0(c_7314088, (function_type)__lambda_965);c_7314088.num_args = 3; 
  __glo_mangle_91exported_91ident_scheme_cyclone_cgen = &c_7314088; 
  mclosure0(c_7314065, (function_type)__lambda_960);c_7314065.num_args = 1; 
  __glo_import_91_125string_scheme_cyclone_cgen = &c_7314065; 
  mclosure0(c_7314051, (function_type)__lambda_958);c_7314051.num_args = 1; 
  __glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen = &c_7314051; 
  mclosure0(c_7314025, (function_type)__lambda_953);c_7314025.num_args = 1; 
  __glo_ast_117lambda_91varargs_91var_scheme_cyclone_cgen = &c_7314025; 
  mclosure0(c_7313403, (function_type)__lambda_861);c_7313403.num_args = 3; 
  __glo_c_91compile_91lambda_scheme_cyclone_cgen = &c_7313403; 
  mclosure0(c_7313328, (function_type)__lambda_854);c_7313328.num_args = 2; 
  __glo_c_91compile_91formals_scheme_cyclone_cgen = &c_7313328; 
  mclosure0(c_7312807, (function_type)__lambda_781);c_7312807.num_args = 6; 
  __glo_c_91compile_91closure_scheme_cyclone_cgen = &c_7312807; 
  mclosure0(c_7312712, (function_type)__lambda_764);c_7312712.num_args = 2; 
  __glo_find_91closure_91assigned_91var_91index_67_scheme_cyclone_cgen = &c_7312712; 
  mclosure0(c_7312662, (function_type)__lambda_755);c_7312662.num_args = 3; 
  __glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen = &c_7312662; 
  mclosure0(c_7312615, (function_type)__lambda_749);c_7312615.num_args = 1; 
  __glo_fl_95cont_127_scheme_cyclone_cgen = &c_7312615; 
  mclosure0(c_7312586, (function_type)__lambda_746);c_7312586.num_args = 1; 
  __glo_fl_95closure_127_scheme_cyclone_cgen = &c_7312586; 
  mclosure0(c_7312559, (function_type)__lambda_742);c_7312559.num_args = 1; 
  __glo_ast_117lambda_91num_91args_scheme_cyclone_cgen = &c_7312559; 
  mclosure0(c_7312511, (function_type)__lambda_733);c_7312511.num_args = 1; 
  __glo_compute_91num_91args_scheme_cyclone_cgen = &c_7312511; 
  mclosure0(c_7312499, (function_type)__lambda_731);c_7312499.num_args = 1; 
  __glo_lambda_91_125env_scheme_cyclone_cgen = &c_7312499; 
  mclosure0(c_7312401, (function_type)__lambda_719);c_7312401.num_args = 2; 
  __glo_allocate_91lambda_scheme_cyclone_cgen = &c_7312401; 
  mclosure0(c_7312381, (function_type)__lambda_716);c_7312381.num_args = 1; 
  __glo_allocate_91symbol_scheme_cyclone_cgen = &c_7312381; 
  mclosure0(c_7312191, (function_type)__lambda_691);c_7312191.num_args = 4; 
  __glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen = &c_7312191; 
  mclosure0(c_7312068, (function_type)__lambda_669);c_7312068.num_args = 4; 
  __glo_c_91compile_91global_scheme_cyclone_cgen = &c_7312068; 
  mclosure0(c_7312053, (function_type)__lambda_667);c_7312053.num_args = 3; 
  __glo_add_91global_scheme_cyclone_cgen = &c_7312053; 
  mclosure0(c_7312046, (function_type)__lambda_1343);c_7312046.num_args = 1; 
  __glo_global_91not_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen = &c_7312046; 
  mclosure0(c_7312039, (function_type)__lambda_666);c_7312039.num_args = 1; 
  __glo_global_91not_91lambda_127_scheme_cyclone_cgen = &c_7312039; 
  mclosure0(c_7312035, (function_type)__lambda_1342);c_7312035.num_args = 1; 
  __glo_global_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen = &c_7312035; 
  mclosure0(c_7312031, (function_type)__lambda_665);c_7312031.num_args = 1; 
  __glo_global_91lambda_127_scheme_cyclone_cgen = &c_7312031; 
  mclosure0(c_7312016, (function_type)__lambda_663);c_7312016.num_args = 2; 
  __glo_add_91global_91inline_scheme_cyclone_cgen = &c_7312016; 
  mclosure0(c_7311947, (function_type)__lambda_653);c_7311947.num_args = 6; 
  __glo_c_91compile_91if_scheme_cyclone_cgen = &c_7311947; 
  mclosure0(c_739797, (function_type)__lambda_384);c_739797.num_args = 6; 
  __glo_c_91compile_91app_scheme_cyclone_cgen = &c_739797; 
  mclosure0(c_739663, (function_type)__lambda_368);c_739663.num_args = 7; 
  __glo_c_91compile_91args_scheme_cyclone_cgen = &c_739663; 
  mclosure0(c_739643, (function_type)__lambda_364);c_739643.num_args = 1; 
  __glo_c_91compile_91ref_scheme_cyclone_cgen = &c_739643; 
  mclosure0(c_739603, (function_type)__lambda_363);c_739603.num_args = 3; 
  __glo_self_91closure_91call_127_scheme_cyclone_cgen = &c_739603; 
  mclosure0(c_739189, (function_type)__lambda_304);c_739189.num_args = 3; 
  __glo_c_91compile_91prim_scheme_cyclone_cgen = &c_739189; 
  mclosure0(c_739148, (function_type)__lambda_298);c_739148.num_args = 2; 
  __glo_alloca_127_scheme_cyclone_cgen = &c_739148; 
  mclosure0(c_739143, (function_type)__lambda_297);c_739143.num_args = 1; 
  __glo_set_91use_91alloca_67_scheme_cyclone_cgen = &c_739143; 
  mclosure0(c_739119, (function_type)__lambda_295);c_739119.num_args = 2; 
  __glo_str_91ending_127_scheme_cyclone_cgen = &c_739119; 
  mclosure0(c_739118, (function_type)__lambda_1341);c_739118.num_args = 1; 
  __glo_string_91byte_91length_scheme_cyclone_cgen = &c_739118; 
  mclosure0(c_739107, (function_type)__lambda_293);c_739107.num_args = 1; 
  __glo__91_125cstr_scheme_cyclone_cgen = &c_739107; 
  mclosure0(c_738711, (function_type)__lambda_244);c_738711.num_args = 3; 
  __glo_c_91compile_91const_scheme_cyclone_cgen = &c_738711; 
  mclosure0(c_738543, (function_type)__lambda_222);c_738543.num_args = 3; 
  __glo_c_91compile_91string_scheme_cyclone_cgen = &c_738543; 
  mclosure0(c_738224, (function_type)__lambda_193);c_738224.num_args = 3; 
  __glo_c_91compile_91bytevector_scheme_cyclone_cgen = &c_738224; 
  mclosure0(c_737830, (function_type)__lambda_158);c_737830.num_args = 3; 
  __glo_c_91compile_91vector_scheme_cyclone_cgen = &c_737830; 
  mclosure0(c_737593, (function_type)__lambda_131);c_737593.num_args = 3; 
  __glo_c_91compile_91scalars_scheme_cyclone_cgen = &c_737593; 
  mclosure0(c_737562, (function_type)__lambda_128);c_737562.num_args = 3; 
  __glo_c_91set_91immutable_91field_scheme_cyclone_cgen = &c_737562; 
  mclosure0(c_737558, (function_type)__lambda_127);c_737558.num_args = 2; 
  __glo_c_91compile_91quote_scheme_cyclone_cgen = &c_737558; 
  mclosure0(c_737421, (function_type)__lambda_112);c_737421.num_args = 6; 
  __glo_c_91compile_91exp_scheme_cyclone_cgen = &c_737421; 
  mclosure0(c_737368, (function_type)__lambda_105);c_737368.num_args = 2; 
  __glo_c_91compile_91program_scheme_cyclone_cgen = &c_737368; 
  mclosure0(c_737315, (function_type)__lambda_101);c_737315.num_args = 2; 
  __glo_c_117serialize_scheme_cyclone_cgen = &c_737315; 
  mclosure0(c_737289, (function_type)__lambda_98);c_737289.num_args = 3; 
  __glo_c_117append_95prefix_scheme_cyclone_cgen = &c_737289; 
  mclosure0(c_737263, (function_type)__lambda_95);c_737263.num_args = 2; 
  __glo_c_117append_scheme_cyclone_cgen = &c_737263; 
  mclosure0(c_737240, (function_type)__lambda_91);c_737240.num_args = 3; 
  __glo_c_117allocs_91_125str2_scheme_cyclone_cgen = &c_737240; 
  mclosure0(c_737206, (function_type)__lambda_87);c_737206.num_args = 1; 
  __glo_c_117allocs_91_125str_scheme_cyclone_cgen = &c_737206; 
  mclosure0(c_737202, (function_type)__lambda_1340);c_737202.num_args = 1; 
  __glo_c_117num_91args_191_191inline_191_191_scheme_cyclone_cgen = &c_737202; 
  mclosure0(c_737198, (function_type)__lambda_86);c_737198.num_args = 1; 
  __glo_c_117num_91args_scheme_cyclone_cgen = &c_737198; 
  mclosure0(c_737194, (function_type)__lambda_1339);c_737194.num_args = 1; 
  __glo_c_117allocs_191_191inline_191_191_scheme_cyclone_cgen = &c_737194; 
  mclosure0(c_737190, (function_type)__lambda_85);c_737190.num_args = 1; 
  __glo_c_117allocs_scheme_cyclone_cgen = &c_737190; 
  mclosure0(c_737186, (function_type)__lambda_84);c_737186.num_args = 1; 
  __glo_c_117body_scheme_cyclone_cgen = &c_737186; 
  mclosure0(c_737181, (function_type)__lambda_83);c_737181.num_args = 2; 
  __glo_c_117tuple_95args_scheme_cyclone_cgen = &c_737181; 
  mclosure0(c_737171, (function_type)__lambda_81);c_737171.num_args = 1; 
  __glo_c_117code_scheme_cyclone_cgen = &c_737171; 
  mclosure0(c_737166, (function_type)__lambda_80);c_737166.num_args = 2; 
  __glo_c_117code_95vars_scheme_cyclone_cgen = &c_737166; 
  mclosure0(c_737162, (function_type)__lambda_1338);c_737162.num_args = 1; 
  __glo_st_117_91_125var_191_191inline_191_191_scheme_cyclone_cgen = &c_737162; 
  mclosure0(c_737158, (function_type)__lambda_79);c_737158.num_args = 1; 
  __glo_st_117_91_125var_scheme_cyclone_cgen = &c_737158; 
  mclosure0(c_737111, (function_type)__lambda_77);c_737111.num_args = 1; 
  __glo_st_117_91_125code_scheme_cyclone_cgen = &c_737111; 
  mclosure0(c_737099, (function_type)__lambda_76);c_737099.num_args = 2; 
  __glo_st_117add_91function_67_scheme_cyclone_cgen = &c_737099; 
  mclosure0(c_737059, (function_type)__lambda_72);c_737059.num_args = 3; 
  __glo_c_91macro_91array_91assign_scheme_cyclone_cgen = &c_737059; 
  mclosure0(c_737028, (function_type)__lambda_68);c_737028.num_args = 2; 
  __glo_c_91macro_91n_91prefix_scheme_cyclone_cgen = &c_737028; 
  mclosure0(c_736946, (function_type)__lambda_57);c_736946.num_args = 1; 
  __glo_c_91macro_91closcall_scheme_cyclone_cgen = &c_736946; 
  mclosure0(c_736902, (function_type)__lambda_52);c_736902.num_args = 1; 
  __glo_c_91macro_91return_91direct_91with_91object_scheme_cyclone_cgen = &c_736902; 
  mclosure0(c_736859, (function_type)__lambda_47);c_736859.num_args = 1; 
  __glo_c_91macro_91return_91direct_91with_91closure_scheme_cyclone_cgen = &c_736859; 
  mclosure0(c_736815, (function_type)__lambda_42);c_736815.num_args = 1; 
  __glo_c_91macro_91return_91direct_scheme_cyclone_cgen = &c_736815; 
  mclosure0(c_736772, (function_type)__lambda_37);c_736772.num_args = 1; 
  __glo_c_91macro_91continue_91or_91gc_scheme_cyclone_cgen = &c_736772; 
  mclosure0(c_736727, (function_type)__lambda_32);c_736727.num_args = 1; 
  __glo_c_91macro_91return_91closcall_scheme_cyclone_cgen = &c_736727; 
  mclosure0(c_736649, (function_type)__lambda_18);c_736649.num_args = 1; 
  __glo_emit_91c_91arity_91macros_scheme_cyclone_cgen = &c_736649; 
  mclosure0(c_736604, (function_type)__lambda_15);c_736604.num_args = 1; 
  __glo_set_91c_91call_91arity_67_scheme_cyclone_cgen = &c_736604; 
  mclosure0(c_736424, (function_type)__lambda_8);c_736424.num_args = 1; 
  __glo_cstr_117escape_91chars_scheme_cyclone_cgen = &c_736424; 
  mclosure0(c_736422, (function_type)__lambda_7);c_736422.num_args = 0; 
  __glo_emit_91newline_scheme_cyclone_cgen = &c_736422; 
  mclosure0(c_736420, (function_type)__lambda_6);c_736420.num_args = 0; 
  __glo_emits_85_scheme_cyclone_cgen = &c_736420; 
  mclosure0(c_736418, (function_type)__lambda_5);c_736418.num_args = 1; 
  __glo_emits_scheme_cyclone_cgen = &c_736418; 
  mclosure0(c_736412, (function_type)__lambda_3);c_736412.num_args = 0; 
  __glo_emit_85_scheme_cyclone_cgen = &c_736412; 
  mclosure0(c_736406, (function_type)__lambda_1);c_736406.num_args = 1; 
  __glo_emit_scheme_cyclone_cgen = &c_736406; 
  __glo_cgen_117mangle_91global_scheme_cyclone_cgen = boolean_f; 
  __glo_inline_91lambdas_scheme_cyclone_cgen = boolean_f; 
  __glo_lambdas_scheme_cyclone_cgen = boolean_f; 
  __glo_num_91lambdas_scheme_cyclone_cgen = obj_int2obj(0); 
  __glo__85symbols_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85global_91syms_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85globals_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85global_91inlines_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85use_91alloca_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85c_91call_91arity_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85c_91call_91max_91args_85_scheme_cyclone_cgen = obj_int2obj(10000); 
  make_utf8_string_with_len(c_736603, "int main(int argc, char **argv, char **envp)\n{gc_thread_data *thd;\n long stack_size = global_stack_size = STACK_SIZE;\n long heap_size = global_heap_size = HEAP_SIZE;\n init_polyfills();\n mclosure0(clos_halt,&Cyc_halt);  // Halt if final closure is reached\n mclosure0(entry_pt,&c_entry_pt); // First function to execute\n _cyc_argc = argc;\n _cyc_argv = argv;\n set_env_variables(envp);\n gc_initialize();\n thd = malloc(sizeof(gc_thread_data));\n gc_thread_data_init(thd, 0, (char *) &stack_size, stack_size);\n thd->gc_cont = &entry_pt;\n thd->gc_args[0] = &clos_halt;\n thd->gc_num_args = 1;\n thd->thread_id = pthread_self();\n gc_add_mutator(thd);\n Cyc_heap_init(heap_size);\n thd->thread_state = CYC_THREAD_STATE_RUNNABLE;\n Cyc_start_trampoline(thd);\n return 0;}", 754, 754); 
  __glo__85c_91main_91function_85_scheme_cyclone_cgen = &c_736603; 
  __glo__85ref_91table_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85cgen_117use_91unsafe_91prims_85_scheme_cyclone_cgen = boolean_f; 
  __glo__85cgen_117track_91call_91history_85_scheme_cyclone_cgen = boolean_t; 

  mclosure0(clo_7316202, c_schemecyclonecgen_inlinable_lambdas); make_pair(pair_7316201, find_or_add_symbol("c_schemecyclonecgen_inlinable_lambdas"), &clo_7316202);
  make_cvar(cvar_7316203, (object *)&__glo_lib_91init_117schemecyclonecgen_scheme_cyclone_cgen);make_pair(pair_7316204, find_or_add_symbol("lib-init:schemecyclonecgen"), &cvar_7316203);
  make_cvar(cvar_7316205, (object *)&__glo_autogen_117primitive_91procedures_scheme_cyclone_cgen);make_pair(pair_7316206, find_or_add_symbol("autogen:primitive-procedures"), &cvar_7316205);
  make_cvar(cvar_7316207, (object *)&__glo_autogen_117defprimitives_scheme_cyclone_cgen);make_pair(pair_7316208, find_or_add_symbol("autogen:defprimitives"), &cvar_7316207);
  make_cvar(cvar_7316209, (object *)&__glo_autogen_scheme_cyclone_cgen);make_pair(pair_7316210, find_or_add_symbol("autogen"), &cvar_7316209);
  make_cvar(cvar_7316211, (object *)&__glo_filter_91invalid_91chars_scheme_cyclone_cgen);make_pair(pair_7316212, find_or_add_symbol("filter-invalid-chars"), &cvar_7316211);
  make_cvar(cvar_7316213, (object *)&__glo_c_117old_91c_91args_91_125new_91decls_91from_91args_scheme_cyclone_cgen);make_pair(pair_7316214, find_or_add_symbol("c:old-c-args->new-decls-from-args"), &cvar_7316213);
  make_cvar(cvar_7316215, (object *)&__glo_mta_117code_91gen_scheme_cyclone_cgen);make_pair(pair_7316216, find_or_add_symbol("mta:code-gen"), &cvar_7316215);
  make_cvar(cvar_7316217, (object *)&__glo_mangle_91exported_91ident_scheme_cyclone_cgen);make_pair(pair_7316218, find_or_add_symbol("mangle-exported-ident"), &cvar_7316217);
  make_cvar(cvar_7316219, (object *)&__glo_import_91_125string_scheme_cyclone_cgen);make_pair(pair_7316220, find_or_add_symbol("import->string"), &cvar_7316219);
  make_cvar(cvar_7316221, (object *)&__glo_ast_117lambda_91varargs_127_scheme_cyclone_cgen);make_pair(pair_7316222, find_or_add_symbol("ast:lambda-varargs?"), &cvar_7316221);
  make_cvar(cvar_7316223, (object *)&__glo_ast_117lambda_91varargs_91var_scheme_cyclone_cgen);make_pair(pair_7316224, find_or_add_symbol("ast:lambda-varargs-var"), &cvar_7316223);
  make_cvar(cvar_7316225, (object *)&__glo_cgen_117mangle_91global_scheme_cyclone_cgen);make_pair(pair_7316226, find_or_add_symbol("cgen:mangle-global"), &cvar_7316225);
  make_cvar(cvar_7316227, (object *)&__glo_c_91compile_91lambda_scheme_cyclone_cgen);make_pair(pair_7316228, find_or_add_symbol("c-compile-lambda"), &cvar_7316227);
  make_cvar(cvar_7316229, (object *)&__glo_c_91compile_91formals_scheme_cyclone_cgen);make_pair(pair_7316230, find_or_add_symbol("c-compile-formals"), &cvar_7316229);
  make_cvar(cvar_7316231, (object *)&__glo_c_91compile_91closure_scheme_cyclone_cgen);make_pair(pair_7316232, find_or_add_symbol("c-compile-closure"), &cvar_7316231);
  make_cvar(cvar_7316233, (object *)&__glo_find_91closure_91assigned_91var_91index_67_scheme_cyclone_cgen);make_pair(pair_7316234, find_or_add_symbol("find-closure-assigned-var-index!"), &cvar_7316233);
  make_cvar(cvar_7316235, (object *)&__glo_c_91compile_91closure_91element_91ref_scheme_cyclone_cgen);make_pair(pair_7316236, find_or_add_symbol("c-compile-closure-element-ref"), &cvar_7316235);
  make_cvar(cvar_7316237, (object *)&__glo_fl_95cont_127_scheme_cyclone_cgen);make_pair(pair_7316238, find_or_add_symbol("fl/cont?"), &cvar_7316237);
  make_cvar(cvar_7316239, (object *)&__glo_fl_95closure_127_scheme_cyclone_cgen);make_pair(pair_7316240, find_or_add_symbol("fl/closure?"), &cvar_7316239);
  make_cvar(cvar_7316241, (object *)&__glo_ast_117lambda_91num_91args_scheme_cyclone_cgen);make_pair(pair_7316242, find_or_add_symbol("ast:lambda-num-args"), &cvar_7316241);
  make_cvar(cvar_7316243, (object *)&__glo_compute_91num_91args_scheme_cyclone_cgen);make_pair(pair_7316244, find_or_add_symbol("compute-num-args"), &cvar_7316243);
  make_cvar(cvar_7316245, (object *)&__glo_lambda_91_125env_scheme_cyclone_cgen);make_pair(pair_7316246, find_or_add_symbol("lambda->env"), &cvar_7316245);
  make_cvar(cvar_7316247, (object *)&__glo_allocate_91lambda_scheme_cyclone_cgen);make_pair(pair_7316248, find_or_add_symbol("allocate-lambda"), &cvar_7316247);
  make_cvar(cvar_7316249, (object *)&__glo_inline_91lambdas_scheme_cyclone_cgen);make_pair(pair_7316250, find_or_add_symbol("inline-lambdas"), &cvar_7316249);
  make_cvar(cvar_7316251, (object *)&__glo_lambdas_scheme_cyclone_cgen);make_pair(pair_7316252, find_or_add_symbol("lambdas"), &cvar_7316251);
  make_cvar(cvar_7316253, (object *)&__glo_num_91lambdas_scheme_cyclone_cgen);make_pair(pair_7316254, find_or_add_symbol("num-lambdas"), &cvar_7316253);
  make_cvar(cvar_7316255, (object *)&__glo_allocate_91symbol_scheme_cyclone_cgen);make_pair(pair_7316256, find_or_add_symbol("allocate-symbol"), &cvar_7316255);
  make_cvar(cvar_7316257, (object *)&__glo__85symbols_85_scheme_cyclone_cgen);make_pair(pair_7316258, find_or_add_symbol("*symbols*"), &cvar_7316257);
  make_cvar(cvar_7316259, (object *)&__glo_c_91compile_91raw_91global_91lambda_scheme_cyclone_cgen);make_pair(pair_7316260, find_or_add_symbol("c-compile-raw-global-lambda"), &cvar_7316259);
  make_cvar(cvar_7316261, (object *)&__glo_c_91compile_91global_scheme_cyclone_cgen);make_pair(pair_7316262, find_or_add_symbol("c-compile-global"), &cvar_7316261);
  make_cvar(cvar_7316263, (object *)&__glo_add_91global_scheme_cyclone_cgen);make_pair(pair_7316264, find_or_add_symbol("add-global"), &cvar_7316263);
  make_cvar(cvar_7316265, (object *)&__glo_global_91not_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen);make_pair(pair_7316266, find_or_add_symbol("global-not-lambda?__inline__"), &cvar_7316265);
  make_cvar(cvar_7316267, (object *)&__glo_global_91not_91lambda_127_scheme_cyclone_cgen);make_pair(pair_7316268, find_or_add_symbol("global-not-lambda?"), &cvar_7316267);
  make_cvar(cvar_7316269, (object *)&__glo_global_91lambda_127_191_191inline_191_191_scheme_cyclone_cgen);make_pair(pair_7316270, find_or_add_symbol("global-lambda?__inline__"), &cvar_7316269);
  make_cvar(cvar_7316271, (object *)&__glo_global_91lambda_127_scheme_cyclone_cgen);make_pair(pair_7316272, find_or_add_symbol("global-lambda?"), &cvar_7316271);
  make_cvar(cvar_7316273, (object *)&__glo__85global_91syms_85_scheme_cyclone_cgen);make_pair(pair_7316274, find_or_add_symbol("*global-syms*"), &cvar_7316273);
  make_cvar(cvar_7316275, (object *)&__glo__85globals_85_scheme_cyclone_cgen);make_pair(pair_7316276, find_or_add_symbol("*globals*"), &cvar_7316275);
  make_cvar(cvar_7316277, (object *)&__glo_add_91global_91inline_scheme_cyclone_cgen);make_pair(pair_7316278, find_or_add_symbol("add-global-inline"), &cvar_7316277);
  make_cvar(cvar_7316279, (object *)&__glo__85global_91inlines_85_scheme_cyclone_cgen);make_pair(pair_7316280, find_or_add_symbol("*global-inlines*"), &cvar_7316279);
  make_cvar(cvar_7316281, (object *)&__glo_c_91compile_91if_scheme_cyclone_cgen);make_pair(pair_7316282, find_or_add_symbol("c-compile-if"), &cvar_7316281);
  make_cvar(cvar_7316283, (object *)&__glo_c_91compile_91app_scheme_cyclone_cgen);make_pair(pair_7316284, find_or_add_symbol("c-compile-app"), &cvar_7316283);
  make_cvar(cvar_7316285, (object *)&__glo_c_91compile_91args_scheme_cyclone_cgen);make_pair(pair_7316286, find_or_add_symbol("c-compile-args"), &cvar_7316285);
  make_cvar(cvar_7316287, (object *)&__glo_c_91compile_91ref_scheme_cyclone_cgen);make_pair(pair_7316288, find_or_add_symbol("c-compile-ref"), &cvar_7316287);
  make_cvar(cvar_7316289, (object *)&__glo_self_91closure_91call_127_scheme_cyclone_cgen);make_pair(pair_7316290, find_or_add_symbol("self-closure-call?"), &cvar_7316289);
  make_cvar(cvar_7316291, (object *)&__glo_c_91compile_91prim_scheme_cyclone_cgen);make_pair(pair_7316292, find_or_add_symbol("c-compile-prim"), &cvar_7316291);
  make_cvar(cvar_7316293, (object *)&__glo_alloca_127_scheme_cyclone_cgen);make_pair(pair_7316294, find_or_add_symbol("alloca?"), &cvar_7316293);
  make_cvar(cvar_7316295, (object *)&__glo_set_91use_91alloca_67_scheme_cyclone_cgen);make_pair(pair_7316296, find_or_add_symbol("set-use-alloca!"), &cvar_7316295);
  make_cvar(cvar_7316297, (object *)&__glo__85use_91alloca_85_scheme_cyclone_cgen);make_pair(pair_7316298, find_or_add_symbol("*use-alloca*"), &cvar_7316297);
  make_cvar(cvar_7316299, (object *)&__glo_str_91ending_127_scheme_cyclone_cgen);make_pair(pair_7316300, find_or_add_symbol("str-ending?"), &cvar_7316299);
  make_cvar(cvar_7316301, (object *)&__glo_string_91byte_91length_scheme_cyclone_cgen);make_pair(pair_7316302, find_or_add_symbol("string-byte-length"), &cvar_7316301);
  make_cvar(cvar_7316303, (object *)&__glo__91_125cstr_scheme_cyclone_cgen);make_pair(pair_7316304, find_or_add_symbol("->cstr"), &cvar_7316303);
  make_cvar(cvar_7316305, (object *)&__glo_c_91compile_91const_scheme_cyclone_cgen);make_pair(pair_7316306, find_or_add_symbol("c-compile-const"), &cvar_7316305);
  make_cvar(cvar_7316307, (object *)&__glo_c_91compile_91string_scheme_cyclone_cgen);make_pair(pair_7316308, find_or_add_symbol("c-compile-string"), &cvar_7316307);
  make_cvar(cvar_7316309, (object *)&__glo_c_91compile_91bytevector_scheme_cyclone_cgen);make_pair(pair_7316310, find_or_add_symbol("c-compile-bytevector"), &cvar_7316309);
  make_cvar(cvar_7316311, (object *)&__glo_c_91compile_91vector_scheme_cyclone_cgen);make_pair(pair_7316312, find_or_add_symbol("c-compile-vector"), &cvar_7316311);
  make_cvar(cvar_7316313, (object *)&__glo_c_91compile_91scalars_scheme_cyclone_cgen);make_pair(pair_7316314, find_or_add_symbol("c-compile-scalars"), &cvar_7316313);
  make_cvar(cvar_7316315, (object *)&__glo_c_91set_91immutable_91field_scheme_cyclone_cgen);make_pair(pair_7316316, find_or_add_symbol("c-set-immutable-field"), &cvar_7316315);
  make_cvar(cvar_7316317, (object *)&__glo_c_91compile_91quote_scheme_cyclone_cgen);make_pair(pair_7316318, find_or_add_symbol("c-compile-quote"), &cvar_7316317);
  make_cvar(cvar_7316319, (object *)&__glo_c_91compile_91exp_scheme_cyclone_cgen);make_pair(pair_7316320, find_or_add_symbol("c-compile-exp"), &cvar_7316319);
  make_cvar(cvar_7316321, (object *)&__glo_c_91compile_91program_scheme_cyclone_cgen);make_pair(pair_7316322, find_or_add_symbol("c-compile-program"), &cvar_7316321);
  make_cvar(cvar_7316323, (object *)&__glo_c_117serialize_scheme_cyclone_cgen);make_pair(pair_7316324, find_or_add_symbol("c:serialize"), &cvar_7316323);
  make_cvar(cvar_7316325, (object *)&__glo_c_117append_95prefix_scheme_cyclone_cgen);make_pair(pair_7316326, find_or_add_symbol("c:append/prefix"), &cvar_7316325);
  make_cvar(cvar_7316327, (object *)&__glo_c_117append_scheme_cyclone_cgen);make_pair(pair_7316328, find_or_add_symbol("c:append"), &cvar_7316327);
  make_cvar(cvar_7316329, (object *)&__glo_c_117allocs_91_125str2_scheme_cyclone_cgen);make_pair(pair_7316330, find_or_add_symbol("c:allocs->str2"), &cvar_7316329);
  make_cvar(cvar_7316331, (object *)&__glo_c_117allocs_91_125str_scheme_cyclone_cgen);make_pair(pair_7316332, find_or_add_symbol("c:allocs->str"), &cvar_7316331);
  make_cvar(cvar_7316333, (object *)&__glo_c_117num_91args_191_191inline_191_191_scheme_cyclone_cgen);make_pair(pair_7316334, find_or_add_symbol("c:num-args__inline__"), &cvar_7316333);
  make_cvar(cvar_7316335, (object *)&__glo_c_117num_91args_scheme_cyclone_cgen);make_pair(pair_7316336, find_or_add_symbol("c:num-args"), &cvar_7316335);
  make_cvar(cvar_7316337, (object *)&__glo_c_117allocs_191_191inline_191_191_scheme_cyclone_cgen);make_pair(pair_7316338, find_or_add_symbol("c:allocs__inline__"), &cvar_7316337);
  make_cvar(cvar_7316339, (object *)&__glo_c_117allocs_scheme_cyclone_cgen);make_pair(pair_7316340, find_or_add_symbol("c:allocs"), &cvar_7316339);
  make_cvar(cvar_7316341, (object *)&__glo_c_117body_scheme_cyclone_cgen);make_pair(pair_7316342, find_or_add_symbol("c:body"), &cvar_7316341);
  make_cvar(cvar_7316343, (object *)&__glo_c_117tuple_95args_scheme_cyclone_cgen);make_pair(pair_7316344, find_or_add_symbol("c:tuple/args"), &cvar_7316343);
  make_cvar(cvar_7316345, (object *)&__glo_c_117code_scheme_cyclone_cgen);make_pair(pair_7316346, find_or_add_symbol("c:code"), &cvar_7316345);
  make_cvar(cvar_7316347, (object *)&__glo_c_117code_95vars_scheme_cyclone_cgen);make_pair(pair_7316348, find_or_add_symbol("c:code/vars"), &cvar_7316347);
  make_cvar(cvar_7316349, (object *)&__glo_st_117_91_125var_191_191inline_191_191_scheme_cyclone_cgen);make_pair(pair_7316350, find_or_add_symbol("st:->var__inline__"), &cvar_7316349);
  make_cvar(cvar_7316351, (object *)&__glo_st_117_91_125var_scheme_cyclone_cgen);make_pair(pair_7316352, find_or_add_symbol("st:->var"), &cvar_7316351);
  make_cvar(cvar_7316353, (object *)&__glo_st_117_91_125code_scheme_cyclone_cgen);make_pair(pair_7316354, find_or_add_symbol("st:->code"), &cvar_7316353);
  make_cvar(cvar_7316355, (object *)&__glo_st_117add_91function_67_scheme_cyclone_cgen);make_pair(pair_7316356, find_or_add_symbol("st:add-function!"), &cvar_7316355);
  make_cvar(cvar_7316357, (object *)&__glo_c_91macro_91array_91assign_scheme_cyclone_cgen);make_pair(pair_7316358, find_or_add_symbol("c-macro-array-assign"), &cvar_7316357);
  make_cvar(cvar_7316359, (object *)&__glo_c_91macro_91n_91prefix_scheme_cyclone_cgen);make_pair(pair_7316360, find_or_add_symbol("c-macro-n-prefix"), &cvar_7316359);
  make_cvar(cvar_7316361, (object *)&__glo_c_91macro_91closcall_scheme_cyclone_cgen);make_pair(pair_7316362, find_or_add_symbol("c-macro-closcall"), &cvar_7316361);
  make_cvar(cvar_7316363, (object *)&__glo_c_91macro_91return_91direct_91with_91object_scheme_cyclone_cgen);make_pair(pair_7316364, find_or_add_symbol("c-macro-return-direct-with-object"), &cvar_7316363);
  make_cvar(cvar_7316365, (object *)&__glo_c_91macro_91return_91direct_91with_91closure_scheme_cyclone_cgen);make_pair(pair_7316366, find_or_add_symbol("c-macro-return-direct-with-closure"), &cvar_7316365);
  make_cvar(cvar_7316367, (object *)&__glo_c_91macro_91return_91direct_scheme_cyclone_cgen);make_pair(pair_7316368, find_or_add_symbol("c-macro-return-direct"), &cvar_7316367);
  make_cvar(cvar_7316369, (object *)&__glo_c_91macro_91continue_91or_91gc_scheme_cyclone_cgen);make_pair(pair_7316370, find_or_add_symbol("c-macro-continue-or-gc"), &cvar_7316369);
  make_cvar(cvar_7316371, (object *)&__glo_c_91macro_91return_91closcall_scheme_cyclone_cgen);make_pair(pair_7316372, find_or_add_symbol("c-macro-return-closcall"), &cvar_7316371);
  make_cvar(cvar_7316373, (object *)&__glo_emit_91c_91arity_91macros_scheme_cyclone_cgen);make_pair(pair_7316374, find_or_add_symbol("emit-c-arity-macros"), &cvar_7316373);
  make_cvar(cvar_7316375, (object *)&__glo_set_91c_91call_91arity_67_scheme_cyclone_cgen);make_pair(pair_7316376, find_or_add_symbol("set-c-call-arity!"), &cvar_7316375);
  make_cvar(cvar_7316377, (object *)&__glo__85c_91call_91arity_85_scheme_cyclone_cgen);make_pair(pair_7316378, find_or_add_symbol("*c-call-arity*"), &cvar_7316377);
  make_cvar(cvar_7316379, (object *)&__glo__85c_91call_91max_91args_85_scheme_cyclone_cgen);make_pair(pair_7316380, find_or_add_symbol("*c-call-max-args*"), &cvar_7316379);
  make_cvar(cvar_7316381, (object *)&__glo__85c_91main_91function_85_scheme_cyclone_cgen);make_pair(pair_7316382, find_or_add_symbol("*c-main-function*"), &cvar_7316381);
  make_cvar(cvar_7316383, (object *)&__glo_cstr_117escape_91chars_scheme_cyclone_cgen);make_pair(pair_7316384, find_or_add_symbol("cstr:escape-chars"), &cvar_7316383);
  make_cvar(cvar_7316385, (object *)&__glo_emit_91newline_scheme_cyclone_cgen);make_pair(pair_7316386, find_or_add_symbol("emit-newline"), &cvar_7316385);
  make_cvar(cvar_7316387, (object *)&__glo_emits_85_scheme_cyclone_cgen);make_pair(pair_7316388, find_or_add_symbol("emits*"), &cvar_7316387);
  make_cvar(cvar_7316389, (object *)&__glo_emits_scheme_cyclone_cgen);make_pair(pair_7316390, find_or_add_symbol("emits"), &cvar_7316389);
  make_cvar(cvar_7316391, (object *)&__glo_emit_85_scheme_cyclone_cgen);make_pair(pair_7316392, find_or_add_symbol("emit*"), &cvar_7316391);
  make_cvar(cvar_7316393, (object *)&__glo_emit_scheme_cyclone_cgen);make_pair(pair_7316394, find_or_add_symbol("emit"), &cvar_7316393);
  make_cvar(cvar_7316395, (object *)&__glo__85ref_91table_85_scheme_cyclone_cgen);make_pair(pair_7316396, find_or_add_symbol("*ref-table*"), &cvar_7316395);
  make_cvar(cvar_7316397, (object *)&__glo__85optimize_91well_91known_91lambdas_85_scheme_cyclone_cgen);make_pair(pair_7316398, find_or_add_symbol("*optimize-well-known-lambdas*"), &cvar_7316397);
  make_cvar(cvar_7316399, (object *)&__glo__85cgen_117use_91unsafe_91prims_85_scheme_cyclone_cgen);make_pair(pair_7316400, find_or_add_symbol("*cgen:use-unsafe-prims*"), &cvar_7316399);
  make_cvar(cvar_7316401, (object *)&__glo__85cgen_117track_91call_91history_85_scheme_cyclone_cgen);make_pair(pair_7316402, find_or_add_symbol("*cgen:track-call-history*"), &cvar_7316401);
make_pair(c_7316503, &pair_7316201,Cyc_global_variables);
make_pair(c_7316502, &pair_7316204, &c_7316503);
make_pair(c_7316501, &pair_7316206, &c_7316502);
make_pair(c_7316500, &pair_7316208, &c_7316501);
make_pair(c_7316499, &pair_7316210, &c_7316500);
make_pair(c_7316498, &pair_7316212, &c_7316499);
make_pair(c_7316497, &pair_7316214, &c_7316498);
make_pair(c_7316496, &pair_7316216, &c_7316497);
make_pair(c_7316495, &pair_7316218, &c_7316496);
make_pair(c_7316494, &pair_7316220, &c_7316495);
make_pair(c_7316493, &pair_7316222, &c_7316494);
make_pair(c_7316492, &pair_7316224, &c_7316493);
make_pair(c_7316491, &pair_7316226, &c_7316492);
make_pair(c_7316490, &pair_7316228, &c_7316491);
make_pair(c_7316489, &pair_7316230, &c_7316490);
make_pair(c_7316488, &pair_7316232, &c_7316489);
make_pair(c_7316487, &pair_7316234, &c_7316488);
make_pair(c_7316486, &pair_7316236, &c_7316487);
make_pair(c_7316485, &pair_7316238, &c_7316486);
make_pair(c_7316484, &pair_7316240, &c_7316485);
make_pair(c_7316483, &pair_7316242, &c_7316484);
make_pair(c_7316482, &pair_7316244, &c_7316483);
make_pair(c_7316481, &pair_7316246, &c_7316482);
make_pair(c_7316480, &pair_7316248, &c_7316481);
make_pair(c_7316479, &pair_7316250, &c_7316480);
make_pair(c_7316478, &pair_7316252, &c_7316479);
make_pair(c_7316477, &pair_7316254, &c_7316478);
make_pair(c_7316476, &pair_7316256, &c_7316477);
make_pair(c_7316475, &pair_7316258, &c_7316476);
make_pair(c_7316474, &pair_7316260, &c_7316475);
make_pair(c_7316473, &pair_7316262, &c_7316474);
make_pair(c_7316472, &pair_7316264, &c_7316473);
make_pair(c_7316471, &pair_7316266, &c_7316472);
make_pair(c_7316470, &pair_7316268, &c_7316471);
make_pair(c_7316469, &pair_7316270, &c_7316470);
make_pair(c_7316468, &pair_7316272, &c_7316469);
make_pair(c_7316467, &pair_7316274, &c_7316468);
make_pair(c_7316466, &pair_7316276, &c_7316467);
make_pair(c_7316465, &pair_7316278, &c_7316466);
make_pair(c_7316464, &pair_7316280, &c_7316465);
make_pair(c_7316463, &pair_7316282, &c_7316464);
make_pair(c_7316462, &pair_7316284, &c_7316463);
make_pair(c_7316461, &pair_7316286, &c_7316462);
make_pair(c_7316460, &pair_7316288, &c_7316461);
make_pair(c_7316459, &pair_7316290, &c_7316460);
make_pair(c_7316458, &pair_7316292, &c_7316459);
make_pair(c_7316457, &pair_7316294, &c_7316458);
make_pair(c_7316456, &pair_7316296, &c_7316457);
make_pair(c_7316455, &pair_7316298, &c_7316456);
make_pair(c_7316454, &pair_7316300, &c_7316455);
make_pair(c_7316453, &pair_7316302, &c_7316454);
make_pair(c_7316452, &pair_7316304, &c_7316453);
make_pair(c_7316451, &pair_7316306, &c_7316452);
make_pair(c_7316450, &pair_7316308, &c_7316451);
make_pair(c_7316449, &pair_7316310, &c_7316450);
make_pair(c_7316448, &pair_7316312, &c_7316449);
make_pair(c_7316447, &pair_7316314, &c_7316448);
make_pair(c_7316446, &pair_7316316, &c_7316447);
make_pair(c_7316445, &pair_7316318, &c_7316446);
make_pair(c_7316444, &pair_7316320, &c_7316445);
make_pair(c_7316443, &pair_7316322, &c_7316444);
make_pair(c_7316442, &pair_7316324, &c_7316443);
make_pair(c_7316441, &pair_7316326, &c_7316442);
make_pair(c_7316440, &pair_7316328, &c_7316441);
make_pair(c_7316439, &pair_7316330, &c_7316440);
make_pair(c_7316438, &pair_7316332, &c_7316439);
make_pair(c_7316437, &pair_7316334, &c_7316438);
make_pair(c_7316436, &pair_7316336, &c_7316437);
make_pair(c_7316435, &pair_7316338, &c_7316436);
make_pair(c_7316434, &pair_7316340, &c_7316435);
make_pair(c_7316433, &pair_7316342, &c_7316434);
make_pair(c_7316432, &pair_7316344, &c_7316433);
make_pair(c_7316431, &pair_7316346, &c_7316432);
make_pair(c_7316430, &pair_7316348, &c_7316431);
make_pair(c_7316429, &pair_7316350, &c_7316430);
make_pair(c_7316428, &pair_7316352, &c_7316429);
make_pair(c_7316427, &pair_7316354, &c_7316428);
make_pair(c_7316426, &pair_7316356, &c_7316427);
make_pair(c_7316425, &pair_7316358, &c_7316426);
make_pair(c_7316424, &pair_7316360, &c_7316425);
make_pair(c_7316423, &pair_7316362, &c_7316424);
make_pair(c_7316422, &pair_7316364, &c_7316423);
make_pair(c_7316421, &pair_7316366, &c_7316422);
make_pair(c_7316420, &pair_7316368, &c_7316421);
make_pair(c_7316419, &pair_7316370, &c_7316420);
make_pair(c_7316418, &pair_7316372, &c_7316419);
make_pair(c_7316417, &pair_7316374, &c_7316418);
make_pair(c_7316416, &pair_7316376, &c_7316417);
make_pair(c_7316415, &pair_7316378, &c_7316416);
make_pair(c_7316414, &pair_7316380, &c_7316415);
make_pair(c_7316413, &pair_7316382, &c_7316414);
make_pair(c_7316412, &pair_7316384, &c_7316413);
make_pair(c_7316411, &pair_7316386, &c_7316412);
make_pair(c_7316410, &pair_7316388, &c_7316411);
make_pair(c_7316409, &pair_7316390, &c_7316410);
make_pair(c_7316408, &pair_7316392, &c_7316409);
make_pair(c_7316407, &pair_7316394, &c_7316408);
make_pair(c_7316406, &pair_7316396, &c_7316407);
make_pair(c_7316405, &pair_7316398, &c_7316406);
make_pair(c_7316404, &pair_7316400, &c_7316405);
make_pair(c_7316403, &pair_7316402, &c_7316404);
Cyc_global_variables = &c_7316403;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117schemecyclonecgen_scheme_cyclone_cgen)->fn)(data, buf[0], 1, buf);
}
void c_schemecyclonecgen_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("scheme_cyclone_cgen");
  c_schemecyclonecgen_entry_pt_first_lambda(data, cont, argc, value);
}
