/**
 ** 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); \
 }}

#include "cyclone/types.h"
object __glo_lib_91init_117schemecxr_scheme_cxr = NULL;
object __glo_caaaaar_scheme_cxr = NULL;
object __glo_cddddr_scheme_cxr = NULL;
object __glo_cdddar_scheme_cxr = NULL;
object __glo_cddadr_scheme_cxr = NULL;
object __glo_cddaar_scheme_cxr = NULL;
object __glo_cdaddr_scheme_cxr = NULL;
object __glo_cdadar_scheme_cxr = NULL;
object __glo_cdaadr_scheme_cxr = NULL;
object __glo_cdaaar_scheme_cxr = NULL;
object __glo_cadddr_scheme_cxr = NULL;
object __glo_caddar_scheme_cxr = NULL;
object __glo_cadadr_scheme_cxr = NULL;
object __glo_cadaar_scheme_cxr = NULL;
object __glo_caaddr_scheme_cxr = NULL;
object __glo_caadar_scheme_cxr = NULL;
object __glo_caaadr_scheme_cxr = NULL;
object __glo_caaaar_scheme_cxr = NULL;
object __glo_cdddr_scheme_cxr = NULL;
object __glo_cddar_scheme_cxr = NULL;
object __glo_cdadr_scheme_cxr = NULL;
object __glo_cdaar_scheme_cxr = NULL;
object __glo_caddr_scheme_cxr = NULL;
object __glo_cadar_scheme_cxr = NULL;
object __glo_caadr_scheme_cxr = NULL;
object __glo_caaar_scheme_cxr = NULL;
object __glo_cddr_scheme_cxr = NULL;
object __glo_cdar_scheme_cxr = NULL;
object __glo_cadr_scheme_cxr = NULL;
object __glo_caar_scheme_cxr = NULL;
#include "cyclone/runtime.h"
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*closure _,object k_73220*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*closure _,object k_73213, object lis_7329_7358*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*closure _,object k_73207, object lis_7328_7357*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*closure _,object k_73201, object lis_7327_7356*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*closure _,object k_73195, object lis_7326_7355*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*closure _,object k_73189, object lis_7325_7354*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*closure _,object k_73183, object lis_7324_7353*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*closure _,object k_73177, object lis_7323_7352*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*closure _,object k_73171, object lis_7322_7351*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*closure _,object k_73165, object lis_7321_7350*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*closure _,object k_73159, object lis_7320_7349*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*closure _,object k_73153, object lis_7319_7348*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*closure _,object k_73147, object lis_7318_7347*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*closure _,object k_73141, object lis_7317_7346*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*closure _,object k_73135, object lis_7316_7345*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*closure _,object k_73129, object lis_7315_7344*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*closure _,object k_73123, object lis_7314_7343*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_73117, object lis_7313_7342*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*closure _,object k_73112, object lis_7312_7341*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*closure _,object k_73107, object lis_7311_7340*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*closure _,object k_73102, object lis_7310_7339*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*closure _,object k_7397, object lis_739_7338*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*closure _,object k_7392, object lis_738_7337*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*closure _,object k_7387, object lis_737_7336*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*closure _,object k_7382, object lis_736_7335*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*closure _,object k_7377, object lis_735_7334*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*closure _,object k_7373, object lis_734_7333*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*closure _,object k_7369, object lis_733_7332*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*closure _,object k_7365, object lis_732_7331*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_7361, object lis_731_7330*/

static void __lambda_30(void *data, object _, int argc, object *args) /* closure _,object k_73220 */
 {
object k_73220 = args[0];
  Cyc_st_add(data, "scheme/cxr.sld:lib-init:schemecxr");
return_direct_with_clo1(data,  k_73220, (((closure)  k_73220)->fn),  obj_int2obj(0));; 
}

static void __lambda_29(void *data, object _, int argc, object *args) /* closure _,object k_73213, object lis_7329_7358 */
 {
object k_73213 = args[0]; object lis_7329_7358 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caaaaar");










return_direct_with_clo1(data,  k_73213, (((closure)  k_73213)->fn),  Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, lis_7329_7358))))));; 
}

static void __lambda_28(void *data, object _, int argc, object *args) /* closure _,object k_73207, object lis_7328_7357 */
 {
object k_73207 = args[0]; object lis_7328_7357 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cddddr");








return_direct_with_clo1(data,  k_73207, (((closure)  k_73207)->fn),  Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, lis_7328_7357)))));; 
}

static void __lambda_27(void *data, object _, int argc, object *args) /* closure _,object k_73201, object lis_7327_7356 */
 {
object k_73201 = args[0]; object lis_7327_7356 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdddar");








return_direct_with_clo1(data,  k_73201, (((closure)  k_73201)->fn),  Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, lis_7327_7356)))));; 
}

static void __lambda_26(void *data, object _, int argc, object *args) /* closure _,object k_73195, object lis_7326_7355 */
 {
object k_73195 = args[0]; object lis_7326_7355 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cddadr");








return_direct_with_clo1(data,  k_73195, (((closure)  k_73195)->fn),  Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, lis_7326_7355)))));; 
}

static void __lambda_25(void *data, object _, int argc, object *args) /* closure _,object k_73189, object lis_7325_7354 */
 {
object k_73189 = args[0]; object lis_7325_7354 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cddaar");








return_direct_with_clo1(data,  k_73189, (((closure)  k_73189)->fn),  Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, lis_7325_7354)))));; 
}

static void __lambda_24(void *data, object _, int argc, object *args) /* closure _,object k_73183, object lis_7324_7353 */
 {
object k_73183 = args[0]; object lis_7324_7353 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdaddr");








return_direct_with_clo1(data,  k_73183, (((closure)  k_73183)->fn),  Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, lis_7324_7353)))));; 
}

static void __lambda_23(void *data, object _, int argc, object *args) /* closure _,object k_73177, object lis_7323_7352 */
 {
object k_73177 = args[0]; object lis_7323_7352 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdadar");








return_direct_with_clo1(data,  k_73177, (((closure)  k_73177)->fn),  Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, lis_7323_7352)))));; 
}

static void __lambda_22(void *data, object _, int argc, object *args) /* closure _,object k_73171, object lis_7322_7351 */
 {
object k_73171 = args[0]; object lis_7322_7351 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdaadr");








return_direct_with_clo1(data,  k_73171, (((closure)  k_73171)->fn),  Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, lis_7322_7351)))));; 
}

static void __lambda_21(void *data, object _, int argc, object *args) /* closure _,object k_73165, object lis_7321_7350 */
 {
object k_73165 = args[0]; object lis_7321_7350 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdaaar");








return_direct_with_clo1(data,  k_73165, (((closure)  k_73165)->fn),  Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, lis_7321_7350)))));; 
}

static void __lambda_20(void *data, object _, int argc, object *args) /* closure _,object k_73159, object lis_7320_7349 */
 {
object k_73159 = args[0]; object lis_7320_7349 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cadddr");








return_direct_with_clo1(data,  k_73159, (((closure)  k_73159)->fn),  Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, lis_7320_7349)))));; 
}

static void __lambda_19(void *data, object _, int argc, object *args) /* closure _,object k_73153, object lis_7319_7348 */
 {
object k_73153 = args[0]; object lis_7319_7348 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caddar");








return_direct_with_clo1(data,  k_73153, (((closure)  k_73153)->fn),  Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, lis_7319_7348)))));; 
}

static void __lambda_18(void *data, object _, int argc, object *args) /* closure _,object k_73147, object lis_7318_7347 */
 {
object k_73147 = args[0]; object lis_7318_7347 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cadadr");








return_direct_with_clo1(data,  k_73147, (((closure)  k_73147)->fn),  Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, lis_7318_7347)))));; 
}

static void __lambda_17(void *data, object _, int argc, object *args) /* closure _,object k_73141, object lis_7317_7346 */
 {
object k_73141 = args[0]; object lis_7317_7346 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cadaar");








return_direct_with_clo1(data,  k_73141, (((closure)  k_73141)->fn),  Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, lis_7317_7346)))));; 
}

static void __lambda_16(void *data, object _, int argc, object *args) /* closure _,object k_73135, object lis_7316_7345 */
 {
object k_73135 = args[0]; object lis_7316_7345 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caaddr");








return_direct_with_clo1(data,  k_73135, (((closure)  k_73135)->fn),  Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, lis_7316_7345)))));; 
}

static void __lambda_15(void *data, object _, int argc, object *args) /* closure _,object k_73129, object lis_7315_7344 */
 {
object k_73129 = args[0]; object lis_7315_7344 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caadar");








return_direct_with_clo1(data,  k_73129, (((closure)  k_73129)->fn),  Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, lis_7315_7344)))));; 
}

static void __lambda_14(void *data, object _, int argc, object *args) /* closure _,object k_73123, object lis_7314_7343 */
 {
object k_73123 = args[0]; object lis_7314_7343 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caaadr");








return_direct_with_clo1(data,  k_73123, (((closure)  k_73123)->fn),  Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, lis_7314_7343)))));; 
}

static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_73117, object lis_7313_7342 */
 {
object k_73117 = args[0]; object lis_7313_7342 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caaaar");








return_direct_with_clo1(data,  k_73117, (((closure)  k_73117)->fn),  Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, lis_7313_7342)))));; 
}

static void __lambda_12(void *data, object _, int argc, object *args) /* closure _,object k_73112, object lis_7312_7341 */
 {
object k_73112 = args[0]; object lis_7312_7341 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdddr");






return_direct_with_clo1(data,  k_73112, (((closure)  k_73112)->fn),  Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, lis_7312_7341))));; 
}

static void __lambda_11(void *data, object _, int argc, object *args) /* closure _,object k_73107, object lis_7311_7340 */
 {
object k_73107 = args[0]; object lis_7311_7340 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cddar");






return_direct_with_clo1(data,  k_73107, (((closure)  k_73107)->fn),  Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, lis_7311_7340))));; 
}

static void __lambda_10(void *data, object _, int argc, object *args) /* closure _,object k_73102, object lis_7310_7339 */
 {
object k_73102 = args[0]; object lis_7310_7339 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdadr");






return_direct_with_clo1(data,  k_73102, (((closure)  k_73102)->fn),  Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, lis_7310_7339))));; 
}

static void __lambda_9(void *data, object _, int argc, object *args) /* closure _,object k_7397, object lis_739_7338 */
 {
object k_7397 = args[0]; object lis_739_7338 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdaar");






return_direct_with_clo1(data,  k_7397, (((closure)  k_7397)->fn),  Cyc_cdr(data, Cyc_car(data, Cyc_car(data, lis_739_7338))));; 
}

static void __lambda_8(void *data, object _, int argc, object *args) /* closure _,object k_7392, object lis_738_7337 */
 {
object k_7392 = args[0]; object lis_738_7337 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caddr");






return_direct_with_clo1(data,  k_7392, (((closure)  k_7392)->fn),  Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, lis_738_7337))));; 
}

static void __lambda_7(void *data, object _, int argc, object *args) /* closure _,object k_7387, object lis_737_7336 */
 {
object k_7387 = args[0]; object lis_737_7336 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cadar");






return_direct_with_clo1(data,  k_7387, (((closure)  k_7387)->fn),  Cyc_car(data, Cyc_cdr(data, Cyc_car(data, lis_737_7336))));; 
}

static void __lambda_6(void *data, object _, int argc, object *args) /* closure _,object k_7382, object lis_736_7335 */
 {
object k_7382 = args[0]; object lis_736_7335 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caadr");






return_direct_with_clo1(data,  k_7382, (((closure)  k_7382)->fn),  Cyc_car(data, Cyc_car(data, Cyc_cdr(data, lis_736_7335))));; 
}

static void __lambda_5(void *data, object _, int argc, object *args) /* closure _,object k_7377, object lis_735_7334 */
 {
object k_7377 = args[0]; object lis_735_7334 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caaar");






return_direct_with_clo1(data,  k_7377, (((closure)  k_7377)->fn),  Cyc_car(data, Cyc_car(data, Cyc_car(data, lis_735_7334))));; 
}

static void __lambda_4(void *data, object _, int argc, object *args) /* closure _,object k_7373, object lis_734_7333 */
 {
object k_7373 = args[0]; object lis_734_7333 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cddr");




return_direct_with_clo1(data,  k_7373, (((closure)  k_7373)->fn),  Cyc_cdr(data, Cyc_cdr(data, lis_734_7333)));; 
}

static void __lambda_3(void *data, object _, int argc, object *args) /* closure _,object k_7369, object lis_733_7332 */
 {
object k_7369 = args[0]; object lis_733_7332 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cdar");




return_direct_with_clo1(data,  k_7369, (((closure)  k_7369)->fn),  Cyc_cdr(data, Cyc_car(data, lis_733_7332)));; 
}

static void __lambda_2(void *data, object _, int argc, object *args) /* closure _,object k_7365, object lis_732_7331 */
 {
object k_7365 = args[0]; object lis_732_7331 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:cadr");




return_direct_with_clo1(data,  k_7365, (((closure)  k_7365)->fn),  Cyc_car(data, Cyc_cdr(data, lis_732_7331)));; 
}

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_7361, object lis_731_7330 */
 {
object k_7361 = args[0]; object lis_731_7330 = args[1];
  Cyc_st_add(data, "scheme/cxr.sld:caar");




return_direct_with_clo1(data,  k_7361, (((closure)  k_7361)->fn),  Cyc_car(data, Cyc_car(data, lis_731_7330)));; 
}

void c_schemecxr_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
object buf[1]; object cont = args[0];
buf[0] = NULL; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_schemecxr_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);

  add_global("__glo_lib_91init_117schemecxr_scheme_cxr", (object *) &__glo_lib_91init_117schemecxr_scheme_cxr);
  add_global("__glo_caaaaar_scheme_cxr", (object *) &__glo_caaaaar_scheme_cxr);
  add_global("__glo_cddddr_scheme_cxr", (object *) &__glo_cddddr_scheme_cxr);
  add_global("__glo_cdddar_scheme_cxr", (object *) &__glo_cdddar_scheme_cxr);
  add_global("__glo_cddadr_scheme_cxr", (object *) &__glo_cddadr_scheme_cxr);
  add_global("__glo_cddaar_scheme_cxr", (object *) &__glo_cddaar_scheme_cxr);
  add_global("__glo_cdaddr_scheme_cxr", (object *) &__glo_cdaddr_scheme_cxr);
  add_global("__glo_cdadar_scheme_cxr", (object *) &__glo_cdadar_scheme_cxr);
  add_global("__glo_cdaadr_scheme_cxr", (object *) &__glo_cdaadr_scheme_cxr);
  add_global("__glo_cdaaar_scheme_cxr", (object *) &__glo_cdaaar_scheme_cxr);
  add_global("__glo_cadddr_scheme_cxr", (object *) &__glo_cadddr_scheme_cxr);
  add_global("__glo_caddar_scheme_cxr", (object *) &__glo_caddar_scheme_cxr);
  add_global("__glo_cadadr_scheme_cxr", (object *) &__glo_cadadr_scheme_cxr);
  add_global("__glo_cadaar_scheme_cxr", (object *) &__glo_cadaar_scheme_cxr);
  add_global("__glo_caaddr_scheme_cxr", (object *) &__glo_caaddr_scheme_cxr);
  add_global("__glo_caadar_scheme_cxr", (object *) &__glo_caadar_scheme_cxr);
  add_global("__glo_caaadr_scheme_cxr", (object *) &__glo_caaadr_scheme_cxr);
  add_global("__glo_caaaar_scheme_cxr", (object *) &__glo_caaaar_scheme_cxr);
  add_global("__glo_cdddr_scheme_cxr", (object *) &__glo_cdddr_scheme_cxr);
  add_global("__glo_cddar_scheme_cxr", (object *) &__glo_cddar_scheme_cxr);
  add_global("__glo_cdadr_scheme_cxr", (object *) &__glo_cdadr_scheme_cxr);
  add_global("__glo_cdaar_scheme_cxr", (object *) &__glo_cdaar_scheme_cxr);
  add_global("__glo_caddr_scheme_cxr", (object *) &__glo_caddr_scheme_cxr);
  add_global("__glo_cadar_scheme_cxr", (object *) &__glo_cadar_scheme_cxr);
  add_global("__glo_caadr_scheme_cxr", (object *) &__glo_caadr_scheme_cxr);
  add_global("__glo_caaar_scheme_cxr", (object *) &__glo_caaar_scheme_cxr);
  add_global("__glo_cddr_scheme_cxr", (object *) &__glo_cddr_scheme_cxr);
  add_global("__glo_cdar_scheme_cxr", (object *) &__glo_cdar_scheme_cxr);
  add_global("__glo_cadr_scheme_cxr", (object *) &__glo_cadr_scheme_cxr);
  add_global("__glo_caar_scheme_cxr", (object *) &__glo_caar_scheme_cxr);
  mclosure0(c_73481, (function_type)__lambda_30);c_73481.num_args = 0; 
  __glo_lib_91init_117schemecxr_scheme_cxr = &c_73481; 
  mclosure0(c_73469, (function_type)__lambda_29);c_73469.num_args = 1; 
  __glo_caaaaar_scheme_cxr = &c_73469; 
  mclosure0(c_73459, (function_type)__lambda_28);c_73459.num_args = 1; 
  __glo_cddddr_scheme_cxr = &c_73459; 
  mclosure0(c_73449, (function_type)__lambda_27);c_73449.num_args = 1; 
  __glo_cdddar_scheme_cxr = &c_73449; 
  mclosure0(c_73439, (function_type)__lambda_26);c_73439.num_args = 1; 
  __glo_cddadr_scheme_cxr = &c_73439; 
  mclosure0(c_73429, (function_type)__lambda_25);c_73429.num_args = 1; 
  __glo_cddaar_scheme_cxr = &c_73429; 
  mclosure0(c_73419, (function_type)__lambda_24);c_73419.num_args = 1; 
  __glo_cdaddr_scheme_cxr = &c_73419; 
  mclosure0(c_73409, (function_type)__lambda_23);c_73409.num_args = 1; 
  __glo_cdadar_scheme_cxr = &c_73409; 
  mclosure0(c_73399, (function_type)__lambda_22);c_73399.num_args = 1; 
  __glo_cdaadr_scheme_cxr = &c_73399; 
  mclosure0(c_73389, (function_type)__lambda_21);c_73389.num_args = 1; 
  __glo_cdaaar_scheme_cxr = &c_73389; 
  mclosure0(c_73379, (function_type)__lambda_20);c_73379.num_args = 1; 
  __glo_cadddr_scheme_cxr = &c_73379; 
  mclosure0(c_73369, (function_type)__lambda_19);c_73369.num_args = 1; 
  __glo_caddar_scheme_cxr = &c_73369; 
  mclosure0(c_73359, (function_type)__lambda_18);c_73359.num_args = 1; 
  __glo_cadadr_scheme_cxr = &c_73359; 
  mclosure0(c_73349, (function_type)__lambda_17);c_73349.num_args = 1; 
  __glo_cadaar_scheme_cxr = &c_73349; 
  mclosure0(c_73339, (function_type)__lambda_16);c_73339.num_args = 1; 
  __glo_caaddr_scheme_cxr = &c_73339; 
  mclosure0(c_73329, (function_type)__lambda_15);c_73329.num_args = 1; 
  __glo_caadar_scheme_cxr = &c_73329; 
  mclosure0(c_73319, (function_type)__lambda_14);c_73319.num_args = 1; 
  __glo_caaadr_scheme_cxr = &c_73319; 
  mclosure0(c_73309, (function_type)__lambda_13);c_73309.num_args = 1; 
  __glo_caaaar_scheme_cxr = &c_73309; 
  mclosure0(c_73301, (function_type)__lambda_12);c_73301.num_args = 1; 
  __glo_cdddr_scheme_cxr = &c_73301; 
  mclosure0(c_73293, (function_type)__lambda_11);c_73293.num_args = 1; 
  __glo_cddar_scheme_cxr = &c_73293; 
  mclosure0(c_73285, (function_type)__lambda_10);c_73285.num_args = 1; 
  __glo_cdadr_scheme_cxr = &c_73285; 
  mclosure0(c_73277, (function_type)__lambda_9);c_73277.num_args = 1; 
  __glo_cdaar_scheme_cxr = &c_73277; 
  mclosure0(c_73269, (function_type)__lambda_8);c_73269.num_args = 1; 
  __glo_caddr_scheme_cxr = &c_73269; 
  mclosure0(c_73261, (function_type)__lambda_7);c_73261.num_args = 1; 
  __glo_cadar_scheme_cxr = &c_73261; 
  mclosure0(c_73253, (function_type)__lambda_6);c_73253.num_args = 1; 
  __glo_caadr_scheme_cxr = &c_73253; 
  mclosure0(c_73245, (function_type)__lambda_5);c_73245.num_args = 1; 
  __glo_caaar_scheme_cxr = &c_73245; 
  mclosure0(c_73239, (function_type)__lambda_4);c_73239.num_args = 1; 
  __glo_cddr_scheme_cxr = &c_73239; 
  mclosure0(c_73233, (function_type)__lambda_3);c_73233.num_args = 1; 
  __glo_cdar_scheme_cxr = &c_73233; 
  mclosure0(c_73227, (function_type)__lambda_2);c_73227.num_args = 1; 
  __glo_cadr_scheme_cxr = &c_73227; 
  mclosure0(c_73221, (function_type)__lambda_1);c_73221.num_args = 1; 
  __glo_caar_scheme_cxr = &c_73221; 

  mclosure0(clo_73484, c_schemecxr_inlinable_lambdas); make_pair(pair_73483, find_or_add_symbol("c_schemecxr_inlinable_lambdas"), &clo_73484);
  make_cvar(cvar_73485, (object *)&__glo_lib_91init_117schemecxr_scheme_cxr);make_pair(pair_73486, find_or_add_symbol("lib-init:schemecxr"), &cvar_73485);
  make_cvar(cvar_73487, (object *)&__glo_caaaaar_scheme_cxr);make_pair(pair_73488, find_or_add_symbol("caaaaar"), &cvar_73487);
  make_cvar(cvar_73489, (object *)&__glo_cddddr_scheme_cxr);make_pair(pair_73490, find_or_add_symbol("cddddr"), &cvar_73489);
  make_cvar(cvar_73491, (object *)&__glo_cdddar_scheme_cxr);make_pair(pair_73492, find_or_add_symbol("cdddar"), &cvar_73491);
  make_cvar(cvar_73493, (object *)&__glo_cddadr_scheme_cxr);make_pair(pair_73494, find_or_add_symbol("cddadr"), &cvar_73493);
  make_cvar(cvar_73495, (object *)&__glo_cddaar_scheme_cxr);make_pair(pair_73496, find_or_add_symbol("cddaar"), &cvar_73495);
  make_cvar(cvar_73497, (object *)&__glo_cdaddr_scheme_cxr);make_pair(pair_73498, find_or_add_symbol("cdaddr"), &cvar_73497);
  make_cvar(cvar_73499, (object *)&__glo_cdadar_scheme_cxr);make_pair(pair_73500, find_or_add_symbol("cdadar"), &cvar_73499);
  make_cvar(cvar_73501, (object *)&__glo_cdaadr_scheme_cxr);make_pair(pair_73502, find_or_add_symbol("cdaadr"), &cvar_73501);
  make_cvar(cvar_73503, (object *)&__glo_cdaaar_scheme_cxr);make_pair(pair_73504, find_or_add_symbol("cdaaar"), &cvar_73503);
  make_cvar(cvar_73505, (object *)&__glo_cadddr_scheme_cxr);make_pair(pair_73506, find_or_add_symbol("cadddr"), &cvar_73505);
  make_cvar(cvar_73507, (object *)&__glo_caddar_scheme_cxr);make_pair(pair_73508, find_or_add_symbol("caddar"), &cvar_73507);
  make_cvar(cvar_73509, (object *)&__glo_cadadr_scheme_cxr);make_pair(pair_73510, find_or_add_symbol("cadadr"), &cvar_73509);
  make_cvar(cvar_73511, (object *)&__glo_cadaar_scheme_cxr);make_pair(pair_73512, find_or_add_symbol("cadaar"), &cvar_73511);
  make_cvar(cvar_73513, (object *)&__glo_caaddr_scheme_cxr);make_pair(pair_73514, find_or_add_symbol("caaddr"), &cvar_73513);
  make_cvar(cvar_73515, (object *)&__glo_caadar_scheme_cxr);make_pair(pair_73516, find_or_add_symbol("caadar"), &cvar_73515);
  make_cvar(cvar_73517, (object *)&__glo_caaadr_scheme_cxr);make_pair(pair_73518, find_or_add_symbol("caaadr"), &cvar_73517);
  make_cvar(cvar_73519, (object *)&__glo_caaaar_scheme_cxr);make_pair(pair_73520, find_or_add_symbol("caaaar"), &cvar_73519);
  make_cvar(cvar_73521, (object *)&__glo_cdddr_scheme_cxr);make_pair(pair_73522, find_or_add_symbol("cdddr"), &cvar_73521);
  make_cvar(cvar_73523, (object *)&__glo_cddar_scheme_cxr);make_pair(pair_73524, find_or_add_symbol("cddar"), &cvar_73523);
  make_cvar(cvar_73525, (object *)&__glo_cdadr_scheme_cxr);make_pair(pair_73526, find_or_add_symbol("cdadr"), &cvar_73525);
  make_cvar(cvar_73527, (object *)&__glo_cdaar_scheme_cxr);make_pair(pair_73528, find_or_add_symbol("cdaar"), &cvar_73527);
  make_cvar(cvar_73529, (object *)&__glo_caddr_scheme_cxr);make_pair(pair_73530, find_or_add_symbol("caddr"), &cvar_73529);
  make_cvar(cvar_73531, (object *)&__glo_cadar_scheme_cxr);make_pair(pair_73532, find_or_add_symbol("cadar"), &cvar_73531);
  make_cvar(cvar_73533, (object *)&__glo_caadr_scheme_cxr);make_pair(pair_73534, find_or_add_symbol("caadr"), &cvar_73533);
  make_cvar(cvar_73535, (object *)&__glo_caaar_scheme_cxr);make_pair(pair_73536, find_or_add_symbol("caaar"), &cvar_73535);
  make_cvar(cvar_73537, (object *)&__glo_cddr_scheme_cxr);make_pair(pair_73538, find_or_add_symbol("cddr"), &cvar_73537);
  make_cvar(cvar_73539, (object *)&__glo_cdar_scheme_cxr);make_pair(pair_73540, find_or_add_symbol("cdar"), &cvar_73539);
  make_cvar(cvar_73541, (object *)&__glo_cadr_scheme_cxr);make_pair(pair_73542, find_or_add_symbol("cadr"), &cvar_73541);
  make_cvar(cvar_73543, (object *)&__glo_caar_scheme_cxr);make_pair(pair_73544, find_or_add_symbol("caar"), &cvar_73543);
make_pair(c_73575, &pair_73483,Cyc_global_variables);
make_pair(c_73574, &pair_73486, &c_73575);
make_pair(c_73573, &pair_73488, &c_73574);
make_pair(c_73572, &pair_73490, &c_73573);
make_pair(c_73571, &pair_73492, &c_73572);
make_pair(c_73570, &pair_73494, &c_73571);
make_pair(c_73569, &pair_73496, &c_73570);
make_pair(c_73568, &pair_73498, &c_73569);
make_pair(c_73567, &pair_73500, &c_73568);
make_pair(c_73566, &pair_73502, &c_73567);
make_pair(c_73565, &pair_73504, &c_73566);
make_pair(c_73564, &pair_73506, &c_73565);
make_pair(c_73563, &pair_73508, &c_73564);
make_pair(c_73562, &pair_73510, &c_73563);
make_pair(c_73561, &pair_73512, &c_73562);
make_pair(c_73560, &pair_73514, &c_73561);
make_pair(c_73559, &pair_73516, &c_73560);
make_pair(c_73558, &pair_73518, &c_73559);
make_pair(c_73557, &pair_73520, &c_73558);
make_pair(c_73556, &pair_73522, &c_73557);
make_pair(c_73555, &pair_73524, &c_73556);
make_pair(c_73554, &pair_73526, &c_73555);
make_pair(c_73553, &pair_73528, &c_73554);
make_pair(c_73552, &pair_73530, &c_73553);
make_pair(c_73551, &pair_73532, &c_73552);
make_pair(c_73550, &pair_73534, &c_73551);
make_pair(c_73549, &pair_73536, &c_73550);
make_pair(c_73548, &pair_73538, &c_73549);
make_pair(c_73547, &pair_73540, &c_73548);
make_pair(c_73546, &pair_73542, &c_73547);
make_pair(c_73545, &pair_73544, &c_73546);
Cyc_global_variables = &c_73545;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117schemecxr_scheme_cxr)->fn)(data, buf[0], 1, buf);
}
void c_schemecxr_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("scheme_cxr");
  c_schemecxr_entry_pt_first_lambda(data, cont, argc, value);
}
