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

#include "cyclone/types.h"
object __glo_lib_91init_117srfi113_srfi_113 = NULL;
object __glo_bag_91comparator_srfi_113 = NULL;
object __glo_set_91comparator_srfi_113 = NULL;
object __glo_sob_91hash_srfi_113 = NULL;
object __glo_alist_91_125bag_srfi_113 = NULL;
object __glo_bag_91_125alist_srfi_113 = NULL;
object __glo_set_91_125bag_67_srfi_113 = NULL;
object __glo_set_91_125bag_srfi_113 = NULL;
object __glo_bag_91_125set_srfi_113 = NULL;
object __glo_bag_91fold_91unique_srfi_113 = NULL;
object __glo_bag_91for_91each_91unique_srfi_113 = NULL;
object __glo_bag_91element_91count_srfi_113 = NULL;
object __glo_bag_91unique_91size_srfi_113 = NULL;
object __glo_bag_91product_67_srfi_113 = NULL;
object __glo_bag_91product_srfi_113 = NULL;
object __glo_valid_91n_srfi_113 = NULL;
object __glo_sob_91product_67_srfi_113 = NULL;
object __glo_bag_91xor_67_srfi_113 = NULL;
object __glo_set_91xor_67_srfi_113 = NULL;
object __glo_bag_91xor_srfi_113 = NULL;
object __glo_set_91xor_srfi_113 = NULL;
object __glo_sob_91xor_67_srfi_113 = NULL;
object __glo_bag_91sum_67_srfi_113 = NULL;
object __glo_sob_91sum_67_srfi_113 = NULL;
object __glo_bag_91sum_srfi_113 = NULL;
object __glo_dyadic_91sob_91sum_67_srfi_113 = NULL;
object __glo_sob_91sum_srfi_113 = NULL;
object __glo_bag_91difference_67_srfi_113 = NULL;
object __glo_set_91difference_67_srfi_113 = NULL;
object __glo_sob_91difference_67_srfi_113 = NULL;
object __glo_bag_91difference_srfi_113 = NULL;
object __glo_set_91difference_srfi_113 = NULL;
object __glo_dyadic_91sob_91difference_67_srfi_113 = NULL;
object __glo_sob_91difference_srfi_113 = NULL;
object __glo_bag_91intersection_67_srfi_113 = NULL;
object __glo_set_91intersection_67_srfi_113 = NULL;
object __glo_sob_91intersection_67_srfi_113 = NULL;
object __glo_bag_91intersection_srfi_113 = NULL;
object __glo_set_91intersection_srfi_113 = NULL;
object __glo_dyadic_91sob_91intersection_67_srfi_113 = NULL;
object __glo_sob_91intersection_srfi_113 = NULL;
object __glo_bag_91union_67_srfi_113 = NULL;
object __glo_set_91union_67_srfi_113 = NULL;
object __glo_sob_91union_67_srfi_113 = NULL;
object __glo_bag_91union_srfi_113 = NULL;
object __glo_set_91union_srfi_113 = NULL;
object __glo_dyadic_91sob_91union_67_srfi_113 = NULL;
object __glo_sob_91union_srfi_113 = NULL;
object __glo_dyadic_91sob_125_123_127_srfi_113 = NULL;
object __glo_bag_125_123_127_srfi_113 = NULL;
object __glo_set_125_123_127_srfi_113 = NULL;
object __glo_sob_125_123_127_srfi_113 = NULL;
object __glo_dyadic_91sob_121_127_srfi_113 = NULL;
object __glo_bag_121_127_srfi_113 = NULL;
object __glo_set_121_127_srfi_113 = NULL;
object __glo_sob_121_127_srfi_113 = NULL;
object __glo_dyadic_91sob_125_127_srfi_113 = NULL;
object __glo_bag_125_127_srfi_113 = NULL;
object __glo_set_125_127_srfi_113 = NULL;
object __glo_sob_125_127_srfi_113 = NULL;
object __glo_dyadic_91sob_121_123_127_srfi_113 = NULL;
object __glo_bag_121_123_127_srfi_113 = NULL;
object __glo_set_121_123_127_srfi_113 = NULL;
object __glo_sob_121_123_127_srfi_113 = NULL;
object __glo_dyadic_91sob_123_127_srfi_113 = NULL;
object __glo_bag_123_127_srfi_113 = NULL;
object __glo_set_123_127_srfi_113 = NULL;
object __glo_sob_123_127_srfi_113 = NULL;
object __glo_list_91_125bag_67_srfi_113 = NULL;
object __glo_list_91_125set_67_srfi_113 = NULL;
object __glo_list_91_125bag_srfi_113 = NULL;
object __glo_list_91_125set_srfi_113 = NULL;
object __glo_list_91_125sob_67_srfi_113 = NULL;
object __glo_bag_91_125list_srfi_113 = NULL;
object __glo_set_91_125list_srfi_113 = NULL;
object __glo_sob_91_125list_srfi_113 = NULL;
object __glo_bag_91partition_67_srfi_113 = NULL;
object __glo_set_91partition_67_srfi_113 = NULL;
object __glo_sob_91partition_67_srfi_113 = NULL;
object __glo_bag_91partition_srfi_113 = NULL;
object __glo_set_91partition_srfi_113 = NULL;
object __glo_sob_91partition_srfi_113 = NULL;
object __glo_bag_91remove_67_srfi_113 = NULL;
object __glo_set_91remove_67_srfi_113 = NULL;
object __glo_bag_91filter_67_srfi_113 = NULL;
object __glo_set_91filter_67_srfi_113 = NULL;
object __glo_sob_91filter_67_srfi_113 = NULL;
object __glo_bag_91remove_srfi_113 = NULL;
object __glo_set_91remove_srfi_113 = NULL;
object __glo_bag_91filter_srfi_113 = NULL;
object __glo_set_91filter_srfi_113 = NULL;
object __glo_sob_91filter_srfi_113 = NULL;
object __glo_bag_91fold_srfi_113 = NULL;
object __glo_set_91fold_srfi_113 = NULL;
object __glo_sob_91fold_srfi_113 = NULL;
object __glo_bag_91map_srfi_113 = NULL;
object __glo_set_91map_srfi_113 = NULL;
object __glo_sob_91map_srfi_113 = NULL;
object __glo_bag_91for_91each_srfi_113 = NULL;
object __glo_set_91for_91each_srfi_113 = NULL;
object __glo_sob_91for_91each_srfi_113 = NULL;
object __glo_do_91n_91times_srfi_113 = NULL;
object __glo_bag_91every_127_srfi_113 = NULL;
object __glo_set_91every_127_srfi_113 = NULL;
object __glo_sob_91every_127_srfi_113 = NULL;
object __glo_bag_91any_127_srfi_113 = NULL;
object __glo_set_91any_127_srfi_113 = NULL;
object __glo_sob_91any_127_srfi_113 = NULL;
object __glo_bag_91count_srfi_113 = NULL;
object __glo_set_91count_srfi_113 = NULL;
object __glo_sob_91count_srfi_113 = NULL;
object __glo_bag_91find_srfi_113 = NULL;
object __glo_set_91find_srfi_113 = NULL;
object __glo_sob_91find_srfi_113 = NULL;
object __glo_bag_91size_srfi_113 = NULL;
object __glo_set_91size_srfi_113 = NULL;
object __glo_sob_91size_srfi_113 = NULL;
object __glo_bag_91search_67_srfi_113 = NULL;
object __glo_set_91search_67_srfi_113 = NULL;
object __glo_sob_91search_67_srfi_113 = NULL;
object __glo_missing_srfi_113 = NULL;
object __glo_bag_91delete_91all_srfi_113 = NULL;
object __glo_set_91delete_91all_srfi_113 = NULL;
object __glo_bag_91delete_srfi_113 = NULL;
object __glo_set_91delete_srfi_113 = NULL;
object __glo_bag_91delete_91all_67_srfi_113 = NULL;
object __glo_set_91delete_91all_67_srfi_113 = NULL;
object __glo_bag_91delete_67_srfi_113 = NULL;
object __glo_set_91delete_67_srfi_113 = NULL;
object __glo_sob_91delete_91all_67_srfi_113 = NULL;
object __glo_bag_91replace_srfi_113 = NULL;
object __glo_set_91replace_srfi_113 = NULL;
object __glo_bag_91replace_67_srfi_113 = NULL;
object __glo_set_91replace_67_srfi_113 = NULL;
object __glo_sob_91replace_67_srfi_113 = NULL;
object __glo_bag_91adjoin_srfi_113 = NULL;
object __glo_set_91adjoin_srfi_113 = NULL;
object __glo_bag_91adjoin_67_srfi_113 = NULL;
object __glo_set_91adjoin_67_srfi_113 = NULL;
object __glo_sob_91adjoin_91all_67_srfi_113 = NULL;
object __glo_bag_91decrement_67_srfi_113 = NULL;
object __glo_bag_91increment_67_srfi_113 = NULL;
object __glo_nonpositive_91keys_srfi_113 = NULL;
object __glo_sob_91cleanup_67_srfi_113 = NULL;
object __glo_sob_91decrement_67_srfi_113 = NULL;
object __glo_sob_91increment_67_srfi_113 = NULL;
object __glo_bag_91element_91comparator_srfi_113 = NULL;
object __glo_set_91element_91comparator_srfi_113 = NULL;
object __glo_bag_91member_srfi_113 = NULL;
object __glo_set_91member_srfi_113 = NULL;
object __glo_sob_91member_srfi_113 = NULL;
object __glo_bag_91disjoint_127_srfi_113 = NULL;
object __glo_set_91disjoint_127_srfi_113 = NULL;
object __glo_sob_91half_91disjoint_127_srfi_113 = NULL;
object __glo_bag_91empty_127_srfi_113 = NULL;
object __glo_set_91empty_127_srfi_113 = NULL;
object __glo_sob_91empty_127_srfi_113 = NULL;
object __glo_bag_91contains_127_srfi_113 = NULL;
object __glo_set_91contains_127_srfi_113 = NULL;
object __glo_sob_91contains_127_srfi_113 = NULL;
object __glo_bag_91unfold_srfi_113 = NULL;
object __glo_set_91unfold_srfi_113 = NULL;
object __glo_sob_91unfold_srfi_113 = NULL;
object __glo_bag_srfi_113 = NULL;
object __glo_set_srfi_113 = NULL;
object __glo_sob_91empty_91copy_srfi_113 = NULL;
object __glo_bag_91copy_srfi_113 = NULL;
object __glo_set_91copy_srfi_113 = NULL;
object __glo_sob_91copy_srfi_113 = NULL;
object __glo_make_91sob_srfi_113 = NULL;
object __glo_check_91element_srfi_113 = NULL;
object __glo_check_91same_91comparator_srfi_113 = NULL;
object __glo_sob_91check_91comparators_srfi_113 = NULL;
object __glo_check_91all_91bags_srfi_113 = NULL;
object __glo_check_91all_91sets_srfi_113 = NULL;
object __glo_check_91bag_srfi_113 = NULL;
object __glo_check_91set_srfi_113 = NULL;
object __glo_bag_127_srfi_113 = NULL;
object __glo_set_127_srfi_113 = NULL;
object __glo_raw_91make_91sob_srfi_113 = NULL;
object __glo_sob_91multi_127_srfi_113 = NULL;
object __glo_sob_91comparator_srfi_113 = NULL;
object __glo_sob_91hash_91table_srfi_113 = NULL;
object __glo_sob_127_srfi_113 = NULL;
object __glo_sob_srfi_113 = NULL;
object __glo_hash_91table_91for_91each_srfi_113 = NULL;
object __glo_hash_91table_91contains_127_srfi_113 = NULL;
object __glo_modulizer_srfi_113 = NULL;
object __glo_make_91hash_91table_95comparator_srfi_113 = 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_case_91lambda_scheme_case_91lambda;
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_comparator_127_srfi_128;
extern object __glo_comparator_91ordered_127_srfi_128;
extern object __glo_comparator_91hashable_127_srfi_128;
extern object __glo_make_91comparator_srfi_128;
extern object __glo_make_91pair_91comparator_srfi_128;
extern object __glo_make_91list_91comparator_srfi_128;
extern object __glo_make_91vector_91comparator_srfi_128;
extern object __glo_make_91eq_91comparator_srfi_128;
extern object __glo_make_91eqv_91comparator_srfi_128;
extern object __glo_make_91equal_91comparator_srfi_128;
extern object __glo_boolean_91hash_srfi_128;
extern object __glo_char_91hash_srfi_128;
extern object __glo_char_91ci_91hash_srfi_128;
extern object __glo_string_91hash_srfi_128;
extern object __glo_string_91ci_91hash_srfi_128;
extern object __glo_symbol_91hash_srfi_128;
extern object __glo_number_91hash_srfi_128;
extern object __glo_make_91default_91comparator_srfi_128;
extern object __glo_default_91hash_srfi_128;
extern object __glo_comparator_91register_91default_67_srfi_128;
extern object __glo_comparator_91type_91test_91predicate_srfi_128;
extern object __glo_comparator_91equality_91predicate_srfi_128;
extern object __glo_comparator_91ordering_91predicate_srfi_128;
extern object __glo_comparator_91hash_91function_srfi_128;
extern object __glo_comparator_91test_91type_srfi_128;
extern object __glo_comparator_91check_91type_srfi_128;
extern object __glo_comparator_91hash_srfi_128;
extern object __glo_hash_91bound_srfi_128;
extern object __glo_hash_91salt_srfi_128;
extern object __glo__123_127_srfi_128;
extern object __glo__121_127_srfi_128;
extern object __glo__125_127_srfi_128;
extern object __glo__121_123_127_srfi_128;
extern object __glo__125_123_127_srfi_128;
extern object __glo_comparator_91if_121_123_125_srfi_128;
extern object __glo__75salt_75_srfi_128;
extern object __glo_comparator_91max_91in_91list_srfi_128;
extern object __glo_comparator_91min_91in_91list_srfi_128;
extern object __glo_comparator_91max_srfi_128;
extern object __glo_comparator_91min_srfi_128;
extern object __glo_default_91comparator_srfi_128;
extern object __glo_boolean_91comparator_srfi_128;
extern object __glo_real_91comparator_srfi_128;
extern object __glo_char_91comparator_srfi_128;
extern object __glo_char_91ci_91comparator_srfi_128;
extern object __glo_string_91comparator_srfi_128;
extern object __glo_string_91ci_91comparator_srfi_128;
extern object __glo_pair_91comparator_srfi_128;
extern object __glo_list_91comparator_srfi_128;
extern object __glo_vector_91comparator_srfi_128;
extern object __glo_eq_91comparator_srfi_128;
extern object __glo_eqv_91comparator_srfi_128;
extern object __glo_equal_91comparator_srfi_128;
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_128;
extern object __glo_string_91ci_91hash_srfi_128;
extern object __glo_hash_91by_91identity_srfi_69;
extern object __glo_Cyc_91memoize_srfi_69;
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_symbol_91hash_191_191inline_191_191_srfi_69;
#include "cyclone/runtime.h"
defsymbol(hash_91table_91contains_127);
defsymbol(sob_127);
defsymbol(hash_91table);
defsymbol(sob_91hash_91table);
defsymbol(comparator);
defsymbol(sob_91comparator);
defsymbol(multi_127);
defsymbol(sob_91multi_127);
defsymbol(missing);
defsymbol(set_91comparator);
defsymbol(bag_91comparator);
defsymbol(sob2);
defsymbol(sob1);
defsymbol(sob);
defsymbol(limit);
defsymbol(obj);
static void __lambda_748(void *data, object clo, int argc, object *args) ;/*closure _,object k_732417*/
static void __lambda_749(void *data, object clo, int argc, object *args) ;/*object self_733075, object r_732419*/
static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_733076, object r_732449*/
static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_733077, object r_732420*/
static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_733078, object r_732447*/
static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_733079, object r_732421*/
static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_733080, object r_732445*/
static void __lambda_755(void *data, object clo, int argc, object *args) ;/*object self_733081, object r_732443*/
static void __lambda_756(void *data, object clo, int argc, object *args) ;/*object self_733082, object r_732422*/
static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_733083, object r_732441*/
static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_733084, object r_732439*/
static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_733085, object r_732423*/
static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_733086, object r_732437*/
static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_733087, object r_732435*/
static void __lambda_762(void *data, object clo, int argc, object *args) ;/*object self_733088, object r_732424*/
static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_733089, object r_732434*/
static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_733090, object r_732428*/
static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_733091, object r_732433*/
static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_733092, object r_732429*/
static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_733093, object r_732432*/
static void __lambda_768(void *data, object clo, int argc, object *args) ;/*object self_733094, object r_732430*/
static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_733095, object r_732431*/
static void __lambda_741(void *data, object clo, int argc, object *args) ;/*closure _,object k_732404, object sob_73630_731208*/
static void __lambda_742(void *data, object clo, int argc, object *args) ;/*object self_733069, object ht_73633_731209*/
static void __lambda_743(void *data, object clo, int argc, object *args) ;/*object self_733070, object r_732410*/
static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_733071, object hash_73636_731210*/
static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_733072, object k_732408, object element_73638_731211, object result_73639_731212*/
static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_733073, object r_732409*/
static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_733074, object r_732407*/
static void __lambda_734(void *data, object clo, int argc, object *args) ;/*closure _,object k_732393, object comparator_73619_731202, object alist_73620_731203*/
static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_733063, object result_73623_731204*/
static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_733064, object ht_73626_731205*/
static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_733065, object k_732398, object assoc_73628_731206*/
static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_733066, object r_732400*/
static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_733067, object r_732397*/
static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_733068, object r_732396*/
static void __lambda_730(void *data, object clo, int argc, object *args) ;/*closure _,object k_732385, object bag_73615_731198*/
static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_733060, object r_732386*/
static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_733061, object k_732389, object elem_73616_731199, object count_73617_731200, object list_73618_731201*/
static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_733062, object r_732387*/
static void __lambda_722(void *data, object clo, int argc, object *args) ;/*closure _,object k_732375, object bag_73611_731194, object set_73612_731195*/
static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_733053, object r_732376*/
static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_733054, object r_732377*/
static void __lambda_725(void *data, object clo, int argc, object *args) ;/*object self_733055, object r_732378*/
static void __lambda_729(void *data, object clo, int argc, object *args) ;/*object self_733056, object k_732382, object key_73613_731196, object value_73614_731197*/
static void __lambda_726(void *data, object clo, int argc, object *args) ;/*object self_733057, object r_732380*/
static void __lambda_727(void *data, object clo, int argc, object *args) ;/*object self_733058, object r_732381*/
static void __lambda_728(void *data, object clo, int argc, object *args) ;/*object self_733059, object r_732379_732495*/
static void __lambda_714(void *data, object clo, int argc, object *args) ;/*closure _,object k_732365, object set_73607_731190*/
static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_733046, object r_732366*/
static void __lambda_716(void *data, object clo, int argc, object *args) ;/*object self_733047, object r_732372*/
static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_733048, object result_73608_731191*/
static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_733049, object k_732371, object key_73609_731192, object value_73610_731193*/
static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_733050, object r_732369*/
static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_733051, object r_732370*/
static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_733052, object r_732368_732494*/
static void __lambda_706(void *data, object clo, int argc, object *args) ;/*closure _,object k_732355, object bag_73603_731186*/
static void __lambda_707(void *data, object clo, int argc, object *args) ;/*object self_733039, object r_732356*/
static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_733040, object r_732362*/
static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_733041, object result_73604_731187*/
static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_733042, object k_732361, object key_73605_731188, object value_73606_731189*/
static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_733043, object r_732359*/
static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_733044, object r_732360*/
static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_733045, object r_732358_732493*/
static void __lambda_698(void *data, object clo, int argc, object *args) ;/*closure _,object k_732346, object proc_73597_731180, object nil_73598_731181, object bag_73599_731182*/
static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_733031, object r_732347*/
static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_733032, object result_73600_731183*/
static void __lambda_780(void *data, object clo, int argc, object *args) ;/*object self_733033, object result_73600_731183*/
static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_733034, object k_732351, object elem_73601_731184, object count_73602_731185*/
static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_733035, object r_732352*/
static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_733036, object r_732349*/
static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_733037, object r_732350*/
static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_733038, object r_732348_732492*/
static void __lambda_693(void *data, object clo, int argc, object *args) ;/*closure _,object k_732339, object proc_73593_731176, object bag_73594_731177*/
static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_733027, object r_732340*/
static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_733028, object k_732343, object key_73595_731178, object value_73596_731179*/
static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_733029, object r_732341*/
static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_733030, object r_732342*/
static void __lambda_690(void *data, object clo, int argc, object *args) ;/*closure _,object k_732334, object bag_73591_731174, object elem_73592_731175*/
static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_733025, object r_732335*/
static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_733026, object r_732336*/
static void __lambda_687(void *data, object clo, int argc, object *args) ;/*closure _,object k_732329, object bag_73590_731173*/
static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_733023, object r_732330*/
static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_733024, object r_732331*/
static void __lambda_684(void *data, object clo, int argc, object *args) ;/*closure _,object k_732324, object n_73588_731171, object bag_73589_731172*/
static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_733021, object r_732325*/
static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_733022, object r_732326*/
static void __lambda_680(void *data, object clo, int argc, object *args) ;/*closure _,object k_732318, object n_73586_731169, object bag_73587_731170*/
static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_733018, object r_732319*/
static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_733019, object r_732320*/
static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_733020, object r_732321*/
static void __lambda_679(void *data, object clo, int argc, object *args) ;/*closure _,object k_732313, object n_73583_731168*/
static void __lambda_673(void *data, object clo, int argc, object *args) ;/*closure _,object k_732304, object n_73577_731162, object result_73578_731163, object sob_73579_731164*/
static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_733013, object rht_73580_731165*/
static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_733014, object k_732309, object elem_73581_731166, object count_73582_731167*/
static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_733015, object r_732307*/
static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_733016, object r_732308*/
static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_733017, object r_732306_732491*/
static void __lambda_669(void *data, object clo, int argc, object *args) ;/*closure _,object k_732298, object bag1_73575_731160, object bag2_73576_731161*/
static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_733010, object r_732299*/
static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_733011, object r_732300*/
static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_733012, object r_732301*/
static void __lambda_665(void *data, object clo, int argc, object *args) ;/*closure _,object k_732292, object set1_73573_731158, object set2_73574_731159*/
static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_733007, object r_732293*/
static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_733008, object r_732294*/
static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_733009, object r_732295*/
static void __lambda_660(void *data, object clo, int argc, object *args) ;/*closure _,object k_732285, object bag1_73571_731156, object bag2_73572_731157*/
static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_733003, object r_732286*/
static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_733004, object r_732287*/
static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_733005, object r_732288*/
static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_733006, object r_732289*/
static void __lambda_655(void *data, object clo, int argc, object *args) ;/*closure _,object k_732278, object set1_73569_731154, object set2_73570_731155*/
static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_732999, object r_732279*/
static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_733000, object r_732280*/
static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_733001, object r_732281*/
static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_733002, object r_732282*/
static void __lambda_641(void *data, object clo, int argc, object *args) ;/*closure _,object k_732261, object result_73557_731142, object sob1_73558_731143, object sob2_73559_731144*/
static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_732986, object r_732262*/
static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_732987, object r_732263*/
static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_732988, object r_732264*/
static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_732989, object sob1_91ht_73560_731145, object sob2_91ht_73561_731146, object result_91ht_73562_731147*/
static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_732990, object k_732273, object key_73563_731148, object value2_73564_731149*/
static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_732991, object value1_73565_731150*/
static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_732992, object r_732272*/
static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_732993, object r_732265_732482*/
static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_732994, object k_732268_732485, object key_73566_731151_732486, object value1_73567_731152_732487*/
static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_732995, object value2_73568_731153_732488*/
static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_732996, object r_732270_732489*/
static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_732997, object r_732267_732483*/
static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_732998, object r_732266_732484_732490*/
static void __lambda_639(void *data, object clo, int argc, object *args) ;/*closure _,object k_732257, object bags_73556_731141_raw, ...*/
static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_732985, object r_732258*/
static void __lambda_635(void *data, object clo, int argc, object *args) ;/*closure _,object k_732251, object sob1_73553_731138, object sobs_73554_731139_raw, ...*/
static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_732982, object k_732254, object sob_73555_731140*/
static void __lambda_636(void *data, object clo, int argc, object *args) ;/*object self_732983, object r_732253*/
static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_732984, object r_732252*/
static void __lambda_633(void *data, object clo, int argc, object *args) ;/*closure _,object k_732247, object bags_73552_731137_raw, ...*/
static void __lambda_634(void *data, object clo, int argc, object *args) ;/*object self_732981, object r_732248*/
static void __lambda_621(void *data, object clo, int argc, object *args) ;/*closure _,object k_732232, object result_73540_731125, object sob1_73541_731126, object sob2_73542_731127*/
static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_732970, object r_732233*/
static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_732971, object r_732234*/
static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_732972, object r_732235*/
static void __lambda_625(void *data, object clo, int argc, object *args) ;/*object self_732973, object sob1_91ht_73543_731128, object sob2_91ht_73544_731129, object result_91ht_73545_731130*/
static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_732974, object k_732242, object key_73546_731131, object value1_73547_731132*/
static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_732975, object value2_73548_731133*/
static void __lambda_626(void *data, object clo, int argc, object *args) ;/*object self_732976, object r_732241*/
static void __lambda_627(void *data, object clo, int argc, object *args) ;/*object self_732977, object r_732236_732476*/
static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_732978, object k_732238_732478, object key_73549_731134_732479, object value2_73550_731135_732480*/
static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_732979, object value1_73551_731136_732481*/
static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_732980, object r_732237_732477*/
static void __lambda_615(void *data, object clo, int argc, object *args) ;/*closure _,object k_732221, object sob1_73536_731121, object sobs_73537_731122_raw, ...*/
static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_732965, object result_73538_731123*/
static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_732966, object r_732224*/
static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_732967, object k_732228, object sob_73539_731124*/
static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_732968, object r_732226*/
static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_732969, object r_732225*/
static void __lambda_613(void *data, object clo, int argc, object *args) ;/*closure _,object k_732217, object bags_73535_731120_raw, ...*/
static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_732964, object r_732218*/
static void __lambda_611(void *data, object clo, int argc, object *args) ;/*closure _,object k_732213, object sets_73534_731119_raw, ...*/
static void __lambda_612(void *data, object clo, int argc, object *args) ;/*object self_732963, object r_732214*/
static void __lambda_607(void *data, object clo, int argc, object *args) ;/*closure _,object k_732207, object sob1_73531_731116, object sobs_73532_731117_raw, ...*/
static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_732960, object k_732210, object sob_73533_731118*/
static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_732961, object r_732209*/
static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_732962, object r_732208*/
static void __lambda_605(void *data, object clo, int argc, object *args) ;/*closure _,object k_732203, object bags_73530_731115_raw, ...*/
static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_732959, object r_732204*/
static void __lambda_603(void *data, object clo, int argc, object *args) ;/*closure _,object k_732199, object sets_73529_731114_raw, ...*/
static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_732958, object r_732200*/
static void __lambda_595(void *data, object clo, int argc, object *args) ;/*closure _,object k_732189, object result_73520_731105, object sob1_73521_731106, object sob2_73522_731107*/
static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_732951, object r_732190*/
static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_732952, object r_732191*/
static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_732953, object r_732192*/
static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_732954, object sob1_91ht_73523_731108, object sob2_91ht_73524_731109, object result_91ht_73525_731110*/
static void __lambda_601(void *data, object clo, int argc, object *args) ;/*object self_732955, object k_732194, object key_73526_731111, object value1_73527_731112*/
static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_732956, object value2_73528_731113*/
static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_732957, object r_732193*/
static void __lambda_589(void *data, object clo, int argc, object *args) ;/*closure _,object k_732178, object sob1_73516_731101, object sobs_73517_731102_raw, ...*/
static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_732946, object result_73518_731103*/
static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_732947, object r_732181*/
static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_732948, object k_732185, object sob_73519_731104*/
static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_732949, object r_732183*/
static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_732950, object r_732182*/
static void __lambda_587(void *data, object clo, int argc, object *args) ;/*closure _,object k_732174, object bags_73515_731100_raw, ...*/
static void __lambda_588(void *data, object clo, int argc, object *args) ;/*object self_732945, object r_732175*/
static void __lambda_585(void *data, object clo, int argc, object *args) ;/*closure _,object k_732170, object sets_73514_731099_raw, ...*/
static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_732944, object r_732171*/
static void __lambda_581(void *data, object clo, int argc, object *args) ;/*closure _,object k_732164, object sob1_73511_731096, object sobs_73512_731097_raw, ...*/
static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_732941, object k_732167, object sob_73513_731098*/
static void __lambda_582(void *data, object clo, int argc, object *args) ;/*object self_732942, object r_732166*/
static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_732943, object r_732165*/
static void __lambda_579(void *data, object clo, int argc, object *args) ;/*closure _,object k_732160, object bags_73510_731095_raw, ...*/
static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_732940, object r_732161*/
static void __lambda_577(void *data, object clo, int argc, object *args) ;/*closure _,object k_732156, object sets_73509_731094_raw, ...*/
static void __lambda_578(void *data, object clo, int argc, object *args) ;/*object self_732939, object r_732157*/
static void __lambda_568(void *data, object clo, int argc, object *args) ;/*closure _,object k_732146, object result_73500_731085, object sob1_73501_731086, object sob2_73502_731087*/
static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_732931, object r_732147*/
static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_732932, object r_732148*/
static void __lambda_571(void *data, object clo, int argc, object *args) ;/*object self_732933, object r_732149*/
static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_732934, object sob1_91ht_73503_731088, object sob2_91ht_73504_731089, object result_91ht_73505_731090*/
static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_732935, object k_732151, object key_73506_731091, object value1_73507_731092*/
static void __lambda_575(void *data, object clo, int argc, object *args) ;/*object self_732936, object value2_73508_731093*/
static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_732937, object r_732153*/
static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_732938, object r_732150*/
static void __lambda_562(void *data, object clo, int argc, object *args) ;/*closure _,object k_732135, object sob1_73496_731081, object sobs_73497_731082_raw, ...*/
static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_732926, object result_73498_731083*/
static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_732927, object r_732138*/
static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_732928, object k_732142, object sob_73499_731084*/
static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_732929, object r_732140*/
static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_732930, object r_732139*/
static void __lambda_560(void *data, object clo, int argc, object *args) ;/*closure _,object k_732131, object bags_73495_731080_raw, ...*/
static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_732925, object r_732132*/
static void __lambda_558(void *data, object clo, int argc, object *args) ;/*closure _,object k_732127, object sets_73494_731079_raw, ...*/
static void __lambda_559(void *data, object clo, int argc, object *args) ;/*object self_732924, object r_732128*/
static void __lambda_554(void *data, object clo, int argc, object *args) ;/*closure _,object k_732121, object sob1_73491_731076, object sobs_73492_731077_raw, ...*/
static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_732921, object k_732124, object sob_73493_731078*/
static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_732922, object r_732123*/
static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_732923, object r_732122*/
static void __lambda_552(void *data, object clo, int argc, object *args) ;/*closure _,object k_732117, object bags_73490_731075_raw, ...*/
static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_732920, object r_732118*/
static void __lambda_550(void *data, object clo, int argc, object *args) ;/*closure _,object k_732113, object sets_73489_731074_raw, ...*/
static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_732919, object r_732114*/
static void __lambda_537(void *data, object clo, int argc, object *args) ;/*closure _,object k_732098, object result_73477_731062, object sob1_73478_731063, object sob2_73479_731064*/
static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_732907, object r_732099*/
static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_732908, object r_732100*/
static void __lambda_540(void *data, object clo, int argc, object *args) ;/*object self_732909, object r_732101*/
static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_732910, object sob1_91ht_73480_731065, object sob2_91ht_73481_731066, object result_91ht_73482_731067*/
static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_732911, object k_732108, object key_73483_731068, object value1_73484_731069*/
static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_732912, object value2_73485_731070*/
static void __lambda_549(void *data, object clo, int argc, object *args) ;/*object self_732913, object r_732110*/
static void __lambda_542(void *data, object clo, int argc, object *args) ;/*object self_732914, object r_732107*/
static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_732915, object r_732102_732470*/
static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_732916, object k_732104_732472, object key_73486_731071_732473, object value2_73487_731072_732474*/
static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_732917, object value1_73488_731073_732475*/
static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_732918, object r_732103_732471*/
static void __lambda_531(void *data, object clo, int argc, object *args) ;/*closure _,object k_732087, object sob1_73473_731058, object sobs_73474_731059_raw, ...*/
static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_732902, object result_73475_731060*/
static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_732903, object r_732090*/
static void __lambda_536(void *data, object clo, int argc, object *args) ;/*object self_732904, object k_732094, object sob_73476_731061*/
static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_732905, object r_732092*/
static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_732906, object r_732091*/
static void __lambda_529(void *data, object clo, int argc, object *args) ;/*closure _,object k_732083, object sob1_73469_731056, object sob2_73470_731057*/
static void __lambda_530(void *data, object clo, int argc, object *args) ;/*object self_732901, object r_732084_732469*/
static void __lambda_527(void *data, object clo, int argc, object *args) ;/*closure _,object k_732079, object bags_73468_731055_raw, ...*/
static void __lambda_528(void *data, object clo, int argc, object *args) ;/*object self_732900, object r_732080*/
static void __lambda_525(void *data, object clo, int argc, object *args) ;/*closure _,object k_732075, object sets_73467_731054_raw, ...*/
static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_732899, object r_732076*/
static void __lambda_517(void *data, object clo, int argc, object *args) ;/*closure _,object k_732055, object args_73449_73453_731046_raw, ...*/
static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_732896, object k_732065, object sob1_73463_731051, object sob2_73464_731052, object sobs_73465_731053_raw, ...*/
static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_732897, object r_732066*/
static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_732898, object r_732064*/
static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_732894, object k_732062, object sob1_73458_731049, object sob2_73459_731050*/
static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_732895, object r_732061*/
static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_732892, object k_732059, object sob_73456_731048*/
static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_732893, object r_732058*/
static void __lambda_516(void *data, object clo, int argc, object *args) ;/*closure _,object k_732052, object sob1_73447_731044, object sob2_73448_731045*/
static void __lambda_514(void *data, object clo, int argc, object *args) ;/*closure _,object k_732048, object bags_73446_731043_raw, ...*/
static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_732891, object r_732049*/
static void __lambda_512(void *data, object clo, int argc, object *args) ;/*closure _,object k_732044, object sets_73445_731042_raw, ...*/
static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_732890, object r_732045*/
static void __lambda_504(void *data, object clo, int argc, object *args) ;/*closure _,object k_732024, object args_73427_73431_731034_raw, ...*/
static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_732887, object k_732034, object sob1_73441_731039, object sob2_73442_731040, object sobs_73443_731041_raw, ...*/
static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_732888, object r_732035_732468*/
static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_732889, object r_732033*/
static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_732885, object k_732031, object sob1_73436_731037, object sob2_73437_731038*/
static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_732886, object r_732030*/
static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_732883, object k_732028, object sob_73434_731036*/
static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_732884, object r_732027*/
static void __lambda_502(void *data, object clo, int argc, object *args) ;/*closure _,object k_732020, object sob1_73425_731032, object sob2_73426_731033*/
static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_732882, object r_732021*/
static void __lambda_500(void *data, object clo, int argc, object *args) ;/*closure _,object k_732016, object bags_73424_731031_raw, ...*/
static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_732881, object r_732017*/
static void __lambda_498(void *data, object clo, int argc, object *args) ;/*closure _,object k_732012, object sets_73423_731030_raw, ...*/
static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_732880, object r_732013*/
static void __lambda_490(void *data, object clo, int argc, object *args) ;/*closure _,object k_731992, object args_73405_73409_731022_raw, ...*/
static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_732877, object k_732002, object sob1_73419_731027, object sob2_73420_731028, object sobs_73421_731029_raw, ...*/
static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_732878, object r_732003*/
static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_732879, object r_732001*/
static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_732875, object k_731999, object sob1_73414_731025, object sob2_73415_731026*/
static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_732876, object r_731998*/
static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_732873, object k_731996, object sob_73412_731024*/
static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_732874, object r_731995*/
static void __lambda_476(void *data, object clo, int argc, object *args) ;/*closure _,object k_731975, object sob1_73398_731015, object sob2_73399_731016*/
static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_732860, object k_731977, object return_73400_731017*/
static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_732861, object r_731979*/
static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_732862, object r_731980*/
static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_732863, object ht1_73401_731018, object ht2_73402_731019*/
static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_732864, object r_731981*/
static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_732865, object k_731983, object key_73403_731020, object value_73404_731021*/
static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_732866, object r_731985*/
static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_732867, object r_731982*/
static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_732868, object r_731978_732467*/
static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_732869, object k_731986*/
static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_732870, object r_731988*/
static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_732871, object r_731989*/
static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_732872, object r_731976*/
static void __lambda_474(void *data, object clo, int argc, object *args) ;/*closure _,object k_731971, object bags_73397_731014_raw, ...*/
static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_732859, object r_731972*/
static void __lambda_472(void *data, object clo, int argc, object *args) ;/*closure _,object k_731967, object sets_73396_731013_raw, ...*/
static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_732858, object r_731968*/
static void __lambda_464(void *data, object clo, int argc, object *args) ;/*closure _,object k_731947, object args_73378_73382_731005_raw, ...*/
static void __lambda_470(void *data, object clo, int argc, object *args) ;/*object self_732855, object k_731957, object sob1_73392_731010, object sob2_73393_731011, object sobs_73394_731012_raw, ...*/
static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_732856, object r_731958*/
static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_732857, object r_731956*/
static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_732853, object k_731954, object sob1_73387_731008, object sob2_73388_731009*/
static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_732854, object r_731953*/
static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_732851, object k_731951, object sob_73385_731007*/
static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_732852, object r_731950*/
static void __lambda_450(void *data, object clo, int argc, object *args) ;/*closure _,object k_731930, object sob1_73371_73998, object sob2_73372_73999*/
static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_732838, object k_731932, object return_73373_731000*/
static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_732839, object r_731934*/
static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_732840, object r_731935*/
static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_732841, object ht1_73374_731001, object ht2_73375_731002*/
static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_732842, object r_731936*/
static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_732843, object k_731938, object key_73376_731003, object value_73377_731004*/
static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_732844, object r_731940*/
static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_732845, object r_731937*/
static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_732846, object r_731933_732466*/
static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_732847, object k_731941*/
static void __lambda_457(void *data, object clo, int argc, object *args) ;/*object self_732848, object r_731943*/
static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_732849, object r_731944*/
static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_732850, object r_731931*/
static void __lambda_448(void *data, object clo, int argc, object *args) ;/*closure _,object k_731926, object bags_73370_73997_raw, ...*/
static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_732837, object r_731927*/
static void __lambda_446(void *data, object clo, int argc, object *args) ;/*closure _,object k_731922, object sets_73369_73996_raw, ...*/
static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_732836, object r_731923*/
static void __lambda_438(void *data, object clo, int argc, object *args) ;/*closure _,object k_731902, object args_73351_73355_73988_raw, ...*/
static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_732833, object k_731912, object sob1_73365_73993, object sob2_73366_73994, object sobs_73367_73995_raw, ...*/
static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_732834, object r_731913*/
static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_732835, object r_731911*/
static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_732831, object k_731909, object sob1_73360_73991, object sob2_73361_73992*/
static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_732832, object r_731908*/
static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_732829, object k_731906, object sob_73358_73990*/
static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_732830, object r_731905*/
static void __lambda_436(void *data, object clo, int argc, object *args) ;/*closure _,object k_731898, object bag_73349_73986, object list_73350_73987*/
static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_732828, object r_731899*/
static void __lambda_434(void *data, object clo, int argc, object *args) ;/*closure _,object k_731894, object set_73347_73984, object list_73348_73985*/
static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_732827, object r_731895*/
static void __lambda_432(void *data, object clo, int argc, object *args) ;/*closure _,object k_731890, object comparator_73345_73982, object list_73346_73983*/
static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_732826, object r_731891*/
static void __lambda_430(void *data, object clo, int argc, object *args) ;/*closure _,object k_731886, object comparator_73343_73980, object list_73344_73981*/
static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_732825, object r_731887*/
static void __lambda_426(void *data, object clo, int argc, object *args) ;/*closure _,object k_731880, object sob_73340_73977, object list_73341_73978*/
static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_732822, object k_731883, object elem_73342_73979*/
static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_732823, object r_731882*/
static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_732824, object r_731881*/
static void __lambda_424(void *data, object clo, int argc, object *args) ;/*closure _,object k_731876, object bag_73339_73976*/
static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_732821, object r_731877*/
static void __lambda_422(void *data, object clo, int argc, object *args) ;/*closure _,object k_731872, object set_73338_73975*/
static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_732820, object r_731873*/
static void __lambda_419(void *data, object clo, int argc, object *args) ;/*closure _,object k_731866, object sob_73335_73972*/
static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_732818, object k_731869, object elem_73336_73973, object list_73337_73974*/
static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_732819, object r_731867*/
static void __lambda_417(void *data, object clo, int argc, object *args) ;/*closure _,object k_731862, object pred_73333_73970, object bag_73334_73971*/
static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_732817, object r_731863*/
static void __lambda_415(void *data, object clo, int argc, object *args) ;/*closure _,object k_731858, object pred_73331_73968, object set_73332_73969*/
static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_732816, object r_731859*/
static void __lambda_406(void *data, object clo, int argc, object *args) ;/*closure _,object k_731847, object pred_73326_73963, object sob_73327_73964*/
static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_732808, object result_73328_73965*/
static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_732809, object k_731853, object key_73329_73966, object value_73330_73967*/
static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_732810, object r_731854*/
static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_732811, object r_731855*/
static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_732812, object r_731851*/
static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_732813, object r_731852*/
static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_732814, object r_731849_732464*/
static void __lambda_411(void *data, object clo, int argc, object *args) ;/*object self_732815, object r_731850_732465*/
static void __lambda_404(void *data, object clo, int argc, object *args) ;/*closure _,object k_731843, object pred_73324_73961, object bag_73325_73962*/
static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_732807, object r_731844*/
static void __lambda_402(void *data, object clo, int argc, object *args) ;/*closure _,object k_731839, object pred_73322_73959, object set_73323_73960*/
static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_732806, object r_731840*/
static void __lambda_393(void *data, object clo, int argc, object *args) ;/*closure _,object k_731829, object pred_73316_73953, object sob_73317_73954*/
static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_732798, object r_731830*/
static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_732799, object r_731831*/
static void __lambda_396(void *data, object clo, int argc, object *args) ;/*object self_732800, object res1_73318_73955, object res2_73319_73956*/
static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_732801, object k_731835, object key_73320_73957, object value_73321_73958*/
static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_732802, object r_731836*/
static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_732803, object r_731833*/
static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_732804, object r_731834*/
static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_732805, object r_731832_732463*/
static void __lambda_388(void *data, object clo, int argc, object *args) ;/*closure _,object k_731822, object pred_73313_73950, object bag_73314_73951*/
static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_732794, object r_731823*/
static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_732795, object k_731825, object x_73315_73952*/
static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_732796, object r_731826*/
static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_732797, object r_731824*/
static void __lambda_383(void *data, object clo, int argc, object *args) ;/*closure _,object k_731815, object pred_73310_73947, object set_73311_73948*/
static void __lambda_384(void *data, object clo, int argc, object *args) ;/*object self_732790, object r_731816*/
static void __lambda_386(void *data, object clo, int argc, object *args) ;/*object self_732791, object k_731818, object x_73312_73949*/
static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_732792, object r_731819*/
static void __lambda_385(void *data, object clo, int argc, object *args) ;/*object self_732793, object r_731817*/
static void __lambda_381(void *data, object clo, int argc, object *args) ;/*closure _,object k_731811, object pred_73308_73945, object bag_73309_73946*/
static void __lambda_382(void *data, object clo, int argc, object *args) ;/*object self_732789, object r_731812*/
static void __lambda_379(void *data, object clo, int argc, object *args) ;/*closure _,object k_731807, object pred_73306_73943, object set_73307_73944*/
static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_732788, object r_731808*/
static void __lambda_373(void *data, object clo, int argc, object *args) ;/*closure _,object k_731799, object pred_73302_73939, object sob_73303_73940*/
static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_732783, object k_731803, object key_73304_73941, object value_73305_73942*/
static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_732784, object r_731804*/
static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_732785, object r_731801*/
static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_732786, object r_731802*/
static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_732787, object r_731800_732462*/
static void __lambda_368(void *data, object clo, int argc, object *args) ;/*closure _,object k_731792, object pred_73299_73936, object bag_73300_73937*/
static void __lambda_369(void *data, object clo, int argc, object *args) ;/*object self_732779, object r_731793*/
static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_732780, object k_731795, object x_73301_73938*/
static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_732781, object r_731796*/
static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_732782, object r_731794*/
static void __lambda_363(void *data, object clo, int argc, object *args) ;/*closure _,object k_731785, object pred_73296_73933, object set_73297_73934*/
static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_732775, object r_731786*/
static void __lambda_366(void *data, object clo, int argc, object *args) ;/*object self_732776, object k_731788, object x_73298_73935*/
static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_732777, object r_731789*/
static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_732778, object r_731787*/
static void __lambda_361(void *data, object clo, int argc, object *args) ;/*closure _,object k_731781, object pred_73294_73931, object bag_73295_73932*/
static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_732774, object r_731782*/
static void __lambda_359(void *data, object clo, int argc, object *args) ;/*closure _,object k_731777, object pred_73292_73929, object set_73293_73930*/
static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_732773, object r_731778*/
static void __lambda_352(void *data, object clo, int argc, object *args) ;/*closure _,object k_731768, object pred_73287_73924, object sob_73288_73925*/
static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_732767, object result_73289_73926*/
static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_732768, object k_731773, object key_73290_73927, object value_73291_73928*/
static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_732769, object r_731774*/
static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_732770, object r_731771*/
static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_732771, object r_731772*/
static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_732772, object r_731770_732461*/
static void __lambda_350(void *data, object clo, int argc, object *args) ;/*closure _,object k_731764, object proc_73284_73921, object nil_73285_73922, object bag_73286_73923*/
static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_732766, object r_731765*/
static void __lambda_348(void *data, object clo, int argc, object *args) ;/*closure _,object k_731760, object proc_73281_73918, object nil_73282_73919, object set_73283_73920*/
static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_732765, object r_731761*/
static void __lambda_342(void *data, object clo, int argc, object *args) ;/*closure _,object k_731753, object proc_73276_73913, object nil_73277_73914, object sob_73278_73915*/
static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_732759, object result_73279_73916*/
static void __lambda_779(void *data, object clo, int argc, object *args) ;/*object self_732760, object result_73279_73916*/
static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_732761, object k_731756, object elem_73280_73917*/
static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_732762, object r_731757*/
static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_732763, object r_731755*/
static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_732764, object r_731754*/
static void __lambda_340(void *data, object clo, int argc, object *args) ;/*closure _,object k_731749, object comparator_73273_73910, object proc_73274_73911, object bag_73275_73912*/
static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_732758, object r_731750*/
static void __lambda_338(void *data, object clo, int argc, object *args) ;/*closure _,object k_731745, object comparator_73270_73907, object proc_73271_73908, object set_73272_73909*/
static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_732757, object r_731746*/
static void __lambda_330(void *data, object clo, int argc, object *args) ;/*closure _,object k_731735, object comparator_73264_73901, object proc_73265_73902, object sob_73266_73903*/
static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_732750, object r_731742*/
static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_732751, object result_73267_73904*/
static void __lambda_336(void *data, object clo, int argc, object *args) ;/*object self_732752, object k_731740, object key_73268_73905, object value_73269_73906*/
static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_732753, object r_731741*/
static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_732754, object r_731738*/
static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_732755, object r_731739*/
static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_732756, object r_731737_732460*/
static void __lambda_328(void *data, object clo, int argc, object *args) ;/*closure _,object k_731731, object proc_73262_73899, object bag_73263_73900*/
static void __lambda_329(void *data, object clo, int argc, object *args) ;/*object self_732749, object r_731732*/
static void __lambda_326(void *data, object clo, int argc, object *args) ;/*closure _,object k_731727, object proc_73260_73897, object set_73261_73898*/
static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_732748, object r_731728*/
static void __lambda_320(void *data, object clo, int argc, object *args) ;/*closure _,object k_731719, object proc_73256_73893, object sob_73257_73894*/
static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_732743, object k_731722, object key_73258_73895, object value_73259_73896*/
static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_732744, object k_731724*/
static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_732745, object r_731723*/
static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_732746, object r_731720*/
static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_732747, object r_731721*/
static void __lambda_313(void *data, object clo, int argc, object *args) ;/*closure _,object k_731710, object cmd_73250_73888, object n_73251_73889*/
static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_732736, object n_73253_73890*/
static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_732737, object loop_73254_73891*/
static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_732738, object loop_73254_73891*/
static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_732739, object k_731713, object n_73255_73892*/
static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_732740, object r_731715*/
static void __lambda_316(void *data, object clo, int argc, object *args) ;/*object self_732741, object r_731712*/
static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_732742, object r_731711*/
static void __lambda_311(void *data, object clo, int argc, object *args) ;/*closure _,object k_731706, object pred_73248_73886, object bag_73249_73887*/
static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_732735, object r_731707*/
static void __lambda_309(void *data, object clo, int argc, object *args) ;/*closure _,object k_731702, object pred_73246_73884, object set_73247_73885*/
static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_732734, object r_731703*/
static void __lambda_301(void *data, object clo, int argc, object *args) ;/*closure _,object k_731692, object pred_73241_73879, object sob_73242_73880*/
static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_732727, object k_731694, object return_73243_73881*/
static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_732728, object k_731698, object elem_73244_73882, object value_73245_73883*/
static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_732729, object r_731699*/
static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_732730, object r_731696*/
static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_732731, object r_731697*/
static void __lambda_306(void *data, object clo, int argc, object *args) ;/*object self_732732, object r_731695_732459*/
static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_732733, object r_731693*/
static void __lambda_299(void *data, object clo, int argc, object *args) ;/*closure _,object k_731688, object pred_73239_73877, object bag_73240_73878*/
static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_732726, object r_731689*/
static void __lambda_297(void *data, object clo, int argc, object *args) ;/*closure _,object k_731684, object pred_73237_73875, object set_73238_73876*/
static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_732725, object r_731685*/
static void __lambda_289(void *data, object clo, int argc, object *args) ;/*closure _,object k_731674, object pred_73232_73870, object sob_73233_73871*/
static void __lambda_291(void *data, object clo, int argc, object *args) ;/*object self_732718, object k_731676, object return_73234_73872*/
static void __lambda_295(void *data, object clo, int argc, object *args) ;/*object self_732719, object k_731680, object elem_73235_73873, object value_73236_73874*/
static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_732720, object r_731681*/
static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_732721, object r_731678*/
static void __lambda_293(void *data, object clo, int argc, object *args) ;/*object self_732722, object r_731679*/
static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_732723, object r_731677_732458*/
static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_732724, object r_731675*/
static void __lambda_287(void *data, object clo, int argc, object *args) ;/*closure _,object k_731670, object pred_73230_73868, object bag_73231_73869*/
static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_732717, object r_731671*/
static void __lambda_285(void *data, object clo, int argc, object *args) ;/*closure _,object k_731666, object pred_73228_73866, object set_73229_73867*/
static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_732716, object r_731667*/
static void __lambda_281(void *data, object clo, int argc, object *args) ;/*closure _,object k_731660, object pred_73224_73862, object sob_73225_73863*/
static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_732713, object k_731662, object elem_73226_73864, object total_73227_73865*/
static void __lambda_284(void *data, object clo, int argc, object *args) ;/*object self_732714, object r_731663*/
static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_732715, object r_731661*/
static void __lambda_279(void *data, object clo, int argc, object *args) ;/*closure _,object k_731656, object pred_73221_73859, object bag_73222_73860, object failure_73223_73861*/
static void __lambda_280(void *data, object clo, int argc, object *args) ;/*object self_732712, object r_731657*/
static void __lambda_277(void *data, object clo, int argc, object *args) ;/*closure _,object k_731652, object pred_73218_73856, object set_73219_73857, object failure_73220_73858*/
static void __lambda_278(void *data, object clo, int argc, object *args) ;/*object self_732711, object r_731653*/
static void __lambda_269(void *data, object clo, int argc, object *args) ;/*closure _,object k_731642, object pred_73212_73850, object sob_73213_73851, object failure_73214_73852*/
static void __lambda_271(void *data, object clo, int argc, object *args) ;/*object self_732704, object k_731644, object return_73215_73853*/
static void __lambda_275(void *data, object clo, int argc, object *args) ;/*object self_732705, object k_731648, object key_73216_73854, object value_73217_73855*/
static void __lambda_276(void *data, object clo, int argc, object *args) ;/*object self_732706, object r_731649*/
static void __lambda_272(void *data, object clo, int argc, object *args) ;/*object self_732707, object r_731646*/
static void __lambda_273(void *data, object clo, int argc, object *args) ;/*object self_732708, object r_731647*/
static void __lambda_274(void *data, object clo, int argc, object *args) ;/*object self_732709, object r_731645_732457*/
static void __lambda_270(void *data, object clo, int argc, object *args) ;/*object self_732710, object r_731643*/
static void __lambda_267(void *data, object clo, int argc, object *args) ;/*closure _,object k_731638, object bag_73211_73849*/
static void __lambda_268(void *data, object clo, int argc, object *args) ;/*object self_732703, object r_731639*/
static void __lambda_265(void *data, object clo, int argc, object *args) ;/*closure _,object k_731634, object set_73210_73848*/
static void __lambda_266(void *data, object clo, int argc, object *args) ;/*object self_732702, object r_731635*/
static void __lambda_256(void *data, object clo, int argc, object *args) ;/*closure _,object k_731624, object sob_73206_73844*/
static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_732693, object r_731625*/
static void __lambda_264(void *data, object clo, int argc, object *args) ;/*object self_732701, object r_731631*/
static void __lambda_258(void *data, object clo, int argc, object *args) ;/*object self_732694, object result_73207_73845*/
static void __lambda_777(void *data, object clo, int argc, object *args) ;/*object self_732695, object result_73207_73845*/
static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_732696, object k_731629, object elem_73208_73846, object count_73209_73847*/
static void __lambda_263(void *data, object clo, int argc, object *args) ;/*object self_732697, object r_731630*/
static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_732698, object r_731627*/
static void __lambda_260(void *data, object clo, int argc, object *args) ;/*object self_732699, object r_731628*/
static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_732700, object r_731626_732456*/
static void __lambda_254(void *data, object clo, int argc, object *args) ;/*closure _,object k_731620, object bag_73202_73840, object element_73203_73841, object failure_73204_73842, object success_73205_73843*/
static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_732692, object r_731621*/
static void __lambda_252(void *data, object clo, int argc, object *args) ;/*closure _,object k_731616, object set_73198_73836, object element_73199_73837, object failure_73200_73838, object success_73201_73839*/
static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_732691, object r_731617*/
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*closure _,object k_731593, object sob_73188_73814, object element_73189_73815, object failure_73190_73816, object success_73191_73817*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_732666, object ignore_73822, object insert_73823, object remove_73824, object update_73825*/
static void __lambda_776(void *data, object clo, int argc, object *args) ;/*object self_732667, object ignore_73822*/
static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_732668, object insert_73823*/
static void __lambda_774(void *data, object clo, int argc, object *args) ;/*object self_732669, object remove_73824*/
static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_732670, object update_73825*/
static void __lambda_250(void *data, object clo, int argc, object *args) ;/*object self_732671, object k_731612, object obj_73192_73830*/
static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_732672, object r_731613*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_732673, object r_731611*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_732674, object r_731594*/
static void __lambda_249(void *data, object clo, int argc, object *args) ;/*object self_732675, object k_731610, object obj_73193_73831*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_732676, object r_731609*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_732677, object r_731595*/
static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_732678, object k_731605, object new_91elem_73194_73832, object obj_73195_73833*/
static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_732679, object r_731606*/
static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_732680, object r_731607*/
static void __lambda_248(void *data, object clo, int argc, object *args) ;/*object self_732681, object r_731608*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_732682, object r_731604*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_732683, object r_731596*/
static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_732684, object k_731601, object obj_73196_73834*/
static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_732685, object r_731602*/
static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_732686, object r_731603*/
static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_732687, object r_731600*/
static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_732688, object r_731597*/
static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_732689, object true_91element_73197_73835*/
static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_732690, object r_731599*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*closure _,object k_731586, object bag_73186_73812, object elements_73187_73813*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_732664, object r_731587*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_732665, object r_731588*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*closure _,object k_731581, object set_73184_73810, object elements_73185_73811*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_732662, object r_731582*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_732663, object r_731583*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*closure _,object k_731576, object bag_73182_73808, object elements_73183_73809_raw, ...*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_732660, object r_731577*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_732661, object r_731578*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*closure _,object k_731571, object set_73180_73806, object elements_73181_73807_raw, ...*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_732658, object r_731572*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_732659, object r_731573*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*closure _,object k_731567, object bag_73178_73804, object elements_73179_73805*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_732657, object r_731568*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*closure _,object k_731563, object set_73176_73802, object elements_73177_73803*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_732656, object r_731564*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*closure _,object k_731559, object bag_73174_73800, object elements_73175_73801_raw, ...*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*object self_732655, object r_731560*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*closure _,object k_731555, object set_73172_73798, object elements_73173_73799_raw, ...*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_732654, object r_731556*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*closure _,object k_731548, object sob_73169_73795, object elements_73170_73796*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_732650, object k_731552, object element_73171_73797*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_732651, object r_731551*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_732652, object r_731549*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_732653, object r_731550*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*closure _,object k_731542, object bag_73166_73792, object element_73167_73793*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_732647, object r_731543*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_732648, object result_73168_73794*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_732649, object r_731545*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*closure _,object k_731536, object set_73163_73789, object element_73164_73790*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_732644, object r_731537*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_732645, object result_73165_73791*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_732646, object r_731539*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*closure _,object k_731531, object bag_73161_73787, object element_73162_73788*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_732642, object r_731532*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_732643, object r_731533*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*closure _,object k_731526, object set_73159_73785, object element_73160_73786*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_732640, object r_731527*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_732641, object r_731528*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*closure _,object k_731511, object sob_73144_73777, object element_73145_73778*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_732628, object comparator_73148_73779*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_732629, object _123_73151_73780*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_732630, object ht_73154_73781*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*object self_732631, object r_731515*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_732632, object k_731517, object return_73156_73782*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_732633, object k_731520, object key_73157_73783, object value_73158_73784*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_732634, object r_731521*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*object self_732635, object r_731522*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_732636, object r_731523*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_732637, object r_731519*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_732638, object r_731518_732455*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_732639, object r_731516*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*closure _,object k_731505, object bag_73141_73774, object elements_73142_73775_raw, ...*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*object self_732625, object r_731506*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_732626, object result_73143_73776*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_732627, object r_731508*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*closure _,object k_731499, object set_73138_73771, object elements_73139_73772_raw, ...*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_732622, object r_731500*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_732623, object result_73140_73773*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_732624, object r_731502*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*closure _,object k_731494, object bag_73136_73769, object elements_73137_73770_raw, ...*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_732620, object r_731495*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_732621, object r_731496*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*closure _,object k_731489, object set_73134_73767, object elements_73135_73768_raw, ...*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_732618, object r_731490*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_732619, object r_731491*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*closure _,object k_731484, object sob_73131_73764, object elements_73132_73765*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_732616, object k_731486, object elem_73133_73766*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_732617, object r_731485*/
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*closure _,object k_731478, object bag_73128_73761, object element_73129_73762, object count_73130_73763*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_732613, object r_731479*/
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_732614, object r_731480*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_732615, object r_731481*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*closure _,object k_731473, object bag_73125_73758, object element_73126_73759, object count_73127_73760*/
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_732611, object r_731474*/
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_732612, object r_731475*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*closure _,object k_731464, object ht_73121_73754*/
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_732605, object result_73122_73755*/
static void __lambda_772(void *data, object clo, int argc, object *args) ;/*object self_732606, object result_73122_73755*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_732607, object k_731468, object key_73123_73756, object value_73124_73757*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_732608, object r_731470*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_732609, object r_731467*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_732610, object r_731466_732454*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*closure _,object k_731456, object sob_73118_73751*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_732600, object ht_73119_73752*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_732601, object k_731461, object key_73120_73753*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_732602, object r_731459*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_732603, object r_731460*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_732604, object r_731458*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*closure _,object k_731450, object sob_73114_73747, object element_73115_73748, object count_73116_73749*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_732597, object r_731451*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_732598, object k_731453, object value_73117_73750*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_732599, object r_731452*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*closure _,object k_731440, object sob_73109_73742, object element_73110_73743, object count_73111_73744*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_732590, object r_731441*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_732591, object r_731442*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_732592, object r_731443*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_732593, object k_731444*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_732594, object r_731445*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_732596, object k_731447, object value_73113_73746*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_732595, object k_731446, object value_73112_73745*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*closure _,object k_731436, object bag_73108_73741*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_732589, object r_731437*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*closure _,object k_731432, object set_73107_73740*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_732588, object r_731433*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*closure _,object k_731428, object bag_73104_73737, object element_73105_73738, object default_73106_73739*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_732587, object r_731429*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*closure _,object k_731424, object set_73101_73734, object element_73102_73735, object default_73103_73736*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_732586, object r_731425*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*closure _,object k_731410, object sob_7393_73723, object element_7394_73724, object default_7395_73725*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_732573, object same_127_73727*/
static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_732574, object same_127_73727*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_732575, object k_731420, object a_7396_73729, object b_7397_73730*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*object self_732576, object r_731421*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_732577, object r_731419*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_732578, object r_731411*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_732579, object k_731413, object return_7398_73731*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_732580, object k_731417, object key_7399_73732, object val_73100_73733*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_732581, object r_731418*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_732582, object r_731415*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_732583, object r_731416*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_732584, object r_731414_732453*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_732585, object r_731412*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*closure _,object k_731403, object a_7390_73721, object b_7391_73722*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_732569, object r_731404*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_732570, object r_731405*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_732571, object r_731406*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_732572, object r_731407*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*closure _,object k_731396, object a_7387_73719, object b_7388_73720*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_732565, object r_731397*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_732566, object r_731398*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_732567, object r_731399*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_732568, object r_731400*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*closure _,object k_731385, object a_7380_73712, object b_7381_73713*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_732556, object r_731386*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_732557, object r_731387*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_732558, object ha_7382_73714, object hb_7383_73715*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_732559, object k_731389, object return_7384_73716*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_732560, object k_731392, object key_7385_73717, object val_7386_73718*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_732561, object r_731393*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_732562, object r_731391*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_732563, object r_731390_732452*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_732564, object r_731388*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*closure _,object k_731381, object bag_7379_73711*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_732555, object r_731382*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*closure _,object k_731377, object set_7378_73710*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_732554, object r_731378*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*closure _,object k_731372, object sob_7377_73709*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_732552, object r_731374*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_732553, object r_731373*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*closure _,object k_731368, object bag_7375_73707, object member_7376_73708*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_732551, object r_731369*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*closure _,object k_731364, object set_7373_73705, object member_7374_73706*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_732550, object r_731365*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*closure _,object k_731360, object sob_7371_73703, object member_7372_73704*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_732549, object r_731361*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*closure _,object k_731357, object continue_127_7366_73698, object mapper_7367_73699, object successor_7368_73700, object seed_7369_73701, object comparator_7370_73702*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*closure _,object k_731354, object continue_127_7361_73693, object mapper_7362_73694, object successor_7363_73695, object seed_7364_73696, object comparator_7365_73697*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*closure _,object k_731343, object stop_127_7350_73683, object mapper_7351_73684, object successor_7352_73685, object seed_7353_73686, object comparator_7354_73687, object multi_127_7355_73688*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_732538, object result_7356_73689*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_732539, object seed_7358_73690*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_732540, object loop_7359_73691*/
static void __lambda_770(void *data, object clo, int argc, object *args) ;/*object self_732541, object loop_7359_73691*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_732542, object k_731347, object seed_7360_73692*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_732543, object r_731348*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_732544, object r_731351*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_732545, object r_731349*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_732546, object r_731350*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_732547, object r_731346*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_732548, object r_731345*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*closure _,object k_731336, object comparator_7346_73679, object elements_7347_73680_raw, ...*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_732534, object result_7348_73681*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_732535, object k_731340, object x_7349_73682*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_732536, object r_731339*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_732537, object r_731338*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*closure _,object k_731329, object comparator_7342_73675, object elements_7343_73676_raw, ...*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_732530, object result_7344_73677*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_732531, object k_731333, object x_7345_73678*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_732532, object r_731332*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_732533, object r_731331*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*closure _,object k_731324, object sob_7341_73674*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_732528, object r_731325*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_732529, object r_731326*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*closure _,object k_731320, object bag_7340_73673*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_732527, object r_731321*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*closure _,object k_731316, object set_7339_73672*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_732526, object r_731317*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*closure _,object k_731309, object sob_7338_73671*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_732522, object r_731313*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*object self_732523, object r_731310*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_732524, object r_731311*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_732525, object r_731312*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*closure _,object k_731305, object comparator_7336_73669, object multi_127_7337_73670*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_732521, object r_731306*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*closure _,object k_731301, object sob_7334_73667, object element_7335_73668*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_732520, object r_731302*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*closure _,object k_731295, object a_7332_73665, object b_7333_73666*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_732518, object r_731297*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_732519, object r_731298*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*closure _,object k_731287, object list_7330_73663*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_732516, object k_731291, object sob_7331_73664*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_732517, object r_731289*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*closure _,object k_731281, object list_7328_73661*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_732513, object k_731284, object obj_7329_73662*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_732514, object r_731283*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_732515, object r_731282*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*closure _,object k_731275, object list_7326_73659*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_732510, object k_731278, object obj_7327_73660*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_732511, object r_731277*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_732512, object r_731276*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*closure _,object k_731271, object obj_7325_73658*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_732509, object r_731272*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*closure _,object k_731267, object obj_7324_73657*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_732508, object r_731268*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*closure _,object k_731263, object obj_7322_73656*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_732507, object r_731264*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*closure _,object k_731258, object obj_7320_73655*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_732505, object r_731259*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_732506, object r_731260*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_731252, object hash_91table_7317_73652, object comparator_7318_73653, object multi_127_7319_73654*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*closure _,object k_731239, object proc_7314_73650, object hash_91table_7315_73651*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*closure _,object k_731221, object hash_91function_732_73644*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_732499, object k_731222, object args_733_737_73645_raw, ...*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_732502, object k_731229, object obj_7312_73648, object limit_7313_73649*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_732503, object r_731230*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_732504, object r_731228*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_732500, object k_731226, object obj_7310_73647*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_732501, object r_731225*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_731215, object comparator_731_73643*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_732496, object r_731216*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_732497, object r_731218*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_732498, object r_731217*/

static void __lambda_748(void *data, object _, int argc, object *args) /* closure _,object k_732417 */
 {
object k_732417 = args[0];
  Cyc_st_add(data, "srfi/113.sld:lib-init:srfi113");

closureN_type c_736621;
object e_736715 [1];
c_736621.hdr.mark = gc_color_red;
 c_736621.hdr.grayed = 0;
c_736621.tag = closureN_tag;
 c_736621.fn = (function_type)__lambda_749;
c_736621.num_args = 1;
c_736621.num_elements = 1;
c_736621.elements = (object *)e_736715;
c_736621.elements[0] = k_732417;


object c_736718 = global_set_cps_id(data,(closure)&c_736621,"__glo_hash_91table_91contains_127_srfi_113", __glo_hash_91table_91contains_127_srfi_113, __glo_hash_91table_91exists_127_srfi_69);
return_closcall1(data,(closure)&c_736621,  c_736718);; 
}

static void __lambda_749(void *data, object self_733075, int argc, object *args) /* object self_733075, object r_732419 */
 {

  
closureN_type c_736623;
object e_736711 [1];
c_736623.hdr.mark = gc_color_red;
 c_736623.hdr.grayed = 0;
c_736623.tag = closureN_tag;
 c_736623.fn = (function_type)__lambda_750;
c_736623.num_args = 1;
c_736623.num_elements = 1;
c_736623.elements = (object *)e_736711;
c_736623.elements[0] = ((closureN)self_733075)->elements[0];


make_pair(c_736714,quote_multi_127,NULL);c_736714.hdr.immutable = 1;

make_pair(c_736713,quote_comparator,&c_736714);c_736713.hdr.immutable = 1;

make_pair(c_736712,quote_hash_91table,&c_736713);c_736712.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_register_91simple_91type_scheme_base, (((closure)  __glo_register_91simple_91type_scheme_base)->fn),  &c_736623, quote_sob, boolean_f, &c_736712);; 
}

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


object c_736710 = global_set_cps_id(data,(closure)&c_736625,"__glo_sob_srfi_113", __glo_sob_srfi_113, r_732449);
return_closcall1(data,(closure)&c_736625,  c_736710);; 
}

static void __lambda_751(void *data, object self_733077, int argc, object *args) /* object self_733077, object r_732420 */
 {

  
closureN_type c_736627;
object e_736706 [1];
c_736627.hdr.mark = gc_color_red;
 c_736627.hdr.grayed = 0;
c_736627.tag = closureN_tag;
 c_736627.fn = (function_type)__lambda_752;
c_736627.num_args = 1;
c_736627.num_elements = 1;
c_736627.elements = (object *)e_736706;
c_736627.elements[0] = ((closureN)self_733077)->elements[0];

return_direct_with_clo3(data,  __glo_make_91type_91predicate_scheme_base, (((closure)  __glo_make_91type_91predicate_scheme_base)->fn),  &c_736627, obj_int2obj(0), quote_sob);; 
}

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


object c_736705 = global_set_cps_id(data,(closure)&c_736629,"__glo_sob_127_srfi_113", __glo_sob_127_srfi_113, r_732447);
return_closcall1(data,(closure)&c_736629,  c_736705);; 
}

static void __lambda_753(void *data, object self_733079, int argc, object *args) /* object self_733079, object r_732421 */
 {

  
closureN_type c_736631;
object e_736701 [1];
c_736631.hdr.mark = gc_color_red;
 c_736631.hdr.grayed = 0;
c_736631.tag = closureN_tag;
 c_736631.fn = (function_type)__lambda_754;
c_736631.num_args = 1;
c_736631.num_elements = 1;
c_736631.elements = (object *)e_736701;
c_736631.elements[0] = ((closureN)self_733079)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_736631, __glo_sob_srfi_113, quote_hash_91table);; 
}

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


make_utf8_string_with_len(c_736700, "sob-hash-table", 14, 14);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_736633, &c_736700, quote_sob, r_732445);; 
}

static void __lambda_755(void *data, object self_733081, int argc, object *args) /* object self_733081, object r_732443 */
 {
 object r_732443 = args[0];
  
closureN_type c_736635;
object e_736695 [1];
c_736635.hdr.mark = gc_color_red;
 c_736635.hdr.grayed = 0;
c_736635.tag = closureN_tag;
 c_736635.fn = (function_type)__lambda_756;
c_736635.num_args = 1;
c_736635.num_elements = 1;
c_736635.elements = (object *)e_736695;
c_736635.elements[0] = ((closureN)self_733081)->elements[0];


object c_736698 = global_set_cps_id(data,(closure)&c_736635,"__glo_sob_91hash_91table_srfi_113", __glo_sob_91hash_91table_srfi_113, r_732443);
return_closcall1(data,(closure)&c_736635,  c_736698);; 
}

static void __lambda_756(void *data, object self_733082, int argc, object *args) /* object self_733082, object r_732422 */
 {

  
closureN_type c_736637;
object e_736694 [1];
c_736637.hdr.mark = gc_color_red;
 c_736637.hdr.grayed = 0;
c_736637.tag = closureN_tag;
 c_736637.fn = (function_type)__lambda_757;
c_736637.num_args = 1;
c_736637.num_elements = 1;
c_736637.elements = (object *)e_736694;
c_736637.elements[0] = ((closureN)self_733082)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_736637, __glo_sob_srfi_113, quote_comparator);; 
}

static void __lambda_757(void *data, object self_733083, int argc, object *args) /* object self_733083, object r_732441 */
 {
 object r_732441 = args[0];
  
closureN_type c_736639;
object e_736692 [1];
c_736639.hdr.mark = gc_color_red;
 c_736639.hdr.grayed = 0;
c_736639.tag = closureN_tag;
 c_736639.fn = (function_type)__lambda_758;
c_736639.num_args = 1;
c_736639.num_elements = 1;
c_736639.elements = (object *)e_736692;
c_736639.elements[0] = ((closureN)self_733083)->elements[0];


make_utf8_string_with_len(c_736693, "sob-comparator", 14, 14);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_736639, &c_736693, quote_sob, r_732441);; 
}

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


object c_736691 = global_set_cps_id(data,(closure)&c_736641,"__glo_sob_91comparator_srfi_113", __glo_sob_91comparator_srfi_113, r_732439);
return_closcall1(data,(closure)&c_736641,  c_736691);; 
}

static void __lambda_759(void *data, object self_733085, int argc, object *args) /* object self_733085, object r_732423 */
 {

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

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_736643, __glo_sob_srfi_113, quote_multi_127);; 
}

static void __lambda_760(void *data, object self_733086, int argc, object *args) /* object self_733086, object r_732437 */
 {
 object r_732437 = args[0];
  
closureN_type c_736645;
object e_736685 [1];
c_736645.hdr.mark = gc_color_red;
 c_736645.hdr.grayed = 0;
c_736645.tag = closureN_tag;
 c_736645.fn = (function_type)__lambda_761;
c_736645.num_args = 1;
c_736645.num_elements = 1;
c_736645.elements = (object *)e_736685;
c_736645.elements[0] = ((closureN)self_733086)->elements[0];


make_utf8_string_with_len(c_736686, "sob-multi\?", 10, 10);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_736645, &c_736686, quote_sob, r_732437);; 
}

static void __lambda_761(void *data, object self_733087, int argc, object *args) /* object self_733087, object r_732435 */
 {
 object r_732435 = args[0];
  
closureN_type c_736647;
object e_736681 [1];
c_736647.hdr.mark = gc_color_red;
 c_736647.hdr.grayed = 0;
c_736647.tag = closureN_tag;
 c_736647.fn = (function_type)__lambda_762;
c_736647.num_args = 1;
c_736647.num_elements = 1;
c_736647.elements = (object *)e_736681;
c_736647.elements[0] = ((closureN)self_733087)->elements[0];


object c_736684 = global_set_cps_id(data,(closure)&c_736647,"__glo_sob_91multi_127_srfi_113", __glo_sob_91multi_127_srfi_113, r_732435);
return_closcall1(data,(closure)&c_736647,  c_736684);; 
}

static void __lambda_762(void *data, object self_733088, int argc, object *args) /* object self_733088, object r_732424 */
 {

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


make_utf8_string_with_len(c_736680, "missing", 7, 7);
return_direct_with_clo2(data,  __glo_string_91copy_scheme_base, (((closure)  __glo_string_91copy_scheme_base)->fn),  &c_736649, &c_736680);; 
}

static void __lambda_763(void *data, object self_733089, int argc, object *args) /* object self_733089, object r_732434 */
 {
 object r_732434 = args[0];
  
closureN_type c_736651;
object e_736675 [1];
c_736651.hdr.mark = gc_color_red;
 c_736651.hdr.grayed = 0;
c_736651.tag = closureN_tag;
 c_736651.fn = (function_type)__lambda_764;
c_736651.num_args = 1;
c_736651.num_elements = 1;
c_736651.elements = (object *)e_736675;
c_736651.elements[0] = ((closureN)self_733089)->elements[0];


object c_736678 = global_set_cps_id(data,(closure)&c_736651,"__glo_missing_srfi_113", __glo_missing_srfi_113, r_732434);
return_closcall1(data,(closure)&c_736651,  c_736678);; 
}

static void __lambda_764(void *data, object self_733090, int argc, object *args) /* object self_733090, object r_732428 */
 {

  
closureN_type c_736653;
object e_736674 [1];
c_736653.hdr.mark = gc_color_red;
 c_736653.hdr.grayed = 0;
c_736653.tag = closureN_tag;
 c_736653.fn = (function_type)__lambda_765;
c_736653.num_args = 1;
c_736653.num_elements = 1;
c_736653.elements = (object *)e_736674;
c_736653.elements[0] = ((closureN)self_733090)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_736653, __glo_set_127_srfi_113, __glo_set_123_127_srfi_113, boolean_f, __glo_sob_91hash_srfi_113);; 
}

static void __lambda_765(void *data, object self_733091, int argc, object *args) /* object self_733091, object r_732433 */
 {
 object r_732433 = args[0];
  
closureN_type c_736655;
object e_736670 [1];
c_736655.hdr.mark = gc_color_red;
 c_736655.hdr.grayed = 0;
c_736655.tag = closureN_tag;
 c_736655.fn = (function_type)__lambda_766;
c_736655.num_args = 1;
c_736655.num_elements = 1;
c_736655.elements = (object *)e_736670;
c_736655.elements[0] = ((closureN)self_733091)->elements[0];


object c_736673 = global_set_cps_id(data,(closure)&c_736655,"__glo_set_91comparator_srfi_113", __glo_set_91comparator_srfi_113, r_732433);
return_closcall1(data,(closure)&c_736655,  c_736673);; 
}

static void __lambda_766(void *data, object self_733092, int argc, object *args) /* object self_733092, object r_732429 */
 {

  
closureN_type c_736657;
object e_736669 [1];
c_736657.hdr.mark = gc_color_red;
 c_736657.hdr.grayed = 0;
c_736657.tag = closureN_tag;
 c_736657.fn = (function_type)__lambda_767;
c_736657.num_args = 1;
c_736657.num_elements = 1;
c_736657.elements = (object *)e_736669;
c_736657.elements[0] = ((closureN)self_733092)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_736657, __glo_bag_127_srfi_113, __glo_bag_123_127_srfi_113, boolean_f, __glo_sob_91hash_srfi_113);; 
}

static void __lambda_767(void *data, object self_733093, int argc, object *args) /* object self_733093, object r_732432 */
 {
 object r_732432 = args[0];
  
closureN_type c_736659;
object e_736665 [1];
c_736659.hdr.mark = gc_color_red;
 c_736659.hdr.grayed = 0;
c_736659.tag = closureN_tag;
 c_736659.fn = (function_type)__lambda_768;
c_736659.num_args = 1;
c_736659.num_elements = 1;
c_736659.elements = (object *)e_736665;
c_736659.elements[0] = ((closureN)self_733093)->elements[0];


object c_736668 = global_set_cps_id(data,(closure)&c_736659,"__glo_bag_91comparator_srfi_113", __glo_bag_91comparator_srfi_113, r_732432);
return_closcall1(data,(closure)&c_736659,  c_736668);; 
}

static void __lambda_768(void *data, object self_733094, int argc, object *args) /* object self_733094, object r_732430 */
 {

  
closureN_type c_736661;
object e_736664 [1];
c_736661.hdr.mark = gc_color_red;
 c_736661.hdr.grayed = 0;
c_736661.tag = closureN_tag;
 c_736661.fn = (function_type)__lambda_769;
c_736661.num_args = 1;
c_736661.num_elements = 1;
c_736661.elements = (object *)e_736664;
c_736661.elements[0] = ((closureN)self_733094)->elements[0];

return_direct_with_clo2(data,  __glo_comparator_91register_91default_67_srfi_128, (((closure)  __glo_comparator_91register_91default_67_srfi_128)->fn),  &c_736661, __glo_set_91comparator_srfi_113);; 
}

static void __lambda_769(void *data, object self_733095, int argc, object *args) /* object self_733095, object r_732431 */
 {

  return_direct_with_clo2(data,  __glo_comparator_91register_91default_67_srfi_128, (((closure)  __glo_comparator_91register_91default_67_srfi_128)->fn),  ((closureN)self_733095)->elements[0], __glo_bag_91comparator_srfi_113);; 
}

static void __lambda_741(void *data, object _, int argc, object *args) /* closure _,object k_732404, object sob_73630_731208 */
 {
object k_732404 = args[0]; object sob_73630_731208 = args[1];
  Cyc_st_add(data, "srfi/113.sld:sob-hash");

closureN_type c_736592;
object e_736618 [2];
c_736592.hdr.mark = gc_color_red;
 c_736592.hdr.grayed = 0;
c_736592.tag = closureN_tag;
 c_736592.fn = (function_type)__lambda_742;
c_736592.num_args = 1;
c_736592.num_elements = 2;
c_736592.elements = (object *)e_736618;
c_736592.elements[0] = k_732404;
c_736592.elements[1] = sob_73630_731208;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736592, sob_73630_731208);; 
}

static void __lambda_742(void *data, object self_733069, int argc, object *args) /* object self_733069, object ht_73633_731209 */
 {

  
closureN_type c_736594;
object e_736616 [2];
c_736594.hdr.mark = gc_color_red;
 c_736594.hdr.grayed = 0;
c_736594.tag = closureN_tag;
 c_736594.fn = (function_type)__lambda_743;
c_736594.num_args = 1;
c_736594.num_elements = 2;
c_736594.elements = (object *)e_736616;
c_736594.elements[0] = ((closureN)self_733069)->elements[0];
c_736594.elements[1] = ((closureN)self_733069)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_736594, ((closureN)self_733069)->elements[1]);; 
}

static void __lambda_743(void *data, object self_733070, int argc, object *args) /* object self_733070, object r_732410 */
 {
 object r_732410 = args[0];
  
closureN_type c_736596;
object e_736615 [2];
c_736596.hdr.mark = gc_color_red;
 c_736596.hdr.grayed = 0;
c_736596.tag = closureN_tag;
 c_736596.fn = (function_type)__lambda_744;
c_736596.num_args = 1;
c_736596.num_elements = 2;
c_736596.elements = (object *)e_736615;
c_736596.elements[0] = ((closureN)self_733070)->elements[0];
c_736596.elements[1] = ((closureN)self_733070)->elements[1];

return_direct_with_clo2(data,  __glo_comparator_91hash_91function_srfi_128, (((closure)  __glo_comparator_91hash_91function_srfi_128)->fn),  &c_736596, r_732410);; 
}

static void __lambda_744(void *data, object self_733071, int argc, object *args) /* object self_733071, object hash_73636_731210 */
 {
 object hash_73636_731210 = args[0];
  
closureN_type c_736598;
object e_736602 [2];
c_736598.hdr.mark = gc_color_red;
 c_736598.hdr.grayed = 0;
c_736598.tag = closureN_tag;
 c_736598.fn = (function_type)__lambda_745;
c_736598.num_args = 1;
c_736598.num_elements = 2;
c_736598.elements = (object *)e_736602;
c_736598.elements[0] = ((closureN)self_733071)->elements[0];
c_736598.elements[1] = ((closureN)self_733071)->elements[1];


closureN_type c_736603;
object e_736614 [1];
c_736603.hdr.mark = gc_color_red;
 c_736603.hdr.grayed = 0;
c_736603.tag = closureN_tag;
 c_736603.fn = (function_type)__lambda_746;
c_736603.num_args = 2;
c_736603.num_elements = 1;
c_736603.elements = (object *)e_736614;
c_736603.elements[0] = hash_73636_731210;

return_direct_with_clo1(data,(closure)&c_736598,__lambda_745,  &c_736603);; 
}

static void __lambda_746(void *data, object self_733072, int argc, object *args) /* object self_733072, object k_732408, object element_73638_731211, object result_73639_731212 */
 {
 object k_732408 = args[0]; object element_73638_731211 = args[1]; object result_73639_731212 = args[2];
  
closureN_type c_736606;
object e_736613 [2];
c_736606.hdr.mark = gc_color_red;
 c_736606.hdr.grayed = 0;
c_736606.tag = closureN_tag;
 c_736606.fn = (function_type)__lambda_747;
c_736606.num_args = 1;
c_736606.num_elements = 2;
c_736606.elements = (object *)e_736613;
c_736606.elements[0] = k_732408;
c_736606.elements[1] = result_73639_731212;

return_closcall2(data,  ((closureN)self_733072)->elements[0],  &c_736606, element_73638_731211);; 
}

static void __lambda_747(void *data, object self_733073, int argc, object *args) /* object self_733073, object r_732409 */
 {
 object r_732409 = args[0];
  
complex_num_type local_736611; 
return_direct_with_clo1(data,  ((closureN)self_733073)->elements[0], (((closure)  ((closureN)self_733073)->elements[0])->fn),  Cyc_fast_sum(data,&local_736611, r_732409, ((closureN)self_733073)->elements[1]));; 
}

static void __lambda_745(void *data, object self_733074, int argc, object *args) /* object self_733074, object r_732407 */
 {
 object r_732407 = args[0];
  return_direct_with_clo4(data,  __glo_sob_91fold_srfi_113, (((closure)  __glo_sob_91fold_srfi_113)->fn),  ((closureN)self_733074)->elements[0], r_732407, obj_int2obj(5381), ((closureN)self_733074)->elements[1]);; 
}

static void __lambda_734(void *data, object _, int argc, object *args) /* closure _,object k_732393, object comparator_73619_731202, object alist_73620_731203 */
 {
object k_732393 = args[0]; object comparator_73619_731202 = args[1]; object alist_73620_731203 = args[2];
  Cyc_st_add(data, "srfi/113.sld:alist->bag");

closureN_type c_736556;
object e_736589 [2];
c_736556.hdr.mark = gc_color_red;
 c_736556.hdr.grayed = 0;
c_736556.tag = closureN_tag;
 c_736556.fn = (function_type)__lambda_735;
c_736556.num_args = 1;
c_736556.num_elements = 2;
c_736556.elements = (object *)e_736589;
c_736556.elements[0] = alist_73620_731203;
c_736556.elements[1] = k_732393;

return_direct_with_clo2(data,  __glo_bag_srfi_113, (((closure)  __glo_bag_srfi_113)->fn),  &c_736556, comparator_73619_731202);; 
}

static void __lambda_735(void *data, object self_733063, int argc, object *args) /* object self_733063, object result_73623_731204 */
 {
 object result_73623_731204 = args[0];
  
closureN_type c_736558;
object e_736588 [3];
c_736558.hdr.mark = gc_color_red;
 c_736558.hdr.grayed = 0;
c_736558.tag = closureN_tag;
 c_736558.fn = (function_type)__lambda_736;
c_736558.num_args = 1;
c_736558.num_elements = 3;
c_736558.elements = (object *)e_736588;
c_736558.elements[0] = ((closureN)self_733063)->elements[0];
c_736558.elements[1] = ((closureN)self_733063)->elements[1];
c_736558.elements[2] = result_73623_731204;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736558, result_73623_731204);; 
}

static void __lambda_736(void *data, object self_733064, int argc, object *args) /* object self_733064, object ht_73626_731205 */
 {
 object ht_73626_731205 = args[0];
  
closureN_type c_736560;
object e_736568 [3];
c_736560.hdr.mark = gc_color_red;
 c_736560.hdr.grayed = 0;
c_736560.tag = closureN_tag;
 c_736560.fn = (function_type)__lambda_737;
c_736560.num_args = 1;
c_736560.num_elements = 3;
c_736560.elements = (object *)e_736568;
c_736560.elements[0] = ((closureN)self_733064)->elements[0];
c_736560.elements[1] = ((closureN)self_733064)->elements[1];
c_736560.elements[2] = ((closureN)self_733064)->elements[2];


closureN_type c_736569;
object e_736587 [2];
c_736569.hdr.mark = gc_color_red;
 c_736569.hdr.grayed = 0;
c_736569.tag = closureN_tag;
 c_736569.fn = (function_type)__lambda_739;
c_736569.num_args = 1;
c_736569.num_elements = 2;
c_736569.elements = (object *)e_736587;
c_736569.elements[0] = ht_73626_731205;
c_736569.elements[1] = ((closureN)self_733064)->elements[2];

return_direct_with_clo1(data,(closure)&c_736560,__lambda_737,  &c_736569);; 
}

static void __lambda_739(void *data, object self_733065, int argc, object *args) /* object self_733065, object k_732398, object assoc_73628_731206 */
 {
 object k_732398 = args[0]; object assoc_73628_731206 = args[1];
  
closureN_type c_736571;
object e_736583 [3];
c_736571.hdr.mark = gc_color_red;
 c_736571.hdr.grayed = 0;
c_736571.tag = closureN_tag;
 c_736571.fn = (function_type)__lambda_740;
c_736571.num_args = 1;
c_736571.num_elements = 3;
c_736571.elements = (object *)e_736583;
c_736571.elements[0] = assoc_73628_731206;
c_736571.elements[1] = k_732398;
c_736571.elements[2] = ((closureN)self_733065)->elements[1];



return_direct_with_clo3(data,  __glo_hash_91table_91contains_127_srfi_113, (((closure)  __glo_hash_91table_91contains_127_srfi_113)->fn),  &c_736571, ((closureN)self_733065)->elements[0], Cyc_car(data, assoc_73628_731206));; 
}

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



return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  ((closureN)self_733066)->elements[1], ((closureN)self_733066)->elements[2], Cyc_car(data, ((closureN)self_733066)->elements[0]), Cyc_cdr(data, ((closureN)self_733066)->elements[0]));}
;; 
}

static void __lambda_737(void *data, object self_733067, int argc, object *args) /* object self_733067, object r_732397 */
 {
 object r_732397 = args[0];
  
closureN_type c_736562;
object e_736566 [2];
c_736562.hdr.mark = gc_color_red;
 c_736562.hdr.grayed = 0;
c_736562.tag = closureN_tag;
 c_736562.fn = (function_type)__lambda_738;
c_736562.num_args = 1;
c_736562.num_elements = 2;
c_736562.elements = (object *)e_736566;
c_736562.elements[0] = ((closureN)self_733067)->elements[1];
c_736562.elements[1] = ((closureN)self_733067)->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_736562, r_732397, ((closureN)self_733067)->elements[0]);; 
}

static void __lambda_738(void *data, object self_733068, int argc, object *args) /* object self_733068, object r_732396 */
 {

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

static void __lambda_730(void *data, object _, int argc, object *args) /* closure _,object k_732385, object bag_73615_731198 */
 {
object k_732385 = args[0]; object bag_73615_731198 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag->alist");

closureN_type c_736538;
object e_736553 [2];
c_736538.hdr.mark = gc_color_red;
 c_736538.hdr.grayed = 0;
c_736538.tag = closureN_tag;
 c_736538.fn = (function_type)__lambda_731;
c_736538.num_args = 1;
c_736538.num_elements = 2;
c_736538.elements = (object *)e_736553;
c_736538.elements[0] = bag_73615_731198;
c_736538.elements[1] = k_732385;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736538, bag_73615_731198);; 
}

static void __lambda_731(void *data, object self_733060, int argc, object *args) /* object self_733060, object r_732386 */
 {

  
closureN_type c_736540;
object e_736544 [2];
c_736540.hdr.mark = gc_color_red;
 c_736540.hdr.grayed = 0;
c_736540.tag = closureN_tag;
 c_736540.fn = (function_type)__lambda_732;
c_736540.num_args = 1;
c_736540.num_elements = 2;
c_736540.elements = (object *)e_736544;
c_736540.elements[0] = ((closureN)self_733060)->elements[0];
c_736540.elements[1] = ((closureN)self_733060)->elements[1];


mclosure0(c_736545, (function_type)__lambda_733);c_736545.num_args = 3;
return_direct_with_clo1(data,(closure)&c_736540,__lambda_732,  &c_736545);; 
}

static void __lambda_733(void *data, object self_733061, int argc, object *args) /* object self_733061, object k_732389, object elem_73616_731199, object count_73617_731200, object list_73618_731201 */
 {
 object k_732389 = args[0]; object elem_73616_731199 = args[1]; object count_73617_731200 = args[2]; object list_73618_731201 = args[3];
  
pair_type local_736549; 

pair_type local_736552; 
return_direct_with_clo1(data,  k_732389, (((closure)  k_732389)->fn),  set_pair_as_expr(&local_736549, set_pair_as_expr(&local_736552, elem_73616_731199, count_73617_731200), list_73618_731201));; 
}

static void __lambda_732(void *data, object self_733062, int argc, object *args) /* object self_733062, object r_732387 */
 {
 object r_732387 = args[0];
  return_direct_with_clo4(data,  __glo_bag_91fold_91unique_srfi_113, (((closure)  __glo_bag_91fold_91unique_srfi_113)->fn),  ((closureN)self_733062)->elements[1], r_732387, NULL, ((closureN)self_733062)->elements[0]);; 
}

static void __lambda_722(void *data, object _, int argc, object *args) /* closure _,object k_732375, object bag_73611_731194, object set_73612_731195 */
 {
object k_732375 = args[0]; object bag_73611_731194 = args[1]; object set_73612_731195 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set->bag!");

closureN_type c_736507;
object e_736535 [3];
c_736507.hdr.mark = gc_color_red;
 c_736507.hdr.grayed = 0;
c_736507.tag = closureN_tag;
 c_736507.fn = (function_type)__lambda_723;
c_736507.num_args = 1;
c_736507.num_elements = 3;
c_736507.elements = (object *)e_736535;
c_736507.elements[0] = bag_73611_731194;
c_736507.elements[1] = k_732375;
c_736507.elements[2] = set_73612_731195;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736507, bag_73611_731194);; 
}

static void __lambda_723(void *data, object self_733053, int argc, object *args) /* object self_733053, object r_732376 */
 {

  
closureN_type c_736509;
object e_736533 [3];
c_736509.hdr.mark = gc_color_red;
 c_736509.hdr.grayed = 0;
c_736509.tag = closureN_tag;
 c_736509.fn = (function_type)__lambda_724;
c_736509.num_args = 1;
c_736509.num_elements = 3;
c_736509.elements = (object *)e_736533;
c_736509.elements[0] = ((closureN)self_733053)->elements[0];
c_736509.elements[1] = ((closureN)self_733053)->elements[1];
c_736509.elements[2] = ((closureN)self_733053)->elements[2];

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_736509, ((closureN)self_733053)->elements[2]);; 
}

static void __lambda_724(void *data, object self_733054, int argc, object *args) /* object self_733054, object r_732377 */
 {

  
closureN_type c_736511;
object e_736530 [3];
c_736511.hdr.mark = gc_color_red;
 c_736511.hdr.grayed = 0;
c_736511.tag = closureN_tag;
 c_736511.fn = (function_type)__lambda_725;
c_736511.num_args = 1;
c_736511.num_elements = 3;
c_736511.elements = (object *)e_736530;
c_736511.elements[0] = ((closureN)self_733054)->elements[0];
c_736511.elements[1] = ((closureN)self_733054)->elements[1];
c_736511.elements[2] = ((closureN)self_733054)->elements[2];

return_direct_with_clo3(data,  __glo_check_91same_91comparator_srfi_113, (((closure)  __glo_check_91same_91comparator_srfi_113)->fn),  &c_736511, ((closureN)self_733054)->elements[2], ((closureN)self_733054)->elements[0]);; 
}

static void __lambda_725(void *data, object self_733055, int argc, object *args) /* object self_733055, object r_732378 */
 {

  
closureN_type c_736513;
object e_736525 [3];
c_736513.hdr.mark = gc_color_red;
 c_736513.hdr.grayed = 0;
c_736513.tag = closureN_tag;
 c_736513.fn = (function_type)__lambda_726;
c_736513.num_args = 1;
c_736513.num_elements = 3;
c_736513.elements = (object *)e_736525;
c_736513.elements[0] = ((closureN)self_733055)->elements[0];
c_736513.elements[1] = ((closureN)self_733055)->elements[1];
c_736513.elements[2] = ((closureN)self_733055)->elements[2];


closureN_type c_736526;
object e_736529 [1];
c_736526.hdr.mark = gc_color_red;
 c_736526.hdr.grayed = 0;
c_736526.tag = closureN_tag;
 c_736526.fn = (function_type)__lambda_729;
c_736526.num_args = 2;
c_736526.num_elements = 1;
c_736526.elements = (object *)e_736529;
c_736526.elements[0] = ((closureN)self_733055)->elements[0];

return_direct_with_clo1(data,(closure)&c_736513,__lambda_726,  &c_736526);; 
}

static void __lambda_729(void *data, object self_733056, int argc, object *args) /* object self_733056, object k_732382, object key_73613_731196, object value_73614_731197 */
 {
 object k_732382 = args[0]; object key_73613_731196 = args[1]; object value_73614_731197 = args[2];
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  k_732382, ((closureN)self_733056)->elements[0], key_73613_731196, value_73614_731197);; 
}

static void __lambda_726(void *data, object self_733057, int argc, object *args) /* object self_733057, object r_732380 */
 {
 object r_732380 = args[0];
  
closureN_type c_736515;
object e_736523 [3];
c_736515.hdr.mark = gc_color_red;
 c_736515.hdr.grayed = 0;
c_736515.tag = closureN_tag;
 c_736515.fn = (function_type)__lambda_727;
c_736515.num_args = 1;
c_736515.num_elements = 3;
c_736515.elements = (object *)e_736523;
c_736515.elements[0] = ((closureN)self_733057)->elements[0];
c_736515.elements[1] = ((closureN)self_733057)->elements[1];
c_736515.elements[2] = r_732380;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736515, ((closureN)self_733057)->elements[2]);; 
}

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

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_736517, r_732381, ((closureN)self_733058)->elements[2]);; 
}

static void __lambda_728(void *data, object self_733059, int argc, object *args) /* object self_733059, object r_732379_732495 */
 {

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

static void __lambda_714(void *data, object _, int argc, object *args) /* closure _,object k_732365, object set_73607_731190 */
 {
object k_732365 = args[0]; object set_73607_731190 = args[1];
  Cyc_st_add(data, "srfi/113.sld:set->bag");

closureN_type c_736478;
object e_736504 [2];
c_736478.hdr.mark = gc_color_red;
 c_736478.hdr.grayed = 0;
c_736478.tag = closureN_tag;
 c_736478.fn = (function_type)__lambda_715;
c_736478.num_args = 1;
c_736478.num_elements = 2;
c_736478.elements = (object *)e_736504;
c_736478.elements[0] = k_732365;
c_736478.elements[1] = set_73607_731190;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_736478, set_73607_731190);; 
}

static void __lambda_715(void *data, object self_733046, int argc, object *args) /* object self_733046, object r_732366 */
 {

  
closureN_type c_736480;
object e_736502 [2];
c_736480.hdr.mark = gc_color_red;
 c_736480.hdr.grayed = 0;
c_736480.tag = closureN_tag;
 c_736480.fn = (function_type)__lambda_716;
c_736480.num_args = 1;
c_736480.num_elements = 2;
c_736480.elements = (object *)e_736502;
c_736480.elements[0] = ((closureN)self_733046)->elements[0];
c_736480.elements[1] = ((closureN)self_733046)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_736480, ((closureN)self_733046)->elements[1]);; 
}

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

return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  &c_736482, r_732372, boolean_t);; 
}

static void __lambda_717(void *data, object self_733048, int argc, object *args) /* object self_733048, object result_73608_731191 */
 {
 object result_73608_731191 = args[0];
  
closureN_type c_736484;
object e_736496 [3];
c_736484.hdr.mark = gc_color_red;
 c_736484.hdr.grayed = 0;
c_736484.tag = closureN_tag;
 c_736484.fn = (function_type)__lambda_718;
c_736484.num_args = 1;
c_736484.num_elements = 3;
c_736484.elements = (object *)e_736496;
c_736484.elements[0] = ((closureN)self_733048)->elements[0];
c_736484.elements[1] = result_73608_731191;
c_736484.elements[2] = ((closureN)self_733048)->elements[1];


closureN_type c_736497;
object e_736500 [1];
c_736497.hdr.mark = gc_color_red;
 c_736497.hdr.grayed = 0;
c_736497.tag = closureN_tag;
 c_736497.fn = (function_type)__lambda_721;
c_736497.num_args = 2;
c_736497.num_elements = 1;
c_736497.elements = (object *)e_736500;
c_736497.elements[0] = result_73608_731191;

return_direct_with_clo1(data,(closure)&c_736484,__lambda_718,  &c_736497);; 
}

static void __lambda_721(void *data, object self_733049, int argc, object *args) /* object self_733049, object k_732371, object key_73609_731192, object value_73610_731193 */
 {
 object k_732371 = args[0]; object key_73609_731192 = args[1]; object value_73610_731193 = args[2];
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  k_732371, ((closureN)self_733049)->elements[0], key_73609_731192, value_73610_731193);; 
}

static void __lambda_718(void *data, object self_733050, int argc, object *args) /* object self_733050, object r_732369 */
 {
 object r_732369 = args[0];
  
closureN_type c_736486;
object e_736494 [3];
c_736486.hdr.mark = gc_color_red;
 c_736486.hdr.grayed = 0;
c_736486.tag = closureN_tag;
 c_736486.fn = (function_type)__lambda_719;
c_736486.num_args = 1;
c_736486.num_elements = 3;
c_736486.elements = (object *)e_736494;
c_736486.elements[0] = ((closureN)self_733050)->elements[0];
c_736486.elements[1] = r_732369;
c_736486.elements[2] = ((closureN)self_733050)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736486, ((closureN)self_733050)->elements[2]);; 
}

static void __lambda_719(void *data, object self_733051, int argc, object *args) /* object self_733051, object r_732370 */
 {
 object r_732370 = args[0];
  
closureN_type c_736488;
object e_736492 [2];
c_736488.hdr.mark = gc_color_red;
 c_736488.hdr.grayed = 0;
c_736488.tag = closureN_tag;
 c_736488.fn = (function_type)__lambda_720;
c_736488.num_args = 1;
c_736488.num_elements = 2;
c_736488.elements = (object *)e_736492;
c_736488.elements[0] = ((closureN)self_733051)->elements[0];
c_736488.elements[1] = ((closureN)self_733051)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_736488, r_732370, ((closureN)self_733051)->elements[1]);; 
}

static void __lambda_720(void *data, object self_733052, int argc, object *args) /* object self_733052, object r_732368_732494 */
 {

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

static void __lambda_706(void *data, object _, int argc, object *args) /* closure _,object k_732355, object bag_73603_731186 */
 {
object k_732355 = args[0]; object bag_73603_731186 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag->set");

closureN_type c_736449;
object e_736475 [2];
c_736449.hdr.mark = gc_color_red;
 c_736449.hdr.grayed = 0;
c_736449.tag = closureN_tag;
 c_736449.fn = (function_type)__lambda_707;
c_736449.num_args = 1;
c_736449.num_elements = 2;
c_736449.elements = (object *)e_736475;
c_736449.elements[0] = bag_73603_731186;
c_736449.elements[1] = k_732355;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736449, bag_73603_731186);; 
}

static void __lambda_707(void *data, object self_733039, int argc, object *args) /* object self_733039, object r_732356 */
 {

  
closureN_type c_736451;
object e_736473 [2];
c_736451.hdr.mark = gc_color_red;
 c_736451.hdr.grayed = 0;
c_736451.tag = closureN_tag;
 c_736451.fn = (function_type)__lambda_708;
c_736451.num_args = 1;
c_736451.num_elements = 2;
c_736451.elements = (object *)e_736473;
c_736451.elements[0] = ((closureN)self_733039)->elements[0];
c_736451.elements[1] = ((closureN)self_733039)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_736451, ((closureN)self_733039)->elements[0]);; 
}

static void __lambda_708(void *data, object self_733040, int argc, object *args) /* object self_733040, object r_732362 */
 {
 object r_732362 = args[0];
  
closureN_type c_736453;
object e_736472 [2];
c_736453.hdr.mark = gc_color_red;
 c_736453.hdr.grayed = 0;
c_736453.tag = closureN_tag;
 c_736453.fn = (function_type)__lambda_709;
c_736453.num_args = 1;
c_736453.num_elements = 2;
c_736453.elements = (object *)e_736472;
c_736453.elements[0] = ((closureN)self_733040)->elements[0];
c_736453.elements[1] = ((closureN)self_733040)->elements[1];

return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  &c_736453, r_732362, boolean_f);; 
}

static void __lambda_709(void *data, object self_733041, int argc, object *args) /* object self_733041, object result_73604_731187 */
 {
 object result_73604_731187 = args[0];
  
closureN_type c_736455;
object e_736467 [3];
c_736455.hdr.mark = gc_color_red;
 c_736455.hdr.grayed = 0;
c_736455.tag = closureN_tag;
 c_736455.fn = (function_type)__lambda_710;
c_736455.num_args = 1;
c_736455.num_elements = 3;
c_736455.elements = (object *)e_736467;
c_736455.elements[0] = ((closureN)self_733041)->elements[0];
c_736455.elements[1] = ((closureN)self_733041)->elements[1];
c_736455.elements[2] = result_73604_731187;


closureN_type c_736468;
object e_736471 [1];
c_736468.hdr.mark = gc_color_red;
 c_736468.hdr.grayed = 0;
c_736468.tag = closureN_tag;
 c_736468.fn = (function_type)__lambda_713;
c_736468.num_args = 2;
c_736468.num_elements = 1;
c_736468.elements = (object *)e_736471;
c_736468.elements[0] = result_73604_731187;

return_direct_with_clo1(data,(closure)&c_736455,__lambda_710,  &c_736468);; 
}

static void __lambda_713(void *data, object self_733042, int argc, object *args) /* object self_733042, object k_732361, object key_73605_731188, object value_73606_731189 */
 {
 object k_732361 = args[0]; object key_73605_731188 = args[1]; object value_73606_731189 = args[2];
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  k_732361, ((closureN)self_733042)->elements[0], key_73605_731188, value_73606_731189);; 
}

static void __lambda_710(void *data, object self_733043, int argc, object *args) /* object self_733043, object r_732359 */
 {
 object r_732359 = args[0];
  
closureN_type c_736457;
object e_736465 [3];
c_736457.hdr.mark = gc_color_red;
 c_736457.hdr.grayed = 0;
c_736457.tag = closureN_tag;
 c_736457.fn = (function_type)__lambda_711;
c_736457.num_args = 1;
c_736457.num_elements = 3;
c_736457.elements = (object *)e_736465;
c_736457.elements[0] = ((closureN)self_733043)->elements[1];
c_736457.elements[1] = r_732359;
c_736457.elements[2] = ((closureN)self_733043)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736457, ((closureN)self_733043)->elements[0]);; 
}

static void __lambda_711(void *data, object self_733044, int argc, object *args) /* object self_733044, object r_732360 */
 {
 object r_732360 = args[0];
  
closureN_type c_736459;
object e_736463 [2];
c_736459.hdr.mark = gc_color_red;
 c_736459.hdr.grayed = 0;
c_736459.tag = closureN_tag;
 c_736459.fn = (function_type)__lambda_712;
c_736459.num_args = 1;
c_736459.num_elements = 2;
c_736459.elements = (object *)e_736463;
c_736459.elements[0] = ((closureN)self_733044)->elements[0];
c_736459.elements[1] = ((closureN)self_733044)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_736459, r_732360, ((closureN)self_733044)->elements[1]);; 
}

static void __lambda_712(void *data, object self_733045, int argc, object *args) /* object self_733045, object r_732358_732493 */
 {

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

static void __lambda_698(void *data, object _, int argc, object *args) /* closure _,object k_732346, object proc_73597_731180, object nil_73598_731181, object bag_73599_731182 */
 {
object k_732346 = args[0]; object proc_73597_731180 = args[1]; object nil_73598_731181 = args[2]; object bag_73599_731182 = args[3];
  Cyc_st_add(data, "srfi/113.sld:bag-fold-unique");

closureN_type c_736405;
object e_736446 [4];
c_736405.hdr.mark = gc_color_red;
 c_736405.hdr.grayed = 0;
c_736405.tag = closureN_tag;
 c_736405.fn = (function_type)__lambda_699;
c_736405.num_args = 1;
c_736405.num_elements = 4;
c_736405.elements = (object *)e_736446;
c_736405.elements[0] = bag_73599_731182;
c_736405.elements[1] = k_732346;
c_736405.elements[2] = nil_73598_731181;
c_736405.elements[3] = proc_73597_731180;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736405, bag_73599_731182);; 
}

static void __lambda_699(void *data, object self_733031, int argc, object *args) /* object self_733031, object r_732347 */
 {

  
closureN_type c_736407;
object e_736444 [3];
c_736407.hdr.mark = gc_color_red;
 c_736407.hdr.grayed = 0;
c_736407.tag = closureN_tag;
 c_736407.fn = (function_type)__lambda_700;
c_736407.num_args = 1;
c_736407.num_elements = 3;
c_736407.elements = (object *)e_736444;
c_736407.elements[0] = ((closureN)self_733031)->elements[0];
c_736407.elements[1] = ((closureN)self_733031)->elements[1];
c_736407.elements[2] = ((closureN)self_733031)->elements[3];

return_direct_with_clo1(data,(closure)&c_736407,__lambda_700,  ((closureN)self_733031)->elements[2]);; 
}

static void __lambda_700(void *data, object self_733032, int argc, object *args) /* object self_733032, object result_73600_731183 */
 {
 object result_73600_731183 = args[0];
  
closureN_type c_736409;
object e_736440 [3];
c_736409.hdr.mark = gc_color_red;
 c_736409.hdr.grayed = 0;
c_736409.tag = closureN_tag;
 c_736409.fn = (function_type)__lambda_780;
c_736409.num_args = 1;
c_736409.num_elements = 3;
c_736409.elements = (object *)e_736440;
c_736409.elements[0] = ((closureN)self_733032)->elements[0];
c_736409.elements[1] = ((closureN)self_733032)->elements[1];
c_736409.elements[2] = ((closureN)self_733032)->elements[2];


pair_type local_736443; 
return_direct_with_clo1(data,(closure)&c_736409,__lambda_780,  set_cell_as_expr(&local_736443, result_73600_731183));; 
}

static void __lambda_780(void *data, object self_733033, int argc, object *args) /* object self_733033, object result_73600_731183 */
 {
 object result_73600_731183 = args[0];
  
closureN_type c_736411;
object e_736425 [3];
c_736411.hdr.mark = gc_color_red;
 c_736411.hdr.grayed = 0;
c_736411.tag = closureN_tag;
 c_736411.fn = (function_type)__lambda_701;
c_736411.num_args = 1;
c_736411.num_elements = 3;
c_736411.elements = (object *)e_736425;
c_736411.elements[0] = ((closureN)self_733033)->elements[0];
c_736411.elements[1] = ((closureN)self_733033)->elements[1];
c_736411.elements[2] = result_73600_731183;


closureN_type c_736426;
object e_736439 [2];
c_736426.hdr.mark = gc_color_red;
 c_736426.hdr.grayed = 0;
c_736426.tag = closureN_tag;
 c_736426.fn = (function_type)__lambda_704;
c_736426.num_args = 2;
c_736426.num_elements = 2;
c_736426.elements = (object *)e_736439;
c_736426.elements[0] = ((closureN)self_733033)->elements[2];
c_736426.elements[1] = result_73600_731183;

return_direct_with_clo1(data,(closure)&c_736411,__lambda_701,  &c_736426);; 
}

static void __lambda_704(void *data, object self_733034, int argc, object *args) /* object self_733034, object k_732351, object elem_73601_731184, object count_73602_731185 */
 {
 object k_732351 = args[0]; object elem_73601_731184 = args[1]; object count_73602_731185 = args[2];
  
closureN_type c_736429;
object e_736435 [2];
c_736429.hdr.mark = gc_color_red;
 c_736429.hdr.grayed = 0;
c_736429.tag = closureN_tag;
 c_736429.fn = (function_type)__lambda_705;
c_736429.num_args = 1;
c_736429.num_elements = 2;
c_736429.elements = (object *)e_736435;
c_736429.elements[0] = k_732351;
c_736429.elements[1] = ((closureN)self_733034)->elements[1];



return_closcall4(data,  ((closureN)self_733034)->elements[0],  &c_736429, elem_73601_731184, count_73602_731185, car(((closureN)self_733034)->elements[1]));; 
}

static void __lambda_705(void *data, object self_733035, int argc, object *args) /* object self_733035, object r_732352 */
 {
 object r_732352 = args[0];
  

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

static void __lambda_701(void *data, object self_733036, int argc, object *args) /* object self_733036, object r_732349 */
 {
 object r_732349 = args[0];
  
closureN_type c_736413;
object e_736423 [3];
c_736413.hdr.mark = gc_color_red;
 c_736413.hdr.grayed = 0;
c_736413.tag = closureN_tag;
 c_736413.fn = (function_type)__lambda_702;
c_736413.num_args = 1;
c_736413.num_elements = 3;
c_736413.elements = (object *)e_736423;
c_736413.elements[0] = ((closureN)self_733036)->elements[1];
c_736413.elements[1] = r_732349;
c_736413.elements[2] = ((closureN)self_733036)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736413, ((closureN)self_733036)->elements[0]);; 
}

static void __lambda_702(void *data, object self_733037, int argc, object *args) /* object self_733037, object r_732350 */
 {
 object r_732350 = args[0];
  
closureN_type c_736415;
object e_736421 [2];
c_736415.hdr.mark = gc_color_red;
 c_736415.hdr.grayed = 0;
c_736415.tag = closureN_tag;
 c_736415.fn = (function_type)__lambda_703;
c_736415.num_args = 1;
c_736415.num_elements = 2;
c_736415.elements = (object *)e_736421;
c_736415.elements[0] = ((closureN)self_733037)->elements[0];
c_736415.elements[1] = ((closureN)self_733037)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_736415, r_732350, ((closureN)self_733037)->elements[1]);; 
}

static void __lambda_703(void *data, object self_733038, int argc, object *args) /* object self_733038, object r_732348_732492 */
 {

  

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

static void __lambda_693(void *data, object _, int argc, object *args) /* closure _,object k_732339, object proc_73593_731176, object bag_73594_731177 */
 {
object k_732339 = args[0]; object proc_73593_731176 = args[1]; object bag_73594_731177 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-for-each-unique");

closureN_type c_736387;
object e_736402 [3];
c_736387.hdr.mark = gc_color_red;
 c_736387.hdr.grayed = 0;
c_736387.tag = closureN_tag;
 c_736387.fn = (function_type)__lambda_694;
c_736387.num_args = 1;
c_736387.num_elements = 3;
c_736387.elements = (object *)e_736402;
c_736387.elements[0] = bag_73594_731177;
c_736387.elements[1] = k_732339;
c_736387.elements[2] = proc_73593_731176;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736387, bag_73594_731177);; 
}

static void __lambda_694(void *data, object self_733027, int argc, object *args) /* object self_733027, object r_732340 */
 {

  
closureN_type c_736389;
object e_736397 [2];
c_736389.hdr.mark = gc_color_red;
 c_736389.hdr.grayed = 0;
c_736389.tag = closureN_tag;
 c_736389.fn = (function_type)__lambda_695;
c_736389.num_args = 1;
c_736389.num_elements = 2;
c_736389.elements = (object *)e_736397;
c_736389.elements[0] = ((closureN)self_733027)->elements[0];
c_736389.elements[1] = ((closureN)self_733027)->elements[1];


closureN_type c_736398;
object e_736401 [1];
c_736398.hdr.mark = gc_color_red;
 c_736398.hdr.grayed = 0;
c_736398.tag = closureN_tag;
 c_736398.fn = (function_type)__lambda_697;
c_736398.num_args = 2;
c_736398.num_elements = 1;
c_736398.elements = (object *)e_736401;
c_736398.elements[0] = ((closureN)self_733027)->elements[2];

return_direct_with_clo1(data,(closure)&c_736389,__lambda_695,  &c_736398);; 
}

static void __lambda_697(void *data, object self_733028, int argc, object *args) /* object self_733028, object k_732343, object key_73595_731178, object value_73596_731179 */
 {
 object k_732343 = args[0]; object key_73595_731178 = args[1]; object value_73596_731179 = args[2];
  return_closcall3(data,  ((closureN)self_733028)->elements[0],  k_732343, key_73595_731178, value_73596_731179);; 
}

static void __lambda_695(void *data, object self_733029, int argc, object *args) /* object self_733029, object r_732341 */
 {
 object r_732341 = args[0];
  
closureN_type c_736391;
object e_736395 [2];
c_736391.hdr.mark = gc_color_red;
 c_736391.hdr.grayed = 0;
c_736391.tag = closureN_tag;
 c_736391.fn = (function_type)__lambda_696;
c_736391.num_args = 1;
c_736391.num_elements = 2;
c_736391.elements = (object *)e_736395;
c_736391.elements[0] = ((closureN)self_733029)->elements[1];
c_736391.elements[1] = r_732341;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736391, ((closureN)self_733029)->elements[0]);; 
}

static void __lambda_696(void *data, object self_733030, int argc, object *args) /* object self_733030, object r_732342 */
 {
 object r_732342 = args[0];
  return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  ((closureN)self_733030)->elements[0], r_732342, ((closureN)self_733030)->elements[1]);; 
}

static void __lambda_690(void *data, object _, int argc, object *args) /* closure _,object k_732334, object bag_73591_731174, object elem_73592_731175 */
 {
object k_732334 = args[0]; object bag_73591_731174 = args[1]; object elem_73592_731175 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-element-count");

closureN_type c_736376;
object e_736384 [3];
c_736376.hdr.mark = gc_color_red;
 c_736376.hdr.grayed = 0;
c_736376.tag = closureN_tag;
 c_736376.fn = (function_type)__lambda_691;
c_736376.num_args = 1;
c_736376.num_elements = 3;
c_736376.elements = (object *)e_736384;
c_736376.elements[0] = bag_73591_731174;
c_736376.elements[1] = elem_73592_731175;
c_736376.elements[2] = k_732334;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736376, bag_73591_731174);; 
}

static void __lambda_691(void *data, object self_733025, int argc, object *args) /* object self_733025, object r_732335 */
 {

  
closureN_type c_736378;
object e_736382 [2];
c_736378.hdr.mark = gc_color_red;
 c_736378.hdr.grayed = 0;
c_736378.tag = closureN_tag;
 c_736378.fn = (function_type)__lambda_692;
c_736378.num_args = 1;
c_736378.num_elements = 2;
c_736378.elements = (object *)e_736382;
c_736378.elements[0] = ((closureN)self_733025)->elements[1];
c_736378.elements[1] = ((closureN)self_733025)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736378, ((closureN)self_733025)->elements[0]);; 
}

static void __lambda_692(void *data, object self_733026, int argc, object *args) /* object self_733026, object r_732336 */
 {
 object r_732336 = args[0];
  return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  ((closureN)self_733026)->elements[1], r_732336, ((closureN)self_733026)->elements[0], obj_int2obj(0));; 
}

static void __lambda_687(void *data, object _, int argc, object *args) /* closure _,object k_732329, object bag_73590_731173 */
 {
object k_732329 = args[0]; object bag_73590_731173 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag-unique-size");

closureN_type c_736366;
object e_736373 [2];
c_736366.hdr.mark = gc_color_red;
 c_736366.hdr.grayed = 0;
c_736366.tag = closureN_tag;
 c_736366.fn = (function_type)__lambda_688;
c_736366.num_args = 1;
c_736366.num_elements = 2;
c_736366.elements = (object *)e_736373;
c_736366.elements[0] = bag_73590_731173;
c_736366.elements[1] = k_732329;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736366, bag_73590_731173);; 
}

static void __lambda_688(void *data, object self_733023, int argc, object *args) /* object self_733023, object r_732330 */
 {

  
closureN_type c_736368;
object e_736371 [1];
c_736368.hdr.mark = gc_color_red;
 c_736368.hdr.grayed = 0;
c_736368.tag = closureN_tag;
 c_736368.fn = (function_type)__lambda_689;
c_736368.num_args = 1;
c_736368.num_elements = 1;
c_736368.elements = (object *)e_736371;
c_736368.elements[0] = ((closureN)self_733023)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736368, ((closureN)self_733023)->elements[0]);; 
}

static void __lambda_689(void *data, object self_733024, int argc, object *args) /* object self_733024, object r_732331 */
 {
 object r_732331 = args[0];
  return_direct_with_clo2(data,  __glo_hash_91table_91size_srfi_69, (((closure)  __glo_hash_91table_91size_srfi_69)->fn),  ((closureN)self_733024)->elements[0], r_732331);; 
}

static void __lambda_684(void *data, object _, int argc, object *args) /* closure _,object k_732324, object n_73588_731171, object bag_73589_731172 */
 {
object k_732324 = args[0]; object n_73588_731171 = args[1]; object bag_73589_731172 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-product!");

closureN_type c_736353;
object e_736363 [3];
c_736353.hdr.mark = gc_color_red;
 c_736353.hdr.grayed = 0;
c_736353.tag = closureN_tag;
 c_736353.fn = (function_type)__lambda_685;
c_736353.num_args = 1;
c_736353.num_elements = 3;
c_736353.elements = (object *)e_736363;
c_736353.elements[0] = bag_73589_731172;
c_736353.elements[1] = k_732324;
c_736353.elements[2] = n_73588_731171;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736353, bag_73589_731172);; 
}

static void __lambda_685(void *data, object self_733021, int argc, object *args) /* object self_733021, object r_732325 */
 {

  
closureN_type c_736355;
object e_736361 [3];
c_736355.hdr.mark = gc_color_red;
 c_736355.hdr.grayed = 0;
c_736355.tag = closureN_tag;
 c_736355.fn = (function_type)__lambda_686;
c_736355.num_args = 1;
c_736355.num_elements = 3;
c_736355.elements = (object *)e_736361;
c_736355.elements[0] = ((closureN)self_733021)->elements[0];
c_736355.elements[1] = ((closureN)self_733021)->elements[1];
c_736355.elements[2] = ((closureN)self_733021)->elements[2];

return_direct_with_clo2(data,  __glo_valid_91n_srfi_113, (((closure)  __glo_valid_91n_srfi_113)->fn),  &c_736355, ((closureN)self_733021)->elements[2]);; 
}

static void __lambda_686(void *data, object self_733022, int argc, object *args) /* object self_733022, object r_732326 */
 {

  return_direct_with_clo4(data,  __glo_sob_91product_67_srfi_113, (((closure)  __glo_sob_91product_67_srfi_113)->fn),  ((closureN)self_733022)->elements[1], ((closureN)self_733022)->elements[2], ((closureN)self_733022)->elements[0], ((closureN)self_733022)->elements[0]);; 
}

static void __lambda_680(void *data, object _, int argc, object *args) /* closure _,object k_732318, object n_73586_731169, object bag_73587_731170 */
 {
object k_732318 = args[0]; object n_73586_731169 = args[1]; object bag_73587_731170 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-product");

closureN_type c_736337;
object e_736350 [3];
c_736337.hdr.mark = gc_color_red;
 c_736337.hdr.grayed = 0;
c_736337.tag = closureN_tag;
 c_736337.fn = (function_type)__lambda_681;
c_736337.num_args = 1;
c_736337.num_elements = 3;
c_736337.elements = (object *)e_736350;
c_736337.elements[0] = bag_73587_731170;
c_736337.elements[1] = k_732318;
c_736337.elements[2] = n_73586_731169;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736337, bag_73587_731170);; 
}

static void __lambda_681(void *data, object self_733018, int argc, object *args) /* object self_733018, object r_732319 */
 {

  
closureN_type c_736339;
object e_736348 [3];
c_736339.hdr.mark = gc_color_red;
 c_736339.hdr.grayed = 0;
c_736339.tag = closureN_tag;
 c_736339.fn = (function_type)__lambda_682;
c_736339.num_args = 1;
c_736339.num_elements = 3;
c_736339.elements = (object *)e_736348;
c_736339.elements[0] = ((closureN)self_733018)->elements[0];
c_736339.elements[1] = ((closureN)self_733018)->elements[1];
c_736339.elements[2] = ((closureN)self_733018)->elements[2];

return_direct_with_clo2(data,  __glo_valid_91n_srfi_113, (((closure)  __glo_valid_91n_srfi_113)->fn),  &c_736339, ((closureN)self_733018)->elements[2]);; 
}

static void __lambda_682(void *data, object self_733019, int argc, object *args) /* object self_733019, object r_732320 */
 {

  
closureN_type c_736341;
object e_736346 [3];
c_736341.hdr.mark = gc_color_red;
 c_736341.hdr.grayed = 0;
c_736341.tag = closureN_tag;
 c_736341.fn = (function_type)__lambda_683;
c_736341.num_args = 1;
c_736341.num_elements = 3;
c_736341.elements = (object *)e_736346;
c_736341.elements[0] = ((closureN)self_733019)->elements[0];
c_736341.elements[1] = ((closureN)self_733019)->elements[1];
c_736341.elements[2] = ((closureN)self_733019)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_736341, ((closureN)self_733019)->elements[0]);; 
}

static void __lambda_683(void *data, object self_733020, int argc, object *args) /* object self_733020, object r_732321 */
 {
 object r_732321 = args[0];
  return_direct_with_clo4(data,  __glo_sob_91product_67_srfi_113, (((closure)  __glo_sob_91product_67_srfi_113)->fn),  ((closureN)self_733020)->elements[1], ((closureN)self_733020)->elements[2], r_732321, ((closureN)self_733020)->elements[0]);; 
}

static void __lambda_679(void *data, object _, int argc, object *args) /* closure _,object k_732313, object n_73583_731168 */
 {
object k_732313 = args[0]; object n_73583_731168 = args[1];
  Cyc_st_add(data, "srfi/113.sld:valid-n");
  
if( (boolean_f != Cyc_is_integer(n_73583_731168)) ){ 
    complex_num_type local_736328; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736328, n_73583_731168)) ){ 
  
complex_num_type local_736332; 
return_direct_with_clo1(data,  k_732313, (((closure)  k_732313)->fn),  ((inline_function_type)
                   ((closure)__glo_positive_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736332, n_73583_731168));
} else { 
  return_direct_with_clo1(data,  k_732313, (((closure)  k_732313)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732313, (((closure)  k_732313)->fn),  boolean_f);}
;; 
}

static void __lambda_673(void *data, object _, int argc, object *args) /* closure _,object k_732304, object n_73577_731162, object result_73578_731163, object sob_73579_731164 */
 {
object k_732304 = args[0]; object n_73577_731162 = args[1]; object result_73578_731163 = args[2]; object sob_73579_731164 = args[3];
  Cyc_st_add(data, "srfi/113.sld:sob-product!");

closureN_type c_736299;
object e_736322 [4];
c_736299.hdr.mark = gc_color_red;
 c_736299.hdr.grayed = 0;
c_736299.tag = closureN_tag;
 c_736299.fn = (function_type)__lambda_674;
c_736299.num_args = 1;
c_736299.num_elements = 4;
c_736299.elements = (object *)e_736322;
c_736299.elements[0] = k_732304;
c_736299.elements[1] = n_73577_731162;
c_736299.elements[2] = result_73578_731163;
c_736299.elements[3] = sob_73579_731164;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736299, result_73578_731163);; 
}

static void __lambda_674(void *data, object self_733013, int argc, object *args) /* object self_733013, object rht_73580_731165 */
 {
 object rht_73580_731165 = args[0];
  
closureN_type c_736301;
object e_736313 [3];
c_736301.hdr.mark = gc_color_red;
 c_736301.hdr.grayed = 0;
c_736301.tag = closureN_tag;
 c_736301.fn = (function_type)__lambda_675;
c_736301.num_args = 1;
c_736301.num_elements = 3;
c_736301.elements = (object *)e_736313;
c_736301.elements[0] = ((closureN)self_733013)->elements[0];
c_736301.elements[1] = ((closureN)self_733013)->elements[2];
c_736301.elements[2] = ((closureN)self_733013)->elements[3];


closureN_type c_736314;
object e_736321 [2];
c_736314.hdr.mark = gc_color_red;
 c_736314.hdr.grayed = 0;
c_736314.tag = closureN_tag;
 c_736314.fn = (function_type)__lambda_678;
c_736314.num_args = 2;
c_736314.num_elements = 2;
c_736314.elements = (object *)e_736321;
c_736314.elements[0] = ((closureN)self_733013)->elements[1];
c_736314.elements[1] = rht_73580_731165;

return_direct_with_clo1(data,(closure)&c_736301,__lambda_675,  &c_736314);; 
}

static void __lambda_678(void *data, object self_733014, int argc, object *args) /* object self_733014, object k_732309, object elem_73581_731166, object count_73582_731167 */
 {
 object k_732309 = args[0]; object elem_73581_731166 = args[1]; object count_73582_731167 = args[2];
  
complex_num_type local_736319; 
return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  k_732309, ((closureN)self_733014)->elements[1], elem_73581_731166, Cyc_fast_mul(data,&local_736319, count_73582_731167, ((closureN)self_733014)->elements[0]));; 
}

static void __lambda_675(void *data, object self_733015, int argc, object *args) /* object self_733015, object r_732307 */
 {
 object r_732307 = args[0];
  
closureN_type c_736303;
object e_736311 [3];
c_736303.hdr.mark = gc_color_red;
 c_736303.hdr.grayed = 0;
c_736303.tag = closureN_tag;
 c_736303.fn = (function_type)__lambda_676;
c_736303.num_args = 1;
c_736303.num_elements = 3;
c_736303.elements = (object *)e_736311;
c_736303.elements[0] = ((closureN)self_733015)->elements[0];
c_736303.elements[1] = r_732307;
c_736303.elements[2] = ((closureN)self_733015)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736303, ((closureN)self_733015)->elements[2]);; 
}

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

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_736305, r_732308, ((closureN)self_733016)->elements[1]);; 
}

static void __lambda_677(void *data, object self_733017, int argc, object *args) /* object self_733017, object r_732306_732491 */
 {

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

static void __lambda_669(void *data, object _, int argc, object *args) /* closure _,object k_732298, object bag1_73575_731160, object bag2_73576_731161 */
 {
object k_732298 = args[0]; object bag1_73575_731160 = args[1]; object bag2_73576_731161 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-xor!");

closureN_type c_736281;
object e_736296 [3];
c_736281.hdr.mark = gc_color_red;
 c_736281.hdr.grayed = 0;
c_736281.tag = closureN_tag;
 c_736281.fn = (function_type)__lambda_670;
c_736281.num_args = 1;
c_736281.num_elements = 3;
c_736281.elements = (object *)e_736296;
c_736281.elements[0] = bag1_73575_731160;
c_736281.elements[1] = bag2_73576_731161;
c_736281.elements[2] = k_732298;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736281, bag1_73575_731160);; 
}

static void __lambda_670(void *data, object self_733010, int argc, object *args) /* object self_733010, object r_732299 */
 {

  
closureN_type c_736283;
object e_736294 [3];
c_736283.hdr.mark = gc_color_red;
 c_736283.hdr.grayed = 0;
c_736283.tag = closureN_tag;
 c_736283.fn = (function_type)__lambda_671;
c_736283.num_args = 1;
c_736283.num_elements = 3;
c_736283.elements = (object *)e_736294;
c_736283.elements[0] = ((closureN)self_733010)->elements[0];
c_736283.elements[1] = ((closureN)self_733010)->elements[1];
c_736283.elements[2] = ((closureN)self_733010)->elements[2];

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736283, ((closureN)self_733010)->elements[1]);; 
}

static void __lambda_671(void *data, object self_733011, int argc, object *args) /* object self_733011, object r_732300 */
 {

  
closureN_type c_736285;
object e_736291 [3];
c_736285.hdr.mark = gc_color_red;
 c_736285.hdr.grayed = 0;
c_736285.tag = closureN_tag;
 c_736285.fn = (function_type)__lambda_672;
c_736285.num_args = 1;
c_736285.num_elements = 3;
c_736285.elements = (object *)e_736291;
c_736285.elements[0] = ((closureN)self_733011)->elements[0];
c_736285.elements[1] = ((closureN)self_733011)->elements[1];
c_736285.elements[2] = ((closureN)self_733011)->elements[2];

return_direct_with_clo3(data,  __glo_check_91same_91comparator_srfi_113, (((closure)  __glo_check_91same_91comparator_srfi_113)->fn),  &c_736285, ((closureN)self_733011)->elements[0], ((closureN)self_733011)->elements[1]);; 
}

static void __lambda_672(void *data, object self_733012, int argc, object *args) /* object self_733012, object r_732301 */
 {

  return_direct_with_clo4(data,  __glo_sob_91xor_67_srfi_113, (((closure)  __glo_sob_91xor_67_srfi_113)->fn),  ((closureN)self_733012)->elements[2], ((closureN)self_733012)->elements[0], ((closureN)self_733012)->elements[0], ((closureN)self_733012)->elements[1]);; 
}

static void __lambda_665(void *data, object _, int argc, object *args) /* closure _,object k_732292, object set1_73573_731158, object set2_73574_731159 */
 {
object k_732292 = args[0]; object set1_73573_731158 = args[1]; object set2_73574_731159 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-xor!");

closureN_type c_736263;
object e_736278 [3];
c_736263.hdr.mark = gc_color_red;
 c_736263.hdr.grayed = 0;
c_736263.tag = closureN_tag;
 c_736263.fn = (function_type)__lambda_666;
c_736263.num_args = 1;
c_736263.num_elements = 3;
c_736263.elements = (object *)e_736278;
c_736263.elements[0] = k_732292;
c_736263.elements[1] = set1_73573_731158;
c_736263.elements[2] = set2_73574_731159;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_736263, set1_73573_731158);; 
}

static void __lambda_666(void *data, object self_733007, int argc, object *args) /* object self_733007, object r_732293 */
 {

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

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_736265, ((closureN)self_733007)->elements[2]);; 
}

static void __lambda_667(void *data, object self_733008, int argc, object *args) /* object self_733008, object r_732294 */
 {

  
closureN_type c_736267;
object e_736273 [3];
c_736267.hdr.mark = gc_color_red;
 c_736267.hdr.grayed = 0;
c_736267.tag = closureN_tag;
 c_736267.fn = (function_type)__lambda_668;
c_736267.num_args = 1;
c_736267.num_elements = 3;
c_736267.elements = (object *)e_736273;
c_736267.elements[0] = ((closureN)self_733008)->elements[0];
c_736267.elements[1] = ((closureN)self_733008)->elements[1];
c_736267.elements[2] = ((closureN)self_733008)->elements[2];

return_direct_with_clo3(data,  __glo_check_91same_91comparator_srfi_113, (((closure)  __glo_check_91same_91comparator_srfi_113)->fn),  &c_736267, ((closureN)self_733008)->elements[1], ((closureN)self_733008)->elements[2]);; 
}

static void __lambda_668(void *data, object self_733009, int argc, object *args) /* object self_733009, object r_732295 */
 {

  return_direct_with_clo4(data,  __glo_sob_91xor_67_srfi_113, (((closure)  __glo_sob_91xor_67_srfi_113)->fn),  ((closureN)self_733009)->elements[0], ((closureN)self_733009)->elements[1], ((closureN)self_733009)->elements[1], ((closureN)self_733009)->elements[2]);; 
}

static void __lambda_660(void *data, object _, int argc, object *args) /* closure _,object k_732285, object bag1_73571_731156, object bag2_73572_731157 */
 {
object k_732285 = args[0]; object bag1_73571_731156 = args[1]; object bag2_73572_731157 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-xor");

closureN_type c_736242;
object e_736260 [3];
c_736242.hdr.mark = gc_color_red;
 c_736242.hdr.grayed = 0;
c_736242.tag = closureN_tag;
 c_736242.fn = (function_type)__lambda_661;
c_736242.num_args = 1;
c_736242.num_elements = 3;
c_736242.elements = (object *)e_736260;
c_736242.elements[0] = bag1_73571_731156;
c_736242.elements[1] = bag2_73572_731157;
c_736242.elements[2] = k_732285;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736242, bag1_73571_731156);; 
}

static void __lambda_661(void *data, object self_733003, int argc, object *args) /* object self_733003, object r_732286 */
 {

  
closureN_type c_736244;
object e_736258 [3];
c_736244.hdr.mark = gc_color_red;
 c_736244.hdr.grayed = 0;
c_736244.tag = closureN_tag;
 c_736244.fn = (function_type)__lambda_662;
c_736244.num_args = 1;
c_736244.num_elements = 3;
c_736244.elements = (object *)e_736258;
c_736244.elements[0] = ((closureN)self_733003)->elements[0];
c_736244.elements[1] = ((closureN)self_733003)->elements[1];
c_736244.elements[2] = ((closureN)self_733003)->elements[2];

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_736244, ((closureN)self_733003)->elements[1]);; 
}

static void __lambda_662(void *data, object self_733004, int argc, object *args) /* object self_733004, object r_732287 */
 {

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

return_direct_with_clo3(data,  __glo_check_91same_91comparator_srfi_113, (((closure)  __glo_check_91same_91comparator_srfi_113)->fn),  &c_736246, ((closureN)self_733004)->elements[0], ((closureN)self_733004)->elements[1]);; 
}

static void __lambda_663(void *data, object self_733005, int argc, object *args) /* object self_733005, object r_732288 */
 {

  
closureN_type c_736248;
object e_736253 [3];
c_736248.hdr.mark = gc_color_red;
 c_736248.hdr.grayed = 0;
c_736248.tag = closureN_tag;
 c_736248.fn = (function_type)__lambda_664;
c_736248.num_args = 1;
c_736248.num_elements = 3;
c_736248.elements = (object *)e_736253;
c_736248.elements[0] = ((closureN)self_733005)->elements[0];
c_736248.elements[1] = ((closureN)self_733005)->elements[1];
c_736248.elements[2] = ((closureN)self_733005)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_736248, ((closureN)self_733005)->elements[0]);; 
}

static void __lambda_664(void *data, object self_733006, int argc, object *args) /* object self_733006, object r_732289 */
 {
 object r_732289 = args[0];
  return_direct_with_clo4(data,  __glo_sob_91xor_67_srfi_113, (((closure)  __glo_sob_91xor_67_srfi_113)->fn),  ((closureN)self_733006)->elements[2], r_732289, ((closureN)self_733006)->elements[0], ((closureN)self_733006)->elements[1]);; 
}

static void __lambda_655(void *data, object _, int argc, object *args) /* closure _,object k_732278, object set1_73569_731154, object set2_73570_731155 */
 {
object k_732278 = args[0]; object set1_73569_731154 = args[1]; object set2_73570_731155 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-xor");

closureN_type c_736221;
object e_736239 [3];
c_736221.hdr.mark = gc_color_red;
 c_736221.hdr.grayed = 0;
c_736221.tag = closureN_tag;
 c_736221.fn = (function_type)__lambda_656;
c_736221.num_args = 1;
c_736221.num_elements = 3;
c_736221.elements = (object *)e_736239;
c_736221.elements[0] = k_732278;
c_736221.elements[1] = set1_73569_731154;
c_736221.elements[2] = set2_73570_731155;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_736221, set1_73569_731154);; 
}

static void __lambda_656(void *data, object self_732999, int argc, object *args) /* object self_732999, object r_732279 */
 {

  
closureN_type c_736223;
object e_736237 [3];
c_736223.hdr.mark = gc_color_red;
 c_736223.hdr.grayed = 0;
c_736223.tag = closureN_tag;
 c_736223.fn = (function_type)__lambda_657;
c_736223.num_args = 1;
c_736223.num_elements = 3;
c_736223.elements = (object *)e_736237;
c_736223.elements[0] = ((closureN)self_732999)->elements[0];
c_736223.elements[1] = ((closureN)self_732999)->elements[1];
c_736223.elements[2] = ((closureN)self_732999)->elements[2];

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_736223, ((closureN)self_732999)->elements[2]);; 
}

static void __lambda_657(void *data, object self_733000, int argc, object *args) /* object self_733000, object r_732280 */
 {

  
closureN_type c_736225;
object e_736234 [3];
c_736225.hdr.mark = gc_color_red;
 c_736225.hdr.grayed = 0;
c_736225.tag = closureN_tag;
 c_736225.fn = (function_type)__lambda_658;
c_736225.num_args = 1;
c_736225.num_elements = 3;
c_736225.elements = (object *)e_736234;
c_736225.elements[0] = ((closureN)self_733000)->elements[0];
c_736225.elements[1] = ((closureN)self_733000)->elements[1];
c_736225.elements[2] = ((closureN)self_733000)->elements[2];

return_direct_with_clo3(data,  __glo_check_91same_91comparator_srfi_113, (((closure)  __glo_check_91same_91comparator_srfi_113)->fn),  &c_736225, ((closureN)self_733000)->elements[1], ((closureN)self_733000)->elements[2]);; 
}

static void __lambda_658(void *data, object self_733001, int argc, object *args) /* object self_733001, object r_732281 */
 {

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

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_736227, ((closureN)self_733001)->elements[1]);; 
}

static void __lambda_659(void *data, object self_733002, int argc, object *args) /* object self_733002, object r_732282 */
 {
 object r_732282 = args[0];
  return_direct_with_clo4(data,  __glo_sob_91xor_67_srfi_113, (((closure)  __glo_sob_91xor_67_srfi_113)->fn),  ((closureN)self_733002)->elements[0], r_732282, ((closureN)self_733002)->elements[1], ((closureN)self_733002)->elements[2]);; 
}

static void __lambda_641(void *data, object _, int argc, object *args) /* closure _,object k_732261, object result_73557_731142, object sob1_73558_731143, object sob2_73559_731144 */
 {
object k_732261 = args[0]; object result_73557_731142 = args[1]; object sob1_73558_731143 = args[2]; object sob2_73559_731144 = args[3];
  Cyc_st_add(data, "srfi/113.sld:sob-xor!");

closureN_type c_736155;
object e_736218 [3];
c_736155.hdr.mark = gc_color_red;
 c_736155.hdr.grayed = 0;
c_736155.tag = closureN_tag;
 c_736155.fn = (function_type)__lambda_642;
c_736155.num_args = 1;
c_736155.num_elements = 3;
c_736155.elements = (object *)e_736218;
c_736155.elements[0] = k_732261;
c_736155.elements[1] = result_73557_731142;
c_736155.elements[2] = sob2_73559_731144;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736155, sob1_73558_731143);; 
}

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

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736157, ((closureN)self_732986)->elements[2]);; 
}

static void __lambda_643(void *data, object self_732987, int argc, object *args) /* object self_732987, object r_732263 */
 {
 object r_732263 = args[0];
  
closureN_type c_736159;
object e_736214 [4];
c_736159.hdr.mark = gc_color_red;
 c_736159.hdr.grayed = 0;
c_736159.tag = closureN_tag;
 c_736159.fn = (function_type)__lambda_644;
c_736159.num_args = 1;
c_736159.num_elements = 4;
c_736159.elements = (object *)e_736214;
c_736159.elements[0] = ((closureN)self_732987)->elements[0];
c_736159.elements[1] = ((closureN)self_732987)->elements[1];
c_736159.elements[2] = r_732263;
c_736159.elements[3] = ((closureN)self_732987)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736159, ((closureN)self_732987)->elements[2]);; 
}

static void __lambda_644(void *data, object self_732988, int argc, object *args) /* object self_732988, object r_732264 */
 {
 object r_732264 = args[0];
  
closureN_type c_736161;
object e_736211 [2];
c_736161.hdr.mark = gc_color_red;
 c_736161.hdr.grayed = 0;
c_736161.tag = closureN_tag;
 c_736161.fn = (function_type)__lambda_645;
c_736161.num_args = 3;
c_736161.num_elements = 2;
c_736161.elements = (object *)e_736211;
c_736161.elements[0] = ((closureN)self_732988)->elements[0];
c_736161.elements[1] = ((closureN)self_732988)->elements[3];

return_direct_with_clo3(data,(closure)&c_736161,__lambda_645,  ((closureN)self_732988)->elements[1], ((closureN)self_732988)->elements[2], r_732264);; 
}

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


closureN_type c_736196;
object e_736210 [2];
c_736196.hdr.mark = gc_color_red;
 c_736196.hdr.grayed = 0;
c_736196.tag = closureN_tag;
 c_736196.fn = (function_type)__lambda_653;
c_736196.num_args = 2;
c_736196.num_elements = 2;
c_736196.elements = (object *)e_736210;
c_736196.elements[0] = result_91ht_73562_731147;
c_736196.elements[1] = sob1_91ht_73560_731145;

return_direct_with_clo1(data,(closure)&c_736163,__lambda_646,  &c_736196);; 
}

static void __lambda_653(void *data, object self_732990, int argc, object *args) /* object self_732990, object k_732273, object key_73563_731148, object value2_73564_731149 */
 {
 object k_732273 = args[0]; object key_73563_731148 = args[1]; object value2_73564_731149 = args[2];
  
closureN_type c_736198;
object e_736208 [4];
c_736198.hdr.mark = gc_color_red;
 c_736198.hdr.grayed = 0;
c_736198.tag = closureN_tag;
 c_736198.fn = (function_type)__lambda_654;
c_736198.num_args = 1;
c_736198.num_elements = 4;
c_736198.elements = (object *)e_736208;
c_736198.elements[0] = k_732273;
c_736198.elements[1] = key_73563_731148;
c_736198.elements[2] = ((closureN)self_732990)->elements[0];
c_736198.elements[3] = value2_73564_731149;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_736198, ((closureN)self_732990)->elements[1], key_73563_731148, obj_int2obj(0));; 
}

static void __lambda_654(void *data, object self_732991, int argc, object *args) /* object self_732991, object value1_73565_731150 */
 {
 object value1_73565_731150 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, value1_73565_731150, obj_int2obj(0))) ){ 
  return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  ((closureN)self_732991)->elements[0], ((closureN)self_732991)->elements[2], ((closureN)self_732991)->elements[1], ((closureN)self_732991)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732991)->elements[0], (((closure)  ((closureN)self_732991)->elements[0])->fn),  Cyc_VOID);}
;; 
}

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

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_736165, ((closureN)self_732992)->elements[4], r_732272);; 
}

static void __lambda_647(void *data, object self_732993, int argc, object *args) /* object self_732993, object r_732265_732482 */
 {

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


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

return_direct_with_clo1(data,(closure)&c_736167,__lambda_648,  &c_736176);; 
}

static void __lambda_650(void *data, object self_732994, int argc, object *args) /* object self_732994, object k_732268_732485, object key_73566_731151_732486, object value1_73567_731152_732487 */
 {
 object k_732268_732485 = args[0]; object key_73566_731151_732486 = args[1]; object value1_73567_731152_732487 = args[2];
  
closureN_type c_736178;
object e_736190 [4];
c_736178.hdr.mark = gc_color_red;
 c_736178.hdr.grayed = 0;
c_736178.tag = closureN_tag;
 c_736178.fn = (function_type)__lambda_651;
c_736178.num_args = 1;
c_736178.num_elements = 4;
c_736178.elements = (object *)e_736190;
c_736178.elements[0] = k_732268_732485;
c_736178.elements[1] = key_73566_731151_732486;
c_736178.elements[2] = ((closureN)self_732994)->elements[0];
c_736178.elements[3] = value1_73567_731152_732487;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_736178, ((closureN)self_732994)->elements[1], key_73566_731151_732486, obj_int2obj(0));; 
}

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


complex_num_type local_736188; 
return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  &c_736180, Cyc_fast_sub(data,&local_736188, ((closureN)self_732995)->elements[3], value2_73568_731153_732488));; 
}

static void __lambda_652(void *data, object self_732996, int argc, object *args) /* object self_732996, object r_732270_732489 */
 {
 object r_732270_732489 = args[0];
  return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  ((closureN)self_732996)->elements[0], ((closureN)self_732996)->elements[2], ((closureN)self_732996)->elements[1], r_732270_732489);; 
}

static void __lambda_648(void *data, object self_732997, int argc, object *args) /* object self_732997, object r_732267_732483 */
 {
 object r_732267_732483 = args[0];
  
closureN_type c_736169;
object e_736173 [2];
c_736169.hdr.mark = gc_color_red;
 c_736169.hdr.grayed = 0;
c_736169.tag = closureN_tag;
 c_736169.fn = (function_type)__lambda_649;
c_736169.num_args = 1;
c_736169.num_elements = 2;
c_736169.elements = (object *)e_736173;
c_736169.elements[0] = ((closureN)self_732997)->elements[0];
c_736169.elements[1] = ((closureN)self_732997)->elements[1];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_736169, ((closureN)self_732997)->elements[2], r_732267_732483);; 
}

static void __lambda_649(void *data, object self_732998, int argc, object *args) /* object self_732998, object r_732266_732484_732490 */
 {

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

static void __lambda_639(void *data, object _, int argc, object *args) /* closure _,object k_732257, object bags_73556_731141_raw, ... */
 {
object k_732257 = args[0];
load_varargs(bags_73556_731141, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag-sum!");

closureN_type c_736145;
object e_736152 [2];
c_736145.hdr.mark = gc_color_red;
 c_736145.hdr.grayed = 0;
c_736145.tag = closureN_tag;
 c_736145.fn = (function_type)__lambda_640;
c_736145.num_args = 1;
c_736145.num_elements = 2;
c_736145.elements = (object *)e_736152;
c_736145.elements[0] = bags_73556_731141;
c_736145.elements[1] = k_732257;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_736145, bags_73556_731141);; 
}

static void __lambda_640(void *data, object self_732985, int argc, object *args) /* object self_732985, object r_732258 */
 {

  
object c_736150 = apply(data,  ((closureN)self_732985)->elements[1],__glo_sob_91sum_67_srfi_113, ((closureN)self_732985)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732985)->elements[1], (((closure)  ((closureN)self_732985)->elements[1])->fn),  c_736150);; 
}

static void __lambda_635(void *data, object _, int argc, object *args) /* closure _,object k_732251, object sob1_73553_731138, object sobs_73554_731139_raw, ... */
 {
object k_732251 = args[0]; object sob1_73553_731138 = args[1];
load_varargs(sobs_73554_731139, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:sob-sum!");

closureN_type c_736129;
object e_736137 [3];
c_736129.hdr.mark = gc_color_red;
 c_736129.hdr.grayed = 0;
c_736129.tag = closureN_tag;
 c_736129.fn = (function_type)__lambda_636;
c_736129.num_args = 1;
c_736129.num_elements = 3;
c_736129.elements = (object *)e_736137;
c_736129.elements[0] = k_732251;
c_736129.elements[1] = sob1_73553_731138;
c_736129.elements[2] = sobs_73554_731139;


closureN_type c_736138;
object e_736142 [1];
c_736138.hdr.mark = gc_color_red;
 c_736138.hdr.grayed = 0;
c_736138.tag = closureN_tag;
 c_736138.fn = (function_type)__lambda_638;
c_736138.num_args = 1;
c_736138.num_elements = 1;
c_736138.elements = (object *)e_736142;
c_736138.elements[0] = sob1_73553_731138;

return_direct_with_clo1(data,(closure)&c_736129,__lambda_636,  &c_736138);; 
}

static void __lambda_638(void *data, object self_732982, int argc, object *args) /* object self_732982, object k_732254, object sob_73555_731140 */
 {
 object k_732254 = args[0]; object sob_73555_731140 = args[1];
  return_direct_with_clo4(data,  __glo_dyadic_91sob_91sum_67_srfi_113, (((closure)  __glo_dyadic_91sob_91sum_67_srfi_113)->fn),  k_732254, ((closureN)self_732982)->elements[0], ((closureN)self_732982)->elements[0], sob_73555_731140);; 
}

static void __lambda_636(void *data, object self_732983, int argc, object *args) /* object self_732983, object r_732253 */
 {
 object r_732253 = args[0];
  
closureN_type c_736131;
object e_736135 [2];
c_736131.hdr.mark = gc_color_red;
 c_736131.hdr.grayed = 0;
c_736131.tag = closureN_tag;
 c_736131.fn = (function_type)__lambda_637;
c_736131.num_args = 1;
c_736131.num_elements = 2;
c_736131.elements = (object *)e_736135;
c_736131.elements[0] = ((closureN)self_732983)->elements[0];
c_736131.elements[1] = ((closureN)self_732983)->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_736131, r_732253, ((closureN)self_732983)->elements[2]);; 
}

static void __lambda_637(void *data, object self_732984, int argc, object *args) /* object self_732984, object r_732252 */
 {

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

static void __lambda_633(void *data, object _, int argc, object *args) /* closure _,object k_732247, object bags_73552_731137_raw, ... */
 {
object k_732247 = args[0];
load_varargs(bags_73552_731137, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag-sum");

closureN_type c_736119;
object e_736126 [2];
c_736119.hdr.mark = gc_color_red;
 c_736119.hdr.grayed = 0;
c_736119.tag = closureN_tag;
 c_736119.fn = (function_type)__lambda_634;
c_736119.num_args = 1;
c_736119.num_elements = 2;
c_736119.elements = (object *)e_736126;
c_736119.elements[0] = bags_73552_731137;
c_736119.elements[1] = k_732247;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_736119, bags_73552_731137);; 
}

static void __lambda_634(void *data, object self_732981, int argc, object *args) /* object self_732981, object r_732248 */
 {

  
object c_736124 = apply(data,  ((closureN)self_732981)->elements[1],__glo_sob_91sum_srfi_113, ((closureN)self_732981)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732981)->elements[1], (((closure)  ((closureN)self_732981)->elements[1])->fn),  c_736124);; 
}

static void __lambda_621(void *data, object _, int argc, object *args) /* closure _,object k_732232, object result_73540_731125, object sob1_73541_731126, object sob2_73542_731127 */
 {
object k_732232 = args[0]; object result_73540_731125 = args[1]; object sob1_73541_731126 = args[2]; object sob2_73542_731127 = args[3];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob-sum!");

closureN_type c_736060;
object e_736116 [3];
c_736060.hdr.mark = gc_color_red;
 c_736060.hdr.grayed = 0;
c_736060.tag = closureN_tag;
 c_736060.fn = (function_type)__lambda_622;
c_736060.num_args = 1;
c_736060.num_elements = 3;
c_736060.elements = (object *)e_736116;
c_736060.elements[0] = k_732232;
c_736060.elements[1] = result_73540_731125;
c_736060.elements[2] = sob2_73542_731127;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736060, sob1_73541_731126);; 
}

static void __lambda_622(void *data, object self_732970, int argc, object *args) /* object self_732970, object r_732233 */
 {
 object r_732233 = args[0];
  
closureN_type c_736062;
object e_736114 [3];
c_736062.hdr.mark = gc_color_red;
 c_736062.hdr.grayed = 0;
c_736062.tag = closureN_tag;
 c_736062.fn = (function_type)__lambda_623;
c_736062.num_args = 1;
c_736062.num_elements = 3;
c_736062.elements = (object *)e_736114;
c_736062.elements[0] = ((closureN)self_732970)->elements[0];
c_736062.elements[1] = r_732233;
c_736062.elements[2] = ((closureN)self_732970)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736062, ((closureN)self_732970)->elements[2]);; 
}

static void __lambda_623(void *data, object self_732971, int argc, object *args) /* object self_732971, object r_732234 */
 {
 object r_732234 = args[0];
  
closureN_type c_736064;
object e_736112 [3];
c_736064.hdr.mark = gc_color_red;
 c_736064.hdr.grayed = 0;
c_736064.tag = closureN_tag;
 c_736064.fn = (function_type)__lambda_624;
c_736064.num_args = 1;
c_736064.num_elements = 3;
c_736064.elements = (object *)e_736112;
c_736064.elements[0] = ((closureN)self_732971)->elements[0];
c_736064.elements[1] = ((closureN)self_732971)->elements[1];
c_736064.elements[2] = r_732234;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_736064, ((closureN)self_732971)->elements[2]);; 
}

static void __lambda_624(void *data, object self_732972, int argc, object *args) /* object self_732972, object r_732235 */
 {
 object r_732235 = args[0];
  
closureN_type c_736066;
object e_736109 [1];
c_736066.hdr.mark = gc_color_red;
 c_736066.hdr.grayed = 0;
c_736066.tag = closureN_tag;
 c_736066.fn = (function_type)__lambda_625;
c_736066.num_args = 3;
c_736066.num_elements = 1;
c_736066.elements = (object *)e_736109;
c_736066.elements[0] = ((closureN)self_732972)->elements[0];

return_direct_with_clo3(data,(closure)&c_736066,__lambda_625,  ((closureN)self_732972)->elements[1], ((closureN)self_732972)->elements[2], r_732235);; 
}

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


closureN_type c_736095;
object e_736108 [2];
c_736095.hdr.mark = gc_color_red;
 c_736095.hdr.grayed = 0;
c_736095.tag = closureN_tag;
 c_736095.fn = (function_type)__lambda_631;
c_736095.num_args = 2;
c_736095.num_elements = 2;
c_736095.elements = (object *)e_736108;
c_736095.elements[0] = result_91ht_73545_731130;
c_736095.elements[1] = sob2_91ht_73544_731129;

return_direct_with_clo1(data,(closure)&c_736068,__lambda_626,  &c_736095);; 
}

static void __lambda_631(void *data, object self_732974, int argc, object *args) /* object self_732974, object k_732242, object key_73546_731131, object value1_73547_731132 */
 {
 object k_732242 = args[0]; object key_73546_731131 = args[1]; object value1_73547_731132 = args[2];
  
closureN_type c_736097;
object e_736106 [4];
c_736097.hdr.mark = gc_color_red;
 c_736097.hdr.grayed = 0;
c_736097.tag = closureN_tag;
 c_736097.fn = (function_type)__lambda_632;
c_736097.num_args = 1;
c_736097.num_elements = 4;
c_736097.elements = (object *)e_736106;
c_736097.elements[0] = k_732242;
c_736097.elements[1] = key_73546_731131;
c_736097.elements[2] = ((closureN)self_732974)->elements[0];
c_736097.elements[3] = value1_73547_731132;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_736097, ((closureN)self_732974)->elements[1], key_73546_731131, obj_int2obj(0));; 
}

static void __lambda_632(void *data, object self_732975, int argc, object *args) /* object self_732975, object value2_73548_731133 */
 {
 object value2_73548_731133 = args[0];
  
complex_num_type local_736104; 
return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  ((closureN)self_732975)->elements[0], ((closureN)self_732975)->elements[2], ((closureN)self_732975)->elements[1], Cyc_fast_sum(data,&local_736104, ((closureN)self_732975)->elements[3], value2_73548_731133));; 
}

static void __lambda_626(void *data, object self_732976, int argc, object *args) /* object self_732976, object r_732241 */
 {
 object r_732241 = args[0];
  
closureN_type c_736070;
object e_736092 [4];
c_736070.hdr.mark = gc_color_red;
 c_736070.hdr.grayed = 0;
c_736070.tag = closureN_tag;
 c_736070.fn = (function_type)__lambda_627;
c_736070.num_args = 1;
c_736070.num_elements = 4;
c_736070.elements = (object *)e_736092;
c_736070.elements[0] = ((closureN)self_732976)->elements[0];
c_736070.elements[1] = ((closureN)self_732976)->elements[1];
c_736070.elements[2] = ((closureN)self_732976)->elements[2];
c_736070.elements[3] = ((closureN)self_732976)->elements[3];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_736070, ((closureN)self_732976)->elements[2], r_732241);; 
}

static void __lambda_627(void *data, object self_732977, int argc, object *args) /* object self_732977, object r_732236_732476 */
 {

  
closureN_type c_736072;
object e_736076 [2];
c_736072.hdr.mark = gc_color_red;
 c_736072.hdr.grayed = 0;
c_736072.tag = closureN_tag;
 c_736072.fn = (function_type)__lambda_628;
c_736072.num_args = 1;
c_736072.num_elements = 2;
c_736072.elements = (object *)e_736076;
c_736072.elements[0] = ((closureN)self_732977)->elements[0];
c_736072.elements[1] = ((closureN)self_732977)->elements[3];


closureN_type c_736077;
object e_736091 [2];
c_736077.hdr.mark = gc_color_red;
 c_736077.hdr.grayed = 0;
c_736077.tag = closureN_tag;
 c_736077.fn = (function_type)__lambda_629;
c_736077.num_args = 2;
c_736077.num_elements = 2;
c_736077.elements = (object *)e_736091;
c_736077.elements[0] = ((closureN)self_732977)->elements[1];
c_736077.elements[1] = ((closureN)self_732977)->elements[2];

return_direct_with_clo1(data,(closure)&c_736072,__lambda_628,  &c_736077);; 
}

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

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_736079, ((closureN)self_732978)->elements[1], key_73549_731134_732479, obj_int2obj(0));; 
}

static void __lambda_630(void *data, object self_732979, int argc, object *args) /* object self_732979, object value1_73551_731136_732481 */
 {
 object value1_73551_731136_732481 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, value1_73551_731136_732481, obj_int2obj(0))) ){ 
  return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  ((closureN)self_732979)->elements[0], ((closureN)self_732979)->elements[2], ((closureN)self_732979)->elements[1], ((closureN)self_732979)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732979)->elements[0], (((closure)  ((closureN)self_732979)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_628(void *data, object self_732980, int argc, object *args) /* object self_732980, object r_732237_732477 */
 {
 object r_732237_732477 = args[0];
  return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  ((closureN)self_732980)->elements[0], ((closureN)self_732980)->elements[1], r_732237_732477);; 
}

static void __lambda_615(void *data, object _, int argc, object *args) /* closure _,object k_732221, object sob1_73536_731121, object sobs_73537_731122_raw, ... */
 {
object k_732221 = args[0]; object sob1_73536_731121 = args[1];
load_varargs(sobs_73537_731122, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:sob-sum");
  
if( (boolean_f != Cyc_is_null(sobs_73537_731122)) ){ 
  return_direct_with_clo1(data,  k_732221, (((closure)  k_732221)->fn),  sob1_73536_731121);
} else { 
  
closureN_type c_736032;
object e_736057 [3];
c_736032.hdr.mark = gc_color_red;
 c_736032.hdr.grayed = 0;
c_736032.tag = closureN_tag;
 c_736032.fn = (function_type)__lambda_616;
c_736032.num_args = 1;
c_736032.num_elements = 3;
c_736032.elements = (object *)e_736057;
c_736032.elements[0] = k_732221;
c_736032.elements[1] = sob1_73536_731121;
c_736032.elements[2] = sobs_73537_731122;

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_736032, sob1_73536_731121);}
;; 
}

static void __lambda_616(void *data, object self_732965, int argc, object *args) /* object self_732965, object result_73538_731123 */
 {
 object result_73538_731123 = args[0];
  
closureN_type c_736034;
object e_736052 [3];
c_736034.hdr.mark = gc_color_red;
 c_736034.hdr.grayed = 0;
c_736034.tag = closureN_tag;
 c_736034.fn = (function_type)__lambda_617;
c_736034.num_args = 1;
c_736034.num_elements = 3;
c_736034.elements = (object *)e_736052;
c_736034.elements[0] = ((closureN)self_732965)->elements[0];
c_736034.elements[1] = result_73538_731123;
c_736034.elements[2] = ((closureN)self_732965)->elements[2];



return_direct_with_clo4(data,  __glo_dyadic_91sob_91sum_67_srfi_113, (((closure)  __glo_dyadic_91sob_91sum_67_srfi_113)->fn),  &c_736034, result_73538_731123, ((closureN)self_732965)->elements[1], Cyc_car(data, ((closureN)self_732965)->elements[2]));; 
}

static void __lambda_617(void *data, object self_732966, int argc, object *args) /* object self_732966, object r_732224 */
 {

  
closureN_type c_736036;
object e_736046 [3];
c_736036.hdr.mark = gc_color_red;
 c_736036.hdr.grayed = 0;
c_736036.tag = closureN_tag;
 c_736036.fn = (function_type)__lambda_618;
c_736036.num_args = 1;
c_736036.num_elements = 3;
c_736036.elements = (object *)e_736046;
c_736036.elements[0] = ((closureN)self_732966)->elements[0];
c_736036.elements[1] = ((closureN)self_732966)->elements[1];
c_736036.elements[2] = ((closureN)self_732966)->elements[2];


closureN_type c_736047;
object e_736051 [1];
c_736047.hdr.mark = gc_color_red;
 c_736047.hdr.grayed = 0;
c_736047.tag = closureN_tag;
 c_736047.fn = (function_type)__lambda_620;
c_736047.num_args = 1;
c_736047.num_elements = 1;
c_736047.elements = (object *)e_736051;
c_736047.elements[0] = ((closureN)self_732966)->elements[1];

return_direct_with_clo1(data,(closure)&c_736036,__lambda_618,  &c_736047);; 
}

static void __lambda_620(void *data, object self_732967, int argc, object *args) /* object self_732967, object k_732228, object sob_73539_731124 */
 {
 object k_732228 = args[0]; object sob_73539_731124 = args[1];
  return_direct_with_clo4(data,  __glo_dyadic_91sob_91sum_67_srfi_113, (((closure)  __glo_dyadic_91sob_91sum_67_srfi_113)->fn),  k_732228, ((closureN)self_732967)->elements[0], ((closureN)self_732967)->elements[0], sob_73539_731124);; 
}

static void __lambda_618(void *data, object self_732968, int argc, object *args) /* object self_732968, object r_732226 */
 {
 object r_732226 = args[0];
  
closureN_type c_736038;
object e_736042 [2];
c_736038.hdr.mark = gc_color_red;
 c_736038.hdr.grayed = 0;
c_736038.tag = closureN_tag;
 c_736038.fn = (function_type)__lambda_619;
c_736038.num_args = 1;
c_736038.num_elements = 2;
c_736038.elements = (object *)e_736042;
c_736038.elements[0] = ((closureN)self_732968)->elements[0];
c_736038.elements[1] = ((closureN)self_732968)->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_736038, r_732226, Cyc_cdr(data, ((closureN)self_732968)->elements[2]));; 
}

static void __lambda_619(void *data, object self_732969, int argc, object *args) /* object self_732969, object r_732225 */
 {

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

static void __lambda_613(void *data, object _, int argc, object *args) /* closure _,object k_732217, object bags_73535_731120_raw, ... */
 {
object k_732217 = args[0];
load_varargs(bags_73535_731120, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag-difference!");

closureN_type c_736019;
object e_736026 [2];
c_736019.hdr.mark = gc_color_red;
 c_736019.hdr.grayed = 0;
c_736019.tag = closureN_tag;
 c_736019.fn = (function_type)__lambda_614;
c_736019.num_args = 1;
c_736019.num_elements = 2;
c_736019.elements = (object *)e_736026;
c_736019.elements[0] = bags_73535_731120;
c_736019.elements[1] = k_732217;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_736019, bags_73535_731120);; 
}

static void __lambda_614(void *data, object self_732964, int argc, object *args) /* object self_732964, object r_732218 */
 {

  
object c_736024 = apply(data,  ((closureN)self_732964)->elements[1],__glo_sob_91difference_67_srfi_113, ((closureN)self_732964)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732964)->elements[1], (((closure)  ((closureN)self_732964)->elements[1])->fn),  c_736024);; 
}

static void __lambda_611(void *data, object _, int argc, object *args) /* closure _,object k_732213, object sets_73534_731119_raw, ... */
 {
object k_732213 = args[0];
load_varargs(sets_73534_731119, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set-difference!");

closureN_type c_736009;
object e_736016 [2];
c_736009.hdr.mark = gc_color_red;
 c_736009.hdr.grayed = 0;
c_736009.tag = closureN_tag;
 c_736009.fn = (function_type)__lambda_612;
c_736009.num_args = 1;
c_736009.num_elements = 2;
c_736009.elements = (object *)e_736016;
c_736009.elements[0] = k_732213;
c_736009.elements[1] = sets_73534_731119;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_736009, sets_73534_731119);; 
}

static void __lambda_612(void *data, object self_732963, int argc, object *args) /* object self_732963, object r_732214 */
 {

  
object c_736014 = apply(data,  ((closureN)self_732963)->elements[0],__glo_sob_91difference_67_srfi_113, ((closureN)self_732963)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732963)->elements[0], (((closure)  ((closureN)self_732963)->elements[0])->fn),  c_736014);; 
}

static void __lambda_607(void *data, object _, int argc, object *args) /* closure _,object k_732207, object sob1_73531_731116, object sobs_73532_731117_raw, ... */
 {
object k_732207 = args[0]; object sob1_73531_731116 = args[1];
load_varargs(sobs_73532_731117, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:sob-difference!");

closureN_type c_735993;
object e_736001 [3];
c_735993.hdr.mark = gc_color_red;
 c_735993.hdr.grayed = 0;
c_735993.tag = closureN_tag;
 c_735993.fn = (function_type)__lambda_608;
c_735993.num_args = 1;
c_735993.num_elements = 3;
c_735993.elements = (object *)e_736001;
c_735993.elements[0] = k_732207;
c_735993.elements[1] = sob1_73531_731116;
c_735993.elements[2] = sobs_73532_731117;


closureN_type c_736002;
object e_736006 [1];
c_736002.hdr.mark = gc_color_red;
 c_736002.hdr.grayed = 0;
c_736002.tag = closureN_tag;
 c_736002.fn = (function_type)__lambda_610;
c_736002.num_args = 1;
c_736002.num_elements = 1;
c_736002.elements = (object *)e_736006;
c_736002.elements[0] = sob1_73531_731116;

return_direct_with_clo1(data,(closure)&c_735993,__lambda_608,  &c_736002);; 
}

static void __lambda_610(void *data, object self_732960, int argc, object *args) /* object self_732960, object k_732210, object sob_73533_731118 */
 {
 object k_732210 = args[0]; object sob_73533_731118 = args[1];
  return_direct_with_clo4(data,  __glo_dyadic_91sob_91difference_67_srfi_113, (((closure)  __glo_dyadic_91sob_91difference_67_srfi_113)->fn),  k_732210, ((closureN)self_732960)->elements[0], ((closureN)self_732960)->elements[0], sob_73533_731118);; 
}

static void __lambda_608(void *data, object self_732961, int argc, object *args) /* object self_732961, object r_732209 */
 {
 object r_732209 = args[0];
  
closureN_type c_735995;
object e_735999 [2];
c_735995.hdr.mark = gc_color_red;
 c_735995.hdr.grayed = 0;
c_735995.tag = closureN_tag;
 c_735995.fn = (function_type)__lambda_609;
c_735995.num_args = 1;
c_735995.num_elements = 2;
c_735995.elements = (object *)e_735999;
c_735995.elements[0] = ((closureN)self_732961)->elements[0];
c_735995.elements[1] = ((closureN)self_732961)->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_735995, r_732209, ((closureN)self_732961)->elements[2]);; 
}

static void __lambda_609(void *data, object self_732962, int argc, object *args) /* object self_732962, object r_732208 */
 {

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

static void __lambda_605(void *data, object _, int argc, object *args) /* closure _,object k_732203, object bags_73530_731115_raw, ... */
 {
object k_732203 = args[0];
load_varargs(bags_73530_731115, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag-difference");

closureN_type c_735983;
object e_735990 [2];
c_735983.hdr.mark = gc_color_red;
 c_735983.hdr.grayed = 0;
c_735983.tag = closureN_tag;
 c_735983.fn = (function_type)__lambda_606;
c_735983.num_args = 1;
c_735983.num_elements = 2;
c_735983.elements = (object *)e_735990;
c_735983.elements[0] = bags_73530_731115;
c_735983.elements[1] = k_732203;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735983, bags_73530_731115);; 
}

static void __lambda_606(void *data, object self_732959, int argc, object *args) /* object self_732959, object r_732204 */
 {

  
object c_735988 = apply(data,  ((closureN)self_732959)->elements[1],__glo_sob_91difference_srfi_113, ((closureN)self_732959)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732959)->elements[1], (((closure)  ((closureN)self_732959)->elements[1])->fn),  c_735988);; 
}

static void __lambda_603(void *data, object _, int argc, object *args) /* closure _,object k_732199, object sets_73529_731114_raw, ... */
 {
object k_732199 = args[0];
load_varargs(sets_73529_731114, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set-difference");

closureN_type c_735973;
object e_735980 [2];
c_735973.hdr.mark = gc_color_red;
 c_735973.hdr.grayed = 0;
c_735973.tag = closureN_tag;
 c_735973.fn = (function_type)__lambda_604;
c_735973.num_args = 1;
c_735973.num_elements = 2;
c_735973.elements = (object *)e_735980;
c_735973.elements[0] = k_732199;
c_735973.elements[1] = sets_73529_731114;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735973, sets_73529_731114);; 
}

static void __lambda_604(void *data, object self_732958, int argc, object *args) /* object self_732958, object r_732200 */
 {

  
object c_735978 = apply(data,  ((closureN)self_732958)->elements[0],__glo_sob_91difference_srfi_113, ((closureN)self_732958)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732958)->elements[0], (((closure)  ((closureN)self_732958)->elements[0])->fn),  c_735978);; 
}

static void __lambda_595(void *data, object _, int argc, object *args) /* closure _,object k_732189, object result_73520_731105, object sob1_73521_731106, object sob2_73522_731107 */
 {
object k_732189 = args[0]; object result_73520_731105 = args[1]; object sob1_73521_731106 = args[2]; object sob2_73522_731107 = args[3];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob-difference!");

closureN_type c_735936;
object e_735970 [3];
c_735936.hdr.mark = gc_color_red;
 c_735936.hdr.grayed = 0;
c_735936.tag = closureN_tag;
 c_735936.fn = (function_type)__lambda_596;
c_735936.num_args = 1;
c_735936.num_elements = 3;
c_735936.elements = (object *)e_735970;
c_735936.elements[0] = k_732189;
c_735936.elements[1] = result_73520_731105;
c_735936.elements[2] = sob2_73522_731107;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735936, sob1_73521_731106);; 
}

static void __lambda_596(void *data, object self_732951, int argc, object *args) /* object self_732951, object r_732190 */
 {
 object r_732190 = args[0];
  
closureN_type c_735938;
object e_735968 [3];
c_735938.hdr.mark = gc_color_red;
 c_735938.hdr.grayed = 0;
c_735938.tag = closureN_tag;
 c_735938.fn = (function_type)__lambda_597;
c_735938.num_args = 1;
c_735938.num_elements = 3;
c_735938.elements = (object *)e_735968;
c_735938.elements[0] = ((closureN)self_732951)->elements[0];
c_735938.elements[1] = r_732190;
c_735938.elements[2] = ((closureN)self_732951)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735938, ((closureN)self_732951)->elements[2]);; 
}

static void __lambda_597(void *data, object self_732952, int argc, object *args) /* object self_732952, object r_732191 */
 {
 object r_732191 = args[0];
  
closureN_type c_735940;
object e_735966 [3];
c_735940.hdr.mark = gc_color_red;
 c_735940.hdr.grayed = 0;
c_735940.tag = closureN_tag;
 c_735940.fn = (function_type)__lambda_598;
c_735940.num_args = 1;
c_735940.num_elements = 3;
c_735940.elements = (object *)e_735966;
c_735940.elements[0] = ((closureN)self_732952)->elements[0];
c_735940.elements[1] = ((closureN)self_732952)->elements[1];
c_735940.elements[2] = r_732191;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735940, ((closureN)self_732952)->elements[2]);; 
}

static void __lambda_598(void *data, object self_732953, int argc, object *args) /* object self_732953, object r_732192 */
 {
 object r_732192 = args[0];
  
closureN_type c_735942;
object e_735963 [1];
c_735942.hdr.mark = gc_color_red;
 c_735942.hdr.grayed = 0;
c_735942.tag = closureN_tag;
 c_735942.fn = (function_type)__lambda_599;
c_735942.num_args = 3;
c_735942.num_elements = 1;
c_735942.elements = (object *)e_735963;
c_735942.elements[0] = ((closureN)self_732953)->elements[0];

return_direct_with_clo3(data,(closure)&c_735942,__lambda_599,  ((closureN)self_732953)->elements[1], ((closureN)self_732953)->elements[2], r_732192);; 
}

static void __lambda_599(void *data, object self_732954, int argc, object *args) /* object self_732954, object sob1_91ht_73523_731108, object sob2_91ht_73524_731109, object result_91ht_73525_731110 */
 {
 object sob1_91ht_73523_731108 = args[0]; object sob2_91ht_73524_731109 = args[1]; object result_91ht_73525_731110 = args[2];
  
closureN_type c_735944;
object e_735948 [2];
c_735944.hdr.mark = gc_color_red;
 c_735944.hdr.grayed = 0;
c_735944.tag = closureN_tag;
 c_735944.fn = (function_type)__lambda_600;
c_735944.num_args = 1;
c_735944.num_elements = 2;
c_735944.elements = (object *)e_735948;
c_735944.elements[0] = ((closureN)self_732954)->elements[0];
c_735944.elements[1] = sob1_91ht_73523_731108;


closureN_type c_735949;
object e_735962 [2];
c_735949.hdr.mark = gc_color_red;
 c_735949.hdr.grayed = 0;
c_735949.tag = closureN_tag;
 c_735949.fn = (function_type)__lambda_601;
c_735949.num_args = 2;
c_735949.num_elements = 2;
c_735949.elements = (object *)e_735962;
c_735949.elements[0] = result_91ht_73525_731110;
c_735949.elements[1] = sob2_91ht_73524_731109;

return_direct_with_clo1(data,(closure)&c_735944,__lambda_600,  &c_735949);; 
}

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

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_735951, ((closureN)self_732955)->elements[1], key_73526_731111, obj_int2obj(0));; 
}

static void __lambda_602(void *data, object self_732956, int argc, object *args) /* object self_732956, object value2_73528_731113 */
 {
 object value2_73528_731113 = args[0];
  
complex_num_type local_735958; 
return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  ((closureN)self_732956)->elements[0], ((closureN)self_732956)->elements[2], ((closureN)self_732956)->elements[1], Cyc_fast_sub(data,&local_735958, ((closureN)self_732956)->elements[3], value2_73528_731113));; 
}

static void __lambda_600(void *data, object self_732957, int argc, object *args) /* object self_732957, object r_732193 */
 {
 object r_732193 = args[0];
  return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  ((closureN)self_732957)->elements[0], ((closureN)self_732957)->elements[1], r_732193);; 
}

static void __lambda_589(void *data, object _, int argc, object *args) /* closure _,object k_732178, object sob1_73516_731101, object sobs_73517_731102_raw, ... */
 {
object k_732178 = args[0]; object sob1_73516_731101 = args[1];
load_varargs(sobs_73517_731102, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:sob-difference");
  
if( (boolean_f != Cyc_is_null(sobs_73517_731102)) ){ 
  return_direct_with_clo1(data,  k_732178, (((closure)  k_732178)->fn),  sob1_73516_731101);
} else { 
  
closureN_type c_735908;
object e_735933 [3];
c_735908.hdr.mark = gc_color_red;
 c_735908.hdr.grayed = 0;
c_735908.tag = closureN_tag;
 c_735908.fn = (function_type)__lambda_590;
c_735908.num_args = 1;
c_735908.num_elements = 3;
c_735908.elements = (object *)e_735933;
c_735908.elements[0] = k_732178;
c_735908.elements[1] = sob1_73516_731101;
c_735908.elements[2] = sobs_73517_731102;

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_735908, sob1_73516_731101);}
;; 
}

static void __lambda_590(void *data, object self_732946, int argc, object *args) /* object self_732946, object result_73518_731103 */
 {
 object result_73518_731103 = args[0];
  
closureN_type c_735910;
object e_735928 [3];
c_735910.hdr.mark = gc_color_red;
 c_735910.hdr.grayed = 0;
c_735910.tag = closureN_tag;
 c_735910.fn = (function_type)__lambda_591;
c_735910.num_args = 1;
c_735910.num_elements = 3;
c_735910.elements = (object *)e_735928;
c_735910.elements[0] = ((closureN)self_732946)->elements[0];
c_735910.elements[1] = result_73518_731103;
c_735910.elements[2] = ((closureN)self_732946)->elements[2];



return_direct_with_clo4(data,  __glo_dyadic_91sob_91difference_67_srfi_113, (((closure)  __glo_dyadic_91sob_91difference_67_srfi_113)->fn),  &c_735910, result_73518_731103, ((closureN)self_732946)->elements[1], Cyc_car(data, ((closureN)self_732946)->elements[2]));; 
}

static void __lambda_591(void *data, object self_732947, int argc, object *args) /* object self_732947, object r_732181 */
 {

  
closureN_type c_735912;
object e_735922 [3];
c_735912.hdr.mark = gc_color_red;
 c_735912.hdr.grayed = 0;
c_735912.tag = closureN_tag;
 c_735912.fn = (function_type)__lambda_592;
c_735912.num_args = 1;
c_735912.num_elements = 3;
c_735912.elements = (object *)e_735922;
c_735912.elements[0] = ((closureN)self_732947)->elements[0];
c_735912.elements[1] = ((closureN)self_732947)->elements[1];
c_735912.elements[2] = ((closureN)self_732947)->elements[2];


closureN_type c_735923;
object e_735927 [1];
c_735923.hdr.mark = gc_color_red;
 c_735923.hdr.grayed = 0;
c_735923.tag = closureN_tag;
 c_735923.fn = (function_type)__lambda_594;
c_735923.num_args = 1;
c_735923.num_elements = 1;
c_735923.elements = (object *)e_735927;
c_735923.elements[0] = ((closureN)self_732947)->elements[1];

return_direct_with_clo1(data,(closure)&c_735912,__lambda_592,  &c_735923);; 
}

static void __lambda_594(void *data, object self_732948, int argc, object *args) /* object self_732948, object k_732185, object sob_73519_731104 */
 {
 object k_732185 = args[0]; object sob_73519_731104 = args[1];
  return_direct_with_clo4(data,  __glo_dyadic_91sob_91difference_67_srfi_113, (((closure)  __glo_dyadic_91sob_91difference_67_srfi_113)->fn),  k_732185, ((closureN)self_732948)->elements[0], ((closureN)self_732948)->elements[0], sob_73519_731104);; 
}

static void __lambda_592(void *data, object self_732949, int argc, object *args) /* object self_732949, object r_732183 */
 {
 object r_732183 = args[0];
  
closureN_type c_735914;
object e_735918 [2];
c_735914.hdr.mark = gc_color_red;
 c_735914.hdr.grayed = 0;
c_735914.tag = closureN_tag;
 c_735914.fn = (function_type)__lambda_593;
c_735914.num_args = 1;
c_735914.num_elements = 2;
c_735914.elements = (object *)e_735918;
c_735914.elements[0] = ((closureN)self_732949)->elements[0];
c_735914.elements[1] = ((closureN)self_732949)->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_735914, r_732183, Cyc_cdr(data, ((closureN)self_732949)->elements[2]));; 
}

static void __lambda_593(void *data, object self_732950, int argc, object *args) /* object self_732950, object r_732182 */
 {

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

static void __lambda_587(void *data, object _, int argc, object *args) /* closure _,object k_732174, object bags_73515_731100_raw, ... */
 {
object k_732174 = args[0];
load_varargs(bags_73515_731100, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag-intersection!");

closureN_type c_735895;
object e_735902 [2];
c_735895.hdr.mark = gc_color_red;
 c_735895.hdr.grayed = 0;
c_735895.tag = closureN_tag;
 c_735895.fn = (function_type)__lambda_588;
c_735895.num_args = 1;
c_735895.num_elements = 2;
c_735895.elements = (object *)e_735902;
c_735895.elements[0] = bags_73515_731100;
c_735895.elements[1] = k_732174;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735895, bags_73515_731100);; 
}

static void __lambda_588(void *data, object self_732945, int argc, object *args) /* object self_732945, object r_732175 */
 {

  
object c_735900 = apply(data,  ((closureN)self_732945)->elements[1],__glo_sob_91intersection_67_srfi_113, ((closureN)self_732945)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732945)->elements[1], (((closure)  ((closureN)self_732945)->elements[1])->fn),  c_735900);; 
}

static void __lambda_585(void *data, object _, int argc, object *args) /* closure _,object k_732170, object sets_73514_731099_raw, ... */
 {
object k_732170 = args[0];
load_varargs(sets_73514_731099, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set-intersection!");

closureN_type c_735885;
object e_735892 [2];
c_735885.hdr.mark = gc_color_red;
 c_735885.hdr.grayed = 0;
c_735885.tag = closureN_tag;
 c_735885.fn = (function_type)__lambda_586;
c_735885.num_args = 1;
c_735885.num_elements = 2;
c_735885.elements = (object *)e_735892;
c_735885.elements[0] = k_732170;
c_735885.elements[1] = sets_73514_731099;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735885, sets_73514_731099);; 
}

static void __lambda_586(void *data, object self_732944, int argc, object *args) /* object self_732944, object r_732171 */
 {

  
object c_735890 = apply(data,  ((closureN)self_732944)->elements[0],__glo_sob_91intersection_67_srfi_113, ((closureN)self_732944)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732944)->elements[0], (((closure)  ((closureN)self_732944)->elements[0])->fn),  c_735890);; 
}

static void __lambda_581(void *data, object _, int argc, object *args) /* closure _,object k_732164, object sob1_73511_731096, object sobs_73512_731097_raw, ... */
 {
object k_732164 = args[0]; object sob1_73511_731096 = args[1];
load_varargs(sobs_73512_731097, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:sob-intersection!");

closureN_type c_735869;
object e_735877 [3];
c_735869.hdr.mark = gc_color_red;
 c_735869.hdr.grayed = 0;
c_735869.tag = closureN_tag;
 c_735869.fn = (function_type)__lambda_582;
c_735869.num_args = 1;
c_735869.num_elements = 3;
c_735869.elements = (object *)e_735877;
c_735869.elements[0] = k_732164;
c_735869.elements[1] = sob1_73511_731096;
c_735869.elements[2] = sobs_73512_731097;


closureN_type c_735878;
object e_735882 [1];
c_735878.hdr.mark = gc_color_red;
 c_735878.hdr.grayed = 0;
c_735878.tag = closureN_tag;
 c_735878.fn = (function_type)__lambda_584;
c_735878.num_args = 1;
c_735878.num_elements = 1;
c_735878.elements = (object *)e_735882;
c_735878.elements[0] = sob1_73511_731096;

return_direct_with_clo1(data,(closure)&c_735869,__lambda_582,  &c_735878);; 
}

static void __lambda_584(void *data, object self_732941, int argc, object *args) /* object self_732941, object k_732167, object sob_73513_731098 */
 {
 object k_732167 = args[0]; object sob_73513_731098 = args[1];
  return_direct_with_clo4(data,  __glo_dyadic_91sob_91intersection_67_srfi_113, (((closure)  __glo_dyadic_91sob_91intersection_67_srfi_113)->fn),  k_732167, ((closureN)self_732941)->elements[0], ((closureN)self_732941)->elements[0], sob_73513_731098);; 
}

static void __lambda_582(void *data, object self_732942, int argc, object *args) /* object self_732942, object r_732166 */
 {
 object r_732166 = args[0];
  
closureN_type c_735871;
object e_735875 [2];
c_735871.hdr.mark = gc_color_red;
 c_735871.hdr.grayed = 0;
c_735871.tag = closureN_tag;
 c_735871.fn = (function_type)__lambda_583;
c_735871.num_args = 1;
c_735871.num_elements = 2;
c_735871.elements = (object *)e_735875;
c_735871.elements[0] = ((closureN)self_732942)->elements[0];
c_735871.elements[1] = ((closureN)self_732942)->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_735871, r_732166, ((closureN)self_732942)->elements[2]);; 
}

static void __lambda_583(void *data, object self_732943, int argc, object *args) /* object self_732943, object r_732165 */
 {

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

static void __lambda_579(void *data, object _, int argc, object *args) /* closure _,object k_732160, object bags_73510_731095_raw, ... */
 {
object k_732160 = args[0];
load_varargs(bags_73510_731095, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag-intersection");

closureN_type c_735859;
object e_735866 [2];
c_735859.hdr.mark = gc_color_red;
 c_735859.hdr.grayed = 0;
c_735859.tag = closureN_tag;
 c_735859.fn = (function_type)__lambda_580;
c_735859.num_args = 1;
c_735859.num_elements = 2;
c_735859.elements = (object *)e_735866;
c_735859.elements[0] = bags_73510_731095;
c_735859.elements[1] = k_732160;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735859, bags_73510_731095);; 
}

static void __lambda_580(void *data, object self_732940, int argc, object *args) /* object self_732940, object r_732161 */
 {

  
object c_735864 = apply(data,  ((closureN)self_732940)->elements[1],__glo_sob_91intersection_srfi_113, ((closureN)self_732940)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732940)->elements[1], (((closure)  ((closureN)self_732940)->elements[1])->fn),  c_735864);; 
}

static void __lambda_577(void *data, object _, int argc, object *args) /* closure _,object k_732156, object sets_73509_731094_raw, ... */
 {
object k_732156 = args[0];
load_varargs(sets_73509_731094, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set-intersection");

closureN_type c_735849;
object e_735856 [2];
c_735849.hdr.mark = gc_color_red;
 c_735849.hdr.grayed = 0;
c_735849.tag = closureN_tag;
 c_735849.fn = (function_type)__lambda_578;
c_735849.num_args = 1;
c_735849.num_elements = 2;
c_735849.elements = (object *)e_735856;
c_735849.elements[0] = k_732156;
c_735849.elements[1] = sets_73509_731094;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735849, sets_73509_731094);; 
}

static void __lambda_578(void *data, object self_732939, int argc, object *args) /* object self_732939, object r_732157 */
 {

  
object c_735854 = apply(data,  ((closureN)self_732939)->elements[0],__glo_sob_91intersection_srfi_113, ((closureN)self_732939)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732939)->elements[0], (((closure)  ((closureN)self_732939)->elements[0])->fn),  c_735854);; 
}

static void __lambda_568(void *data, object _, int argc, object *args) /* closure _,object k_732146, object result_73500_731085, object sob1_73501_731086, object sob2_73502_731087 */
 {
object k_732146 = args[0]; object result_73500_731085 = args[1]; object sob1_73501_731086 = args[2]; object sob2_73502_731087 = args[3];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob-intersection!");

closureN_type c_735812;
object e_735846 [3];
c_735812.hdr.mark = gc_color_red;
 c_735812.hdr.grayed = 0;
c_735812.tag = closureN_tag;
 c_735812.fn = (function_type)__lambda_569;
c_735812.num_args = 1;
c_735812.num_elements = 3;
c_735812.elements = (object *)e_735846;
c_735812.elements[0] = k_732146;
c_735812.elements[1] = result_73500_731085;
c_735812.elements[2] = sob2_73502_731087;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735812, sob1_73501_731086);; 
}

static void __lambda_569(void *data, object self_732931, int argc, object *args) /* object self_732931, object r_732147 */
 {
 object r_732147 = args[0];
  
closureN_type c_735814;
object e_735844 [3];
c_735814.hdr.mark = gc_color_red;
 c_735814.hdr.grayed = 0;
c_735814.tag = closureN_tag;
 c_735814.fn = (function_type)__lambda_570;
c_735814.num_args = 1;
c_735814.num_elements = 3;
c_735814.elements = (object *)e_735844;
c_735814.elements[0] = ((closureN)self_732931)->elements[0];
c_735814.elements[1] = r_732147;
c_735814.elements[2] = ((closureN)self_732931)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735814, ((closureN)self_732931)->elements[2]);; 
}

static void __lambda_570(void *data, object self_732932, int argc, object *args) /* object self_732932, object r_732148 */
 {
 object r_732148 = args[0];
  
closureN_type c_735816;
object e_735842 [3];
c_735816.hdr.mark = gc_color_red;
 c_735816.hdr.grayed = 0;
c_735816.tag = closureN_tag;
 c_735816.fn = (function_type)__lambda_571;
c_735816.num_args = 1;
c_735816.num_elements = 3;
c_735816.elements = (object *)e_735842;
c_735816.elements[0] = ((closureN)self_732932)->elements[0];
c_735816.elements[1] = ((closureN)self_732932)->elements[1];
c_735816.elements[2] = r_732148;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735816, ((closureN)self_732932)->elements[2]);; 
}

static void __lambda_571(void *data, object self_732933, int argc, object *args) /* object self_732933, object r_732149 */
 {
 object r_732149 = args[0];
  
closureN_type c_735818;
object e_735839 [1];
c_735818.hdr.mark = gc_color_red;
 c_735818.hdr.grayed = 0;
c_735818.tag = closureN_tag;
 c_735818.fn = (function_type)__lambda_572;
c_735818.num_args = 3;
c_735818.num_elements = 1;
c_735818.elements = (object *)e_735839;
c_735818.elements[0] = ((closureN)self_732933)->elements[0];

return_direct_with_clo3(data,(closure)&c_735818,__lambda_572,  ((closureN)self_732933)->elements[1], ((closureN)self_732933)->elements[2], r_732149);; 
}

static void __lambda_572(void *data, object self_732934, int argc, object *args) /* object self_732934, object sob1_91ht_73503_731088, object sob2_91ht_73504_731089, object result_91ht_73505_731090 */
 {
 object sob1_91ht_73503_731088 = args[0]; object sob2_91ht_73504_731089 = args[1]; object result_91ht_73505_731090 = args[2];
  
closureN_type c_735820;
object e_735824 [2];
c_735820.hdr.mark = gc_color_red;
 c_735820.hdr.grayed = 0;
c_735820.tag = closureN_tag;
 c_735820.fn = (function_type)__lambda_573;
c_735820.num_args = 1;
c_735820.num_elements = 2;
c_735820.elements = (object *)e_735824;
c_735820.elements[0] = ((closureN)self_732934)->elements[0];
c_735820.elements[1] = sob1_91ht_73503_731088;


closureN_type c_735825;
object e_735838 [2];
c_735825.hdr.mark = gc_color_red;
 c_735825.hdr.grayed = 0;
c_735825.tag = closureN_tag;
 c_735825.fn = (function_type)__lambda_574;
c_735825.num_args = 2;
c_735825.num_elements = 2;
c_735825.elements = (object *)e_735838;
c_735825.elements[0] = result_91ht_73505_731090;
c_735825.elements[1] = sob2_91ht_73504_731089;

return_direct_with_clo1(data,(closure)&c_735820,__lambda_573,  &c_735825);; 
}

static void __lambda_574(void *data, object self_732935, int argc, object *args) /* object self_732935, object k_732151, object key_73506_731091, object value1_73507_731092 */
 {
 object k_732151 = args[0]; object key_73506_731091 = args[1]; object value1_73507_731092 = args[2];
  
closureN_type c_735827;
object e_735836 [4];
c_735827.hdr.mark = gc_color_red;
 c_735827.hdr.grayed = 0;
c_735827.tag = closureN_tag;
 c_735827.fn = (function_type)__lambda_575;
c_735827.num_args = 1;
c_735827.num_elements = 4;
c_735827.elements = (object *)e_735836;
c_735827.elements[0] = k_732151;
c_735827.elements[1] = key_73506_731091;
c_735827.elements[2] = ((closureN)self_732935)->elements[0];
c_735827.elements[3] = value1_73507_731092;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_735827, ((closureN)self_732935)->elements[1], key_73506_731091, obj_int2obj(0));; 
}

static void __lambda_575(void *data, object self_732936, int argc, object *args) /* object self_732936, object value2_73508_731093 */
 {
 object value2_73508_731093 = args[0];
  
closureN_type c_735829;
object e_735834 [3];
c_735829.hdr.mark = gc_color_red;
 c_735829.hdr.grayed = 0;
c_735829.tag = closureN_tag;
 c_735829.fn = (function_type)__lambda_576;
c_735829.num_args = 1;
c_735829.num_elements = 3;
c_735829.elements = (object *)e_735834;
c_735829.elements[0] = ((closureN)self_732936)->elements[0];
c_735829.elements[1] = ((closureN)self_732936)->elements[1];
c_735829.elements[2] = ((closureN)self_732936)->elements[2];

return_direct_with_clo3(data,  __glo_min_scheme_base, (((closure)  __glo_min_scheme_base)->fn),  &c_735829, ((closureN)self_732936)->elements[3], value2_73508_731093);; 
}

static void __lambda_576(void *data, object self_732937, int argc, object *args) /* object self_732937, object r_732153 */
 {
 object r_732153 = args[0];
  return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  ((closureN)self_732937)->elements[0], ((closureN)self_732937)->elements[2], ((closureN)self_732937)->elements[1], r_732153);; 
}

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

static void __lambda_562(void *data, object _, int argc, object *args) /* closure _,object k_732135, object sob1_73496_731081, object sobs_73497_731082_raw, ... */
 {
object k_732135 = args[0]; object sob1_73496_731081 = args[1];
load_varargs(sobs_73497_731082, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:sob-intersection");
  
if( (boolean_f != Cyc_is_null(sobs_73497_731082)) ){ 
  return_direct_with_clo1(data,  k_732135, (((closure)  k_732135)->fn),  sob1_73496_731081);
} else { 
  
closureN_type c_735784;
object e_735809 [3];
c_735784.hdr.mark = gc_color_red;
 c_735784.hdr.grayed = 0;
c_735784.tag = closureN_tag;
 c_735784.fn = (function_type)__lambda_563;
c_735784.num_args = 1;
c_735784.num_elements = 3;
c_735784.elements = (object *)e_735809;
c_735784.elements[0] = k_732135;
c_735784.elements[1] = sob1_73496_731081;
c_735784.elements[2] = sobs_73497_731082;

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_735784, sob1_73496_731081);}
;; 
}

static void __lambda_563(void *data, object self_732926, int argc, object *args) /* object self_732926, object result_73498_731083 */
 {
 object result_73498_731083 = args[0];
  
closureN_type c_735786;
object e_735804 [3];
c_735786.hdr.mark = gc_color_red;
 c_735786.hdr.grayed = 0;
c_735786.tag = closureN_tag;
 c_735786.fn = (function_type)__lambda_564;
c_735786.num_args = 1;
c_735786.num_elements = 3;
c_735786.elements = (object *)e_735804;
c_735786.elements[0] = ((closureN)self_732926)->elements[0];
c_735786.elements[1] = result_73498_731083;
c_735786.elements[2] = ((closureN)self_732926)->elements[2];



return_direct_with_clo4(data,  __glo_dyadic_91sob_91intersection_67_srfi_113, (((closure)  __glo_dyadic_91sob_91intersection_67_srfi_113)->fn),  &c_735786, result_73498_731083, ((closureN)self_732926)->elements[1], Cyc_car(data, ((closureN)self_732926)->elements[2]));; 
}

static void __lambda_564(void *data, object self_732927, int argc, object *args) /* object self_732927, object r_732138 */
 {

  
closureN_type c_735788;
object e_735798 [3];
c_735788.hdr.mark = gc_color_red;
 c_735788.hdr.grayed = 0;
c_735788.tag = closureN_tag;
 c_735788.fn = (function_type)__lambda_565;
c_735788.num_args = 1;
c_735788.num_elements = 3;
c_735788.elements = (object *)e_735798;
c_735788.elements[0] = ((closureN)self_732927)->elements[0];
c_735788.elements[1] = ((closureN)self_732927)->elements[1];
c_735788.elements[2] = ((closureN)self_732927)->elements[2];


closureN_type c_735799;
object e_735803 [1];
c_735799.hdr.mark = gc_color_red;
 c_735799.hdr.grayed = 0;
c_735799.tag = closureN_tag;
 c_735799.fn = (function_type)__lambda_567;
c_735799.num_args = 1;
c_735799.num_elements = 1;
c_735799.elements = (object *)e_735803;
c_735799.elements[0] = ((closureN)self_732927)->elements[1];

return_direct_with_clo1(data,(closure)&c_735788,__lambda_565,  &c_735799);; 
}

static void __lambda_567(void *data, object self_732928, int argc, object *args) /* object self_732928, object k_732142, object sob_73499_731084 */
 {
 object k_732142 = args[0]; object sob_73499_731084 = args[1];
  return_direct_with_clo4(data,  __glo_dyadic_91sob_91intersection_67_srfi_113, (((closure)  __glo_dyadic_91sob_91intersection_67_srfi_113)->fn),  k_732142, ((closureN)self_732928)->elements[0], ((closureN)self_732928)->elements[0], sob_73499_731084);; 
}

static void __lambda_565(void *data, object self_732929, int argc, object *args) /* object self_732929, object r_732140 */
 {
 object r_732140 = args[0];
  
closureN_type c_735790;
object e_735794 [2];
c_735790.hdr.mark = gc_color_red;
 c_735790.hdr.grayed = 0;
c_735790.tag = closureN_tag;
 c_735790.fn = (function_type)__lambda_566;
c_735790.num_args = 1;
c_735790.num_elements = 2;
c_735790.elements = (object *)e_735794;
c_735790.elements[0] = ((closureN)self_732929)->elements[0];
c_735790.elements[1] = ((closureN)self_732929)->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_735790, r_732140, Cyc_cdr(data, ((closureN)self_732929)->elements[2]));; 
}

static void __lambda_566(void *data, object self_732930, int argc, object *args) /* object self_732930, object r_732139 */
 {

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

static void __lambda_560(void *data, object _, int argc, object *args) /* closure _,object k_732131, object bags_73495_731080_raw, ... */
 {
object k_732131 = args[0];
load_varargs(bags_73495_731080, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag-union!");

closureN_type c_735771;
object e_735778 [2];
c_735771.hdr.mark = gc_color_red;
 c_735771.hdr.grayed = 0;
c_735771.tag = closureN_tag;
 c_735771.fn = (function_type)__lambda_561;
c_735771.num_args = 1;
c_735771.num_elements = 2;
c_735771.elements = (object *)e_735778;
c_735771.elements[0] = bags_73495_731080;
c_735771.elements[1] = k_732131;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735771, bags_73495_731080);; 
}

static void __lambda_561(void *data, object self_732925, int argc, object *args) /* object self_732925, object r_732132 */
 {

  
object c_735776 = apply(data,  ((closureN)self_732925)->elements[1],__glo_sob_91union_67_srfi_113, ((closureN)self_732925)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732925)->elements[1], (((closure)  ((closureN)self_732925)->elements[1])->fn),  c_735776);; 
}

static void __lambda_558(void *data, object _, int argc, object *args) /* closure _,object k_732127, object sets_73494_731079_raw, ... */
 {
object k_732127 = args[0];
load_varargs(sets_73494_731079, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set-union!");

closureN_type c_735761;
object e_735768 [2];
c_735761.hdr.mark = gc_color_red;
 c_735761.hdr.grayed = 0;
c_735761.tag = closureN_tag;
 c_735761.fn = (function_type)__lambda_559;
c_735761.num_args = 1;
c_735761.num_elements = 2;
c_735761.elements = (object *)e_735768;
c_735761.elements[0] = k_732127;
c_735761.elements[1] = sets_73494_731079;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735761, sets_73494_731079);; 
}

static void __lambda_559(void *data, object self_732924, int argc, object *args) /* object self_732924, object r_732128 */
 {

  
object c_735766 = apply(data,  ((closureN)self_732924)->elements[0],__glo_sob_91union_67_srfi_113, ((closureN)self_732924)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732924)->elements[0], (((closure)  ((closureN)self_732924)->elements[0])->fn),  c_735766);; 
}

static void __lambda_554(void *data, object _, int argc, object *args) /* closure _,object k_732121, object sob1_73491_731076, object sobs_73492_731077_raw, ... */
 {
object k_732121 = args[0]; object sob1_73491_731076 = args[1];
load_varargs(sobs_73492_731077, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:sob-union!");

closureN_type c_735745;
object e_735753 [3];
c_735745.hdr.mark = gc_color_red;
 c_735745.hdr.grayed = 0;
c_735745.tag = closureN_tag;
 c_735745.fn = (function_type)__lambda_555;
c_735745.num_args = 1;
c_735745.num_elements = 3;
c_735745.elements = (object *)e_735753;
c_735745.elements[0] = k_732121;
c_735745.elements[1] = sob1_73491_731076;
c_735745.elements[2] = sobs_73492_731077;


closureN_type c_735754;
object e_735758 [1];
c_735754.hdr.mark = gc_color_red;
 c_735754.hdr.grayed = 0;
c_735754.tag = closureN_tag;
 c_735754.fn = (function_type)__lambda_557;
c_735754.num_args = 1;
c_735754.num_elements = 1;
c_735754.elements = (object *)e_735758;
c_735754.elements[0] = sob1_73491_731076;

return_direct_with_clo1(data,(closure)&c_735745,__lambda_555,  &c_735754);; 
}

static void __lambda_557(void *data, object self_732921, int argc, object *args) /* object self_732921, object k_732124, object sob_73493_731078 */
 {
 object k_732124 = args[0]; object sob_73493_731078 = args[1];
  return_direct_with_clo4(data,  __glo_dyadic_91sob_91union_67_srfi_113, (((closure)  __glo_dyadic_91sob_91union_67_srfi_113)->fn),  k_732124, ((closureN)self_732921)->elements[0], ((closureN)self_732921)->elements[0], sob_73493_731078);; 
}

static void __lambda_555(void *data, object self_732922, int argc, object *args) /* object self_732922, object r_732123 */
 {
 object r_732123 = args[0];
  
closureN_type c_735747;
object e_735751 [2];
c_735747.hdr.mark = gc_color_red;
 c_735747.hdr.grayed = 0;
c_735747.tag = closureN_tag;
 c_735747.fn = (function_type)__lambda_556;
c_735747.num_args = 1;
c_735747.num_elements = 2;
c_735747.elements = (object *)e_735751;
c_735747.elements[0] = ((closureN)self_732922)->elements[0];
c_735747.elements[1] = ((closureN)self_732922)->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_735747, r_732123, ((closureN)self_732922)->elements[2]);; 
}

static void __lambda_556(void *data, object self_732923, int argc, object *args) /* object self_732923, object r_732122 */
 {

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

static void __lambda_552(void *data, object _, int argc, object *args) /* closure _,object k_732117, object bags_73490_731075_raw, ... */
 {
object k_732117 = args[0];
load_varargs(bags_73490_731075, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag-union");

closureN_type c_735735;
object e_735742 [2];
c_735735.hdr.mark = gc_color_red;
 c_735735.hdr.grayed = 0;
c_735735.tag = closureN_tag;
 c_735735.fn = (function_type)__lambda_553;
c_735735.num_args = 1;
c_735735.num_elements = 2;
c_735735.elements = (object *)e_735742;
c_735735.elements[0] = bags_73490_731075;
c_735735.elements[1] = k_732117;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735735, bags_73490_731075);; 
}

static void __lambda_553(void *data, object self_732920, int argc, object *args) /* object self_732920, object r_732118 */
 {

  
object c_735740 = apply(data,  ((closureN)self_732920)->elements[1],__glo_sob_91union_srfi_113, ((closureN)self_732920)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732920)->elements[1], (((closure)  ((closureN)self_732920)->elements[1])->fn),  c_735740);; 
}

static void __lambda_550(void *data, object _, int argc, object *args) /* closure _,object k_732113, object sets_73489_731074_raw, ... */
 {
object k_732113 = args[0];
load_varargs(sets_73489_731074, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set-union");

closureN_type c_735725;
object e_735732 [2];
c_735725.hdr.mark = gc_color_red;
 c_735725.hdr.grayed = 0;
c_735725.tag = closureN_tag;
 c_735725.fn = (function_type)__lambda_551;
c_735725.num_args = 1;
c_735725.num_elements = 2;
c_735725.elements = (object *)e_735732;
c_735725.elements[0] = k_732113;
c_735725.elements[1] = sets_73489_731074;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735725, sets_73489_731074);; 
}

static void __lambda_551(void *data, object self_732919, int argc, object *args) /* object self_732919, object r_732114 */
 {

  
object c_735730 = apply(data,  ((closureN)self_732919)->elements[0],__glo_sob_91union_srfi_113, ((closureN)self_732919)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732919)->elements[0], (((closure)  ((closureN)self_732919)->elements[0])->fn),  c_735730);; 
}

static void __lambda_537(void *data, object _, int argc, object *args) /* closure _,object k_732098, object result_73477_731062, object sob1_73478_731063, object sob2_73479_731064 */
 {
object k_732098 = args[0]; object result_73477_731062 = args[1]; object sob1_73478_731063 = args[2]; object sob2_73479_731064 = args[3];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob-union!");

closureN_type c_735666;
object e_735722 [3];
c_735666.hdr.mark = gc_color_red;
 c_735666.hdr.grayed = 0;
c_735666.tag = closureN_tag;
 c_735666.fn = (function_type)__lambda_538;
c_735666.num_args = 1;
c_735666.num_elements = 3;
c_735666.elements = (object *)e_735722;
c_735666.elements[0] = k_732098;
c_735666.elements[1] = result_73477_731062;
c_735666.elements[2] = sob2_73479_731064;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735666, sob1_73478_731063);; 
}

static void __lambda_538(void *data, object self_732907, int argc, object *args) /* object self_732907, object r_732099 */
 {
 object r_732099 = args[0];
  
closureN_type c_735668;
object e_735720 [3];
c_735668.hdr.mark = gc_color_red;
 c_735668.hdr.grayed = 0;
c_735668.tag = closureN_tag;
 c_735668.fn = (function_type)__lambda_539;
c_735668.num_args = 1;
c_735668.num_elements = 3;
c_735668.elements = (object *)e_735720;
c_735668.elements[0] = ((closureN)self_732907)->elements[0];
c_735668.elements[1] = r_732099;
c_735668.elements[2] = ((closureN)self_732907)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735668, ((closureN)self_732907)->elements[2]);; 
}

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

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735670, ((closureN)self_732908)->elements[2]);; 
}

static void __lambda_540(void *data, object self_732909, int argc, object *args) /* object self_732909, object r_732101 */
 {
 object r_732101 = args[0];
  
closureN_type c_735672;
object e_735715 [1];
c_735672.hdr.mark = gc_color_red;
 c_735672.hdr.grayed = 0;
c_735672.tag = closureN_tag;
 c_735672.fn = (function_type)__lambda_541;
c_735672.num_args = 3;
c_735672.num_elements = 1;
c_735672.elements = (object *)e_735715;
c_735672.elements[0] = ((closureN)self_732909)->elements[0];

return_direct_with_clo3(data,(closure)&c_735672,__lambda_541,  ((closureN)self_732909)->elements[1], ((closureN)self_732909)->elements[2], r_732101);; 
}

static void __lambda_541(void *data, object self_732910, int argc, object *args) /* object self_732910, object sob1_91ht_73480_731065, object sob2_91ht_73481_731066, object result_91ht_73482_731067 */
 {
 object sob1_91ht_73480_731065 = args[0]; object sob2_91ht_73481_731066 = args[1]; object result_91ht_73482_731067 = args[2];
  
closureN_type c_735674;
object e_735700 [4];
c_735674.hdr.mark = gc_color_red;
 c_735674.hdr.grayed = 0;
c_735674.tag = closureN_tag;
 c_735674.fn = (function_type)__lambda_542;
c_735674.num_args = 1;
c_735674.num_elements = 4;
c_735674.elements = (object *)e_735700;
c_735674.elements[0] = ((closureN)self_732910)->elements[0];
c_735674.elements[1] = result_91ht_73482_731067;
c_735674.elements[2] = sob1_91ht_73480_731065;
c_735674.elements[3] = sob2_91ht_73481_731066;


closureN_type c_735701;
object e_735714 [2];
c_735701.hdr.mark = gc_color_red;
 c_735701.hdr.grayed = 0;
c_735701.tag = closureN_tag;
 c_735701.fn = (function_type)__lambda_547;
c_735701.num_args = 2;
c_735701.num_elements = 2;
c_735701.elements = (object *)e_735714;
c_735701.elements[0] = result_91ht_73482_731067;
c_735701.elements[1] = sob2_91ht_73481_731066;

return_direct_with_clo1(data,(closure)&c_735674,__lambda_542,  &c_735701);; 
}

static void __lambda_547(void *data, object self_732911, int argc, object *args) /* object self_732911, object k_732108, object key_73483_731068, object value1_73484_731069 */
 {
 object k_732108 = args[0]; object key_73483_731068 = args[1]; object value1_73484_731069 = args[2];
  
closureN_type c_735703;
object e_735712 [4];
c_735703.hdr.mark = gc_color_red;
 c_735703.hdr.grayed = 0;
c_735703.tag = closureN_tag;
 c_735703.fn = (function_type)__lambda_548;
c_735703.num_args = 1;
c_735703.num_elements = 4;
c_735703.elements = (object *)e_735712;
c_735703.elements[0] = k_732108;
c_735703.elements[1] = key_73483_731068;
c_735703.elements[2] = ((closureN)self_732911)->elements[0];
c_735703.elements[3] = value1_73484_731069;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_735703, ((closureN)self_732911)->elements[1], key_73483_731068, obj_int2obj(0));; 
}

static void __lambda_548(void *data, object self_732912, int argc, object *args) /* object self_732912, object value2_73485_731070 */
 {
 object value2_73485_731070 = args[0];
  
closureN_type c_735705;
object e_735710 [3];
c_735705.hdr.mark = gc_color_red;
 c_735705.hdr.grayed = 0;
c_735705.tag = closureN_tag;
 c_735705.fn = (function_type)__lambda_549;
c_735705.num_args = 1;
c_735705.num_elements = 3;
c_735705.elements = (object *)e_735710;
c_735705.elements[0] = ((closureN)self_732912)->elements[0];
c_735705.elements[1] = ((closureN)self_732912)->elements[1];
c_735705.elements[2] = ((closureN)self_732912)->elements[2];

return_direct_with_clo3(data,  __glo_max_scheme_base, (((closure)  __glo_max_scheme_base)->fn),  &c_735705, ((closureN)self_732912)->elements[3], value2_73485_731070);; 
}

static void __lambda_549(void *data, object self_732913, int argc, object *args) /* object self_732913, object r_732110 */
 {
 object r_732110 = args[0];
  return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  ((closureN)self_732913)->elements[0], ((closureN)self_732913)->elements[2], ((closureN)self_732913)->elements[1], r_732110);; 
}

static void __lambda_542(void *data, object self_732914, int argc, object *args) /* object self_732914, object r_732107 */
 {
 object r_732107 = args[0];
  
closureN_type c_735676;
object e_735698 [4];
c_735676.hdr.mark = gc_color_red;
 c_735676.hdr.grayed = 0;
c_735676.tag = closureN_tag;
 c_735676.fn = (function_type)__lambda_543;
c_735676.num_args = 1;
c_735676.num_elements = 4;
c_735676.elements = (object *)e_735698;
c_735676.elements[0] = ((closureN)self_732914)->elements[0];
c_735676.elements[1] = ((closureN)self_732914)->elements[1];
c_735676.elements[2] = ((closureN)self_732914)->elements[2];
c_735676.elements[3] = ((closureN)self_732914)->elements[3];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_735676, ((closureN)self_732914)->elements[2], r_732107);; 
}

static void __lambda_543(void *data, object self_732915, int argc, object *args) /* object self_732915, object r_732102_732470 */
 {

  
closureN_type c_735678;
object e_735682 [2];
c_735678.hdr.mark = gc_color_red;
 c_735678.hdr.grayed = 0;
c_735678.tag = closureN_tag;
 c_735678.fn = (function_type)__lambda_544;
c_735678.num_args = 1;
c_735678.num_elements = 2;
c_735678.elements = (object *)e_735682;
c_735678.elements[0] = ((closureN)self_732915)->elements[0];
c_735678.elements[1] = ((closureN)self_732915)->elements[3];


closureN_type c_735683;
object e_735697 [2];
c_735683.hdr.mark = gc_color_red;
 c_735683.hdr.grayed = 0;
c_735683.tag = closureN_tag;
 c_735683.fn = (function_type)__lambda_545;
c_735683.num_args = 2;
c_735683.num_elements = 2;
c_735683.elements = (object *)e_735697;
c_735683.elements[0] = ((closureN)self_732915)->elements[1];
c_735683.elements[1] = ((closureN)self_732915)->elements[2];

return_direct_with_clo1(data,(closure)&c_735678,__lambda_544,  &c_735683);; 
}

static void __lambda_545(void *data, object self_732916, int argc, object *args) /* object self_732916, object k_732104_732472, object key_73486_731071_732473, object value2_73487_731072_732474 */
 {
 object k_732104_732472 = args[0]; object key_73486_731071_732473 = args[1]; object value2_73487_731072_732474 = args[2];
  
closureN_type c_735685;
object e_735695 [4];
c_735685.hdr.mark = gc_color_red;
 c_735685.hdr.grayed = 0;
c_735685.tag = closureN_tag;
 c_735685.fn = (function_type)__lambda_546;
c_735685.num_args = 1;
c_735685.num_elements = 4;
c_735685.elements = (object *)e_735695;
c_735685.elements[0] = k_732104_732472;
c_735685.elements[1] = key_73486_731071_732473;
c_735685.elements[2] = ((closureN)self_732916)->elements[0];
c_735685.elements[3] = value2_73487_731072_732474;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_735685, ((closureN)self_732916)->elements[1], key_73486_731071_732473, obj_int2obj(0));; 
}

static void __lambda_546(void *data, object self_732917, int argc, object *args) /* object self_732917, object value1_73488_731073_732475 */
 {
 object value1_73488_731073_732475 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, value1_73488_731073_732475, obj_int2obj(0))) ){ 
  return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  ((closureN)self_732917)->elements[0], ((closureN)self_732917)->elements[2], ((closureN)self_732917)->elements[1], ((closureN)self_732917)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732917)->elements[0], (((closure)  ((closureN)self_732917)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_544(void *data, object self_732918, int argc, object *args) /* object self_732918, object r_732103_732471 */
 {
 object r_732103_732471 = args[0];
  return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  ((closureN)self_732918)->elements[0], ((closureN)self_732918)->elements[1], r_732103_732471);; 
}

static void __lambda_531(void *data, object _, int argc, object *args) /* closure _,object k_732087, object sob1_73473_731058, object sobs_73474_731059_raw, ... */
 {
object k_732087 = args[0]; object sob1_73473_731058 = args[1];
load_varargs(sobs_73474_731059, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:sob-union");
  
if( (boolean_f != Cyc_is_null(sobs_73474_731059)) ){ 
  return_direct_with_clo1(data,  k_732087, (((closure)  k_732087)->fn),  sob1_73473_731058);
} else { 
  
closureN_type c_735638;
object e_735663 [3];
c_735638.hdr.mark = gc_color_red;
 c_735638.hdr.grayed = 0;
c_735638.tag = closureN_tag;
 c_735638.fn = (function_type)__lambda_532;
c_735638.num_args = 1;
c_735638.num_elements = 3;
c_735638.elements = (object *)e_735663;
c_735638.elements[0] = k_732087;
c_735638.elements[1] = sob1_73473_731058;
c_735638.elements[2] = sobs_73474_731059;

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_735638, sob1_73473_731058);}
;; 
}

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



return_direct_with_clo4(data,  __glo_dyadic_91sob_91union_67_srfi_113, (((closure)  __glo_dyadic_91sob_91union_67_srfi_113)->fn),  &c_735640, result_73475_731060, ((closureN)self_732902)->elements[1], Cyc_car(data, ((closureN)self_732902)->elements[2]));; 
}

static void __lambda_533(void *data, object self_732903, int argc, object *args) /* object self_732903, object r_732090 */
 {

  
closureN_type c_735642;
object e_735652 [3];
c_735642.hdr.mark = gc_color_red;
 c_735642.hdr.grayed = 0;
c_735642.tag = closureN_tag;
 c_735642.fn = (function_type)__lambda_534;
c_735642.num_args = 1;
c_735642.num_elements = 3;
c_735642.elements = (object *)e_735652;
c_735642.elements[0] = ((closureN)self_732903)->elements[0];
c_735642.elements[1] = ((closureN)self_732903)->elements[1];
c_735642.elements[2] = ((closureN)self_732903)->elements[2];


closureN_type c_735653;
object e_735657 [1];
c_735653.hdr.mark = gc_color_red;
 c_735653.hdr.grayed = 0;
c_735653.tag = closureN_tag;
 c_735653.fn = (function_type)__lambda_536;
c_735653.num_args = 1;
c_735653.num_elements = 1;
c_735653.elements = (object *)e_735657;
c_735653.elements[0] = ((closureN)self_732903)->elements[1];

return_direct_with_clo1(data,(closure)&c_735642,__lambda_534,  &c_735653);; 
}

static void __lambda_536(void *data, object self_732904, int argc, object *args) /* object self_732904, object k_732094, object sob_73476_731061 */
 {
 object k_732094 = args[0]; object sob_73476_731061 = args[1];
  return_direct_with_clo4(data,  __glo_dyadic_91sob_91union_67_srfi_113, (((closure)  __glo_dyadic_91sob_91union_67_srfi_113)->fn),  k_732094, ((closureN)self_732904)->elements[0], ((closureN)self_732904)->elements[0], sob_73476_731061);; 
}

static void __lambda_534(void *data, object self_732905, int argc, object *args) /* object self_732905, object r_732092 */
 {
 object r_732092 = args[0];
  
closureN_type c_735644;
object e_735648 [2];
c_735644.hdr.mark = gc_color_red;
 c_735644.hdr.grayed = 0;
c_735644.tag = closureN_tag;
 c_735644.fn = (function_type)__lambda_535;
c_735644.num_args = 1;
c_735644.num_elements = 2;
c_735644.elements = (object *)e_735648;
c_735644.elements[0] = ((closureN)self_732905)->elements[0];
c_735644.elements[1] = ((closureN)self_732905)->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_735644, r_732092, Cyc_cdr(data, ((closureN)self_732905)->elements[2]));; 
}

static void __lambda_535(void *data, object self_732906, int argc, object *args) /* object self_732906, object r_732091 */
 {

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

static void __lambda_529(void *data, object _, int argc, object *args) /* closure _,object k_732083, object sob1_73469_731056, object sob2_73470_731057 */
 {
object k_732083 = args[0]; object sob1_73469_731056 = args[1]; object sob2_73470_731057 = args[2];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob>=?");

closureN_type c_735626;
object e_735632 [1];
c_735626.hdr.mark = gc_color_red;
 c_735626.hdr.grayed = 0;
c_735626.tag = closureN_tag;
 c_735626.fn = (function_type)__lambda_530;
c_735626.num_args = 1;
c_735626.num_elements = 1;
c_735626.elements = (object *)e_735632;
c_735626.elements[0] = k_732083;

return_direct_with_clo3(data,  __glo_dyadic_91sob_125_127_srfi_113, (((closure)  __glo_dyadic_91sob_125_127_srfi_113)->fn),  &c_735626, sob2_73470_731057, sob1_73469_731056);; 
}

static void __lambda_530(void *data, object self_732901, int argc, object *args) /* object self_732901, object r_732084_732469 */
 {
 object r_732084_732469 = args[0];
  
complex_num_type local_735631; 
return_direct_with_clo1(data,  ((closureN)self_732901)->elements[0], (((closure)  ((closureN)self_732901)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735631, r_732084_732469));; 
}

static void __lambda_527(void *data, object _, int argc, object *args) /* closure _,object k_732079, object bags_73468_731055_raw, ... */
 {
object k_732079 = args[0];
load_varargs(bags_73468_731055, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag>=?");

closureN_type c_735616;
object e_735623 [2];
c_735616.hdr.mark = gc_color_red;
 c_735616.hdr.grayed = 0;
c_735616.tag = closureN_tag;
 c_735616.fn = (function_type)__lambda_528;
c_735616.num_args = 1;
c_735616.num_elements = 2;
c_735616.elements = (object *)e_735623;
c_735616.elements[0] = bags_73468_731055;
c_735616.elements[1] = k_732079;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735616, bags_73468_731055);; 
}

static void __lambda_528(void *data, object self_732900, int argc, object *args) /* object self_732900, object r_732080 */
 {

  
object c_735621 = apply(data,  ((closureN)self_732900)->elements[1],__glo_sob_125_123_127_srfi_113, ((closureN)self_732900)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732900)->elements[1], (((closure)  ((closureN)self_732900)->elements[1])->fn),  c_735621);; 
}

static void __lambda_525(void *data, object _, int argc, object *args) /* closure _,object k_732075, object sets_73467_731054_raw, ... */
 {
object k_732075 = args[0];
load_varargs(sets_73467_731054, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set>=?");

closureN_type c_735606;
object e_735613 [2];
c_735606.hdr.mark = gc_color_red;
 c_735606.hdr.grayed = 0;
c_735606.tag = closureN_tag;
 c_735606.fn = (function_type)__lambda_526;
c_735606.num_args = 1;
c_735606.num_elements = 2;
c_735606.elements = (object *)e_735613;
c_735606.elements[0] = k_732075;
c_735606.elements[1] = sets_73467_731054;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735606, sets_73467_731054);; 
}

static void __lambda_526(void *data, object self_732899, int argc, object *args) /* object self_732899, object r_732076 */
 {

  
object c_735611 = apply(data,  ((closureN)self_732899)->elements[0],__glo_sob_125_123_127_srfi_113, ((closureN)self_732899)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732899)->elements[0], (((closure)  ((closureN)self_732899)->elements[0])->fn),  c_735611);; 
}

static void __lambda_517(void *data, object _, int argc, object *args) /* closure _,object k_732055, object args_73449_73453_731046_raw, ... */
 {
object k_732055 = args[0];
load_varargs(args_73449_73453_731046, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:sob>=?");
  
  
  
  make_pair(c_735545,quote_sob,NULL);c_735545.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73449_73453_731046), Cyc_length(data, &c_735545))) ){ 
  
closureN_type c_735547;
object e_735554 [2];
c_735547.hdr.mark = gc_color_red;
 c_735547.hdr.grayed = 0;
c_735547.tag = closureN_tag;
 c_735547.fn = (function_type)__lambda_518;
c_735547.num_args = 1;
c_735547.num_elements = 2;
c_735547.elements = (object *)e_735554;
c_735547.elements[0] = args_73449_73453_731046;
c_735547.elements[1] = k_732055;


mclosure0(c_735555, (function_type)__lambda_519);c_735555.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735547,__lambda_518,  &c_735555);
} else { 
    
  
  
  make_pair(c_735564,quote_sob2,NULL);c_735564.hdr.immutable = 1;
  make_pair(c_735563,quote_sob1,&c_735564);c_735563.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73449_73453_731046), Cyc_length(data, &c_735563))) ){ 
  
closureN_type c_735566;
object e_735573 [2];
c_735566.hdr.mark = gc_color_red;
 c_735566.hdr.grayed = 0;
c_735566.tag = closureN_tag;
 c_735566.fn = (function_type)__lambda_520;
c_735566.num_args = 1;
c_735566.num_elements = 2;
c_735566.elements = (object *)e_735573;
c_735566.elements[0] = args_73449_73453_731046;
c_735566.elements[1] = k_732055;


mclosure0(c_735574, (function_type)__lambda_521);c_735574.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735566,__lambda_520,  &c_735574);
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, args_73449_73453_731046), obj_int2obj(2))) ){ 
  
closureN_type c_735581;
object e_735588 [2];
c_735581.hdr.mark = gc_color_red;
 c_735581.hdr.grayed = 0;
c_735581.tag = closureN_tag;
 c_735581.fn = (function_type)__lambda_522;
c_735581.num_args = 1;
c_735581.num_elements = 2;
c_735581.elements = (object *)e_735588;
c_735581.elements[0] = args_73449_73453_731046;
c_735581.elements[1] = k_732055;


mclosure0(c_735589, (function_type)__lambda_523);c_735589.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735581,__lambda_522,  &c_735589);
} else { 
  
make_utf8_string_with_len(c_735603, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_732055, &c_735603);}
;}
;}
;; 
}

static void __lambda_523(void *data, object self_732896, int argc, object *args) /* object self_732896, object k_732065, object sob1_73463_731051, object sob2_73464_731052, object sobs_73465_731053_raw, ... */
 {
 object k_732065 = args[0]; object sob1_73463_731051 = args[1]; object sob2_73464_731052 = args[2];
load_varargs(sobs_73465_731053, args, 3, argc - 3);
  
closureN_type c_735591;
object e_735601 [3];
c_735591.hdr.mark = gc_color_red;
 c_735591.hdr.grayed = 0;
c_735591.tag = closureN_tag;
 c_735591.fn = (function_type)__lambda_524;
c_735591.num_args = 1;
c_735591.num_elements = 3;
c_735591.elements = (object *)e_735601;
c_735591.elements[0] = k_732065;
c_735591.elements[1] = sob2_73464_731052;
c_735591.elements[2] = sobs_73465_731053;

return_direct_with_clo3(data,  __glo_dyadic_91sob_125_123_127_srfi_113, (((closure)  __glo_dyadic_91sob_125_123_127_srfi_113)->fn),  &c_735591, sob1_73463_731051, sob2_73464_731052);; 
}

static void __lambda_524(void *data, object self_732897, int argc, object *args) /* object self_732897, object r_732066 */
 {
 object r_732066 = args[0];
  if( (boolean_f != r_732066) ){ 
  
object c_735596 = apply_va(data,  ((closureN)self_732897)->elements[0],3,__glo_sob_125_123_127_srfi_113, ((closureN)self_732897)->elements[1], ((closureN)self_732897)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_732897)->elements[0], (((closure)  ((closureN)self_732897)->elements[0])->fn),  c_735596);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732897)->elements[0], (((closure)  ((closureN)self_732897)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_522(void *data, object self_732898, int argc, object *args) /* object self_732898, object r_732064 */
 {
 object r_732064 = args[0];
  
object c_735586 = apply(data,  ((closureN)self_732898)->elements[1],r_732064, ((closureN)self_732898)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732898)->elements[1], (((closure)  ((closureN)self_732898)->elements[1])->fn),  c_735586);; 
}

static void __lambda_521(void *data, object self_732894, int argc, object *args) /* object self_732894, object k_732062, object sob1_73458_731049, object sob2_73459_731050 */
 {
 object k_732062 = args[0]; object sob1_73458_731049 = args[1]; object sob2_73459_731050 = args[2];
  return_direct_with_clo3(data,  __glo_dyadic_91sob_125_123_127_srfi_113, (((closure)  __glo_dyadic_91sob_125_123_127_srfi_113)->fn),  k_732062, sob1_73458_731049, sob2_73459_731050);; 
}

static void __lambda_520(void *data, object self_732895, int argc, object *args) /* object self_732895, object r_732061 */
 {
 object r_732061 = args[0];
  
object c_735571 = apply(data,  ((closureN)self_732895)->elements[1],r_732061, ((closureN)self_732895)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732895)->elements[1], (((closure)  ((closureN)self_732895)->elements[1])->fn),  c_735571);; 
}

static void __lambda_519(void *data, object self_732892, int argc, object *args) /* object self_732892, object k_732059, object sob_73456_731048 */
 {
 object k_732059 = args[0];
  return_direct_with_clo1(data,  k_732059, (((closure)  k_732059)->fn),  boolean_t);; 
}

static void __lambda_518(void *data, object self_732893, int argc, object *args) /* object self_732893, object r_732058 */
 {
 object r_732058 = args[0];
  
object c_735552 = apply(data,  ((closureN)self_732893)->elements[1],r_732058, ((closureN)self_732893)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732893)->elements[1], (((closure)  ((closureN)self_732893)->elements[1])->fn),  c_735552);; 
}

static void __lambda_516(void *data, object _, int argc, object *args) /* closure _,object k_732052, object sob1_73447_731044, object sob2_73448_731045 */
 {
object k_732052 = args[0]; object sob1_73447_731044 = args[1]; object sob2_73448_731045 = args[2];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob<?");
return_direct_with_clo3(data,  __glo_dyadic_91sob_125_127_srfi_113, (((closure)  __glo_dyadic_91sob_125_127_srfi_113)->fn),  k_732052, sob2_73448_731045, sob1_73447_731044);; 
}

static void __lambda_514(void *data, object _, int argc, object *args) /* closure _,object k_732048, object bags_73446_731043_raw, ... */
 {
object k_732048 = args[0];
load_varargs(bags_73446_731043, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag<?");

closureN_type c_735528;
object e_735535 [2];
c_735528.hdr.mark = gc_color_red;
 c_735528.hdr.grayed = 0;
c_735528.tag = closureN_tag;
 c_735528.fn = (function_type)__lambda_515;
c_735528.num_args = 1;
c_735528.num_elements = 2;
c_735528.elements = (object *)e_735535;
c_735528.elements[0] = bags_73446_731043;
c_735528.elements[1] = k_732048;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735528, bags_73446_731043);; 
}

static void __lambda_515(void *data, object self_732891, int argc, object *args) /* object self_732891, object r_732049 */
 {

  
object c_735533 = apply(data,  ((closureN)self_732891)->elements[1],__glo_sob_121_127_srfi_113, ((closureN)self_732891)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732891)->elements[1], (((closure)  ((closureN)self_732891)->elements[1])->fn),  c_735533);; 
}

static void __lambda_512(void *data, object _, int argc, object *args) /* closure _,object k_732044, object sets_73445_731042_raw, ... */
 {
object k_732044 = args[0];
load_varargs(sets_73445_731042, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set<?");

closureN_type c_735518;
object e_735525 [2];
c_735518.hdr.mark = gc_color_red;
 c_735518.hdr.grayed = 0;
c_735518.tag = closureN_tag;
 c_735518.fn = (function_type)__lambda_513;
c_735518.num_args = 1;
c_735518.num_elements = 2;
c_735518.elements = (object *)e_735525;
c_735518.elements[0] = k_732044;
c_735518.elements[1] = sets_73445_731042;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735518, sets_73445_731042);; 
}

static void __lambda_513(void *data, object self_732890, int argc, object *args) /* object self_732890, object r_732045 */
 {

  
object c_735523 = apply(data,  ((closureN)self_732890)->elements[0],__glo_sob_121_127_srfi_113, ((closureN)self_732890)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732890)->elements[0], (((closure)  ((closureN)self_732890)->elements[0])->fn),  c_735523);; 
}

static void __lambda_504(void *data, object _, int argc, object *args) /* closure _,object k_732024, object args_73427_73431_731034_raw, ... */
 {
object k_732024 = args[0];
load_varargs(args_73427_73431_731034, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:sob<?");
  
  
  
  make_pair(c_735457,quote_sob,NULL);c_735457.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73427_73431_731034), Cyc_length(data, &c_735457))) ){ 
  
closureN_type c_735459;
object e_735466 [2];
c_735459.hdr.mark = gc_color_red;
 c_735459.hdr.grayed = 0;
c_735459.tag = closureN_tag;
 c_735459.fn = (function_type)__lambda_505;
c_735459.num_args = 1;
c_735459.num_elements = 2;
c_735459.elements = (object *)e_735466;
c_735459.elements[0] = args_73427_73431_731034;
c_735459.elements[1] = k_732024;


mclosure0(c_735467, (function_type)__lambda_506);c_735467.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735459,__lambda_505,  &c_735467);
} else { 
    
  
  
  make_pair(c_735476,quote_sob2,NULL);c_735476.hdr.immutable = 1;
  make_pair(c_735475,quote_sob1,&c_735476);c_735475.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73427_73431_731034), Cyc_length(data, &c_735475))) ){ 
  
closureN_type c_735478;
object e_735485 [2];
c_735478.hdr.mark = gc_color_red;
 c_735478.hdr.grayed = 0;
c_735478.tag = closureN_tag;
 c_735478.fn = (function_type)__lambda_507;
c_735478.num_args = 1;
c_735478.num_elements = 2;
c_735478.elements = (object *)e_735485;
c_735478.elements[0] = args_73427_73431_731034;
c_735478.elements[1] = k_732024;


mclosure0(c_735486, (function_type)__lambda_508);c_735486.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735478,__lambda_507,  &c_735486);
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, args_73427_73431_731034), obj_int2obj(2))) ){ 
  
closureN_type c_735493;
object e_735500 [2];
c_735493.hdr.mark = gc_color_red;
 c_735493.hdr.grayed = 0;
c_735493.tag = closureN_tag;
 c_735493.fn = (function_type)__lambda_509;
c_735493.num_args = 1;
c_735493.num_elements = 2;
c_735493.elements = (object *)e_735500;
c_735493.elements[0] = args_73427_73431_731034;
c_735493.elements[1] = k_732024;


mclosure0(c_735501, (function_type)__lambda_510);c_735501.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735493,__lambda_509,  &c_735501);
} else { 
  
make_utf8_string_with_len(c_735515, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_732024, &c_735515);}
;}
;}
;; 
}

static void __lambda_510(void *data, object self_732887, int argc, object *args) /* object self_732887, object k_732034, object sob1_73441_731039, object sob2_73442_731040, object sobs_73443_731041_raw, ... */
 {
 object k_732034 = args[0]; object sob1_73441_731039 = args[1]; object sob2_73442_731040 = args[2];
load_varargs(sobs_73443_731041, args, 3, argc - 3);
  
closureN_type c_735503;
object e_735513 [3];
c_735503.hdr.mark = gc_color_red;
 c_735503.hdr.grayed = 0;
c_735503.tag = closureN_tag;
 c_735503.fn = (function_type)__lambda_511;
c_735503.num_args = 1;
c_735503.num_elements = 3;
c_735503.elements = (object *)e_735513;
c_735503.elements[0] = k_732034;
c_735503.elements[1] = sob2_73442_731040;
c_735503.elements[2] = sobs_73443_731041;

return_direct_with_clo3(data,  __glo_dyadic_91sob_125_127_srfi_113, (((closure)  __glo_dyadic_91sob_125_127_srfi_113)->fn),  &c_735503, sob2_73442_731040, sob1_73441_731039);; 
}

static void __lambda_511(void *data, object self_732888, int argc, object *args) /* object self_732888, object r_732035_732468 */
 {
 object r_732035_732468 = args[0];
  if( (boolean_f != r_732035_732468) ){ 
  
object c_735508 = apply_va(data,  ((closureN)self_732888)->elements[0],3,__glo_sob_121_127_srfi_113, ((closureN)self_732888)->elements[1], ((closureN)self_732888)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_732888)->elements[0], (((closure)  ((closureN)self_732888)->elements[0])->fn),  c_735508);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732888)->elements[0], (((closure)  ((closureN)self_732888)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_509(void *data, object self_732889, int argc, object *args) /* object self_732889, object r_732033 */
 {
 object r_732033 = args[0];
  
object c_735498 = apply(data,  ((closureN)self_732889)->elements[1],r_732033, ((closureN)self_732889)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732889)->elements[1], (((closure)  ((closureN)self_732889)->elements[1])->fn),  c_735498);; 
}

static void __lambda_508(void *data, object self_732885, int argc, object *args) /* object self_732885, object k_732031, object sob1_73436_731037, object sob2_73437_731038 */
 {
 object k_732031 = args[0]; object sob1_73436_731037 = args[1]; object sob2_73437_731038 = args[2];
  return_direct_with_clo3(data,  __glo_dyadic_91sob_125_127_srfi_113, (((closure)  __glo_dyadic_91sob_125_127_srfi_113)->fn),  k_732031, sob2_73437_731038, sob1_73436_731037);; 
}

static void __lambda_507(void *data, object self_732886, int argc, object *args) /* object self_732886, object r_732030 */
 {
 object r_732030 = args[0];
  
object c_735483 = apply(data,  ((closureN)self_732886)->elements[1],r_732030, ((closureN)self_732886)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732886)->elements[1], (((closure)  ((closureN)self_732886)->elements[1])->fn),  c_735483);; 
}

static void __lambda_506(void *data, object self_732883, int argc, object *args) /* object self_732883, object k_732028, object sob_73434_731036 */
 {
 object k_732028 = args[0];
  return_direct_with_clo1(data,  k_732028, (((closure)  k_732028)->fn),  boolean_t);; 
}

static void __lambda_505(void *data, object self_732884, int argc, object *args) /* object self_732884, object r_732027 */
 {
 object r_732027 = args[0];
  
object c_735464 = apply(data,  ((closureN)self_732884)->elements[1],r_732027, ((closureN)self_732884)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732884)->elements[1], (((closure)  ((closureN)self_732884)->elements[1])->fn),  c_735464);; 
}

static void __lambda_502(void *data, object _, int argc, object *args) /* closure _,object k_732020, object sob1_73425_731032, object sob2_73426_731033 */
 {
object k_732020 = args[0]; object sob1_73425_731032 = args[1]; object sob2_73426_731033 = args[2];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob>?");

closureN_type c_735443;
object e_735449 [1];
c_735443.hdr.mark = gc_color_red;
 c_735443.hdr.grayed = 0;
c_735443.tag = closureN_tag;
 c_735443.fn = (function_type)__lambda_503;
c_735443.num_args = 1;
c_735443.num_elements = 1;
c_735443.elements = (object *)e_735449;
c_735443.elements[0] = k_732020;

return_direct_with_clo3(data,  __glo_dyadic_91sob_121_123_127_srfi_113, (((closure)  __glo_dyadic_91sob_121_123_127_srfi_113)->fn),  &c_735443, sob1_73425_731032, sob2_73426_731033);; 
}

static void __lambda_503(void *data, object self_732882, int argc, object *args) /* object self_732882, object r_732021 */
 {
 object r_732021 = args[0];
  
complex_num_type local_735448; 
return_direct_with_clo1(data,  ((closureN)self_732882)->elements[0], (((closure)  ((closureN)self_732882)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735448, r_732021));; 
}

static void __lambda_500(void *data, object _, int argc, object *args) /* closure _,object k_732016, object bags_73424_731031_raw, ... */
 {
object k_732016 = args[0];
load_varargs(bags_73424_731031, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag>?");

closureN_type c_735433;
object e_735440 [2];
c_735433.hdr.mark = gc_color_red;
 c_735433.hdr.grayed = 0;
c_735433.tag = closureN_tag;
 c_735433.fn = (function_type)__lambda_501;
c_735433.num_args = 1;
c_735433.num_elements = 2;
c_735433.elements = (object *)e_735440;
c_735433.elements[0] = bags_73424_731031;
c_735433.elements[1] = k_732016;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735433, bags_73424_731031);; 
}

static void __lambda_501(void *data, object self_732881, int argc, object *args) /* object self_732881, object r_732017 */
 {

  
object c_735438 = apply(data,  ((closureN)self_732881)->elements[1],__glo_sob_125_127_srfi_113, ((closureN)self_732881)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732881)->elements[1], (((closure)  ((closureN)self_732881)->elements[1])->fn),  c_735438);; 
}

static void __lambda_498(void *data, object _, int argc, object *args) /* closure _,object k_732012, object sets_73423_731030_raw, ... */
 {
object k_732012 = args[0];
load_varargs(sets_73423_731030, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set>?");

closureN_type c_735423;
object e_735430 [2];
c_735423.hdr.mark = gc_color_red;
 c_735423.hdr.grayed = 0;
c_735423.tag = closureN_tag;
 c_735423.fn = (function_type)__lambda_499;
c_735423.num_args = 1;
c_735423.num_elements = 2;
c_735423.elements = (object *)e_735430;
c_735423.elements[0] = k_732012;
c_735423.elements[1] = sets_73423_731030;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735423, sets_73423_731030);; 
}

static void __lambda_499(void *data, object self_732880, int argc, object *args) /* object self_732880, object r_732013 */
 {

  
object c_735428 = apply(data,  ((closureN)self_732880)->elements[0],__glo_sob_125_127_srfi_113, ((closureN)self_732880)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732880)->elements[0], (((closure)  ((closureN)self_732880)->elements[0])->fn),  c_735428);; 
}

static void __lambda_490(void *data, object _, int argc, object *args) /* closure _,object k_731992, object args_73405_73409_731022_raw, ... */
 {
object k_731992 = args[0];
load_varargs(args_73405_73409_731022, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:sob>?");
  
  
  
  make_pair(c_735362,quote_sob,NULL);c_735362.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73405_73409_731022), Cyc_length(data, &c_735362))) ){ 
  
closureN_type c_735364;
object e_735371 [2];
c_735364.hdr.mark = gc_color_red;
 c_735364.hdr.grayed = 0;
c_735364.tag = closureN_tag;
 c_735364.fn = (function_type)__lambda_491;
c_735364.num_args = 1;
c_735364.num_elements = 2;
c_735364.elements = (object *)e_735371;
c_735364.elements[0] = args_73405_73409_731022;
c_735364.elements[1] = k_731992;


mclosure0(c_735372, (function_type)__lambda_492);c_735372.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735364,__lambda_491,  &c_735372);
} else { 
    
  
  
  make_pair(c_735381,quote_sob2,NULL);c_735381.hdr.immutable = 1;
  make_pair(c_735380,quote_sob1,&c_735381);c_735380.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73405_73409_731022), Cyc_length(data, &c_735380))) ){ 
  
closureN_type c_735383;
object e_735390 [2];
c_735383.hdr.mark = gc_color_red;
 c_735383.hdr.grayed = 0;
c_735383.tag = closureN_tag;
 c_735383.fn = (function_type)__lambda_493;
c_735383.num_args = 1;
c_735383.num_elements = 2;
c_735383.elements = (object *)e_735390;
c_735383.elements[0] = args_73405_73409_731022;
c_735383.elements[1] = k_731992;


mclosure0(c_735391, (function_type)__lambda_494);c_735391.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735383,__lambda_493,  &c_735391);
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, args_73405_73409_731022), obj_int2obj(2))) ){ 
  
closureN_type c_735398;
object e_735405 [2];
c_735398.hdr.mark = gc_color_red;
 c_735398.hdr.grayed = 0;
c_735398.tag = closureN_tag;
 c_735398.fn = (function_type)__lambda_495;
c_735398.num_args = 1;
c_735398.num_elements = 2;
c_735398.elements = (object *)e_735405;
c_735398.elements[0] = args_73405_73409_731022;
c_735398.elements[1] = k_731992;


mclosure0(c_735406, (function_type)__lambda_496);c_735406.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735398,__lambda_495,  &c_735406);
} else { 
  
make_utf8_string_with_len(c_735420, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731992, &c_735420);}
;}
;}
;; 
}

static void __lambda_496(void *data, object self_732877, int argc, object *args) /* object self_732877, object k_732002, object sob1_73419_731027, object sob2_73420_731028, object sobs_73421_731029_raw, ... */
 {
 object k_732002 = args[0]; object sob1_73419_731027 = args[1]; object sob2_73420_731028 = args[2];
load_varargs(sobs_73421_731029, args, 3, argc - 3);
  
closureN_type c_735408;
object e_735418 [3];
c_735408.hdr.mark = gc_color_red;
 c_735408.hdr.grayed = 0;
c_735408.tag = closureN_tag;
 c_735408.fn = (function_type)__lambda_497;
c_735408.num_args = 1;
c_735408.num_elements = 3;
c_735408.elements = (object *)e_735418;
c_735408.elements[0] = k_732002;
c_735408.elements[1] = sob2_73420_731028;
c_735408.elements[2] = sobs_73421_731029;

return_direct_with_clo3(data,  __glo_dyadic_91sob_125_127_srfi_113, (((closure)  __glo_dyadic_91sob_125_127_srfi_113)->fn),  &c_735408, sob1_73419_731027, sob2_73420_731028);; 
}

static void __lambda_497(void *data, object self_732878, int argc, object *args) /* object self_732878, object r_732003 */
 {
 object r_732003 = args[0];
  if( (boolean_f != r_732003) ){ 
  
object c_735413 = apply_va(data,  ((closureN)self_732878)->elements[0],3,__glo_sob_125_127_srfi_113, ((closureN)self_732878)->elements[1], ((closureN)self_732878)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_732878)->elements[0], (((closure)  ((closureN)self_732878)->elements[0])->fn),  c_735413);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732878)->elements[0], (((closure)  ((closureN)self_732878)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_495(void *data, object self_732879, int argc, object *args) /* object self_732879, object r_732001 */
 {
 object r_732001 = args[0];
  
object c_735403 = apply(data,  ((closureN)self_732879)->elements[1],r_732001, ((closureN)self_732879)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732879)->elements[1], (((closure)  ((closureN)self_732879)->elements[1])->fn),  c_735403);; 
}

static void __lambda_494(void *data, object self_732875, int argc, object *args) /* object self_732875, object k_731999, object sob1_73414_731025, object sob2_73415_731026 */
 {
 object k_731999 = args[0]; object sob1_73414_731025 = args[1]; object sob2_73415_731026 = args[2];
  return_direct_with_clo3(data,  __glo_dyadic_91sob_125_127_srfi_113, (((closure)  __glo_dyadic_91sob_125_127_srfi_113)->fn),  k_731999, sob1_73414_731025, sob2_73415_731026);; 
}

static void __lambda_493(void *data, object self_732876, int argc, object *args) /* object self_732876, object r_731998 */
 {
 object r_731998 = args[0];
  
object c_735388 = apply(data,  ((closureN)self_732876)->elements[1],r_731998, ((closureN)self_732876)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732876)->elements[1], (((closure)  ((closureN)self_732876)->elements[1])->fn),  c_735388);; 
}

static void __lambda_492(void *data, object self_732873, int argc, object *args) /* object self_732873, object k_731996, object sob_73412_731024 */
 {
 object k_731996 = args[0];
  return_direct_with_clo1(data,  k_731996, (((closure)  k_731996)->fn),  boolean_t);; 
}

static void __lambda_491(void *data, object self_732874, int argc, object *args) /* object self_732874, object r_731995 */
 {
 object r_731995 = args[0];
  
object c_735369 = apply(data,  ((closureN)self_732874)->elements[1],r_731995, ((closureN)self_732874)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732874)->elements[1], (((closure)  ((closureN)self_732874)->elements[1])->fn),  c_735369);; 
}

static void __lambda_476(void *data, object _, int argc, object *args) /* closure _,object k_731975, object sob1_73398_731015, object sob2_73399_731016 */
 {
object k_731975 = args[0]; object sob1_73398_731015 = args[1]; object sob2_73399_731016 = args[2];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob<=?");

closureN_type c_735293;
object e_735296 [1];
c_735293.hdr.mark = gc_color_red;
 c_735293.hdr.grayed = 0;
c_735293.tag = closureN_tag;
 c_735293.fn = (function_type)__lambda_477;
c_735293.num_args = 1;
c_735293.num_elements = 1;
c_735293.elements = (object *)e_735296;
c_735293.elements[0] = k_731975;


closureN_type c_735297;
object e_735354 [2];
c_735297.hdr.mark = gc_color_red;
 c_735297.hdr.grayed = 0;
c_735297.tag = closureN_tag;
 c_735297.fn = (function_type)__lambda_478;
c_735297.num_args = 1;
c_735297.num_elements = 2;
c_735297.elements = (object *)e_735354;
c_735297.elements[0] = sob1_73398_731015;
c_735297.elements[1] = sob2_73399_731016;

return_direct_with_clo1(data,(closure)&c_735293,__lambda_477,  &c_735297);; 
}

static void __lambda_478(void *data, object self_732860, int argc, object *args) /* object self_732860, object k_731977, object return_73400_731017 */
 {
 object k_731977 = args[0]; object return_73400_731017 = args[1];
  
closureN_type c_735299;
object e_735352 [3];
c_735299.hdr.mark = gc_color_red;
 c_735299.hdr.grayed = 0;
c_735299.tag = closureN_tag;
 c_735299.fn = (function_type)__lambda_479;
c_735299.num_args = 1;
c_735299.num_elements = 3;
c_735299.elements = (object *)e_735352;
c_735299.elements[0] = k_731977;
c_735299.elements[1] = return_73400_731017;
c_735299.elements[2] = ((closureN)self_732860)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735299, ((closureN)self_732860)->elements[0]);; 
}

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

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735301, ((closureN)self_732861)->elements[2]);; 
}

static void __lambda_480(void *data, object self_732862, int argc, object *args) /* object self_732862, object r_731980 */
 {
 object r_731980 = args[0];
  
closureN_type c_735303;
object e_735348 [2];
c_735303.hdr.mark = gc_color_red;
 c_735303.hdr.grayed = 0;
c_735303.tag = closureN_tag;
 c_735303.fn = (function_type)__lambda_481;
c_735303.num_args = 2;
c_735303.num_elements = 2;
c_735303.elements = (object *)e_735348;
c_735303.elements[0] = ((closureN)self_732862)->elements[0];
c_735303.elements[1] = ((closureN)self_732862)->elements[2];

return_direct_with_clo2(data,(closure)&c_735303,__lambda_481,  ((closureN)self_732862)->elements[1], r_731980);; 
}

static void __lambda_481(void *data, object self_732863, int argc, object *args) /* object self_732863, object ht1_73401_731018, object ht2_73402_731019 */
 {
 object ht1_73401_731018 = args[0]; object ht2_73402_731019 = args[1];
  
closureN_type c_735305;
object e_735322 [3];
c_735305.hdr.mark = gc_color_red;
 c_735305.hdr.grayed = 0;
c_735305.tag = closureN_tag;
 c_735305.fn = (function_type)__lambda_482;
c_735305.num_args = 0;
c_735305.num_elements = 3;
c_735305.elements = (object *)e_735322;
c_735305.elements[0] = ht1_73401_731018;
c_735305.elements[1] = ht2_73402_731019;
c_735305.elements[2] = ((closureN)self_732863)->elements[1];


closureN_type c_735323;
object e_735347 [4];
c_735323.hdr.mark = gc_color_red;
 c_735323.hdr.grayed = 0;
c_735323.tag = closureN_tag;
 c_735323.fn = (function_type)__lambda_485;
c_735323.num_args = 1;
c_735323.num_elements = 4;
c_735323.elements = (object *)e_735347;
c_735323.elements[0] = ht1_73401_731018;
c_735323.elements[1] = ht2_73402_731019;
c_735323.elements[2] = ((closureN)self_732863)->elements[0];
c_735323.elements[3] = ((closureN)self_732863)->elements[1];

return_direct_with_clo1(data,(closure)&c_735305,__lambda_482,  &c_735323);; 
}

static void __lambda_485(void *data, object self_732864, int argc, object *args) /* object self_732864, object r_731981 */
 {

  
closureN_type c_735325;
object e_735332 [2];
c_735325.hdr.mark = gc_color_red;
 c_735325.hdr.grayed = 0;
c_735325.tag = closureN_tag;
 c_735325.fn = (function_type)__lambda_486;
c_735325.num_args = 1;
c_735325.num_elements = 2;
c_735325.elements = (object *)e_735332;
c_735325.elements[0] = ((closureN)self_732864)->elements[0];
c_735325.elements[1] = ((closureN)self_732864)->elements[2];


closureN_type c_735333;
object e_735346 [2];
c_735333.hdr.mark = gc_color_red;
 c_735333.hdr.grayed = 0;
c_735333.tag = closureN_tag;
 c_735333.fn = (function_type)__lambda_488;
c_735333.num_args = 2;
c_735333.num_elements = 2;
c_735333.elements = (object *)e_735346;
c_735333.elements[0] = ((closureN)self_732864)->elements[1];
c_735333.elements[1] = ((closureN)self_732864)->elements[3];

return_direct_with_clo1(data,(closure)&c_735325,__lambda_486,  &c_735333);; 
}

static void __lambda_488(void *data, object self_732865, int argc, object *args) /* object self_732865, object k_731983, object key_73403_731020, object value_73404_731021 */
 {
 object k_731983 = args[0]; object key_73403_731020 = args[1]; object value_73404_731021 = args[2];
  
closureN_type c_735335;
object e_735344 [3];
c_735335.hdr.mark = gc_color_red;
 c_735335.hdr.grayed = 0;
c_735335.tag = closureN_tag;
 c_735335.fn = (function_type)__lambda_489;
c_735335.num_args = 1;
c_735335.num_elements = 3;
c_735335.elements = (object *)e_735344;
c_735335.elements[0] = k_731983;
c_735335.elements[1] = ((closureN)self_732865)->elements[1];
c_735335.elements[2] = value_73404_731021;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_735335, ((closureN)self_732865)->elements[0], key_73403_731020, obj_int2obj(0));; 
}

static void __lambda_489(void *data, object self_732866, int argc, object *args) /* object self_732866, object r_731985 */
 {
 object r_731985 = args[0];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_732866)->elements[2], r_731985)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732866)->elements[0], (((closure)  ((closureN)self_732866)->elements[0])->fn),  Cyc_VOID);
} else { 
  return_closcall2(data,  ((closureN)self_732866)->elements[1],  ((closureN)self_732866)->elements[0], boolean_f);}
;; 
}

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

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_735327, ((closureN)self_732867)->elements[0], r_731982);; 
}

static void __lambda_487(void *data, object self_732868, int argc, object *args) /* object self_732868, object r_731978_732467 */
 {

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

static void __lambda_482(void *data, object self_732869, int argc, object *args) /* object self_732869, object k_731986 */
 {
 object k_731986 = args[0];
  
closureN_type c_735307;
object e_735320 [3];
c_735307.hdr.mark = gc_color_red;
 c_735307.hdr.grayed = 0;
c_735307.tag = closureN_tag;
 c_735307.fn = (function_type)__lambda_483;
c_735307.num_args = 1;
c_735307.num_elements = 3;
c_735307.elements = (object *)e_735320;
c_735307.elements[0] = ((closureN)self_732869)->elements[1];
c_735307.elements[1] = k_731986;
c_735307.elements[2] = ((closureN)self_732869)->elements[2];

return_direct_with_clo2(data,  __glo_hash_91table_91size_srfi_69, (((closure)  __glo_hash_91table_91size_srfi_69)->fn),  &c_735307, ((closureN)self_732869)->elements[0]);; 
}

static void __lambda_483(void *data, object self_732870, int argc, object *args) /* object self_732870, object r_731988 */
 {
 object r_731988 = args[0];
  
closureN_type c_735309;
object e_735318 [3];
c_735309.hdr.mark = gc_color_red;
 c_735309.hdr.grayed = 0;
c_735309.tag = closureN_tag;
 c_735309.fn = (function_type)__lambda_484;
c_735309.num_args = 1;
c_735309.num_elements = 3;
c_735309.elements = (object *)e_735318;
c_735309.elements[0] = ((closureN)self_732870)->elements[1];
c_735309.elements[1] = r_731988;
c_735309.elements[2] = ((closureN)self_732870)->elements[2];

return_direct_with_clo2(data,  __glo_hash_91table_91size_srfi_69, (((closure)  __glo_hash_91table_91size_srfi_69)->fn),  &c_735309, ((closureN)self_732870)->elements[0]);; 
}

static void __lambda_484(void *data, object self_732871, int argc, object *args) /* object self_732871, object r_731989 */
 {
 object r_731989 = args[0];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_732871)->elements[1], r_731989)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732871)->elements[0], (((closure)  ((closureN)self_732871)->elements[0])->fn),  Cyc_VOID);
} else { 
  return_closcall2(data,  ((closureN)self_732871)->elements[2],  ((closureN)self_732871)->elements[0], boolean_f);}
;; 
}

static void __lambda_477(void *data, object self_732872, int argc, object *args) /* object self_732872, object r_731976 */
 {
 object r_731976 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_732872)->elements[0], r_731976);; 
}

static void __lambda_474(void *data, object _, int argc, object *args) /* closure _,object k_731971, object bags_73397_731014_raw, ... */
 {
object k_731971 = args[0];
load_varargs(bags_73397_731014, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag<=?");

closureN_type c_735283;
object e_735290 [2];
c_735283.hdr.mark = gc_color_red;
 c_735283.hdr.grayed = 0;
c_735283.tag = closureN_tag;
 c_735283.fn = (function_type)__lambda_475;
c_735283.num_args = 1;
c_735283.num_elements = 2;
c_735283.elements = (object *)e_735290;
c_735283.elements[0] = bags_73397_731014;
c_735283.elements[1] = k_731971;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735283, bags_73397_731014);; 
}

static void __lambda_475(void *data, object self_732859, int argc, object *args) /* object self_732859, object r_731972 */
 {

  
object c_735288 = apply(data,  ((closureN)self_732859)->elements[1],__glo_sob_121_123_127_srfi_113, ((closureN)self_732859)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732859)->elements[1], (((closure)  ((closureN)self_732859)->elements[1])->fn),  c_735288);; 
}

static void __lambda_472(void *data, object _, int argc, object *args) /* closure _,object k_731967, object sets_73396_731013_raw, ... */
 {
object k_731967 = args[0];
load_varargs(sets_73396_731013, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set<=?");

closureN_type c_735273;
object e_735280 [2];
c_735273.hdr.mark = gc_color_red;
 c_735273.hdr.grayed = 0;
c_735273.tag = closureN_tag;
 c_735273.fn = (function_type)__lambda_473;
c_735273.num_args = 1;
c_735273.num_elements = 2;
c_735273.elements = (object *)e_735280;
c_735273.elements[0] = k_731967;
c_735273.elements[1] = sets_73396_731013;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735273, sets_73396_731013);; 
}

static void __lambda_473(void *data, object self_732858, int argc, object *args) /* object self_732858, object r_731968 */
 {

  
object c_735278 = apply(data,  ((closureN)self_732858)->elements[0],__glo_sob_121_123_127_srfi_113, ((closureN)self_732858)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732858)->elements[0], (((closure)  ((closureN)self_732858)->elements[0])->fn),  c_735278);; 
}

static void __lambda_464(void *data, object _, int argc, object *args) /* closure _,object k_731947, object args_73378_73382_731005_raw, ... */
 {
object k_731947 = args[0];
load_varargs(args_73378_73382_731005, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:sob<=?");
  
  
  
  make_pair(c_735212,quote_sob,NULL);c_735212.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73378_73382_731005), Cyc_length(data, &c_735212))) ){ 
  
closureN_type c_735214;
object e_735221 [2];
c_735214.hdr.mark = gc_color_red;
 c_735214.hdr.grayed = 0;
c_735214.tag = closureN_tag;
 c_735214.fn = (function_type)__lambda_465;
c_735214.num_args = 1;
c_735214.num_elements = 2;
c_735214.elements = (object *)e_735221;
c_735214.elements[0] = args_73378_73382_731005;
c_735214.elements[1] = k_731947;


mclosure0(c_735222, (function_type)__lambda_466);c_735222.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735214,__lambda_465,  &c_735222);
} else { 
    
  
  
  make_pair(c_735231,quote_sob2,NULL);c_735231.hdr.immutable = 1;
  make_pair(c_735230,quote_sob1,&c_735231);c_735230.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73378_73382_731005), Cyc_length(data, &c_735230))) ){ 
  
closureN_type c_735233;
object e_735240 [2];
c_735233.hdr.mark = gc_color_red;
 c_735233.hdr.grayed = 0;
c_735233.tag = closureN_tag;
 c_735233.fn = (function_type)__lambda_467;
c_735233.num_args = 1;
c_735233.num_elements = 2;
c_735233.elements = (object *)e_735240;
c_735233.elements[0] = args_73378_73382_731005;
c_735233.elements[1] = k_731947;


mclosure0(c_735241, (function_type)__lambda_468);c_735241.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735233,__lambda_467,  &c_735241);
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, args_73378_73382_731005), obj_int2obj(2))) ){ 
  
closureN_type c_735248;
object e_735255 [2];
c_735248.hdr.mark = gc_color_red;
 c_735248.hdr.grayed = 0;
c_735248.tag = closureN_tag;
 c_735248.fn = (function_type)__lambda_469;
c_735248.num_args = 1;
c_735248.num_elements = 2;
c_735248.elements = (object *)e_735255;
c_735248.elements[0] = args_73378_73382_731005;
c_735248.elements[1] = k_731947;


mclosure0(c_735256, (function_type)__lambda_470);c_735256.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735248,__lambda_469,  &c_735256);
} else { 
  
make_utf8_string_with_len(c_735270, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731947, &c_735270);}
;}
;}
;; 
}

static void __lambda_470(void *data, object self_732855, int argc, object *args) /* object self_732855, object k_731957, object sob1_73392_731010, object sob2_73393_731011, object sobs_73394_731012_raw, ... */
 {
 object k_731957 = args[0]; object sob1_73392_731010 = args[1]; object sob2_73393_731011 = args[2];
load_varargs(sobs_73394_731012, args, 3, argc - 3);
  
closureN_type c_735258;
object e_735268 [3];
c_735258.hdr.mark = gc_color_red;
 c_735258.hdr.grayed = 0;
c_735258.tag = closureN_tag;
 c_735258.fn = (function_type)__lambda_471;
c_735258.num_args = 1;
c_735258.num_elements = 3;
c_735258.elements = (object *)e_735268;
c_735258.elements[0] = k_731957;
c_735258.elements[1] = sob2_73393_731011;
c_735258.elements[2] = sobs_73394_731012;

return_direct_with_clo3(data,  __glo_dyadic_91sob_121_123_127_srfi_113, (((closure)  __glo_dyadic_91sob_121_123_127_srfi_113)->fn),  &c_735258, sob1_73392_731010, sob2_73393_731011);; 
}

static void __lambda_471(void *data, object self_732856, int argc, object *args) /* object self_732856, object r_731958 */
 {
 object r_731958 = args[0];
  if( (boolean_f != r_731958) ){ 
  
object c_735263 = apply_va(data,  ((closureN)self_732856)->elements[0],3,__glo_sob_121_123_127_srfi_113, ((closureN)self_732856)->elements[1], ((closureN)self_732856)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_732856)->elements[0], (((closure)  ((closureN)self_732856)->elements[0])->fn),  c_735263);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732856)->elements[0], (((closure)  ((closureN)self_732856)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_469(void *data, object self_732857, int argc, object *args) /* object self_732857, object r_731956 */
 {
 object r_731956 = args[0];
  
object c_735253 = apply(data,  ((closureN)self_732857)->elements[1],r_731956, ((closureN)self_732857)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732857)->elements[1], (((closure)  ((closureN)self_732857)->elements[1])->fn),  c_735253);; 
}

static void __lambda_468(void *data, object self_732853, int argc, object *args) /* object self_732853, object k_731954, object sob1_73387_731008, object sob2_73388_731009 */
 {
 object k_731954 = args[0]; object sob1_73387_731008 = args[1]; object sob2_73388_731009 = args[2];
  return_direct_with_clo3(data,  __glo_dyadic_91sob_121_123_127_srfi_113, (((closure)  __glo_dyadic_91sob_121_123_127_srfi_113)->fn),  k_731954, sob1_73387_731008, sob2_73388_731009);; 
}

static void __lambda_467(void *data, object self_732854, int argc, object *args) /* object self_732854, object r_731953 */
 {
 object r_731953 = args[0];
  
object c_735238 = apply(data,  ((closureN)self_732854)->elements[1],r_731953, ((closureN)self_732854)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732854)->elements[1], (((closure)  ((closureN)self_732854)->elements[1])->fn),  c_735238);; 
}

static void __lambda_466(void *data, object self_732851, int argc, object *args) /* object self_732851, object k_731951, object sob_73385_731007 */
 {
 object k_731951 = args[0];
  return_direct_with_clo1(data,  k_731951, (((closure)  k_731951)->fn),  boolean_t);; 
}

static void __lambda_465(void *data, object self_732852, int argc, object *args) /* object self_732852, object r_731950 */
 {
 object r_731950 = args[0];
  
object c_735219 = apply(data,  ((closureN)self_732852)->elements[1],r_731950, ((closureN)self_732852)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732852)->elements[1], (((closure)  ((closureN)self_732852)->elements[1])->fn),  c_735219);; 
}

static void __lambda_450(void *data, object _, int argc, object *args) /* closure _,object k_731930, object sob1_73371_73998, object sob2_73372_73999 */
 {
object k_731930 = args[0]; object sob1_73371_73998 = args[1]; object sob2_73372_73999 = args[2];
  Cyc_st_add(data, "srfi/113.sld:dyadic-sob=?");

closureN_type c_735143;
object e_735146 [1];
c_735143.hdr.mark = gc_color_red;
 c_735143.hdr.grayed = 0;
c_735143.tag = closureN_tag;
 c_735143.fn = (function_type)__lambda_451;
c_735143.num_args = 1;
c_735143.num_elements = 1;
c_735143.elements = (object *)e_735146;
c_735143.elements[0] = k_731930;


closureN_type c_735147;
object e_735204 [2];
c_735147.hdr.mark = gc_color_red;
 c_735147.hdr.grayed = 0;
c_735147.tag = closureN_tag;
 c_735147.fn = (function_type)__lambda_452;
c_735147.num_args = 1;
c_735147.num_elements = 2;
c_735147.elements = (object *)e_735204;
c_735147.elements[0] = sob1_73371_73998;
c_735147.elements[1] = sob2_73372_73999;

return_direct_with_clo1(data,(closure)&c_735143,__lambda_451,  &c_735147);; 
}

static void __lambda_452(void *data, object self_732838, int argc, object *args) /* object self_732838, object k_731932, object return_73373_731000 */
 {
 object k_731932 = args[0]; object return_73373_731000 = args[1];
  
closureN_type c_735149;
object e_735202 [3];
c_735149.hdr.mark = gc_color_red;
 c_735149.hdr.grayed = 0;
c_735149.tag = closureN_tag;
 c_735149.fn = (function_type)__lambda_453;
c_735149.num_args = 1;
c_735149.num_elements = 3;
c_735149.elements = (object *)e_735202;
c_735149.elements[0] = k_731932;
c_735149.elements[1] = return_73373_731000;
c_735149.elements[2] = ((closureN)self_732838)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735149, ((closureN)self_732838)->elements[0]);; 
}

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

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_735151, ((closureN)self_732839)->elements[2]);; 
}

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

return_direct_with_clo2(data,(closure)&c_735153,__lambda_455,  ((closureN)self_732840)->elements[1], r_731935);; 
}

static void __lambda_455(void *data, object self_732841, int argc, object *args) /* object self_732841, object ht1_73374_731001, object ht2_73375_731002 */
 {
 object ht1_73374_731001 = args[0]; object ht2_73375_731002 = args[1];
  
closureN_type c_735155;
object e_735172 [3];
c_735155.hdr.mark = gc_color_red;
 c_735155.hdr.grayed = 0;
c_735155.tag = closureN_tag;
 c_735155.fn = (function_type)__lambda_456;
c_735155.num_args = 0;
c_735155.num_elements = 3;
c_735155.elements = (object *)e_735172;
c_735155.elements[0] = ht1_73374_731001;
c_735155.elements[1] = ht2_73375_731002;
c_735155.elements[2] = ((closureN)self_732841)->elements[1];


closureN_type c_735173;
object e_735197 [4];
c_735173.hdr.mark = gc_color_red;
 c_735173.hdr.grayed = 0;
c_735173.tag = closureN_tag;
 c_735173.fn = (function_type)__lambda_459;
c_735173.num_args = 1;
c_735173.num_elements = 4;
c_735173.elements = (object *)e_735197;
c_735173.elements[0] = ht1_73374_731001;
c_735173.elements[1] = ht2_73375_731002;
c_735173.elements[2] = ((closureN)self_732841)->elements[0];
c_735173.elements[3] = ((closureN)self_732841)->elements[1];

return_direct_with_clo1(data,(closure)&c_735155,__lambda_456,  &c_735173);; 
}

static void __lambda_459(void *data, object self_732842, int argc, object *args) /* object self_732842, object r_731936 */
 {

  
closureN_type c_735175;
object e_735182 [2];
c_735175.hdr.mark = gc_color_red;
 c_735175.hdr.grayed = 0;
c_735175.tag = closureN_tag;
 c_735175.fn = (function_type)__lambda_460;
c_735175.num_args = 1;
c_735175.num_elements = 2;
c_735175.elements = (object *)e_735182;
c_735175.elements[0] = ((closureN)self_732842)->elements[0];
c_735175.elements[1] = ((closureN)self_732842)->elements[2];


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

return_direct_with_clo1(data,(closure)&c_735175,__lambda_460,  &c_735183);; 
}

static void __lambda_462(void *data, object self_732843, int argc, object *args) /* object self_732843, object k_731938, object key_73376_731003, object value_73377_731004 */
 {
 object k_731938 = args[0]; object key_73376_731003 = args[1]; object value_73377_731004 = args[2];
  
closureN_type c_735185;
object e_735194 [3];
c_735185.hdr.mark = gc_color_red;
 c_735185.hdr.grayed = 0;
c_735185.tag = closureN_tag;
 c_735185.fn = (function_type)__lambda_463;
c_735185.num_args = 1;
c_735185.num_elements = 3;
c_735185.elements = (object *)e_735194;
c_735185.elements[0] = k_731938;
c_735185.elements[1] = ((closureN)self_732843)->elements[1];
c_735185.elements[2] = value_73377_731004;

return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_735185, ((closureN)self_732843)->elements[0], key_73376_731003, obj_int2obj(0));; 
}

static void __lambda_463(void *data, object self_732844, int argc, object *args) /* object self_732844, object r_731940 */
 {
 object r_731940 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_732844)->elements[2], r_731940)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732844)->elements[0], (((closure)  ((closureN)self_732844)->elements[0])->fn),  Cyc_VOID);
} else { 
  return_closcall2(data,  ((closureN)self_732844)->elements[1],  ((closureN)self_732844)->elements[0], boolean_f);}
;; 
}

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

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_735177, ((closureN)self_732845)->elements[0], r_731937);; 
}

static void __lambda_461(void *data, object self_732846, int argc, object *args) /* object self_732846, object r_731933_732466 */
 {

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

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

return_direct_with_clo2(data,  __glo_hash_91table_91size_srfi_69, (((closure)  __glo_hash_91table_91size_srfi_69)->fn),  &c_735157, ((closureN)self_732847)->elements[0]);; 
}

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

return_direct_with_clo2(data,  __glo_hash_91table_91size_srfi_69, (((closure)  __glo_hash_91table_91size_srfi_69)->fn),  &c_735159, ((closureN)self_732848)->elements[0]);; 
}

static void __lambda_458(void *data, object self_732849, int argc, object *args) /* object self_732849, object r_731944 */
 {
 object r_731944 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_732849)->elements[1], r_731944)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732849)->elements[0], (((closure)  ((closureN)self_732849)->elements[0])->fn),  Cyc_VOID);
} else { 
  return_closcall2(data,  ((closureN)self_732849)->elements[2],  ((closureN)self_732849)->elements[0], boolean_f);}
;; 
}

static void __lambda_451(void *data, object self_732850, int argc, object *args) /* object self_732850, object r_731931 */
 {
 object r_731931 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_732850)->elements[0], r_731931);; 
}

static void __lambda_448(void *data, object _, int argc, object *args) /* closure _,object k_731926, object bags_73370_73997_raw, ... */
 {
object k_731926 = args[0];
load_varargs(bags_73370_73997, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:bag=?");

closureN_type c_735133;
object e_735140 [2];
c_735133.hdr.mark = gc_color_red;
 c_735133.hdr.grayed = 0;
c_735133.tag = closureN_tag;
 c_735133.fn = (function_type)__lambda_449;
c_735133.num_args = 1;
c_735133.num_elements = 2;
c_735133.elements = (object *)e_735140;
c_735133.elements[0] = bags_73370_73997;
c_735133.elements[1] = k_731926;

return_direct_with_clo2(data,  __glo_check_91all_91bags_srfi_113, (((closure)  __glo_check_91all_91bags_srfi_113)->fn),  &c_735133, bags_73370_73997);; 
}

static void __lambda_449(void *data, object self_732837, int argc, object *args) /* object self_732837, object r_731927 */
 {

  
object c_735138 = apply(data,  ((closureN)self_732837)->elements[1],__glo_sob_123_127_srfi_113, ((closureN)self_732837)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732837)->elements[1], (((closure)  ((closureN)self_732837)->elements[1])->fn),  c_735138);; 
}

static void __lambda_446(void *data, object _, int argc, object *args) /* closure _,object k_731922, object sets_73369_73996_raw, ... */
 {
object k_731922 = args[0];
load_varargs(sets_73369_73996, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:set=?");

closureN_type c_735123;
object e_735130 [2];
c_735123.hdr.mark = gc_color_red;
 c_735123.hdr.grayed = 0;
c_735123.tag = closureN_tag;
 c_735123.fn = (function_type)__lambda_447;
c_735123.num_args = 1;
c_735123.num_elements = 2;
c_735123.elements = (object *)e_735130;
c_735123.elements[0] = k_731922;
c_735123.elements[1] = sets_73369_73996;

return_direct_with_clo2(data,  __glo_check_91all_91sets_srfi_113, (((closure)  __glo_check_91all_91sets_srfi_113)->fn),  &c_735123, sets_73369_73996);; 
}

static void __lambda_447(void *data, object self_732836, int argc, object *args) /* object self_732836, object r_731923 */
 {

  
object c_735128 = apply(data,  ((closureN)self_732836)->elements[0],__glo_sob_123_127_srfi_113, ((closureN)self_732836)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_732836)->elements[0], (((closure)  ((closureN)self_732836)->elements[0])->fn),  c_735128);; 
}

static void __lambda_438(void *data, object _, int argc, object *args) /* closure _,object k_731902, object args_73351_73355_73988_raw, ... */
 {
object k_731902 = args[0];
load_varargs(args_73351_73355_73988, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/113.sld:sob=?");
  
  
  
  make_pair(c_735062,quote_sob,NULL);c_735062.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73351_73355_73988), Cyc_length(data, &c_735062))) ){ 
  
closureN_type c_735064;
object e_735071 [2];
c_735064.hdr.mark = gc_color_red;
 c_735064.hdr.grayed = 0;
c_735064.tag = closureN_tag;
 c_735064.fn = (function_type)__lambda_439;
c_735064.num_args = 1;
c_735064.num_elements = 2;
c_735064.elements = (object *)e_735071;
c_735064.elements[0] = args_73351_73355_73988;
c_735064.elements[1] = k_731902;


mclosure0(c_735072, (function_type)__lambda_440);c_735072.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735064,__lambda_439,  &c_735072);
} else { 
    
  
  
  make_pair(c_735081,quote_sob2,NULL);c_735081.hdr.immutable = 1;
  make_pair(c_735080,quote_sob1,&c_735081);c_735080.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73351_73355_73988), Cyc_length(data, &c_735080))) ){ 
  
closureN_type c_735083;
object e_735090 [2];
c_735083.hdr.mark = gc_color_red;
 c_735083.hdr.grayed = 0;
c_735083.tag = closureN_tag;
 c_735083.fn = (function_type)__lambda_441;
c_735083.num_args = 1;
c_735083.num_elements = 2;
c_735083.elements = (object *)e_735090;
c_735083.elements[0] = args_73351_73355_73988;
c_735083.elements[1] = k_731902;


mclosure0(c_735091, (function_type)__lambda_442);c_735091.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735083,__lambda_441,  &c_735091);
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, args_73351_73355_73988), obj_int2obj(2))) ){ 
  
closureN_type c_735098;
object e_735105 [2];
c_735098.hdr.mark = gc_color_red;
 c_735098.hdr.grayed = 0;
c_735098.tag = closureN_tag;
 c_735098.fn = (function_type)__lambda_443;
c_735098.num_args = 1;
c_735098.num_elements = 2;
c_735098.elements = (object *)e_735105;
c_735098.elements[0] = args_73351_73355_73988;
c_735098.elements[1] = k_731902;


mclosure0(c_735106, (function_type)__lambda_444);c_735106.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735098,__lambda_443,  &c_735106);
} else { 
  
make_utf8_string_with_len(c_735120, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731902, &c_735120);}
;}
;}
;; 
}

static void __lambda_444(void *data, object self_732833, int argc, object *args) /* object self_732833, object k_731912, object sob1_73365_73993, object sob2_73366_73994, object sobs_73367_73995_raw, ... */
 {
 object k_731912 = args[0]; object sob1_73365_73993 = args[1]; object sob2_73366_73994 = args[2];
load_varargs(sobs_73367_73995, args, 3, argc - 3);
  
closureN_type c_735108;
object e_735118 [3];
c_735108.hdr.mark = gc_color_red;
 c_735108.hdr.grayed = 0;
c_735108.tag = closureN_tag;
 c_735108.fn = (function_type)__lambda_445;
c_735108.num_args = 1;
c_735108.num_elements = 3;
c_735108.elements = (object *)e_735118;
c_735108.elements[0] = k_731912;
c_735108.elements[1] = sob2_73366_73994;
c_735108.elements[2] = sobs_73367_73995;

return_direct_with_clo3(data,  __glo_dyadic_91sob_123_127_srfi_113, (((closure)  __glo_dyadic_91sob_123_127_srfi_113)->fn),  &c_735108, sob1_73365_73993, sob2_73366_73994);; 
}

static void __lambda_445(void *data, object self_732834, int argc, object *args) /* object self_732834, object r_731913 */
 {
 object r_731913 = args[0];
  if( (boolean_f != r_731913) ){ 
  
object c_735113 = apply_va(data,  ((closureN)self_732834)->elements[0],3,__glo_sob_123_127_srfi_113, ((closureN)self_732834)->elements[1], ((closureN)self_732834)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_732834)->elements[0], (((closure)  ((closureN)self_732834)->elements[0])->fn),  c_735113);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732834)->elements[0], (((closure)  ((closureN)self_732834)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_443(void *data, object self_732835, int argc, object *args) /* object self_732835, object r_731911 */
 {
 object r_731911 = args[0];
  
object c_735103 = apply(data,  ((closureN)self_732835)->elements[1],r_731911, ((closureN)self_732835)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732835)->elements[1], (((closure)  ((closureN)self_732835)->elements[1])->fn),  c_735103);; 
}

static void __lambda_442(void *data, object self_732831, int argc, object *args) /* object self_732831, object k_731909, object sob1_73360_73991, object sob2_73361_73992 */
 {
 object k_731909 = args[0]; object sob1_73360_73991 = args[1]; object sob2_73361_73992 = args[2];
  return_direct_with_clo3(data,  __glo_dyadic_91sob_123_127_srfi_113, (((closure)  __glo_dyadic_91sob_123_127_srfi_113)->fn),  k_731909, sob1_73360_73991, sob2_73361_73992);; 
}

static void __lambda_441(void *data, object self_732832, int argc, object *args) /* object self_732832, object r_731908 */
 {
 object r_731908 = args[0];
  
object c_735088 = apply(data,  ((closureN)self_732832)->elements[1],r_731908, ((closureN)self_732832)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732832)->elements[1], (((closure)  ((closureN)self_732832)->elements[1])->fn),  c_735088);; 
}

static void __lambda_440(void *data, object self_732829, int argc, object *args) /* object self_732829, object k_731906, object sob_73358_73990 */
 {
 object k_731906 = args[0];
  return_direct_with_clo1(data,  k_731906, (((closure)  k_731906)->fn),  boolean_t);; 
}

static void __lambda_439(void *data, object self_732830, int argc, object *args) /* object self_732830, object r_731905 */
 {
 object r_731905 = args[0];
  
object c_735069 = apply(data,  ((closureN)self_732830)->elements[1],r_731905, ((closureN)self_732830)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732830)->elements[1], (((closure)  ((closureN)self_732830)->elements[1])->fn),  c_735069);; 
}

static void __lambda_436(void *data, object _, int argc, object *args) /* closure _,object k_731898, object bag_73349_73986, object list_73350_73987 */
 {
object k_731898 = args[0]; object bag_73349_73986 = args[1]; object list_73350_73987 = args[2];
  Cyc_st_add(data, "srfi/113.sld:list->bag!");

closureN_type c_735049;
object e_735054 [3];
c_735049.hdr.mark = gc_color_red;
 c_735049.hdr.grayed = 0;
c_735049.tag = closureN_tag;
 c_735049.fn = (function_type)__lambda_437;
c_735049.num_args = 1;
c_735049.num_elements = 3;
c_735049.elements = (object *)e_735054;
c_735049.elements[0] = bag_73349_73986;
c_735049.elements[1] = k_731898;
c_735049.elements[2] = list_73350_73987;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_735049, bag_73349_73986);; 
}

static void __lambda_437(void *data, object self_732828, int argc, object *args) /* object self_732828, object r_731899 */
 {

  return_direct_with_clo3(data,  __glo_list_91_125sob_67_srfi_113, (((closure)  __glo_list_91_125sob_67_srfi_113)->fn),  ((closureN)self_732828)->elements[1], ((closureN)self_732828)->elements[0], ((closureN)self_732828)->elements[2]);; 
}

static void __lambda_434(void *data, object _, int argc, object *args) /* closure _,object k_731894, object set_73347_73984, object list_73348_73985 */
 {
object k_731894 = args[0]; object set_73347_73984 = args[1]; object list_73348_73985 = args[2];
  Cyc_st_add(data, "srfi/113.sld:list->set!");

closureN_type c_735041;
object e_735046 [3];
c_735041.hdr.mark = gc_color_red;
 c_735041.hdr.grayed = 0;
c_735041.tag = closureN_tag;
 c_735041.fn = (function_type)__lambda_435;
c_735041.num_args = 1;
c_735041.num_elements = 3;
c_735041.elements = (object *)e_735046;
c_735041.elements[0] = k_731894;
c_735041.elements[1] = list_73348_73985;
c_735041.elements[2] = set_73347_73984;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_735041, set_73347_73984);; 
}

static void __lambda_435(void *data, object self_732827, int argc, object *args) /* object self_732827, object r_731895 */
 {

  return_direct_with_clo3(data,  __glo_list_91_125sob_67_srfi_113, (((closure)  __glo_list_91_125sob_67_srfi_113)->fn),  ((closureN)self_732827)->elements[0], ((closureN)self_732827)->elements[2], ((closureN)self_732827)->elements[1]);; 
}

static void __lambda_432(void *data, object _, int argc, object *args) /* closure _,object k_731890, object comparator_73345_73982, object list_73346_73983 */
 {
object k_731890 = args[0]; object comparator_73345_73982 = args[1]; object list_73346_73983 = args[2];
  Cyc_st_add(data, "srfi/113.sld:list->bag");

closureN_type c_735034;
object e_735038 [2];
c_735034.hdr.mark = gc_color_red;
 c_735034.hdr.grayed = 0;
c_735034.tag = closureN_tag;
 c_735034.fn = (function_type)__lambda_433;
c_735034.num_args = 1;
c_735034.num_elements = 2;
c_735034.elements = (object *)e_735038;
c_735034.elements[0] = k_731890;
c_735034.elements[1] = list_73346_73983;

return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  &c_735034, comparator_73345_73982, boolean_t);; 
}

static void __lambda_433(void *data, object self_732826, int argc, object *args) /* object self_732826, object r_731891 */
 {
 object r_731891 = args[0];
  return_direct_with_clo3(data,  __glo_list_91_125sob_67_srfi_113, (((closure)  __glo_list_91_125sob_67_srfi_113)->fn),  ((closureN)self_732826)->elements[0], r_731891, ((closureN)self_732826)->elements[1]);; 
}

static void __lambda_430(void *data, object _, int argc, object *args) /* closure _,object k_731886, object comparator_73343_73980, object list_73344_73981 */
 {
object k_731886 = args[0]; object comparator_73343_73980 = args[1]; object list_73344_73981 = args[2];
  Cyc_st_add(data, "srfi/113.sld:list->set");

closureN_type c_735027;
object e_735031 [2];
c_735027.hdr.mark = gc_color_red;
 c_735027.hdr.grayed = 0;
c_735027.tag = closureN_tag;
 c_735027.fn = (function_type)__lambda_431;
c_735027.num_args = 1;
c_735027.num_elements = 2;
c_735027.elements = (object *)e_735031;
c_735027.elements[0] = k_731886;
c_735027.elements[1] = list_73344_73981;

return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  &c_735027, comparator_73343_73980, boolean_f);; 
}

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

static void __lambda_426(void *data, object _, int argc, object *args) /* closure _,object k_731880, object sob_73340_73977, object list_73341_73978 */
 {
object k_731880 = args[0]; object sob_73340_73977 = args[1]; object list_73341_73978 = args[2];
  Cyc_st_add(data, "srfi/113.sld:list->sob!");

closureN_type c_735012;
object e_735020 [3];
c_735012.hdr.mark = gc_color_red;
 c_735012.hdr.grayed = 0;
c_735012.tag = closureN_tag;
 c_735012.fn = (function_type)__lambda_427;
c_735012.num_args = 1;
c_735012.num_elements = 3;
c_735012.elements = (object *)e_735020;
c_735012.elements[0] = k_731880;
c_735012.elements[1] = list_73341_73978;
c_735012.elements[2] = sob_73340_73977;


closureN_type c_735021;
object e_735024 [1];
c_735021.hdr.mark = gc_color_red;
 c_735021.hdr.grayed = 0;
c_735021.tag = closureN_tag;
 c_735021.fn = (function_type)__lambda_429;
c_735021.num_args = 1;
c_735021.num_elements = 1;
c_735021.elements = (object *)e_735024;
c_735021.elements[0] = sob_73340_73977;

return_direct_with_clo1(data,(closure)&c_735012,__lambda_427,  &c_735021);; 
}

static void __lambda_429(void *data, object self_732822, int argc, object *args) /* object self_732822, object k_731883, object elem_73342_73979 */
 {
 object k_731883 = args[0]; object elem_73342_73979 = args[1];
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  k_731883, ((closureN)self_732822)->elements[0], elem_73342_73979, obj_int2obj(1));; 
}

static void __lambda_427(void *data, object self_732823, int argc, object *args) /* object self_732823, object r_731882 */
 {
 object r_731882 = args[0];
  
closureN_type c_735014;
object e_735018 [2];
c_735014.hdr.mark = gc_color_red;
 c_735014.hdr.grayed = 0;
c_735014.tag = closureN_tag;
 c_735014.fn = (function_type)__lambda_428;
c_735014.num_args = 1;
c_735014.num_elements = 2;
c_735014.elements = (object *)e_735018;
c_735014.elements[0] = ((closureN)self_732823)->elements[0];
c_735014.elements[1] = ((closureN)self_732823)->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_735014, r_731882, ((closureN)self_732823)->elements[1]);; 
}

static void __lambda_428(void *data, object self_732824, int argc, object *args) /* object self_732824, object r_731881 */
 {

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

static void __lambda_424(void *data, object _, int argc, object *args) /* closure _,object k_731876, object bag_73339_73976 */
 {
object k_731876 = args[0]; object bag_73339_73976 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag->list");

closureN_type c_735005;
object e_735009 [2];
c_735005.hdr.mark = gc_color_red;
 c_735005.hdr.grayed = 0;
c_735005.tag = closureN_tag;
 c_735005.fn = (function_type)__lambda_425;
c_735005.num_args = 1;
c_735005.num_elements = 2;
c_735005.elements = (object *)e_735009;
c_735005.elements[0] = bag_73339_73976;
c_735005.elements[1] = k_731876;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_735005, bag_73339_73976);; 
}

static void __lambda_425(void *data, object self_732821, int argc, object *args) /* object self_732821, object r_731877 */
 {

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

static void __lambda_422(void *data, object _, int argc, object *args) /* closure _,object k_731872, object set_73338_73975 */
 {
object k_731872 = args[0]; object set_73338_73975 = args[1];
  Cyc_st_add(data, "srfi/113.sld:set->list");

closureN_type c_734998;
object e_735002 [2];
c_734998.hdr.mark = gc_color_red;
 c_734998.hdr.grayed = 0;
c_734998.tag = closureN_tag;
 c_734998.fn = (function_type)__lambda_423;
c_734998.num_args = 1;
c_734998.num_elements = 2;
c_734998.elements = (object *)e_735002;
c_734998.elements[0] = k_731872;
c_734998.elements[1] = set_73338_73975;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734998, set_73338_73975);; 
}

static void __lambda_423(void *data, object self_732820, int argc, object *args) /* object self_732820, object r_731873 */
 {

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

static void __lambda_419(void *data, object _, int argc, object *args) /* closure _,object k_731866, object sob_73335_73972 */
 {
object k_731866 = args[0]; object sob_73335_73972 = args[1];
  Cyc_st_add(data, "srfi/113.sld:sob->list");

closureN_type c_734986;
object e_734990 [2];
c_734986.hdr.mark = gc_color_red;
 c_734986.hdr.grayed = 0;
c_734986.tag = closureN_tag;
 c_734986.fn = (function_type)__lambda_420;
c_734986.num_args = 1;
c_734986.num_elements = 2;
c_734986.elements = (object *)e_734990;
c_734986.elements[0] = k_731866;
c_734986.elements[1] = sob_73335_73972;


mclosure0(c_734991, (function_type)__lambda_421);c_734991.num_args = 2;
return_direct_with_clo1(data,(closure)&c_734986,__lambda_420,  &c_734991);; 
}

static void __lambda_421(void *data, object self_732818, int argc, object *args) /* object self_732818, object k_731869, object elem_73336_73973, object list_73337_73974 */
 {
 object k_731869 = args[0]; object elem_73336_73973 = args[1]; object list_73337_73974 = args[2];
  
pair_type local_734995; 
return_direct_with_clo1(data,  k_731869, (((closure)  k_731869)->fn),  set_pair_as_expr(&local_734995, elem_73336_73973, list_73337_73974));; 
}

static void __lambda_420(void *data, object self_732819, int argc, object *args) /* object self_732819, object r_731867 */
 {
 object r_731867 = args[0];
  return_direct_with_clo4(data,  __glo_sob_91fold_srfi_113, (((closure)  __glo_sob_91fold_srfi_113)->fn),  ((closureN)self_732819)->elements[0], r_731867, NULL, ((closureN)self_732819)->elements[1]);; 
}

static void __lambda_417(void *data, object _, int argc, object *args) /* closure _,object k_731862, object pred_73333_73970, object bag_73334_73971 */
 {
object k_731862 = args[0]; object pred_73333_73970 = args[1]; object bag_73334_73971 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-partition!");

closureN_type c_734978;
object e_734983 [3];
c_734978.hdr.mark = gc_color_red;
 c_734978.hdr.grayed = 0;
c_734978.tag = closureN_tag;
 c_734978.fn = (function_type)__lambda_418;
c_734978.num_args = 1;
c_734978.num_elements = 3;
c_734978.elements = (object *)e_734983;
c_734978.elements[0] = bag_73334_73971;
c_734978.elements[1] = k_731862;
c_734978.elements[2] = pred_73333_73970;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734978, bag_73334_73971);; 
}

static void __lambda_418(void *data, object self_732817, int argc, object *args) /* object self_732817, object r_731863 */
 {

  return_direct_with_clo3(data,  __glo_sob_91partition_67_srfi_113, (((closure)  __glo_sob_91partition_67_srfi_113)->fn),  ((closureN)self_732817)->elements[1], ((closureN)self_732817)->elements[2], ((closureN)self_732817)->elements[0]);; 
}

static void __lambda_415(void *data, object _, int argc, object *args) /* closure _,object k_731858, object pred_73331_73968, object set_73332_73969 */
 {
object k_731858 = args[0]; object pred_73331_73968 = args[1]; object set_73332_73969 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-partition!");

closureN_type c_734970;
object e_734975 [3];
c_734970.hdr.mark = gc_color_red;
 c_734970.hdr.grayed = 0;
c_734970.tag = closureN_tag;
 c_734970.fn = (function_type)__lambda_416;
c_734970.num_args = 1;
c_734970.num_elements = 3;
c_734970.elements = (object *)e_734975;
c_734970.elements[0] = k_731858;
c_734970.elements[1] = pred_73331_73968;
c_734970.elements[2] = set_73332_73969;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734970, set_73332_73969);; 
}

static void __lambda_416(void *data, object self_732816, int argc, object *args) /* object self_732816, object r_731859 */
 {

  return_direct_with_clo3(data,  __glo_sob_91partition_67_srfi_113, (((closure)  __glo_sob_91partition_67_srfi_113)->fn),  ((closureN)self_732816)->elements[0], ((closureN)self_732816)->elements[1], ((closureN)self_732816)->elements[2]);; 
}

static void __lambda_406(void *data, object _, int argc, object *args) /* closure _,object k_731847, object pred_73326_73963, object sob_73327_73964 */
 {
object k_731847 = args[0]; object pred_73326_73963 = args[1]; object sob_73327_73964 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-partition!");

closureN_type c_734929;
object e_734967 [3];
c_734929.hdr.mark = gc_color_red;
 c_734929.hdr.grayed = 0;
c_734929.tag = closureN_tag;
 c_734929.fn = (function_type)__lambda_407;
c_734929.num_args = 1;
c_734929.num_elements = 3;
c_734929.elements = (object *)e_734967;
c_734929.elements[0] = k_731847;
c_734929.elements[1] = pred_73326_73963;
c_734929.elements[2] = sob_73327_73964;

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_734929, sob_73327_73964);; 
}

static void __lambda_407(void *data, object self_732808, int argc, object *args) /* object self_732808, object result_73328_73965 */
 {
 object result_73328_73965 = args[0];
  
closureN_type c_734931;
object e_734947 [3];
c_734931.hdr.mark = gc_color_red;
 c_734931.hdr.grayed = 0;
c_734931.tag = closureN_tag;
 c_734931.fn = (function_type)__lambda_408;
c_734931.num_args = 1;
c_734931.num_elements = 3;
c_734931.elements = (object *)e_734947;
c_734931.elements[0] = ((closureN)self_732808)->elements[0];
c_734931.elements[1] = result_73328_73965;
c_734931.elements[2] = ((closureN)self_732808)->elements[2];


closureN_type c_734948;
object e_734966 [3];
c_734948.hdr.mark = gc_color_red;
 c_734948.hdr.grayed = 0;
c_734948.tag = closureN_tag;
 c_734948.fn = (function_type)__lambda_412;
c_734948.num_args = 2;
c_734948.num_elements = 3;
c_734948.elements = (object *)e_734966;
c_734948.elements[0] = ((closureN)self_732808)->elements[1];
c_734948.elements[1] = result_73328_73965;
c_734948.elements[2] = ((closureN)self_732808)->elements[2];

return_direct_with_clo1(data,(closure)&c_734931,__lambda_408,  &c_734948);; 
}

static void __lambda_412(void *data, object self_732809, int argc, object *args) /* object self_732809, object k_731853, object key_73329_73966, object value_73330_73967 */
 {
 object k_731853 = args[0]; object key_73329_73966 = args[1]; object value_73330_73967 = args[2];
  
closureN_type c_734951;
object e_734965 [5];
c_734951.hdr.mark = gc_color_red;
 c_734951.hdr.grayed = 0;
c_734951.tag = closureN_tag;
 c_734951.fn = (function_type)__lambda_413;
c_734951.num_args = 1;
c_734951.num_elements = 5;
c_734951.elements = (object *)e_734965;
c_734951.elements[0] = k_731853;
c_734951.elements[1] = key_73329_73966;
c_734951.elements[2] = ((closureN)self_732809)->elements[1];
c_734951.elements[3] = ((closureN)self_732809)->elements[2];
c_734951.elements[4] = value_73330_73967;

return_closcall2(data,  ((closureN)self_732809)->elements[0],  &c_734951, key_73329_73966);; 
}

static void __lambda_413(void *data, object self_732810, int argc, object *args) /* object self_732810, object r_731854 */
 {
 object r_731854 = args[0];
  if( (boolean_f != r_731854) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732810)->elements[0], (((closure)  ((closureN)self_732810)->elements[0])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_734955;
object e_734961 [4];
c_734955.hdr.mark = gc_color_red;
 c_734955.hdr.grayed = 0;
c_734955.tag = closureN_tag;
 c_734955.fn = (function_type)__lambda_414;
c_734955.num_args = 1;
c_734955.num_elements = 4;
c_734955.elements = (object *)e_734961;
c_734955.elements[0] = ((closureN)self_732810)->elements[0];
c_734955.elements[1] = ((closureN)self_732810)->elements[1];
c_734955.elements[2] = ((closureN)self_732810)->elements[2];
c_734955.elements[3] = ((closureN)self_732810)->elements[4];

return_direct_with_clo4(data,  __glo_sob_91decrement_67_srfi_113, (((closure)  __glo_sob_91decrement_67_srfi_113)->fn),  &c_734955, ((closureN)self_732810)->elements[3], ((closureN)self_732810)->elements[1], ((closureN)self_732810)->elements[4]);}
;; 
}

static void __lambda_414(void *data, object self_732811, int argc, object *args) /* object self_732811, object r_731855 */
 {

  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  ((closureN)self_732811)->elements[0], ((closureN)self_732811)->elements[2], ((closureN)self_732811)->elements[1], ((closureN)self_732811)->elements[3]);; 
}

static void __lambda_408(void *data, object self_732812, int argc, object *args) /* object self_732812, object r_731851 */
 {
 object r_731851 = args[0];
  
closureN_type c_734933;
object e_734945 [4];
c_734933.hdr.mark = gc_color_red;
 c_734933.hdr.grayed = 0;
c_734933.tag = closureN_tag;
 c_734933.fn = (function_type)__lambda_409;
c_734933.num_args = 1;
c_734933.num_elements = 4;
c_734933.elements = (object *)e_734945;
c_734933.elements[0] = ((closureN)self_732812)->elements[0];
c_734933.elements[1] = r_731851;
c_734933.elements[2] = ((closureN)self_732812)->elements[1];
c_734933.elements[3] = ((closureN)self_732812)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734933, ((closureN)self_732812)->elements[2]);; 
}

static void __lambda_409(void *data, object self_732813, int argc, object *args) /* object self_732813, object r_731852 */
 {
 object r_731852 = args[0];
  
closureN_type c_734935;
object e_734943 [3];
c_734935.hdr.mark = gc_color_red;
 c_734935.hdr.grayed = 0;
c_734935.tag = closureN_tag;
 c_734935.fn = (function_type)__lambda_410;
c_734935.num_args = 1;
c_734935.num_elements = 3;
c_734935.elements = (object *)e_734943;
c_734935.elements[0] = ((closureN)self_732813)->elements[0];
c_734935.elements[1] = ((closureN)self_732813)->elements[2];
c_734935.elements[2] = ((closureN)self_732813)->elements[3];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734935, r_731852, ((closureN)self_732813)->elements[1]);; 
}

static void __lambda_410(void *data, object self_732814, int argc, object *args) /* object self_732814, object r_731849_732464 */
 {

  
closureN_type c_734937;
object e_734941 [2];
c_734937.hdr.mark = gc_color_red;
 c_734937.hdr.grayed = 0;
c_734937.tag = closureN_tag;
 c_734937.fn = (function_type)__lambda_411;
c_734937.num_args = 1;
c_734937.num_elements = 2;
c_734937.elements = (object *)e_734941;
c_734937.elements[0] = ((closureN)self_732814)->elements[0];
c_734937.elements[1] = ((closureN)self_732814)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91cleanup_67_srfi_113, (((closure)  __glo_sob_91cleanup_67_srfi_113)->fn),  &c_734937, ((closureN)self_732814)->elements[2]);; 
}

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

static void __lambda_404(void *data, object _, int argc, object *args) /* closure _,object k_731843, object pred_73324_73961, object bag_73325_73962 */
 {
object k_731843 = args[0]; object pred_73324_73961 = args[1]; object bag_73325_73962 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-partition");

closureN_type c_734921;
object e_734926 [3];
c_734921.hdr.mark = gc_color_red;
 c_734921.hdr.grayed = 0;
c_734921.tag = closureN_tag;
 c_734921.fn = (function_type)__lambda_405;
c_734921.num_args = 1;
c_734921.num_elements = 3;
c_734921.elements = (object *)e_734926;
c_734921.elements[0] = bag_73325_73962;
c_734921.elements[1] = k_731843;
c_734921.elements[2] = pred_73324_73961;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734921, bag_73325_73962);; 
}

static void __lambda_405(void *data, object self_732807, int argc, object *args) /* object self_732807, object r_731844 */
 {

  return_direct_with_clo3(data,  __glo_sob_91partition_srfi_113, (((closure)  __glo_sob_91partition_srfi_113)->fn),  ((closureN)self_732807)->elements[1], ((closureN)self_732807)->elements[2], ((closureN)self_732807)->elements[0]);; 
}

static void __lambda_402(void *data, object _, int argc, object *args) /* closure _,object k_731839, object pred_73322_73959, object set_73323_73960 */
 {
object k_731839 = args[0]; object pred_73322_73959 = args[1]; object set_73323_73960 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-partition");

closureN_type c_734913;
object e_734918 [3];
c_734913.hdr.mark = gc_color_red;
 c_734913.hdr.grayed = 0;
c_734913.tag = closureN_tag;
 c_734913.fn = (function_type)__lambda_403;
c_734913.num_args = 1;
c_734913.num_elements = 3;
c_734913.elements = (object *)e_734918;
c_734913.elements[0] = k_731839;
c_734913.elements[1] = pred_73322_73959;
c_734913.elements[2] = set_73323_73960;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734913, set_73323_73960);; 
}

static void __lambda_403(void *data, object self_732806, int argc, object *args) /* object self_732806, object r_731840 */
 {

  return_direct_with_clo3(data,  __glo_sob_91partition_srfi_113, (((closure)  __glo_sob_91partition_srfi_113)->fn),  ((closureN)self_732806)->elements[0], ((closureN)self_732806)->elements[1], ((closureN)self_732806)->elements[2]);; 
}

static void __lambda_393(void *data, object _, int argc, object *args) /* closure _,object k_731829, object pred_73316_73953, object sob_73317_73954 */
 {
object k_731829 = args[0]; object pred_73316_73953 = args[1]; object sob_73317_73954 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-partition");

closureN_type c_734870;
object e_734910 [3];
c_734870.hdr.mark = gc_color_red;
 c_734870.hdr.grayed = 0;
c_734870.tag = closureN_tag;
 c_734870.fn = (function_type)__lambda_394;
c_734870.num_args = 1;
c_734870.num_elements = 3;
c_734870.elements = (object *)e_734910;
c_734870.elements[0] = k_731829;
c_734870.elements[1] = pred_73316_73953;
c_734870.elements[2] = sob_73317_73954;

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_734870, sob_73317_73954);; 
}

static void __lambda_394(void *data, object self_732798, int argc, object *args) /* object self_732798, object r_731830 */
 {
 object r_731830 = args[0];
  
closureN_type c_734872;
object e_734908 [4];
c_734872.hdr.mark = gc_color_red;
 c_734872.hdr.grayed = 0;
c_734872.tag = closureN_tag;
 c_734872.fn = (function_type)__lambda_395;
c_734872.num_args = 1;
c_734872.num_elements = 4;
c_734872.elements = (object *)e_734908;
c_734872.elements[0] = ((closureN)self_732798)->elements[0];
c_734872.elements[1] = ((closureN)self_732798)->elements[1];
c_734872.elements[2] = r_731830;
c_734872.elements[3] = ((closureN)self_732798)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_734872, ((closureN)self_732798)->elements[2]);; 
}

static void __lambda_395(void *data, object self_732799, int argc, object *args) /* object self_732799, object r_731831 */
 {
 object r_731831 = args[0];
  
closureN_type c_734874;
object e_734906 [3];
c_734874.hdr.mark = gc_color_red;
 c_734874.hdr.grayed = 0;
c_734874.tag = closureN_tag;
 c_734874.fn = (function_type)__lambda_396;
c_734874.num_args = 2;
c_734874.num_elements = 3;
c_734874.elements = (object *)e_734906;
c_734874.elements[0] = ((closureN)self_732799)->elements[0];
c_734874.elements[1] = ((closureN)self_732799)->elements[1];
c_734874.elements[2] = ((closureN)self_732799)->elements[3];

return_direct_with_clo2(data,(closure)&c_734874,__lambda_396,  ((closureN)self_732799)->elements[2], r_731831);; 
}

static void __lambda_396(void *data, object self_732800, int argc, object *args) /* object self_732800, object res1_73318_73955, object res2_73319_73956 */
 {
 object res1_73318_73955 = args[0]; object res2_73319_73956 = args[1];
  
closureN_type c_734876;
object e_734889 [4];
c_734876.hdr.mark = gc_color_red;
 c_734876.hdr.grayed = 0;
c_734876.tag = closureN_tag;
 c_734876.fn = (function_type)__lambda_397;
c_734876.num_args = 1;
c_734876.num_elements = 4;
c_734876.elements = (object *)e_734889;
c_734876.elements[0] = ((closureN)self_732800)->elements[0];
c_734876.elements[1] = res1_73318_73955;
c_734876.elements[2] = res2_73319_73956;
c_734876.elements[3] = ((closureN)self_732800)->elements[2];


closureN_type c_734890;
object e_734905 [3];
c_734890.hdr.mark = gc_color_red;
 c_734890.hdr.grayed = 0;
c_734890.tag = closureN_tag;
 c_734890.fn = (function_type)__lambda_400;
c_734890.num_args = 2;
c_734890.num_elements = 3;
c_734890.elements = (object *)e_734905;
c_734890.elements[0] = ((closureN)self_732800)->elements[1];
c_734890.elements[1] = res1_73318_73955;
c_734890.elements[2] = res2_73319_73956;

return_direct_with_clo1(data,(closure)&c_734876,__lambda_397,  &c_734890);; 
}

static void __lambda_400(void *data, object self_732801, int argc, object *args) /* object self_732801, object k_731835, object key_73320_73957, object value_73321_73958 */
 {
 object k_731835 = args[0]; object key_73320_73957 = args[1]; object value_73321_73958 = args[2];
  
closureN_type c_734893;
object e_734904 [5];
c_734893.hdr.mark = gc_color_red;
 c_734893.hdr.grayed = 0;
c_734893.tag = closureN_tag;
 c_734893.fn = (function_type)__lambda_401;
c_734893.num_args = 1;
c_734893.num_elements = 5;
c_734893.elements = (object *)e_734904;
c_734893.elements[0] = k_731835;
c_734893.elements[1] = key_73320_73957;
c_734893.elements[2] = ((closureN)self_732801)->elements[1];
c_734893.elements[3] = ((closureN)self_732801)->elements[2];
c_734893.elements[4] = value_73321_73958;

return_closcall2(data,  ((closureN)self_732801)->elements[0],  &c_734893, key_73320_73957);; 
}

static void __lambda_401(void *data, object self_732802, int argc, object *args) /* object self_732802, object r_731836 */
 {
 object r_731836 = args[0];
  if( (boolean_f != r_731836) ){ 
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  ((closureN)self_732802)->elements[0], ((closureN)self_732802)->elements[2], ((closureN)self_732802)->elements[1], ((closureN)self_732802)->elements[4]);
} else { 
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  ((closureN)self_732802)->elements[0], ((closureN)self_732802)->elements[3], ((closureN)self_732802)->elements[1], ((closureN)self_732802)->elements[4]);}
;; 
}

static void __lambda_397(void *data, object self_732803, int argc, object *args) /* object self_732803, object r_731833 */
 {
 object r_731833 = args[0];
  
closureN_type c_734878;
object e_734887 [4];
c_734878.hdr.mark = gc_color_red;
 c_734878.hdr.grayed = 0;
c_734878.tag = closureN_tag;
 c_734878.fn = (function_type)__lambda_398;
c_734878.num_args = 1;
c_734878.num_elements = 4;
c_734878.elements = (object *)e_734887;
c_734878.elements[0] = ((closureN)self_732803)->elements[0];
c_734878.elements[1] = r_731833;
c_734878.elements[2] = ((closureN)self_732803)->elements[1];
c_734878.elements[3] = ((closureN)self_732803)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734878, ((closureN)self_732803)->elements[3]);; 
}

static void __lambda_398(void *data, object self_732804, int argc, object *args) /* object self_732804, object r_731834 */
 {
 object r_731834 = args[0];
  
closureN_type c_734880;
object e_734885 [3];
c_734880.hdr.mark = gc_color_red;
 c_734880.hdr.grayed = 0;
c_734880.tag = closureN_tag;
 c_734880.fn = (function_type)__lambda_399;
c_734880.num_args = 1;
c_734880.num_elements = 3;
c_734880.elements = (object *)e_734885;
c_734880.elements[0] = ((closureN)self_732804)->elements[0];
c_734880.elements[1] = ((closureN)self_732804)->elements[2];
c_734880.elements[2] = ((closureN)self_732804)->elements[3];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734880, r_731834, ((closureN)self_732804)->elements[1]);; 
}

static void __lambda_399(void *data, object self_732805, int argc, object *args) /* object self_732805, object r_731832_732463 */
 {

  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_732805)->elements[0], ((closureN)self_732805)->elements[1], ((closureN)self_732805)->elements[2]);; 
}

static void __lambda_388(void *data, object _, int argc, object *args) /* closure _,object k_731822, object pred_73313_73950, object bag_73314_73951 */
 {
object k_731822 = args[0]; object pred_73313_73950 = args[1]; object bag_73314_73951 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-remove!");

closureN_type c_734849;
object e_734867 [3];
c_734849.hdr.mark = gc_color_red;
 c_734849.hdr.grayed = 0;
c_734849.tag = closureN_tag;
 c_734849.fn = (function_type)__lambda_389;
c_734849.num_args = 1;
c_734849.num_elements = 3;
c_734849.elements = (object *)e_734867;
c_734849.elements[0] = bag_73314_73951;
c_734849.elements[1] = k_731822;
c_734849.elements[2] = pred_73313_73950;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734849, bag_73314_73951);; 
}

static void __lambda_389(void *data, object self_732794, int argc, object *args) /* object self_732794, object r_731823 */
 {

  
closureN_type c_734851;
object e_734855 [2];
c_734851.hdr.mark = gc_color_red;
 c_734851.hdr.grayed = 0;
c_734851.tag = closureN_tag;
 c_734851.fn = (function_type)__lambda_390;
c_734851.num_args = 1;
c_734851.num_elements = 2;
c_734851.elements = (object *)e_734855;
c_734851.elements[0] = ((closureN)self_732794)->elements[0];
c_734851.elements[1] = ((closureN)self_732794)->elements[1];


closureN_type c_734856;
object e_734866 [1];
c_734856.hdr.mark = gc_color_red;
 c_734856.hdr.grayed = 0;
c_734856.tag = closureN_tag;
 c_734856.fn = (function_type)__lambda_391;
c_734856.num_args = 1;
c_734856.num_elements = 1;
c_734856.elements = (object *)e_734866;
c_734856.elements[0] = ((closureN)self_732794)->elements[2];

return_direct_with_clo1(data,(closure)&c_734851,__lambda_390,  &c_734856);; 
}

static void __lambda_391(void *data, object self_732795, int argc, object *args) /* object self_732795, object k_731825, object x_73315_73952 */
 {
 object k_731825 = args[0]; object x_73315_73952 = args[1];
  
closureN_type c_734859;
object e_734865 [1];
c_734859.hdr.mark = gc_color_red;
 c_734859.hdr.grayed = 0;
c_734859.tag = closureN_tag;
 c_734859.fn = (function_type)__lambda_392;
c_734859.num_args = 1;
c_734859.num_elements = 1;
c_734859.elements = (object *)e_734865;
c_734859.elements[0] = k_731825;

return_closcall2(data,  ((closureN)self_732795)->elements[0],  &c_734859, x_73315_73952);; 
}

static void __lambda_392(void *data, object self_732796, int argc, object *args) /* object self_732796, object r_731826 */
 {
 object r_731826 = args[0];
  
complex_num_type local_734864; 
return_direct_with_clo1(data,  ((closureN)self_732796)->elements[0], (((closure)  ((closureN)self_732796)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_734864, r_731826));; 
}

static void __lambda_390(void *data, object self_732797, int argc, object *args) /* object self_732797, object r_731824 */
 {
 object r_731824 = args[0];
  return_direct_with_clo3(data,  __glo_sob_91filter_67_srfi_113, (((closure)  __glo_sob_91filter_67_srfi_113)->fn),  ((closureN)self_732797)->elements[1], r_731824, ((closureN)self_732797)->elements[0]);; 
}

static void __lambda_383(void *data, object _, int argc, object *args) /* closure _,object k_731815, object pred_73310_73947, object set_73311_73948 */
 {
object k_731815 = args[0]; object pred_73310_73947 = args[1]; object set_73311_73948 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-remove!");

closureN_type c_734828;
object e_734846 [3];
c_734828.hdr.mark = gc_color_red;
 c_734828.hdr.grayed = 0;
c_734828.tag = closureN_tag;
 c_734828.fn = (function_type)__lambda_384;
c_734828.num_args = 1;
c_734828.num_elements = 3;
c_734828.elements = (object *)e_734846;
c_734828.elements[0] = k_731815;
c_734828.elements[1] = pred_73310_73947;
c_734828.elements[2] = set_73311_73948;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734828, set_73311_73948);; 
}

static void __lambda_384(void *data, object self_732790, int argc, object *args) /* object self_732790, object r_731816 */
 {

  
closureN_type c_734830;
object e_734834 [2];
c_734830.hdr.mark = gc_color_red;
 c_734830.hdr.grayed = 0;
c_734830.tag = closureN_tag;
 c_734830.fn = (function_type)__lambda_385;
c_734830.num_args = 1;
c_734830.num_elements = 2;
c_734830.elements = (object *)e_734834;
c_734830.elements[0] = ((closureN)self_732790)->elements[0];
c_734830.elements[1] = ((closureN)self_732790)->elements[2];


closureN_type c_734835;
object e_734845 [1];
c_734835.hdr.mark = gc_color_red;
 c_734835.hdr.grayed = 0;
c_734835.tag = closureN_tag;
 c_734835.fn = (function_type)__lambda_386;
c_734835.num_args = 1;
c_734835.num_elements = 1;
c_734835.elements = (object *)e_734845;
c_734835.elements[0] = ((closureN)self_732790)->elements[1];

return_direct_with_clo1(data,(closure)&c_734830,__lambda_385,  &c_734835);; 
}

static void __lambda_386(void *data, object self_732791, int argc, object *args) /* object self_732791, object k_731818, object x_73312_73949 */
 {
 object k_731818 = args[0]; object x_73312_73949 = args[1];
  
closureN_type c_734838;
object e_734844 [1];
c_734838.hdr.mark = gc_color_red;
 c_734838.hdr.grayed = 0;
c_734838.tag = closureN_tag;
 c_734838.fn = (function_type)__lambda_387;
c_734838.num_args = 1;
c_734838.num_elements = 1;
c_734838.elements = (object *)e_734844;
c_734838.elements[0] = k_731818;

return_closcall2(data,  ((closureN)self_732791)->elements[0],  &c_734838, x_73312_73949);; 
}

static void __lambda_387(void *data, object self_732792, int argc, object *args) /* object self_732792, object r_731819 */
 {
 object r_731819 = args[0];
  
complex_num_type local_734843; 
return_direct_with_clo1(data,  ((closureN)self_732792)->elements[0], (((closure)  ((closureN)self_732792)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_734843, r_731819));; 
}

static void __lambda_385(void *data, object self_732793, int argc, object *args) /* object self_732793, object r_731817 */
 {
 object r_731817 = args[0];
  return_direct_with_clo3(data,  __glo_sob_91filter_67_srfi_113, (((closure)  __glo_sob_91filter_67_srfi_113)->fn),  ((closureN)self_732793)->elements[0], r_731817, ((closureN)self_732793)->elements[1]);; 
}

static void __lambda_381(void *data, object _, int argc, object *args) /* closure _,object k_731811, object pred_73308_73945, object bag_73309_73946 */
 {
object k_731811 = args[0]; object pred_73308_73945 = args[1]; object bag_73309_73946 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-filter!");

closureN_type c_734820;
object e_734825 [3];
c_734820.hdr.mark = gc_color_red;
 c_734820.hdr.grayed = 0;
c_734820.tag = closureN_tag;
 c_734820.fn = (function_type)__lambda_382;
c_734820.num_args = 1;
c_734820.num_elements = 3;
c_734820.elements = (object *)e_734825;
c_734820.elements[0] = bag_73309_73946;
c_734820.elements[1] = k_731811;
c_734820.elements[2] = pred_73308_73945;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734820, bag_73309_73946);; 
}

static void __lambda_382(void *data, object self_732789, int argc, object *args) /* object self_732789, object r_731812 */
 {

  return_direct_with_clo3(data,  __glo_sob_91filter_67_srfi_113, (((closure)  __glo_sob_91filter_67_srfi_113)->fn),  ((closureN)self_732789)->elements[1], ((closureN)self_732789)->elements[2], ((closureN)self_732789)->elements[0]);; 
}

static void __lambda_379(void *data, object _, int argc, object *args) /* closure _,object k_731807, object pred_73306_73943, object set_73307_73944 */
 {
object k_731807 = args[0]; object pred_73306_73943 = args[1]; object set_73307_73944 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-filter!");

closureN_type c_734812;
object e_734817 [3];
c_734812.hdr.mark = gc_color_red;
 c_734812.hdr.grayed = 0;
c_734812.tag = closureN_tag;
 c_734812.fn = (function_type)__lambda_380;
c_734812.num_args = 1;
c_734812.num_elements = 3;
c_734812.elements = (object *)e_734817;
c_734812.elements[0] = k_731807;
c_734812.elements[1] = pred_73306_73943;
c_734812.elements[2] = set_73307_73944;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734812, set_73307_73944);; 
}

static void __lambda_380(void *data, object self_732788, int argc, object *args) /* object self_732788, object r_731808 */
 {

  return_direct_with_clo3(data,  __glo_sob_91filter_67_srfi_113, (((closure)  __glo_sob_91filter_67_srfi_113)->fn),  ((closureN)self_732788)->elements[0], ((closureN)self_732788)->elements[1], ((closureN)self_732788)->elements[2]);; 
}

static void __lambda_373(void *data, object _, int argc, object *args) /* closure _,object k_731799, object pred_73302_73939, object sob_73303_73940 */
 {
object k_731799 = args[0]; object pred_73302_73939 = args[1]; object sob_73303_73940 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-filter!");

closureN_type c_734784;
object e_734796 [2];
c_734784.hdr.mark = gc_color_red;
 c_734784.hdr.grayed = 0;
c_734784.tag = closureN_tag;
 c_734784.fn = (function_type)__lambda_374;
c_734784.num_args = 1;
c_734784.num_elements = 2;
c_734784.elements = (object *)e_734796;
c_734784.elements[0] = k_731799;
c_734784.elements[1] = sob_73303_73940;


closureN_type c_734797;
object e_734809 [2];
c_734797.hdr.mark = gc_color_red;
 c_734797.hdr.grayed = 0;
c_734797.tag = closureN_tag;
 c_734797.fn = (function_type)__lambda_377;
c_734797.num_args = 2;
c_734797.num_elements = 2;
c_734797.elements = (object *)e_734809;
c_734797.elements[0] = pred_73302_73939;
c_734797.elements[1] = sob_73303_73940;

return_direct_with_clo1(data,(closure)&c_734784,__lambda_374,  &c_734797);; 
}

static void __lambda_377(void *data, object self_732783, int argc, object *args) /* object self_732783, object k_731803, object key_73304_73941, object value_73305_73942 */
 {
 object k_731803 = args[0]; object key_73304_73941 = args[1]; object value_73305_73942 = args[2];
  
closureN_type c_734800;
object e_734808 [4];
c_734800.hdr.mark = gc_color_red;
 c_734800.hdr.grayed = 0;
c_734800.tag = closureN_tag;
 c_734800.fn = (function_type)__lambda_378;
c_734800.num_args = 1;
c_734800.num_elements = 4;
c_734800.elements = (object *)e_734808;
c_734800.elements[0] = k_731803;
c_734800.elements[1] = key_73304_73941;
c_734800.elements[2] = ((closureN)self_732783)->elements[1];
c_734800.elements[3] = value_73305_73942;

return_closcall2(data,  ((closureN)self_732783)->elements[0],  &c_734800, key_73304_73941);; 
}

static void __lambda_378(void *data, object self_732784, int argc, object *args) /* object self_732784, object r_731804 */
 {
 object r_731804 = args[0];
  if( (boolean_f != r_731804) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732784)->elements[0], (((closure)  ((closureN)self_732784)->elements[0])->fn),  Cyc_VOID);
} else { 
  return_direct_with_clo4(data,  __glo_sob_91decrement_67_srfi_113, (((closure)  __glo_sob_91decrement_67_srfi_113)->fn),  ((closureN)self_732784)->elements[0], ((closureN)self_732784)->elements[2], ((closureN)self_732784)->elements[1], ((closureN)self_732784)->elements[3]);}
;; 
}

static void __lambda_374(void *data, object self_732785, int argc, object *args) /* object self_732785, object r_731801 */
 {
 object r_731801 = args[0];
  
closureN_type c_734786;
object e_734794 [3];
c_734786.hdr.mark = gc_color_red;
 c_734786.hdr.grayed = 0;
c_734786.tag = closureN_tag;
 c_734786.fn = (function_type)__lambda_375;
c_734786.num_args = 1;
c_734786.num_elements = 3;
c_734786.elements = (object *)e_734794;
c_734786.elements[0] = ((closureN)self_732785)->elements[0];
c_734786.elements[1] = r_731801;
c_734786.elements[2] = ((closureN)self_732785)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734786, ((closureN)self_732785)->elements[1]);; 
}

static void __lambda_375(void *data, object self_732786, int argc, object *args) /* object self_732786, object r_731802 */
 {
 object r_731802 = args[0];
  
closureN_type c_734788;
object e_734792 [2];
c_734788.hdr.mark = gc_color_red;
 c_734788.hdr.grayed = 0;
c_734788.tag = closureN_tag;
 c_734788.fn = (function_type)__lambda_376;
c_734788.num_args = 1;
c_734788.num_elements = 2;
c_734788.elements = (object *)e_734792;
c_734788.elements[0] = ((closureN)self_732786)->elements[0];
c_734788.elements[1] = ((closureN)self_732786)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734788, r_731802, ((closureN)self_732786)->elements[1]);; 
}

static void __lambda_376(void *data, object self_732787, int argc, object *args) /* object self_732787, object r_731800_732462 */
 {

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

static void __lambda_368(void *data, object _, int argc, object *args) /* closure _,object k_731792, object pred_73299_73936, object bag_73300_73937 */
 {
object k_731792 = args[0]; object pred_73299_73936 = args[1]; object bag_73300_73937 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-remove");

closureN_type c_734763;
object e_734781 [3];
c_734763.hdr.mark = gc_color_red;
 c_734763.hdr.grayed = 0;
c_734763.tag = closureN_tag;
 c_734763.fn = (function_type)__lambda_369;
c_734763.num_args = 1;
c_734763.num_elements = 3;
c_734763.elements = (object *)e_734781;
c_734763.elements[0] = bag_73300_73937;
c_734763.elements[1] = k_731792;
c_734763.elements[2] = pred_73299_73936;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734763, bag_73300_73937);; 
}

static void __lambda_369(void *data, object self_732779, int argc, object *args) /* object self_732779, object r_731793 */
 {

  
closureN_type c_734765;
object e_734769 [2];
c_734765.hdr.mark = gc_color_red;
 c_734765.hdr.grayed = 0;
c_734765.tag = closureN_tag;
 c_734765.fn = (function_type)__lambda_370;
c_734765.num_args = 1;
c_734765.num_elements = 2;
c_734765.elements = (object *)e_734769;
c_734765.elements[0] = ((closureN)self_732779)->elements[0];
c_734765.elements[1] = ((closureN)self_732779)->elements[1];


closureN_type c_734770;
object e_734780 [1];
c_734770.hdr.mark = gc_color_red;
 c_734770.hdr.grayed = 0;
c_734770.tag = closureN_tag;
 c_734770.fn = (function_type)__lambda_371;
c_734770.num_args = 1;
c_734770.num_elements = 1;
c_734770.elements = (object *)e_734780;
c_734770.elements[0] = ((closureN)self_732779)->elements[2];

return_direct_with_clo1(data,(closure)&c_734765,__lambda_370,  &c_734770);; 
}

static void __lambda_371(void *data, object self_732780, int argc, object *args) /* object self_732780, object k_731795, object x_73301_73938 */
 {
 object k_731795 = args[0]; object x_73301_73938 = args[1];
  
closureN_type c_734773;
object e_734779 [1];
c_734773.hdr.mark = gc_color_red;
 c_734773.hdr.grayed = 0;
c_734773.tag = closureN_tag;
 c_734773.fn = (function_type)__lambda_372;
c_734773.num_args = 1;
c_734773.num_elements = 1;
c_734773.elements = (object *)e_734779;
c_734773.elements[0] = k_731795;

return_closcall2(data,  ((closureN)self_732780)->elements[0],  &c_734773, x_73301_73938);; 
}

static void __lambda_372(void *data, object self_732781, int argc, object *args) /* object self_732781, object r_731796 */
 {
 object r_731796 = args[0];
  
complex_num_type local_734778; 
return_direct_with_clo1(data,  ((closureN)self_732781)->elements[0], (((closure)  ((closureN)self_732781)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_734778, r_731796));; 
}

static void __lambda_370(void *data, object self_732782, int argc, object *args) /* object self_732782, object r_731794 */
 {
 object r_731794 = args[0];
  return_direct_with_clo3(data,  __glo_sob_91filter_srfi_113, (((closure)  __glo_sob_91filter_srfi_113)->fn),  ((closureN)self_732782)->elements[1], r_731794, ((closureN)self_732782)->elements[0]);; 
}

static void __lambda_363(void *data, object _, int argc, object *args) /* closure _,object k_731785, object pred_73296_73933, object set_73297_73934 */
 {
object k_731785 = args[0]; object pred_73296_73933 = args[1]; object set_73297_73934 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-remove");

closureN_type c_734742;
object e_734760 [3];
c_734742.hdr.mark = gc_color_red;
 c_734742.hdr.grayed = 0;
c_734742.tag = closureN_tag;
 c_734742.fn = (function_type)__lambda_364;
c_734742.num_args = 1;
c_734742.num_elements = 3;
c_734742.elements = (object *)e_734760;
c_734742.elements[0] = k_731785;
c_734742.elements[1] = pred_73296_73933;
c_734742.elements[2] = set_73297_73934;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734742, set_73297_73934);; 
}

static void __lambda_364(void *data, object self_732775, int argc, object *args) /* object self_732775, object r_731786 */
 {

  
closureN_type c_734744;
object e_734748 [2];
c_734744.hdr.mark = gc_color_red;
 c_734744.hdr.grayed = 0;
c_734744.tag = closureN_tag;
 c_734744.fn = (function_type)__lambda_365;
c_734744.num_args = 1;
c_734744.num_elements = 2;
c_734744.elements = (object *)e_734748;
c_734744.elements[0] = ((closureN)self_732775)->elements[0];
c_734744.elements[1] = ((closureN)self_732775)->elements[2];


closureN_type c_734749;
object e_734759 [1];
c_734749.hdr.mark = gc_color_red;
 c_734749.hdr.grayed = 0;
c_734749.tag = closureN_tag;
 c_734749.fn = (function_type)__lambda_366;
c_734749.num_args = 1;
c_734749.num_elements = 1;
c_734749.elements = (object *)e_734759;
c_734749.elements[0] = ((closureN)self_732775)->elements[1];

return_direct_with_clo1(data,(closure)&c_734744,__lambda_365,  &c_734749);; 
}

static void __lambda_366(void *data, object self_732776, int argc, object *args) /* object self_732776, object k_731788, object x_73298_73935 */
 {
 object k_731788 = args[0]; object x_73298_73935 = args[1];
  
closureN_type c_734752;
object e_734758 [1];
c_734752.hdr.mark = gc_color_red;
 c_734752.hdr.grayed = 0;
c_734752.tag = closureN_tag;
 c_734752.fn = (function_type)__lambda_367;
c_734752.num_args = 1;
c_734752.num_elements = 1;
c_734752.elements = (object *)e_734758;
c_734752.elements[0] = k_731788;

return_closcall2(data,  ((closureN)self_732776)->elements[0],  &c_734752, x_73298_73935);; 
}

static void __lambda_367(void *data, object self_732777, int argc, object *args) /* object self_732777, object r_731789 */
 {
 object r_731789 = args[0];
  
complex_num_type local_734757; 
return_direct_with_clo1(data,  ((closureN)self_732777)->elements[0], (((closure)  ((closureN)self_732777)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_734757, r_731789));; 
}

static void __lambda_365(void *data, object self_732778, int argc, object *args) /* object self_732778, object r_731787 */
 {
 object r_731787 = args[0];
  return_direct_with_clo3(data,  __glo_sob_91filter_srfi_113, (((closure)  __glo_sob_91filter_srfi_113)->fn),  ((closureN)self_732778)->elements[0], r_731787, ((closureN)self_732778)->elements[1]);; 
}

static void __lambda_361(void *data, object _, int argc, object *args) /* closure _,object k_731781, object pred_73294_73931, object bag_73295_73932 */
 {
object k_731781 = args[0]; object pred_73294_73931 = args[1]; object bag_73295_73932 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-filter");

closureN_type c_734734;
object e_734739 [3];
c_734734.hdr.mark = gc_color_red;
 c_734734.hdr.grayed = 0;
c_734734.tag = closureN_tag;
 c_734734.fn = (function_type)__lambda_362;
c_734734.num_args = 1;
c_734734.num_elements = 3;
c_734734.elements = (object *)e_734739;
c_734734.elements[0] = bag_73295_73932;
c_734734.elements[1] = k_731781;
c_734734.elements[2] = pred_73294_73931;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734734, bag_73295_73932);; 
}

static void __lambda_362(void *data, object self_732774, int argc, object *args) /* object self_732774, object r_731782 */
 {

  return_direct_with_clo3(data,  __glo_sob_91filter_srfi_113, (((closure)  __glo_sob_91filter_srfi_113)->fn),  ((closureN)self_732774)->elements[1], ((closureN)self_732774)->elements[2], ((closureN)self_732774)->elements[0]);; 
}

static void __lambda_359(void *data, object _, int argc, object *args) /* closure _,object k_731777, object pred_73292_73929, object set_73293_73930 */
 {
object k_731777 = args[0]; object pred_73292_73929 = args[1]; object set_73293_73930 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-filter");

closureN_type c_734726;
object e_734731 [3];
c_734726.hdr.mark = gc_color_red;
 c_734726.hdr.grayed = 0;
c_734726.tag = closureN_tag;
 c_734726.fn = (function_type)__lambda_360;
c_734726.num_args = 1;
c_734726.num_elements = 3;
c_734726.elements = (object *)e_734731;
c_734726.elements[0] = k_731777;
c_734726.elements[1] = pred_73292_73929;
c_734726.elements[2] = set_73293_73930;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734726, set_73293_73930);; 
}

static void __lambda_360(void *data, object self_732773, int argc, object *args) /* object self_732773, object r_731778 */
 {

  return_direct_with_clo3(data,  __glo_sob_91filter_srfi_113, (((closure)  __glo_sob_91filter_srfi_113)->fn),  ((closureN)self_732773)->elements[0], ((closureN)self_732773)->elements[1], ((closureN)self_732773)->elements[2]);; 
}

static void __lambda_352(void *data, object _, int argc, object *args) /* closure _,object k_731768, object pred_73287_73924, object sob_73288_73925 */
 {
object k_731768 = args[0]; object pred_73287_73924 = args[1]; object sob_73288_73925 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-filter");

closureN_type c_734695;
object e_734723 [3];
c_734695.hdr.mark = gc_color_red;
 c_734695.hdr.grayed = 0;
c_734695.tag = closureN_tag;
 c_734695.fn = (function_type)__lambda_353;
c_734695.num_args = 1;
c_734695.num_elements = 3;
c_734695.elements = (object *)e_734723;
c_734695.elements[0] = k_731768;
c_734695.elements[1] = pred_73287_73924;
c_734695.elements[2] = sob_73288_73925;

return_direct_with_clo2(data,  __glo_sob_91empty_91copy_srfi_113, (((closure)  __glo_sob_91empty_91copy_srfi_113)->fn),  &c_734695, sob_73288_73925);; 
}

static void __lambda_353(void *data, object self_732767, int argc, object *args) /* object self_732767, object result_73289_73926 */
 {
 object result_73289_73926 = args[0];
  
closureN_type c_734697;
object e_734709 [3];
c_734697.hdr.mark = gc_color_red;
 c_734697.hdr.grayed = 0;
c_734697.tag = closureN_tag;
 c_734697.fn = (function_type)__lambda_354;
c_734697.num_args = 1;
c_734697.num_elements = 3;
c_734697.elements = (object *)e_734709;
c_734697.elements[0] = ((closureN)self_732767)->elements[0];
c_734697.elements[1] = result_73289_73926;
c_734697.elements[2] = ((closureN)self_732767)->elements[2];


closureN_type c_734710;
object e_734722 [2];
c_734710.hdr.mark = gc_color_red;
 c_734710.hdr.grayed = 0;
c_734710.tag = closureN_tag;
 c_734710.fn = (function_type)__lambda_357;
c_734710.num_args = 2;
c_734710.num_elements = 2;
c_734710.elements = (object *)e_734722;
c_734710.elements[0] = ((closureN)self_732767)->elements[1];
c_734710.elements[1] = result_73289_73926;

return_direct_with_clo1(data,(closure)&c_734697,__lambda_354,  &c_734710);; 
}

static void __lambda_357(void *data, object self_732768, int argc, object *args) /* object self_732768, object k_731773, object key_73290_73927, object value_73291_73928 */
 {
 object k_731773 = args[0]; object key_73290_73927 = args[1]; object value_73291_73928 = args[2];
  
closureN_type c_734713;
object e_734721 [4];
c_734713.hdr.mark = gc_color_red;
 c_734713.hdr.grayed = 0;
c_734713.tag = closureN_tag;
 c_734713.fn = (function_type)__lambda_358;
c_734713.num_args = 1;
c_734713.num_elements = 4;
c_734713.elements = (object *)e_734721;
c_734713.elements[0] = k_731773;
c_734713.elements[1] = key_73290_73927;
c_734713.elements[2] = ((closureN)self_732768)->elements[1];
c_734713.elements[3] = value_73291_73928;

return_closcall2(data,  ((closureN)self_732768)->elements[0],  &c_734713, key_73290_73927);; 
}

static void __lambda_358(void *data, object self_732769, int argc, object *args) /* object self_732769, object r_731774 */
 {
 object r_731774 = args[0];
  if( (boolean_f != r_731774) ){ 
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  ((closureN)self_732769)->elements[0], ((closureN)self_732769)->elements[2], ((closureN)self_732769)->elements[1], ((closureN)self_732769)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732769)->elements[0], (((closure)  ((closureN)self_732769)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_354(void *data, object self_732770, int argc, object *args) /* object self_732770, object r_731771 */
 {
 object r_731771 = args[0];
  
closureN_type c_734699;
object e_734707 [3];
c_734699.hdr.mark = gc_color_red;
 c_734699.hdr.grayed = 0;
c_734699.tag = closureN_tag;
 c_734699.fn = (function_type)__lambda_355;
c_734699.num_args = 1;
c_734699.num_elements = 3;
c_734699.elements = (object *)e_734707;
c_734699.elements[0] = ((closureN)self_732770)->elements[0];
c_734699.elements[1] = r_731771;
c_734699.elements[2] = ((closureN)self_732770)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734699, ((closureN)self_732770)->elements[2]);; 
}

static void __lambda_355(void *data, object self_732771, int argc, object *args) /* object self_732771, object r_731772 */
 {
 object r_731772 = args[0];
  
closureN_type c_734701;
object e_734705 [2];
c_734701.hdr.mark = gc_color_red;
 c_734701.hdr.grayed = 0;
c_734701.tag = closureN_tag;
 c_734701.fn = (function_type)__lambda_356;
c_734701.num_args = 1;
c_734701.num_elements = 2;
c_734701.elements = (object *)e_734705;
c_734701.elements[0] = ((closureN)self_732771)->elements[0];
c_734701.elements[1] = ((closureN)self_732771)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734701, r_731772, ((closureN)self_732771)->elements[1]);; 
}

static void __lambda_356(void *data, object self_732772, int argc, object *args) /* object self_732772, object r_731770_732461 */
 {

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

static void __lambda_350(void *data, object _, int argc, object *args) /* closure _,object k_731764, object proc_73284_73921, object nil_73285_73922, object bag_73286_73923 */
 {
object k_731764 = args[0]; object proc_73284_73921 = args[1]; object nil_73285_73922 = args[2]; object bag_73286_73923 = args[3];
  Cyc_st_add(data, "srfi/113.sld:bag-fold");

closureN_type c_734686;
object e_734692 [4];
c_734686.hdr.mark = gc_color_red;
 c_734686.hdr.grayed = 0;
c_734686.tag = closureN_tag;
 c_734686.fn = (function_type)__lambda_351;
c_734686.num_args = 1;
c_734686.num_elements = 4;
c_734686.elements = (object *)e_734692;
c_734686.elements[0] = bag_73286_73923;
c_734686.elements[1] = k_731764;
c_734686.elements[2] = nil_73285_73922;
c_734686.elements[3] = proc_73284_73921;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734686, bag_73286_73923);; 
}

static void __lambda_351(void *data, object self_732766, int argc, object *args) /* object self_732766, object r_731765 */
 {

  return_direct_with_clo4(data,  __glo_sob_91fold_srfi_113, (((closure)  __glo_sob_91fold_srfi_113)->fn),  ((closureN)self_732766)->elements[1], ((closureN)self_732766)->elements[3], ((closureN)self_732766)->elements[2], ((closureN)self_732766)->elements[0]);; 
}

static void __lambda_348(void *data, object _, int argc, object *args) /* closure _,object k_731760, object proc_73281_73918, object nil_73282_73919, object set_73283_73920 */
 {
object k_731760 = args[0]; object proc_73281_73918 = args[1]; object nil_73282_73919 = args[2]; object set_73283_73920 = args[3];
  Cyc_st_add(data, "srfi/113.sld:set-fold");

closureN_type c_734677;
object e_734683 [4];
c_734677.hdr.mark = gc_color_red;
 c_734677.hdr.grayed = 0;
c_734677.tag = closureN_tag;
 c_734677.fn = (function_type)__lambda_349;
c_734677.num_args = 1;
c_734677.num_elements = 4;
c_734677.elements = (object *)e_734683;
c_734677.elements[0] = k_731760;
c_734677.elements[1] = nil_73282_73919;
c_734677.elements[2] = proc_73281_73918;
c_734677.elements[3] = set_73283_73920;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734677, set_73283_73920);; 
}

static void __lambda_349(void *data, object self_732765, int argc, object *args) /* object self_732765, object r_731761 */
 {

  return_direct_with_clo4(data,  __glo_sob_91fold_srfi_113, (((closure)  __glo_sob_91fold_srfi_113)->fn),  ((closureN)self_732765)->elements[0], ((closureN)self_732765)->elements[2], ((closureN)self_732765)->elements[1], ((closureN)self_732765)->elements[3]);; 
}

static void __lambda_342(void *data, object _, int argc, object *args) /* closure _,object k_731753, object proc_73276_73913, object nil_73277_73914, object sob_73278_73915 */
 {
object k_731753 = args[0]; object proc_73276_73913 = args[1]; object nil_73277_73914 = args[2]; object sob_73278_73915 = args[3];
  Cyc_st_add(data, "srfi/113.sld:sob-fold");

closureN_type c_734641;
object e_734674 [3];
c_734641.hdr.mark = gc_color_red;
 c_734641.hdr.grayed = 0;
c_734641.tag = closureN_tag;
 c_734641.fn = (function_type)__lambda_343;
c_734641.num_args = 1;
c_734641.num_elements = 3;
c_734641.elements = (object *)e_734674;
c_734641.elements[0] = k_731753;
c_734641.elements[1] = proc_73276_73913;
c_734641.elements[2] = sob_73278_73915;

return_direct_with_clo1(data,(closure)&c_734641,__lambda_343,  nil_73277_73914);; 
}

static void __lambda_343(void *data, object self_732759, int argc, object *args) /* object self_732759, object result_73279_73916 */
 {
 object result_73279_73916 = args[0];
  
closureN_type c_734643;
object e_734670 [3];
c_734643.hdr.mark = gc_color_red;
 c_734643.hdr.grayed = 0;
c_734643.tag = closureN_tag;
 c_734643.fn = (function_type)__lambda_779;
c_734643.num_args = 1;
c_734643.num_elements = 3;
c_734643.elements = (object *)e_734670;
c_734643.elements[0] = ((closureN)self_732759)->elements[0];
c_734643.elements[1] = ((closureN)self_732759)->elements[1];
c_734643.elements[2] = ((closureN)self_732759)->elements[2];


pair_type local_734673; 
return_direct_with_clo1(data,(closure)&c_734643,__lambda_779,  set_cell_as_expr(&local_734673, result_73279_73916));; 
}

static void __lambda_779(void *data, object self_732760, int argc, object *args) /* object self_732760, object result_73279_73916 */
 {
 object result_73279_73916 = args[0];
  
closureN_type c_734645;
object e_734655 [3];
c_734645.hdr.mark = gc_color_red;
 c_734645.hdr.grayed = 0;
c_734645.tag = closureN_tag;
 c_734645.fn = (function_type)__lambda_344;
c_734645.num_args = 1;
c_734645.num_elements = 3;
c_734645.elements = (object *)e_734655;
c_734645.elements[0] = ((closureN)self_732760)->elements[0];
c_734645.elements[1] = result_73279_73916;
c_734645.elements[2] = ((closureN)self_732760)->elements[2];


closureN_type c_734656;
object e_734669 [2];
c_734656.hdr.mark = gc_color_red;
 c_734656.hdr.grayed = 0;
c_734656.tag = closureN_tag;
 c_734656.fn = (function_type)__lambda_346;
c_734656.num_args = 1;
c_734656.num_elements = 2;
c_734656.elements = (object *)e_734669;
c_734656.elements[0] = ((closureN)self_732760)->elements[1];
c_734656.elements[1] = result_73279_73916;

return_direct_with_clo1(data,(closure)&c_734645,__lambda_344,  &c_734656);; 
}

static void __lambda_346(void *data, object self_732761, int argc, object *args) /* object self_732761, object k_731756, object elem_73280_73917 */
 {
 object k_731756 = args[0]; object elem_73280_73917 = args[1];
  
closureN_type c_734659;
object e_734665 [2];
c_734659.hdr.mark = gc_color_red;
 c_734659.hdr.grayed = 0;
c_734659.tag = closureN_tag;
 c_734659.fn = (function_type)__lambda_347;
c_734659.num_args = 1;
c_734659.num_elements = 2;
c_734659.elements = (object *)e_734665;
c_734659.elements[0] = k_731756;
c_734659.elements[1] = ((closureN)self_732761)->elements[1];



return_closcall3(data,  ((closureN)self_732761)->elements[0],  &c_734659, elem_73280_73917, car(((closureN)self_732761)->elements[1]));; 
}

static void __lambda_347(void *data, object self_732762, int argc, object *args) /* object self_732762, object r_731757 */
 {
 object r_731757 = args[0];
  

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

static void __lambda_344(void *data, object self_732763, int argc, object *args) /* object self_732763, object r_731755 */
 {
 object r_731755 = args[0];
  
closureN_type c_734647;
object e_734653 [2];
c_734647.hdr.mark = gc_color_red;
 c_734647.hdr.grayed = 0;
c_734647.tag = closureN_tag;
 c_734647.fn = (function_type)__lambda_345;
c_734647.num_args = 1;
c_734647.num_elements = 2;
c_734647.elements = (object *)e_734653;
c_734647.elements[0] = ((closureN)self_732763)->elements[0];
c_734647.elements[1] = ((closureN)self_732763)->elements[1];

return_direct_with_clo3(data,  __glo_sob_91for_91each_srfi_113, (((closure)  __glo_sob_91for_91each_srfi_113)->fn),  &c_734647, r_731755, ((closureN)self_732763)->elements[2]);; 
}

static void __lambda_345(void *data, object self_732764, int argc, object *args) /* object self_732764, object r_731754 */
 {

  

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

static void __lambda_340(void *data, object _, int argc, object *args) /* closure _,object k_731749, object comparator_73273_73910, object proc_73274_73911, object bag_73275_73912 */
 {
object k_731749 = args[0]; object comparator_73273_73910 = args[1]; object proc_73274_73911 = args[2]; object bag_73275_73912 = args[3];
  Cyc_st_add(data, "srfi/113.sld:bag-map");

closureN_type c_734632;
object e_734638 [4];
c_734632.hdr.mark = gc_color_red;
 c_734632.hdr.grayed = 0;
c_734632.tag = closureN_tag;
 c_734632.fn = (function_type)__lambda_341;
c_734632.num_args = 1;
c_734632.num_elements = 4;
c_734632.elements = (object *)e_734638;
c_734632.elements[0] = bag_73275_73912;
c_734632.elements[1] = comparator_73273_73910;
c_734632.elements[2] = k_731749;
c_734632.elements[3] = proc_73274_73911;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734632, bag_73275_73912);; 
}

static void __lambda_341(void *data, object self_732758, int argc, object *args) /* object self_732758, object r_731750 */
 {

  return_direct_with_clo4(data,  __glo_sob_91map_srfi_113, (((closure)  __glo_sob_91map_srfi_113)->fn),  ((closureN)self_732758)->elements[2], ((closureN)self_732758)->elements[1], ((closureN)self_732758)->elements[3], ((closureN)self_732758)->elements[0]);; 
}

static void __lambda_338(void *data, object _, int argc, object *args) /* closure _,object k_731745, object comparator_73270_73907, object proc_73271_73908, object set_73272_73909 */
 {
object k_731745 = args[0]; object comparator_73270_73907 = args[1]; object proc_73271_73908 = args[2]; object set_73272_73909 = args[3];
  Cyc_st_add(data, "srfi/113.sld:set-map");

closureN_type c_734623;
object e_734629 [4];
c_734623.hdr.mark = gc_color_red;
 c_734623.hdr.grayed = 0;
c_734623.tag = closureN_tag;
 c_734623.fn = (function_type)__lambda_339;
c_734623.num_args = 1;
c_734623.num_elements = 4;
c_734623.elements = (object *)e_734629;
c_734623.elements[0] = comparator_73270_73907;
c_734623.elements[1] = k_731745;
c_734623.elements[2] = proc_73271_73908;
c_734623.elements[3] = set_73272_73909;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734623, set_73272_73909);; 
}

static void __lambda_339(void *data, object self_732757, int argc, object *args) /* object self_732757, object r_731746 */
 {

  return_direct_with_clo4(data,  __glo_sob_91map_srfi_113, (((closure)  __glo_sob_91map_srfi_113)->fn),  ((closureN)self_732757)->elements[1], ((closureN)self_732757)->elements[0], ((closureN)self_732757)->elements[2], ((closureN)self_732757)->elements[3]);; 
}

static void __lambda_330(void *data, object _, int argc, object *args) /* closure _,object k_731735, object comparator_73264_73901, object proc_73265_73902, object sob_73266_73903 */
 {
object k_731735 = args[0]; object comparator_73264_73901 = args[1]; object proc_73265_73902 = args[2]; object sob_73266_73903 = args[3];
  Cyc_st_add(data, "srfi/113.sld:sob-map");

closureN_type c_734591;
object e_734620 [4];
c_734591.hdr.mark = gc_color_red;
 c_734591.hdr.grayed = 0;
c_734591.tag = closureN_tag;
 c_734591.fn = (function_type)__lambda_331;
c_734591.num_args = 1;
c_734591.num_elements = 4;
c_734591.elements = (object *)e_734620;
c_734591.elements[0] = comparator_73264_73901;
c_734591.elements[1] = k_731735;
c_734591.elements[2] = proc_73265_73902;
c_734591.elements[3] = sob_73266_73903;

return_direct_with_clo2(data,  __glo_sob_91multi_127_srfi_113, (((closure)  __glo_sob_91multi_127_srfi_113)->fn),  &c_734591, sob_73266_73903);; 
}

static void __lambda_331(void *data, object self_732750, int argc, object *args) /* object self_732750, object r_731742 */
 {
 object r_731742 = args[0];
  
closureN_type c_734593;
object e_734618 [3];
c_734593.hdr.mark = gc_color_red;
 c_734593.hdr.grayed = 0;
c_734593.tag = closureN_tag;
 c_734593.fn = (function_type)__lambda_332;
c_734593.num_args = 1;
c_734593.num_elements = 3;
c_734593.elements = (object *)e_734618;
c_734593.elements[0] = ((closureN)self_732750)->elements[1];
c_734593.elements[1] = ((closureN)self_732750)->elements[2];
c_734593.elements[2] = ((closureN)self_732750)->elements[3];

return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  &c_734593, ((closureN)self_732750)->elements[0], r_731742);; 
}

static void __lambda_332(void *data, object self_732751, int argc, object *args) /* object self_732751, object result_73267_73904 */
 {
 object result_73267_73904 = args[0];
  
closureN_type c_734595;
object e_734607 [3];
c_734595.hdr.mark = gc_color_red;
 c_734595.hdr.grayed = 0;
c_734595.tag = closureN_tag;
 c_734595.fn = (function_type)__lambda_333;
c_734595.num_args = 1;
c_734595.num_elements = 3;
c_734595.elements = (object *)e_734607;
c_734595.elements[0] = ((closureN)self_732751)->elements[0];
c_734595.elements[1] = result_73267_73904;
c_734595.elements[2] = ((closureN)self_732751)->elements[2];


closureN_type c_734608;
object e_734617 [2];
c_734608.hdr.mark = gc_color_red;
 c_734608.hdr.grayed = 0;
c_734608.tag = closureN_tag;
 c_734608.fn = (function_type)__lambda_336;
c_734608.num_args = 2;
c_734608.num_elements = 2;
c_734608.elements = (object *)e_734617;
c_734608.elements[0] = ((closureN)self_732751)->elements[1];
c_734608.elements[1] = result_73267_73904;

return_direct_with_clo1(data,(closure)&c_734595,__lambda_333,  &c_734608);; 
}

static void __lambda_336(void *data, object self_732752, int argc, object *args) /* object self_732752, object k_731740, object key_73268_73905, object value_73269_73906 */
 {
 object k_731740 = args[0]; object key_73268_73905 = args[1]; object value_73269_73906 = args[2];
  
closureN_type c_734611;
object e_734616 [3];
c_734611.hdr.mark = gc_color_red;
 c_734611.hdr.grayed = 0;
c_734611.tag = closureN_tag;
 c_734611.fn = (function_type)__lambda_337;
c_734611.num_args = 1;
c_734611.num_elements = 3;
c_734611.elements = (object *)e_734616;
c_734611.elements[0] = k_731740;
c_734611.elements[1] = ((closureN)self_732752)->elements[1];
c_734611.elements[2] = value_73269_73906;

return_closcall2(data,  ((closureN)self_732752)->elements[0],  &c_734611, key_73268_73905);; 
}

static void __lambda_337(void *data, object self_732753, int argc, object *args) /* object self_732753, object r_731741 */
 {
 object r_731741 = args[0];
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  ((closureN)self_732753)->elements[0], ((closureN)self_732753)->elements[1], r_731741, ((closureN)self_732753)->elements[2]);; 
}

static void __lambda_333(void *data, object self_732754, int argc, object *args) /* object self_732754, object r_731738 */
 {
 object r_731738 = args[0];
  
closureN_type c_734597;
object e_734605 [3];
c_734597.hdr.mark = gc_color_red;
 c_734597.hdr.grayed = 0;
c_734597.tag = closureN_tag;
 c_734597.fn = (function_type)__lambda_334;
c_734597.num_args = 1;
c_734597.num_elements = 3;
c_734597.elements = (object *)e_734605;
c_734597.elements[0] = ((closureN)self_732754)->elements[0];
c_734597.elements[1] = r_731738;
c_734597.elements[2] = ((closureN)self_732754)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734597, ((closureN)self_732754)->elements[2]);; 
}

static void __lambda_334(void *data, object self_732755, int argc, object *args) /* object self_732755, object r_731739 */
 {
 object r_731739 = args[0];
  
closureN_type c_734599;
object e_734603 [2];
c_734599.hdr.mark = gc_color_red;
 c_734599.hdr.grayed = 0;
c_734599.tag = closureN_tag;
 c_734599.fn = (function_type)__lambda_335;
c_734599.num_args = 1;
c_734599.num_elements = 2;
c_734599.elements = (object *)e_734603;
c_734599.elements[0] = ((closureN)self_732755)->elements[0];
c_734599.elements[1] = ((closureN)self_732755)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734599, r_731739, ((closureN)self_732755)->elements[1]);; 
}

static void __lambda_335(void *data, object self_732756, int argc, object *args) /* object self_732756, object r_731737_732460 */
 {

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

static void __lambda_328(void *data, object _, int argc, object *args) /* closure _,object k_731731, object proc_73262_73899, object bag_73263_73900 */
 {
object k_731731 = args[0]; object proc_73262_73899 = args[1]; object bag_73263_73900 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-for-each");

closureN_type c_734583;
object e_734588 [3];
c_734583.hdr.mark = gc_color_red;
 c_734583.hdr.grayed = 0;
c_734583.tag = closureN_tag;
 c_734583.fn = (function_type)__lambda_329;
c_734583.num_args = 1;
c_734583.num_elements = 3;
c_734583.elements = (object *)e_734588;
c_734583.elements[0] = bag_73263_73900;
c_734583.elements[1] = k_731731;
c_734583.elements[2] = proc_73262_73899;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734583, bag_73263_73900);; 
}

static void __lambda_329(void *data, object self_732749, int argc, object *args) /* object self_732749, object r_731732 */
 {

  return_direct_with_clo3(data,  __glo_sob_91for_91each_srfi_113, (((closure)  __glo_sob_91for_91each_srfi_113)->fn),  ((closureN)self_732749)->elements[1], ((closureN)self_732749)->elements[2], ((closureN)self_732749)->elements[0]);; 
}

static void __lambda_326(void *data, object _, int argc, object *args) /* closure _,object k_731727, object proc_73260_73897, object set_73261_73898 */
 {
object k_731727 = args[0]; object proc_73260_73897 = args[1]; object set_73261_73898 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-for-each");

closureN_type c_734575;
object e_734580 [3];
c_734575.hdr.mark = gc_color_red;
 c_734575.hdr.grayed = 0;
c_734575.tag = closureN_tag;
 c_734575.fn = (function_type)__lambda_327;
c_734575.num_args = 1;
c_734575.num_elements = 3;
c_734575.elements = (object *)e_734580;
c_734575.elements[0] = k_731727;
c_734575.elements[1] = proc_73260_73897;
c_734575.elements[2] = set_73261_73898;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734575, set_73261_73898);; 
}

static void __lambda_327(void *data, object self_732748, int argc, object *args) /* object self_732748, object r_731728 */
 {

  return_direct_with_clo3(data,  __glo_sob_91for_91each_srfi_113, (((closure)  __glo_sob_91for_91each_srfi_113)->fn),  ((closureN)self_732748)->elements[0], ((closureN)self_732748)->elements[1], ((closureN)self_732748)->elements[2]);; 
}

static void __lambda_320(void *data, object _, int argc, object *args) /* closure _,object k_731719, object proc_73256_73893, object sob_73257_73894 */
 {
object k_731719 = args[0]; object proc_73256_73893 = args[1]; object sob_73257_73894 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-for-each");

closureN_type c_734551;
object e_734559 [2];
c_734551.hdr.mark = gc_color_red;
 c_734551.hdr.grayed = 0;
c_734551.tag = closureN_tag;
 c_734551.fn = (function_type)__lambda_321;
c_734551.num_args = 1;
c_734551.num_elements = 2;
c_734551.elements = (object *)e_734559;
c_734551.elements[0] = k_731719;
c_734551.elements[1] = sob_73257_73894;


closureN_type c_734560;
object e_734572 [1];
c_734560.hdr.mark = gc_color_red;
 c_734560.hdr.grayed = 0;
c_734560.tag = closureN_tag;
 c_734560.fn = (function_type)__lambda_323;
c_734560.num_args = 2;
c_734560.num_elements = 1;
c_734560.elements = (object *)e_734572;
c_734560.elements[0] = proc_73256_73893;

return_direct_with_clo1(data,(closure)&c_734551,__lambda_321,  &c_734560);; 
}

static void __lambda_323(void *data, object self_732743, int argc, object *args) /* object self_732743, object k_731722, object key_73258_73895, object value_73259_73896 */
 {
 object k_731722 = args[0]; object key_73258_73895 = args[1]; object value_73259_73896 = args[2];
  
closureN_type c_734562;
object e_734566 [2];
c_734562.hdr.mark = gc_color_red;
 c_734562.hdr.grayed = 0;
c_734562.tag = closureN_tag;
 c_734562.fn = (function_type)__lambda_324;
c_734562.num_args = 1;
c_734562.num_elements = 2;
c_734562.elements = (object *)e_734566;
c_734562.elements[0] = k_731722;
c_734562.elements[1] = value_73259_73896;


closureN_type c_734567;
object e_734571 [2];
c_734567.hdr.mark = gc_color_red;
 c_734567.hdr.grayed = 0;
c_734567.tag = closureN_tag;
 c_734567.fn = (function_type)__lambda_325;
c_734567.num_args = 0;
c_734567.num_elements = 2;
c_734567.elements = (object *)e_734571;
c_734567.elements[0] = key_73258_73895;
c_734567.elements[1] = ((closureN)self_732743)->elements[0];

return_direct_with_clo1(data,(closure)&c_734562,__lambda_324,  &c_734567);; 
}

static void __lambda_325(void *data, object self_732744, int argc, object *args) /* object self_732744, object k_731724 */
 {
 object k_731724 = args[0];
  return_closcall2(data,  ((closureN)self_732744)->elements[1],  k_731724, ((closureN)self_732744)->elements[0]);; 
}

static void __lambda_324(void *data, object self_732745, int argc, object *args) /* object self_732745, object r_731723 */
 {
 object r_731723 = args[0];
  return_direct_with_clo3(data,  __glo_do_91n_91times_srfi_113, (((closure)  __glo_do_91n_91times_srfi_113)->fn),  ((closureN)self_732745)->elements[0], r_731723, ((closureN)self_732745)->elements[1]);; 
}

static void __lambda_321(void *data, object self_732746, int argc, object *args) /* object self_732746, object r_731720 */
 {
 object r_731720 = args[0];
  
closureN_type c_734553;
object e_734557 [2];
c_734553.hdr.mark = gc_color_red;
 c_734553.hdr.grayed = 0;
c_734553.tag = closureN_tag;
 c_734553.fn = (function_type)__lambda_322;
c_734553.num_args = 1;
c_734553.num_elements = 2;
c_734553.elements = (object *)e_734557;
c_734553.elements[0] = ((closureN)self_732746)->elements[0];
c_734553.elements[1] = r_731720;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734553, ((closureN)self_732746)->elements[1]);; 
}

static void __lambda_322(void *data, object self_732747, int argc, object *args) /* object self_732747, object r_731721 */
 {
 object r_731721 = args[0];
  return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  ((closureN)self_732747)->elements[0], r_731721, ((closureN)self_732747)->elements[1]);; 
}

static void __lambda_313(void *data, object _, int argc, object *args) /* closure _,object k_731710, object cmd_73250_73888, object n_73251_73889 */
 {
object k_731710 = args[0]; object cmd_73250_73888 = args[1]; object n_73251_73889 = args[2];
  Cyc_st_add(data, "srfi/113.sld:do-n-times");

closureN_type c_734505;
object e_734548 [2];
c_734505.hdr.mark = gc_color_red;
 c_734505.hdr.grayed = 0;
c_734505.tag = closureN_tag;
 c_734505.fn = (function_type)__lambda_314;
c_734505.num_args = 1;
c_734505.num_elements = 2;
c_734505.elements = (object *)e_734548;
c_734505.elements[0] = cmd_73250_73888;
c_734505.elements[1] = k_731710;

return_direct_with_clo1(data,(closure)&c_734505,__lambda_314,  n_73251_73889);; 
}

static void __lambda_314(void *data, object self_732736, int argc, object *args) /* object self_732736, object n_73253_73890 */
 {
 object n_73253_73890 = args[0];
  
closureN_type c_734507;
object e_734547 [3];
c_734507.hdr.mark = gc_color_red;
 c_734507.hdr.grayed = 0;
c_734507.tag = closureN_tag;
 c_734507.fn = (function_type)__lambda_315;
c_734507.num_args = 1;
c_734507.num_elements = 3;
c_734507.elements = (object *)e_734547;
c_734507.elements[0] = ((closureN)self_732736)->elements[0];
c_734507.elements[1] = ((closureN)self_732736)->elements[1];
c_734507.elements[2] = n_73253_73890;

return_direct_with_clo1(data,(closure)&c_734507,__lambda_315,  boolean_f);; 
}

static void __lambda_315(void *data, object self_732737, int argc, object *args) /* object self_732737, object loop_73254_73891 */
 {
 object loop_73254_73891 = args[0];
  
closureN_type c_734509;
object e_734543 [3];
c_734509.hdr.mark = gc_color_red;
 c_734509.hdr.grayed = 0;
c_734509.tag = closureN_tag;
 c_734509.fn = (function_type)__lambda_778;
c_734509.num_args = 1;
c_734509.num_elements = 3;
c_734509.elements = (object *)e_734543;
c_734509.elements[0] = ((closureN)self_732737)->elements[0];
c_734509.elements[1] = ((closureN)self_732737)->elements[1];
c_734509.elements[2] = ((closureN)self_732737)->elements[2];


pair_type local_734546; 
return_direct_with_clo1(data,(closure)&c_734509,__lambda_778,  set_cell_as_expr(&local_734546, loop_73254_73891));; 
}

static void __lambda_778(void *data, object self_732738, int argc, object *args) /* object self_732738, object loop_73254_73891 */
 {
 object loop_73254_73891 = args[0];
  
closureN_type c_734511;
object e_734524 [3];
c_734511.hdr.mark = gc_color_red;
 c_734511.hdr.grayed = 0;
c_734511.tag = closureN_tag;
 c_734511.fn = (function_type)__lambda_316;
c_734511.num_args = 1;
c_734511.num_elements = 3;
c_734511.elements = (object *)e_734524;
c_734511.elements[0] = ((closureN)self_732738)->elements[1];
c_734511.elements[1] = loop_73254_73891;
c_734511.elements[2] = ((closureN)self_732738)->elements[2];


closureN_type c_734525;
object e_734542 [2];
c_734525.hdr.mark = gc_color_red;
 c_734525.hdr.grayed = 0;
c_734525.tag = closureN_tag;
 c_734525.fn = (function_type)__lambda_318;
c_734525.num_args = 1;
c_734525.num_elements = 2;
c_734525.elements = (object *)e_734542;
c_734525.elements[0] = ((closureN)self_732738)->elements[0];
c_734525.elements[1] = loop_73254_73891;

return_direct_with_clo1(data,(closure)&c_734511,__lambda_316,  &c_734525);; 
}

static void __lambda_318(void *data, object self_732739, int argc, object *args) /* object self_732739, object k_731713, object n_73255_73892 */
 {
 object k_731713 = args[0]; object n_73255_73892 = args[1];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, n_73255_73892, obj_int2obj(0))) ){ 
  
closureN_type c_734530;
object e_734540 [3];
c_734530.hdr.mark = gc_color_red;
 c_734530.hdr.grayed = 0;
c_734530.tag = closureN_tag;
 c_734530.fn = (function_type)__lambda_319;
c_734530.num_args = 1;
c_734530.num_elements = 3;
c_734530.elements = (object *)e_734540;
c_734530.elements[0] = k_731713;
c_734530.elements[1] = ((closureN)self_732739)->elements[1];
c_734530.elements[2] = n_73255_73892;

return_closcall1(data,  ((closureN)self_732739)->elements[0],  &c_734530);
} else { 
  return_direct_with_clo1(data,  k_731713, (((closure)  k_731713)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_319(void *data, object self_732740, int argc, object *args) /* object self_732740, object r_731715 */
 {

  


complex_num_type local_734538; 
return_closcall2(data,  car(((closureN)self_732740)->elements[1]),  ((closureN)self_732740)->elements[0], Cyc_fast_sub(data,&local_734538, ((closureN)self_732740)->elements[2], obj_int2obj(1)));; 
}

static void __lambda_316(void *data, object self_732741, int argc, object *args) /* object self_732741, object r_731712 */
 {
 object r_731712 = args[0];
  
closureN_type c_734513;
object e_734520 [3];
c_734513.hdr.mark = gc_color_red;
 c_734513.hdr.grayed = 0;
c_734513.tag = closureN_tag;
 c_734513.fn = (function_type)__lambda_317;
c_734513.num_args = 1;
c_734513.num_elements = 3;
c_734513.elements = (object *)e_734520;
c_734513.elements[0] = ((closureN)self_732741)->elements[0];
c_734513.elements[1] = ((closureN)self_732741)->elements[1];
c_734513.elements[2] = ((closureN)self_732741)->elements[2];



return_direct_with_clo1(data,(closure)&c_734513,__lambda_317,  Cyc_set_cell(data, ((closureN)self_732741)->elements[1], r_731712));; 
}

static void __lambda_317(void *data, object self_732742, int argc, object *args) /* object self_732742, object r_731711 */
 {

  

return_closcall2(data,  car(((closureN)self_732742)->elements[1]),  ((closureN)self_732742)->elements[0], ((closureN)self_732742)->elements[2]);; 
}

static void __lambda_311(void *data, object _, int argc, object *args) /* closure _,object k_731706, object pred_73248_73886, object bag_73249_73887 */
 {
object k_731706 = args[0]; object pred_73248_73886 = args[1]; object bag_73249_73887 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-every?");

closureN_type c_734497;
object e_734502 [3];
c_734497.hdr.mark = gc_color_red;
 c_734497.hdr.grayed = 0;
c_734497.tag = closureN_tag;
 c_734497.fn = (function_type)__lambda_312;
c_734497.num_args = 1;
c_734497.num_elements = 3;
c_734497.elements = (object *)e_734502;
c_734497.elements[0] = bag_73249_73887;
c_734497.elements[1] = k_731706;
c_734497.elements[2] = pred_73248_73886;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734497, bag_73249_73887);; 
}

static void __lambda_312(void *data, object self_732735, int argc, object *args) /* object self_732735, object r_731707 */
 {

  return_direct_with_clo3(data,  __glo_sob_91every_127_srfi_113, (((closure)  __glo_sob_91every_127_srfi_113)->fn),  ((closureN)self_732735)->elements[1], ((closureN)self_732735)->elements[2], ((closureN)self_732735)->elements[0]);; 
}

static void __lambda_309(void *data, object _, int argc, object *args) /* closure _,object k_731702, object pred_73246_73884, object set_73247_73885 */
 {
object k_731702 = args[0]; object pred_73246_73884 = args[1]; object set_73247_73885 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-every?");

closureN_type c_734489;
object e_734494 [3];
c_734489.hdr.mark = gc_color_red;
 c_734489.hdr.grayed = 0;
c_734489.tag = closureN_tag;
 c_734489.fn = (function_type)__lambda_310;
c_734489.num_args = 1;
c_734489.num_elements = 3;
c_734489.elements = (object *)e_734494;
c_734489.elements[0] = k_731702;
c_734489.elements[1] = pred_73246_73884;
c_734489.elements[2] = set_73247_73885;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734489, set_73247_73885);; 
}

static void __lambda_310(void *data, object self_732734, int argc, object *args) /* object self_732734, object r_731703 */
 {

  return_direct_with_clo3(data,  __glo_sob_91every_127_srfi_113, (((closure)  __glo_sob_91every_127_srfi_113)->fn),  ((closureN)self_732734)->elements[0], ((closureN)self_732734)->elements[1], ((closureN)self_732734)->elements[2]);; 
}

static void __lambda_301(void *data, object _, int argc, object *args) /* closure _,object k_731692, object pred_73241_73879, object sob_73242_73880 */
 {
object k_731692 = args[0]; object pred_73241_73879 = args[1]; object sob_73242_73880 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-every?");

closureN_type c_734457;
object e_734460 [1];
c_734457.hdr.mark = gc_color_red;
 c_734457.hdr.grayed = 0;
c_734457.tag = closureN_tag;
 c_734457.fn = (function_type)__lambda_302;
c_734457.num_args = 1;
c_734457.num_elements = 1;
c_734457.elements = (object *)e_734460;
c_734457.elements[0] = k_731692;


closureN_type c_734461;
object e_734486 [2];
c_734461.hdr.mark = gc_color_red;
 c_734461.hdr.grayed = 0;
c_734461.tag = closureN_tag;
 c_734461.fn = (function_type)__lambda_303;
c_734461.num_args = 1;
c_734461.num_elements = 2;
c_734461.elements = (object *)e_734486;
c_734461.elements[0] = pred_73241_73879;
c_734461.elements[1] = sob_73242_73880;

return_direct_with_clo1(data,(closure)&c_734457,__lambda_302,  &c_734461);; 
}

static void __lambda_303(void *data, object self_732727, int argc, object *args) /* object self_732727, object k_731694, object return_73243_73881 */
 {
 object k_731694 = args[0]; object return_73243_73881 = args[1];
  
closureN_type c_734463;
object e_734474 [2];
c_734463.hdr.mark = gc_color_red;
 c_734463.hdr.grayed = 0;
c_734463.tag = closureN_tag;
 c_734463.fn = (function_type)__lambda_304;
c_734463.num_args = 1;
c_734463.num_elements = 2;
c_734463.elements = (object *)e_734474;
c_734463.elements[0] = k_731694;
c_734463.elements[1] = ((closureN)self_732727)->elements[1];


closureN_type c_734475;
object e_734485 [2];
c_734475.hdr.mark = gc_color_red;
 c_734475.hdr.grayed = 0;
c_734475.tag = closureN_tag;
 c_734475.fn = (function_type)__lambda_307;
c_734475.num_args = 2;
c_734475.num_elements = 2;
c_734475.elements = (object *)e_734485;
c_734475.elements[0] = ((closureN)self_732727)->elements[0];
c_734475.elements[1] = return_73243_73881;

return_direct_with_clo1(data,(closure)&c_734463,__lambda_304,  &c_734475);; 
}

static void __lambda_307(void *data, object self_732728, int argc, object *args) /* object self_732728, object k_731698, object elem_73244_73882, object value_73245_73883 */
 {
 object k_731698 = args[0]; object elem_73244_73882 = args[1];
  
closureN_type c_734478;
object e_734484 [2];
c_734478.hdr.mark = gc_color_red;
 c_734478.hdr.grayed = 0;
c_734478.tag = closureN_tag;
 c_734478.fn = (function_type)__lambda_308;
c_734478.num_args = 1;
c_734478.num_elements = 2;
c_734478.elements = (object *)e_734484;
c_734478.elements[0] = k_731698;
c_734478.elements[1] = ((closureN)self_732728)->elements[1];

return_closcall2(data,  ((closureN)self_732728)->elements[0],  &c_734478, elem_73244_73882);; 
}

static void __lambda_308(void *data, object self_732729, int argc, object *args) /* object self_732729, object r_731699 */
 {
 object r_731699 = args[0];
  if( (boolean_f != r_731699) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732729)->elements[0], (((closure)  ((closureN)self_732729)->elements[0])->fn),  Cyc_VOID);
} else { 
  return_closcall2(data,  ((closureN)self_732729)->elements[1],  ((closureN)self_732729)->elements[0], boolean_f);}
;; 
}

static void __lambda_304(void *data, object self_732730, int argc, object *args) /* object self_732730, object r_731696 */
 {
 object r_731696 = args[0];
  
closureN_type c_734465;
object e_734472 [2];
c_734465.hdr.mark = gc_color_red;
 c_734465.hdr.grayed = 0;
c_734465.tag = closureN_tag;
 c_734465.fn = (function_type)__lambda_305;
c_734465.num_args = 1;
c_734465.num_elements = 2;
c_734465.elements = (object *)e_734472;
c_734465.elements[0] = ((closureN)self_732730)->elements[0];
c_734465.elements[1] = r_731696;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734465, ((closureN)self_732730)->elements[1]);; 
}

static void __lambda_305(void *data, object self_732731, int argc, object *args) /* object self_732731, object r_731697 */
 {
 object r_731697 = args[0];
  
closureN_type c_734467;
object e_734470 [1];
c_734467.hdr.mark = gc_color_red;
 c_734467.hdr.grayed = 0;
c_734467.tag = closureN_tag;
 c_734467.fn = (function_type)__lambda_306;
c_734467.num_args = 1;
c_734467.num_elements = 1;
c_734467.elements = (object *)e_734470;
c_734467.elements[0] = ((closureN)self_732731)->elements[0];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734467, r_731697, ((closureN)self_732731)->elements[1]);; 
}

static void __lambda_306(void *data, object self_732732, int argc, object *args) /* object self_732732, object r_731695_732459 */
 {

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

static void __lambda_302(void *data, object self_732733, int argc, object *args) /* object self_732733, object r_731693 */
 {
 object r_731693 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_732733)->elements[0], r_731693);; 
}

static void __lambda_299(void *data, object _, int argc, object *args) /* closure _,object k_731688, object pred_73239_73877, object bag_73240_73878 */
 {
object k_731688 = args[0]; object pred_73239_73877 = args[1]; object bag_73240_73878 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-any?");

closureN_type c_734449;
object e_734454 [3];
c_734449.hdr.mark = gc_color_red;
 c_734449.hdr.grayed = 0;
c_734449.tag = closureN_tag;
 c_734449.fn = (function_type)__lambda_300;
c_734449.num_args = 1;
c_734449.num_elements = 3;
c_734449.elements = (object *)e_734454;
c_734449.elements[0] = bag_73240_73878;
c_734449.elements[1] = k_731688;
c_734449.elements[2] = pred_73239_73877;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734449, bag_73240_73878);; 
}

static void __lambda_300(void *data, object self_732726, int argc, object *args) /* object self_732726, object r_731689 */
 {

  return_direct_with_clo3(data,  __glo_sob_91any_127_srfi_113, (((closure)  __glo_sob_91any_127_srfi_113)->fn),  ((closureN)self_732726)->elements[1], ((closureN)self_732726)->elements[2], ((closureN)self_732726)->elements[0]);; 
}

static void __lambda_297(void *data, object _, int argc, object *args) /* closure _,object k_731684, object pred_73237_73875, object set_73238_73876 */
 {
object k_731684 = args[0]; object pred_73237_73875 = args[1]; object set_73238_73876 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-any?");

closureN_type c_734441;
object e_734446 [3];
c_734441.hdr.mark = gc_color_red;
 c_734441.hdr.grayed = 0;
c_734441.tag = closureN_tag;
 c_734441.fn = (function_type)__lambda_298;
c_734441.num_args = 1;
c_734441.num_elements = 3;
c_734441.elements = (object *)e_734446;
c_734441.elements[0] = k_731684;
c_734441.elements[1] = pred_73237_73875;
c_734441.elements[2] = set_73238_73876;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734441, set_73238_73876);; 
}

static void __lambda_298(void *data, object self_732725, int argc, object *args) /* object self_732725, object r_731685 */
 {

  return_direct_with_clo3(data,  __glo_sob_91any_127_srfi_113, (((closure)  __glo_sob_91any_127_srfi_113)->fn),  ((closureN)self_732725)->elements[0], ((closureN)self_732725)->elements[1], ((closureN)self_732725)->elements[2]);; 
}

static void __lambda_289(void *data, object _, int argc, object *args) /* closure _,object k_731674, object pred_73232_73870, object sob_73233_73871 */
 {
object k_731674 = args[0]; object pred_73232_73870 = args[1]; object sob_73233_73871 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-any?");

closureN_type c_734409;
object e_734412 [1];
c_734409.hdr.mark = gc_color_red;
 c_734409.hdr.grayed = 0;
c_734409.tag = closureN_tag;
 c_734409.fn = (function_type)__lambda_290;
c_734409.num_args = 1;
c_734409.num_elements = 1;
c_734409.elements = (object *)e_734412;
c_734409.elements[0] = k_731674;


closureN_type c_734413;
object e_734438 [2];
c_734413.hdr.mark = gc_color_red;
 c_734413.hdr.grayed = 0;
c_734413.tag = closureN_tag;
 c_734413.fn = (function_type)__lambda_291;
c_734413.num_args = 1;
c_734413.num_elements = 2;
c_734413.elements = (object *)e_734438;
c_734413.elements[0] = pred_73232_73870;
c_734413.elements[1] = sob_73233_73871;

return_direct_with_clo1(data,(closure)&c_734409,__lambda_290,  &c_734413);; 
}

static void __lambda_291(void *data, object self_732718, int argc, object *args) /* object self_732718, object k_731676, object return_73234_73872 */
 {
 object k_731676 = args[0]; object return_73234_73872 = args[1];
  
closureN_type c_734415;
object e_734426 [2];
c_734415.hdr.mark = gc_color_red;
 c_734415.hdr.grayed = 0;
c_734415.tag = closureN_tag;
 c_734415.fn = (function_type)__lambda_292;
c_734415.num_args = 1;
c_734415.num_elements = 2;
c_734415.elements = (object *)e_734426;
c_734415.elements[0] = k_731676;
c_734415.elements[1] = ((closureN)self_732718)->elements[1];


closureN_type c_734427;
object e_734437 [2];
c_734427.hdr.mark = gc_color_red;
 c_734427.hdr.grayed = 0;
c_734427.tag = closureN_tag;
 c_734427.fn = (function_type)__lambda_295;
c_734427.num_args = 2;
c_734427.num_elements = 2;
c_734427.elements = (object *)e_734437;
c_734427.elements[0] = ((closureN)self_732718)->elements[0];
c_734427.elements[1] = return_73234_73872;

return_direct_with_clo1(data,(closure)&c_734415,__lambda_292,  &c_734427);; 
}

static void __lambda_295(void *data, object self_732719, int argc, object *args) /* object self_732719, object k_731680, object elem_73235_73873, object value_73236_73874 */
 {
 object k_731680 = args[0]; object elem_73235_73873 = args[1];
  
closureN_type c_734430;
object e_734436 [2];
c_734430.hdr.mark = gc_color_red;
 c_734430.hdr.grayed = 0;
c_734430.tag = closureN_tag;
 c_734430.fn = (function_type)__lambda_296;
c_734430.num_args = 1;
c_734430.num_elements = 2;
c_734430.elements = (object *)e_734436;
c_734430.elements[0] = k_731680;
c_734430.elements[1] = ((closureN)self_732719)->elements[1];

return_closcall2(data,  ((closureN)self_732719)->elements[0],  &c_734430, elem_73235_73873);; 
}

static void __lambda_296(void *data, object self_732720, int argc, object *args) /* object self_732720, object r_731681 */
 {
 object r_731681 = args[0];
  if( (boolean_f != r_731681) ){ 
  return_closcall2(data,  ((closureN)self_732720)->elements[1],  ((closureN)self_732720)->elements[0], boolean_t);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732720)->elements[0], (((closure)  ((closureN)self_732720)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_292(void *data, object self_732721, int argc, object *args) /* object self_732721, object r_731678 */
 {
 object r_731678 = args[0];
  
closureN_type c_734417;
object e_734424 [2];
c_734417.hdr.mark = gc_color_red;
 c_734417.hdr.grayed = 0;
c_734417.tag = closureN_tag;
 c_734417.fn = (function_type)__lambda_293;
c_734417.num_args = 1;
c_734417.num_elements = 2;
c_734417.elements = (object *)e_734424;
c_734417.elements[0] = ((closureN)self_732721)->elements[0];
c_734417.elements[1] = r_731678;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734417, ((closureN)self_732721)->elements[1]);; 
}

static void __lambda_293(void *data, object self_732722, int argc, object *args) /* object self_732722, object r_731679 */
 {
 object r_731679 = args[0];
  
closureN_type c_734419;
object e_734422 [1];
c_734419.hdr.mark = gc_color_red;
 c_734419.hdr.grayed = 0;
c_734419.tag = closureN_tag;
 c_734419.fn = (function_type)__lambda_294;
c_734419.num_args = 1;
c_734419.num_elements = 1;
c_734419.elements = (object *)e_734422;
c_734419.elements[0] = ((closureN)self_732722)->elements[0];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734419, r_731679, ((closureN)self_732722)->elements[1]);; 
}

static void __lambda_294(void *data, object self_732723, int argc, object *args) /* object self_732723, object r_731677_732458 */
 {

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

static void __lambda_290(void *data, object self_732724, int argc, object *args) /* object self_732724, object r_731675 */
 {
 object r_731675 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_732724)->elements[0], r_731675);; 
}

static void __lambda_287(void *data, object _, int argc, object *args) /* closure _,object k_731670, object pred_73230_73868, object bag_73231_73869 */
 {
object k_731670 = args[0]; object pred_73230_73868 = args[1]; object bag_73231_73869 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-count");

closureN_type c_734401;
object e_734406 [3];
c_734401.hdr.mark = gc_color_red;
 c_734401.hdr.grayed = 0;
c_734401.tag = closureN_tag;
 c_734401.fn = (function_type)__lambda_288;
c_734401.num_args = 1;
c_734401.num_elements = 3;
c_734401.elements = (object *)e_734406;
c_734401.elements[0] = bag_73231_73869;
c_734401.elements[1] = k_731670;
c_734401.elements[2] = pred_73230_73868;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734401, bag_73231_73869);; 
}

static void __lambda_288(void *data, object self_732717, int argc, object *args) /* object self_732717, object r_731671 */
 {

  return_direct_with_clo3(data,  __glo_sob_91count_srfi_113, (((closure)  __glo_sob_91count_srfi_113)->fn),  ((closureN)self_732717)->elements[1], ((closureN)self_732717)->elements[2], ((closureN)self_732717)->elements[0]);; 
}

static void __lambda_285(void *data, object _, int argc, object *args) /* closure _,object k_731666, object pred_73228_73866, object set_73229_73867 */
 {
object k_731666 = args[0]; object pred_73228_73866 = args[1]; object set_73229_73867 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-count");

closureN_type c_734393;
object e_734398 [3];
c_734393.hdr.mark = gc_color_red;
 c_734393.hdr.grayed = 0;
c_734393.tag = closureN_tag;
 c_734393.fn = (function_type)__lambda_286;
c_734393.num_args = 1;
c_734393.num_elements = 3;
c_734393.elements = (object *)e_734398;
c_734393.elements[0] = k_731666;
c_734393.elements[1] = pred_73228_73866;
c_734393.elements[2] = set_73229_73867;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734393, set_73229_73867);; 
}

static void __lambda_286(void *data, object self_732716, int argc, object *args) /* object self_732716, object r_731667 */
 {

  return_direct_with_clo3(data,  __glo_sob_91count_srfi_113, (((closure)  __glo_sob_91count_srfi_113)->fn),  ((closureN)self_732716)->elements[0], ((closureN)self_732716)->elements[1], ((closureN)self_732716)->elements[2]);; 
}

static void __lambda_281(void *data, object _, int argc, object *args) /* closure _,object k_731660, object pred_73224_73862, object sob_73225_73863 */
 {
object k_731660 = args[0]; object pred_73224_73862 = args[1]; object sob_73225_73863 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-count");

closureN_type c_734371;
object e_734375 [2];
c_734371.hdr.mark = gc_color_red;
 c_734371.hdr.grayed = 0;
c_734371.tag = closureN_tag;
 c_734371.fn = (function_type)__lambda_282;
c_734371.num_args = 1;
c_734371.num_elements = 2;
c_734371.elements = (object *)e_734375;
c_734371.elements[0] = k_731660;
c_734371.elements[1] = sob_73225_73863;


closureN_type c_734376;
object e_734390 [1];
c_734376.hdr.mark = gc_color_red;
 c_734376.hdr.grayed = 0;
c_734376.tag = closureN_tag;
 c_734376.fn = (function_type)__lambda_283;
c_734376.num_args = 2;
c_734376.num_elements = 1;
c_734376.elements = (object *)e_734390;
c_734376.elements[0] = pred_73224_73862;

return_direct_with_clo1(data,(closure)&c_734371,__lambda_282,  &c_734376);; 
}

static void __lambda_283(void *data, object self_732713, int argc, object *args) /* object self_732713, object k_731662, object elem_73226_73864, object total_73227_73865 */
 {
 object k_731662 = args[0]; object elem_73226_73864 = args[1]; object total_73227_73865 = args[2];
  
closureN_type c_734379;
object e_734389 [2];
c_734379.hdr.mark = gc_color_red;
 c_734379.hdr.grayed = 0;
c_734379.tag = closureN_tag;
 c_734379.fn = (function_type)__lambda_284;
c_734379.num_args = 1;
c_734379.num_elements = 2;
c_734379.elements = (object *)e_734389;
c_734379.elements[0] = k_731662;
c_734379.elements[1] = total_73227_73865;

return_closcall2(data,  ((closureN)self_732713)->elements[0],  &c_734379, elem_73226_73864);; 
}

static void __lambda_284(void *data, object self_732714, int argc, object *args) /* object self_732714, object r_731663 */
 {
 object r_731663 = args[0];
  if( (boolean_f != r_731663) ){ 
  
complex_num_type local_734384; 
return_direct_with_clo1(data,  ((closureN)self_732714)->elements[0], (((closure)  ((closureN)self_732714)->elements[0])->fn),  Cyc_fast_sum(data,&local_734384, ((closureN)self_732714)->elements[1], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732714)->elements[0], (((closure)  ((closureN)self_732714)->elements[0])->fn),  ((closureN)self_732714)->elements[1]);}
;; 
}

static void __lambda_282(void *data, object self_732715, int argc, object *args) /* object self_732715, object r_731661 */
 {
 object r_731661 = args[0];
  return_direct_with_clo4(data,  __glo_sob_91fold_srfi_113, (((closure)  __glo_sob_91fold_srfi_113)->fn),  ((closureN)self_732715)->elements[0], r_731661, obj_int2obj(0), ((closureN)self_732715)->elements[1]);; 
}

static void __lambda_279(void *data, object _, int argc, object *args) /* closure _,object k_731656, object pred_73221_73859, object bag_73222_73860, object failure_73223_73861 */
 {
object k_731656 = args[0]; object pred_73221_73859 = args[1]; object bag_73222_73860 = args[2]; object failure_73223_73861 = args[3];
  Cyc_st_add(data, "srfi/113.sld:bag-find");

closureN_type c_734362;
object e_734368 [4];
c_734362.hdr.mark = gc_color_red;
 c_734362.hdr.grayed = 0;
c_734362.tag = closureN_tag;
 c_734362.fn = (function_type)__lambda_280;
c_734362.num_args = 1;
c_734362.num_elements = 4;
c_734362.elements = (object *)e_734368;
c_734362.elements[0] = bag_73222_73860;
c_734362.elements[1] = failure_73223_73861;
c_734362.elements[2] = k_731656;
c_734362.elements[3] = pred_73221_73859;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734362, bag_73222_73860);; 
}

static void __lambda_280(void *data, object self_732712, int argc, object *args) /* object self_732712, object r_731657 */
 {

  return_direct_with_clo4(data,  __glo_sob_91find_srfi_113, (((closure)  __glo_sob_91find_srfi_113)->fn),  ((closureN)self_732712)->elements[2], ((closureN)self_732712)->elements[3], ((closureN)self_732712)->elements[0], ((closureN)self_732712)->elements[1]);; 
}

static void __lambda_277(void *data, object _, int argc, object *args) /* closure _,object k_731652, object pred_73218_73856, object set_73219_73857, object failure_73220_73858 */
 {
object k_731652 = args[0]; object pred_73218_73856 = args[1]; object set_73219_73857 = args[2]; object failure_73220_73858 = args[3];
  Cyc_st_add(data, "srfi/113.sld:set-find");

closureN_type c_734353;
object e_734359 [4];
c_734353.hdr.mark = gc_color_red;
 c_734353.hdr.grayed = 0;
c_734353.tag = closureN_tag;
 c_734353.fn = (function_type)__lambda_278;
c_734353.num_args = 1;
c_734353.num_elements = 4;
c_734353.elements = (object *)e_734359;
c_734353.elements[0] = failure_73220_73858;
c_734353.elements[1] = k_731652;
c_734353.elements[2] = pred_73218_73856;
c_734353.elements[3] = set_73219_73857;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734353, set_73219_73857);; 
}

static void __lambda_278(void *data, object self_732711, int argc, object *args) /* object self_732711, object r_731653 */
 {

  return_direct_with_clo4(data,  __glo_sob_91find_srfi_113, (((closure)  __glo_sob_91find_srfi_113)->fn),  ((closureN)self_732711)->elements[1], ((closureN)self_732711)->elements[2], ((closureN)self_732711)->elements[3], ((closureN)self_732711)->elements[0]);; 
}

static void __lambda_269(void *data, object _, int argc, object *args) /* closure _,object k_731642, object pred_73212_73850, object sob_73213_73851, object failure_73214_73852 */
 {
object k_731642 = args[0]; object pred_73212_73850 = args[1]; object sob_73213_73851 = args[2]; object failure_73214_73852 = args[3];
  Cyc_st_add(data, "srfi/113.sld:sob-find");

closureN_type c_734319;
object e_734322 [1];
c_734319.hdr.mark = gc_color_red;
 c_734319.hdr.grayed = 0;
c_734319.tag = closureN_tag;
 c_734319.fn = (function_type)__lambda_270;
c_734319.num_args = 1;
c_734319.num_elements = 1;
c_734319.elements = (object *)e_734322;
c_734319.elements[0] = k_731642;


closureN_type c_734323;
object e_734350 [3];
c_734323.hdr.mark = gc_color_red;
 c_734323.hdr.grayed = 0;
c_734323.tag = closureN_tag;
 c_734323.fn = (function_type)__lambda_271;
c_734323.num_args = 1;
c_734323.num_elements = 3;
c_734323.elements = (object *)e_734350;
c_734323.elements[0] = failure_73214_73852;
c_734323.elements[1] = pred_73212_73850;
c_734323.elements[2] = sob_73213_73851;

return_direct_with_clo1(data,(closure)&c_734319,__lambda_270,  &c_734323);; 
}

static void __lambda_271(void *data, object self_732704, int argc, object *args) /* object self_732704, object k_731644, object return_73215_73853 */
 {
 object k_731644 = args[0]; object return_73215_73853 = args[1];
  
closureN_type c_734325;
object e_734337 [3];
c_734325.hdr.mark = gc_color_red;
 c_734325.hdr.grayed = 0;
c_734325.tag = closureN_tag;
 c_734325.fn = (function_type)__lambda_272;
c_734325.num_args = 1;
c_734325.num_elements = 3;
c_734325.elements = (object *)e_734337;
c_734325.elements[0] = ((closureN)self_732704)->elements[0];
c_734325.elements[1] = k_731644;
c_734325.elements[2] = ((closureN)self_732704)->elements[2];


closureN_type c_734338;
object e_734349 [2];
c_734338.hdr.mark = gc_color_red;
 c_734338.hdr.grayed = 0;
c_734338.tag = closureN_tag;
 c_734338.fn = (function_type)__lambda_275;
c_734338.num_args = 2;
c_734338.num_elements = 2;
c_734338.elements = (object *)e_734349;
c_734338.elements[0] = ((closureN)self_732704)->elements[1];
c_734338.elements[1] = return_73215_73853;

return_direct_with_clo1(data,(closure)&c_734325,__lambda_272,  &c_734338);; 
}

static void __lambda_275(void *data, object self_732705, int argc, object *args) /* object self_732705, object k_731648, object key_73216_73854, object value_73217_73855 */
 {
 object k_731648 = args[0]; object key_73216_73854 = args[1];
  
closureN_type c_734341;
object e_734348 [3];
c_734341.hdr.mark = gc_color_red;
 c_734341.hdr.grayed = 0;
c_734341.tag = closureN_tag;
 c_734341.fn = (function_type)__lambda_276;
c_734341.num_args = 1;
c_734341.num_elements = 3;
c_734341.elements = (object *)e_734348;
c_734341.elements[0] = k_731648;
c_734341.elements[1] = key_73216_73854;
c_734341.elements[2] = ((closureN)self_732705)->elements[1];

return_closcall2(data,  ((closureN)self_732705)->elements[0],  &c_734341, key_73216_73854);; 
}

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

static void __lambda_272(void *data, object self_732707, int argc, object *args) /* object self_732707, object r_731646 */
 {
 object r_731646 = args[0];
  
closureN_type c_734327;
object e_734335 [3];
c_734327.hdr.mark = gc_color_red;
 c_734327.hdr.grayed = 0;
c_734327.tag = closureN_tag;
 c_734327.fn = (function_type)__lambda_273;
c_734327.num_args = 1;
c_734327.num_elements = 3;
c_734327.elements = (object *)e_734335;
c_734327.elements[0] = ((closureN)self_732707)->elements[0];
c_734327.elements[1] = ((closureN)self_732707)->elements[1];
c_734327.elements[2] = r_731646;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734327, ((closureN)self_732707)->elements[2]);; 
}

static void __lambda_273(void *data, object self_732708, int argc, object *args) /* object self_732708, object r_731647 */
 {
 object r_731647 = args[0];
  
closureN_type c_734329;
object e_734333 [2];
c_734329.hdr.mark = gc_color_red;
 c_734329.hdr.grayed = 0;
c_734329.tag = closureN_tag;
 c_734329.fn = (function_type)__lambda_274;
c_734329.num_args = 1;
c_734329.num_elements = 2;
c_734329.elements = (object *)e_734333;
c_734329.elements[0] = ((closureN)self_732708)->elements[0];
c_734329.elements[1] = ((closureN)self_732708)->elements[1];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734329, r_731647, ((closureN)self_732708)->elements[2]);; 
}

static void __lambda_274(void *data, object self_732709, int argc, object *args) /* object self_732709, object r_731645_732457 */
 {

  return_closcall1(data,  ((closureN)self_732709)->elements[0],  ((closureN)self_732709)->elements[1]);; 
}

static void __lambda_270(void *data, object self_732710, int argc, object *args) /* object self_732710, object r_731643 */
 {
 object r_731643 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_732710)->elements[0], r_731643);; 
}

static void __lambda_267(void *data, object _, int argc, object *args) /* closure _,object k_731638, object bag_73211_73849 */
 {
object k_731638 = args[0]; object bag_73211_73849 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag-size");

closureN_type c_734312;
object e_734316 [2];
c_734312.hdr.mark = gc_color_red;
 c_734312.hdr.grayed = 0;
c_734312.tag = closureN_tag;
 c_734312.fn = (function_type)__lambda_268;
c_734312.num_args = 1;
c_734312.num_elements = 2;
c_734312.elements = (object *)e_734316;
c_734312.elements[0] = bag_73211_73849;
c_734312.elements[1] = k_731638;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734312, bag_73211_73849);; 
}

static void __lambda_268(void *data, object self_732703, int argc, object *args) /* object self_732703, object r_731639 */
 {

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

static void __lambda_265(void *data, object _, int argc, object *args) /* closure _,object k_731634, object set_73210_73848 */
 {
object k_731634 = args[0]; object set_73210_73848 = args[1];
  Cyc_st_add(data, "srfi/113.sld:set-size");

closureN_type c_734305;
object e_734309 [2];
c_734305.hdr.mark = gc_color_red;
 c_734305.hdr.grayed = 0;
c_734305.tag = closureN_tag;
 c_734305.fn = (function_type)__lambda_266;
c_734305.num_args = 1;
c_734305.num_elements = 2;
c_734305.elements = (object *)e_734309;
c_734305.elements[0] = k_731634;
c_734305.elements[1] = set_73210_73848;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734305, set_73210_73848);; 
}

static void __lambda_266(void *data, object self_732702, int argc, object *args) /* object self_732702, object r_731635 */
 {

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

static void __lambda_256(void *data, object _, int argc, object *args) /* closure _,object k_731624, object sob_73206_73844 */
 {
object k_731624 = args[0]; object sob_73206_73844 = args[1];
  Cyc_st_add(data, "srfi/113.sld:sob-size");

closureN_type c_734254;
object e_734302 [2];
c_734254.hdr.mark = gc_color_red;
 c_734254.hdr.grayed = 0;
c_734254.tag = closureN_tag;
 c_734254.fn = (function_type)__lambda_257;
c_734254.num_args = 1;
c_734254.num_elements = 2;
c_734254.elements = (object *)e_734302;
c_734254.elements[0] = k_731624;
c_734254.elements[1] = sob_73206_73844;

return_direct_with_clo2(data,  __glo_sob_91multi_127_srfi_113, (((closure)  __glo_sob_91multi_127_srfi_113)->fn),  &c_734254, sob_73206_73844);; 
}

static void __lambda_257(void *data, object self_732693, int argc, object *args) /* object self_732693, object r_731625 */
 {
 object r_731625 = args[0];
  if( (boolean_f != r_731625) ){ 
  
closureN_type c_734256;
object e_734295 [2];
c_734256.hdr.mark = gc_color_red;
 c_734256.hdr.grayed = 0;
c_734256.tag = closureN_tag;
 c_734256.fn = (function_type)__lambda_258;
c_734256.num_args = 1;
c_734256.num_elements = 2;
c_734256.elements = (object *)e_734295;
c_734256.elements[0] = ((closureN)self_732693)->elements[0];
c_734256.elements[1] = ((closureN)self_732693)->elements[1];

return_direct_with_clo1(data,(closure)&c_734256,__lambda_258,  obj_int2obj(0));
} else { 
  
closureN_type c_734297;
object e_734300 [1];
c_734297.hdr.mark = gc_color_red;
 c_734297.hdr.grayed = 0;
c_734297.tag = closureN_tag;
 c_734297.fn = (function_type)__lambda_264;
c_734297.num_args = 1;
c_734297.num_elements = 1;
c_734297.elements = (object *)e_734300;
c_734297.elements[0] = ((closureN)self_732693)->elements[0];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734297, ((closureN)self_732693)->elements[1]);}
;; 
}

static void __lambda_264(void *data, object self_732701, int argc, object *args) /* object self_732701, object r_731631 */
 {
 object r_731631 = args[0];
  return_direct_with_clo2(data,  __glo_hash_91table_91size_srfi_69, (((closure)  __glo_hash_91table_91size_srfi_69)->fn),  ((closureN)self_732701)->elements[0], r_731631);; 
}

static void __lambda_258(void *data, object self_732694, int argc, object *args) /* object self_732694, object result_73207_73845 */
 {
 object result_73207_73845 = args[0];
  
closureN_type c_734258;
object e_734291 [2];
c_734258.hdr.mark = gc_color_red;
 c_734258.hdr.grayed = 0;
c_734258.tag = closureN_tag;
 c_734258.fn = (function_type)__lambda_777;
c_734258.num_args = 1;
c_734258.num_elements = 2;
c_734258.elements = (object *)e_734291;
c_734258.elements[0] = ((closureN)self_732694)->elements[0];
c_734258.elements[1] = ((closureN)self_732694)->elements[1];


pair_type local_734294; 
return_direct_with_clo1(data,(closure)&c_734258,__lambda_777,  set_cell_as_expr(&local_734294, result_73207_73845));; 
}

static void __lambda_777(void *data, object self_732695, int argc, object *args) /* object self_732695, object result_73207_73845 */
 {
 object result_73207_73845 = args[0];
  
closureN_type c_734260;
object e_734274 [3];
c_734260.hdr.mark = gc_color_red;
 c_734260.hdr.grayed = 0;
c_734260.tag = closureN_tag;
 c_734260.fn = (function_type)__lambda_259;
c_734260.num_args = 1;
c_734260.num_elements = 3;
c_734260.elements = (object *)e_734274;
c_734260.elements[0] = ((closureN)self_732695)->elements[0];
c_734260.elements[1] = result_73207_73845;
c_734260.elements[2] = ((closureN)self_732695)->elements[1];


closureN_type c_734275;
object e_734290 [1];
c_734275.hdr.mark = gc_color_red;
 c_734275.hdr.grayed = 0;
c_734275.tag = closureN_tag;
 c_734275.fn = (function_type)__lambda_262;
c_734275.num_args = 2;
c_734275.num_elements = 1;
c_734275.elements = (object *)e_734290;
c_734275.elements[0] = result_73207_73845;

return_direct_with_clo1(data,(closure)&c_734260,__lambda_259,  &c_734275);; 
}

static void __lambda_262(void *data, object self_732696, int argc, object *args) /* object self_732696, object k_731629, object elem_73208_73846, object count_73209_73847 */
 {
 object k_731629 = args[0]; object count_73209_73847 = args[2];
  
closureN_type c_734277;
object e_734283 [2];
c_734277.hdr.mark = gc_color_red;
 c_734277.hdr.grayed = 0;
c_734277.tag = closureN_tag;
 c_734277.fn = (function_type)__lambda_263;
c_734277.num_args = 1;
c_734277.num_elements = 2;
c_734277.elements = (object *)e_734283;
c_734277.elements[0] = k_731629;
c_734277.elements[1] = ((closureN)self_732696)->elements[0];


complex_num_type local_734286; 


return_direct_with_clo1(data,(closure)&c_734277,__lambda_263,  Cyc_fast_sum(data,&local_734286, count_73209_73847, car(((closureN)self_732696)->elements[0])));; 
}

static void __lambda_263(void *data, object self_732697, int argc, object *args) /* object self_732697, object r_731630 */
 {
 object r_731630 = args[0];
  

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

static void __lambda_259(void *data, object self_732698, int argc, object *args) /* object self_732698, object r_731627 */
 {
 object r_731627 = args[0];
  
closureN_type c_734262;
object e_734272 [3];
c_734262.hdr.mark = gc_color_red;
 c_734262.hdr.grayed = 0;
c_734262.tag = closureN_tag;
 c_734262.fn = (function_type)__lambda_260;
c_734262.num_args = 1;
c_734262.num_elements = 3;
c_734262.elements = (object *)e_734272;
c_734262.elements[0] = ((closureN)self_732698)->elements[0];
c_734262.elements[1] = r_731627;
c_734262.elements[2] = ((closureN)self_732698)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_734262, ((closureN)self_732698)->elements[2]);; 
}

static void __lambda_260(void *data, object self_732699, int argc, object *args) /* object self_732699, object r_731628 */
 {
 object r_731628 = args[0];
  
closureN_type c_734264;
object e_734270 [2];
c_734264.hdr.mark = gc_color_red;
 c_734264.hdr.grayed = 0;
c_734264.tag = closureN_tag;
 c_734264.fn = (function_type)__lambda_261;
c_734264.num_args = 1;
c_734264.num_elements = 2;
c_734264.elements = (object *)e_734270;
c_734264.elements[0] = ((closureN)self_732699)->elements[0];
c_734264.elements[1] = ((closureN)self_732699)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_734264, r_731628, ((closureN)self_732699)->elements[1]);; 
}

static void __lambda_261(void *data, object self_732700, int argc, object *args) /* object self_732700, object r_731626_732456 */
 {

  

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

static void __lambda_254(void *data, object _, int argc, object *args) /* closure _,object k_731620, object bag_73202_73840, object element_73203_73841, object failure_73204_73842, object success_73205_73843 */
 {
object k_731620 = args[0]; object bag_73202_73840 = args[1]; object element_73203_73841 = args[2]; object failure_73204_73842 = args[3]; object success_73205_73843 = args[4];
  Cyc_st_add(data, "srfi/113.sld:bag-search!");

closureN_type c_734244;
object e_734251 [5];
c_734244.hdr.mark = gc_color_red;
 c_734244.hdr.grayed = 0;
c_734244.tag = closureN_tag;
 c_734244.fn = (function_type)__lambda_255;
c_734244.num_args = 1;
c_734244.num_elements = 5;
c_734244.elements = (object *)e_734251;
c_734244.elements[0] = bag_73202_73840;
c_734244.elements[1] = element_73203_73841;
c_734244.elements[2] = failure_73204_73842;
c_734244.elements[3] = k_731620;
c_734244.elements[4] = success_73205_73843;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734244, bag_73202_73840);; 
}

static void __lambda_255(void *data, object self_732692, int argc, object *args) /* object self_732692, object r_731621 */
 {

  return_direct_with_clo5(data,  __glo_sob_91search_67_srfi_113, (((closure)  __glo_sob_91search_67_srfi_113)->fn),  ((closureN)self_732692)->elements[3], ((closureN)self_732692)->elements[0], ((closureN)self_732692)->elements[1], ((closureN)self_732692)->elements[2], ((closureN)self_732692)->elements[4]);; 
}

static void __lambda_252(void *data, object _, int argc, object *args) /* closure _,object k_731616, object set_73198_73836, object element_73199_73837, object failure_73200_73838, object success_73201_73839 */
 {
object k_731616 = args[0]; object set_73198_73836 = args[1]; object element_73199_73837 = args[2]; object failure_73200_73838 = args[3]; object success_73201_73839 = args[4];
  Cyc_st_add(data, "srfi/113.sld:set-search!");

closureN_type c_734234;
object e_734241 [5];
c_734234.hdr.mark = gc_color_red;
 c_734234.hdr.grayed = 0;
c_734234.tag = closureN_tag;
 c_734234.fn = (function_type)__lambda_253;
c_734234.num_args = 1;
c_734234.num_elements = 5;
c_734234.elements = (object *)e_734241;
c_734234.elements[0] = element_73199_73837;
c_734234.elements[1] = failure_73200_73838;
c_734234.elements[2] = k_731616;
c_734234.elements[3] = set_73198_73836;
c_734234.elements[4] = success_73201_73839;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734234, set_73198_73836);; 
}

static void __lambda_253(void *data, object self_732691, int argc, object *args) /* object self_732691, object r_731617 */
 {

  return_direct_with_clo5(data,  __glo_sob_91search_67_srfi_113, (((closure)  __glo_sob_91search_67_srfi_113)->fn),  ((closureN)self_732691)->elements[2], ((closureN)self_732691)->elements[3], ((closureN)self_732691)->elements[0], ((closureN)self_732691)->elements[1], ((closureN)self_732691)->elements[4]);; 
}

static void __lambda_230(void *data, object _, int argc, object *args) /* closure _,object k_731593, object sob_73188_73814, object element_73189_73815, object failure_73190_73816, object success_73191_73817 */
 {
object k_731593 = args[0]; object sob_73188_73814 = args[1]; object element_73189_73815 = args[2]; object failure_73190_73816 = args[3]; object success_73191_73817 = args[4];
  Cyc_st_add(data, "srfi/113.sld:sob-search!");

closureN_type c_734090;
object e_734231 [5];
c_734090.hdr.mark = gc_color_red;
 c_734090.hdr.grayed = 0;
c_734090.tag = closureN_tag;
 c_734090.fn = (function_type)__lambda_231;
c_734090.num_args = 4;
c_734090.num_elements = 5;
c_734090.elements = (object *)e_734231;
c_734090.elements[0] = element_73189_73815;
c_734090.elements[1] = failure_73190_73816;
c_734090.elements[2] = k_731593;
c_734090.elements[3] = sob_73188_73814;
c_734090.elements[4] = success_73191_73817;

return_direct_with_clo4(data,(closure)&c_734090,__lambda_231,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_231(void *data, object self_732666, int argc, object *args) /* object self_732666, object ignore_73822, object insert_73823, object remove_73824, object update_73825 */
 {
 object ignore_73822 = args[0]; object insert_73823 = args[1]; object remove_73824 = args[2]; object update_73825 = args[3];
  
closureN_type c_734092;
object e_734227 [8];
c_734092.hdr.mark = gc_color_red;
 c_734092.hdr.grayed = 0;
c_734092.tag = closureN_tag;
 c_734092.fn = (function_type)__lambda_776;
c_734092.num_args = 1;
c_734092.num_elements = 8;
c_734092.elements = (object *)e_734227;
c_734092.elements[0] = ((closureN)self_732666)->elements[0];
c_734092.elements[1] = ((closureN)self_732666)->elements[1];
c_734092.elements[2] = insert_73823;
c_734092.elements[3] = ((closureN)self_732666)->elements[2];
c_734092.elements[4] = remove_73824;
c_734092.elements[5] = ((closureN)self_732666)->elements[3];
c_734092.elements[6] = ((closureN)self_732666)->elements[4];
c_734092.elements[7] = update_73825;


pair_type local_734230; 
return_direct_with_clo1(data,(closure)&c_734092,__lambda_776,  set_cell_as_expr(&local_734230, ignore_73822));; 
}

static void __lambda_776(void *data, object self_732667, int argc, object *args) /* object self_732667, object ignore_73822 */
 {
 object ignore_73822 = args[0];
  
closureN_type c_734094;
object e_734222 [8];
c_734094.hdr.mark = gc_color_red;
 c_734094.hdr.grayed = 0;
c_734094.tag = closureN_tag;
 c_734094.fn = (function_type)__lambda_775;
c_734094.num_args = 1;
c_734094.num_elements = 8;
c_734094.elements = (object *)e_734222;
c_734094.elements[0] = ((closureN)self_732667)->elements[0];
c_734094.elements[1] = ((closureN)self_732667)->elements[1];
c_734094.elements[2] = ignore_73822;
c_734094.elements[3] = ((closureN)self_732667)->elements[3];
c_734094.elements[4] = ((closureN)self_732667)->elements[4];
c_734094.elements[5] = ((closureN)self_732667)->elements[5];
c_734094.elements[6] = ((closureN)self_732667)->elements[6];
c_734094.elements[7] = ((closureN)self_732667)->elements[7];


pair_type local_734225; 
return_direct_with_clo1(data,(closure)&c_734094,__lambda_775,  set_cell_as_expr(&local_734225, ((closureN)self_732667)->elements[2]));; 
}

static void __lambda_775(void *data, object self_732668, int argc, object *args) /* object self_732668, object insert_73823 */
 {
 object insert_73823 = args[0];
  
closureN_type c_734096;
object e_734217 [8];
c_734096.hdr.mark = gc_color_red;
 c_734096.hdr.grayed = 0;
c_734096.tag = closureN_tag;
 c_734096.fn = (function_type)__lambda_774;
c_734096.num_args = 1;
c_734096.num_elements = 8;
c_734096.elements = (object *)e_734217;
c_734096.elements[0] = ((closureN)self_732668)->elements[0];
c_734096.elements[1] = ((closureN)self_732668)->elements[1];
c_734096.elements[2] = ((closureN)self_732668)->elements[2];
c_734096.elements[3] = insert_73823;
c_734096.elements[4] = ((closureN)self_732668)->elements[3];
c_734096.elements[5] = ((closureN)self_732668)->elements[5];
c_734096.elements[6] = ((closureN)self_732668)->elements[6];
c_734096.elements[7] = ((closureN)self_732668)->elements[7];


pair_type local_734220; 
return_direct_with_clo1(data,(closure)&c_734096,__lambda_774,  set_cell_as_expr(&local_734220, ((closureN)self_732668)->elements[4]));; 
}

static void __lambda_774(void *data, object self_732669, int argc, object *args) /* object self_732669, object remove_73824 */
 {
 object remove_73824 = args[0];
  
closureN_type c_734098;
object e_734212 [8];
c_734098.hdr.mark = gc_color_red;
 c_734098.hdr.grayed = 0;
c_734098.tag = closureN_tag;
 c_734098.fn = (function_type)__lambda_773;
c_734098.num_args = 1;
c_734098.num_elements = 8;
c_734098.elements = (object *)e_734212;
c_734098.elements[0] = ((closureN)self_732669)->elements[0];
c_734098.elements[1] = ((closureN)self_732669)->elements[1];
c_734098.elements[2] = ((closureN)self_732669)->elements[2];
c_734098.elements[3] = ((closureN)self_732669)->elements[3];
c_734098.elements[4] = ((closureN)self_732669)->elements[4];
c_734098.elements[5] = remove_73824;
c_734098.elements[6] = ((closureN)self_732669)->elements[5];
c_734098.elements[7] = ((closureN)self_732669)->elements[6];


pair_type local_734215; 
return_direct_with_clo1(data,(closure)&c_734098,__lambda_773,  set_cell_as_expr(&local_734215, ((closureN)self_732669)->elements[7]));; 
}

static void __lambda_773(void *data, object self_732670, int argc, object *args) /* object self_732670, object update_73825 */
 {
 object update_73825 = args[0];
  
closureN_type c_734100;
object e_734200 [9];
c_734100.hdr.mark = gc_color_red;
 c_734100.hdr.grayed = 0;
c_734100.tag = closureN_tag;
 c_734100.fn = (function_type)__lambda_232;
c_734100.num_args = 1;
c_734100.num_elements = 9;
c_734100.elements = (object *)e_734200;
c_734100.elements[0] = ((closureN)self_732670)->elements[0];
c_734100.elements[1] = ((closureN)self_732670)->elements[1];
c_734100.elements[2] = ((closureN)self_732670)->elements[2];
c_734100.elements[3] = ((closureN)self_732670)->elements[3];
c_734100.elements[4] = ((closureN)self_732670)->elements[4];
c_734100.elements[5] = ((closureN)self_732670)->elements[5];
c_734100.elements[6] = ((closureN)self_732670)->elements[6];
c_734100.elements[7] = ((closureN)self_732670)->elements[7];
c_734100.elements[8] = update_73825;


closureN_type c_734201;
object e_734211 [2];
c_734201.hdr.mark = gc_color_red;
 c_734201.hdr.grayed = 0;
c_734201.tag = closureN_tag;
 c_734201.fn = (function_type)__lambda_250;
c_734201.num_args = 1;
c_734201.num_elements = 2;
c_734201.elements = (object *)e_734211;
c_734201.elements[0] = ((closureN)self_732670)->elements[0];
c_734201.elements[1] = ((closureN)self_732670)->elements[6];

return_direct_with_clo1(data,(closure)&c_734100,__lambda_232,  &c_734201);; 
}

static void __lambda_250(void *data, object self_732671, int argc, object *args) /* object self_732671, object k_731612, object obj_73192_73830 */
 {
 object k_731612 = args[0]; object obj_73192_73830 = args[1];
  
closureN_type c_734203;
object e_734208 [3];
c_734203.hdr.mark = gc_color_red;
 c_734203.hdr.grayed = 0;
c_734203.tag = closureN_tag;
 c_734203.fn = (function_type)__lambda_251;
c_734203.num_args = 1;
c_734203.num_elements = 3;
c_734203.elements = (object *)e_734208;
c_734203.elements[0] = k_731612;
c_734203.elements[1] = obj_73192_73830;
c_734203.elements[2] = ((closureN)self_732671)->elements[1];

return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  &c_734203, ((closureN)self_732671)->elements[1], ((closureN)self_732671)->elements[0], obj_int2obj(1));; 
}

static void __lambda_251(void *data, object self_732672, int argc, object *args) /* object self_732672, object r_731613 */
 {

  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_732672)->elements[0], ((closureN)self_732672)->elements[2], ((closureN)self_732672)->elements[1]);; 
}

static void __lambda_232(void *data, object self_732673, int argc, object *args) /* object self_732673, object r_731611 */
 {
 object r_731611 = args[0];
  
closureN_type c_734102;
object e_734196 [9];
c_734102.hdr.mark = gc_color_red;
 c_734102.hdr.grayed = 0;
c_734102.tag = closureN_tag;
 c_734102.fn = (function_type)__lambda_233;
c_734102.num_args = 1;
c_734102.num_elements = 9;
c_734102.elements = (object *)e_734196;
c_734102.elements[0] = ((closureN)self_732673)->elements[0];
c_734102.elements[1] = ((closureN)self_732673)->elements[1];
c_734102.elements[2] = ((closureN)self_732673)->elements[2];
c_734102.elements[3] = ((closureN)self_732673)->elements[3];
c_734102.elements[4] = ((closureN)self_732673)->elements[4];
c_734102.elements[5] = ((closureN)self_732673)->elements[5];
c_734102.elements[6] = ((closureN)self_732673)->elements[6];
c_734102.elements[7] = ((closureN)self_732673)->elements[7];
c_734102.elements[8] = ((closureN)self_732673)->elements[8];



return_direct_with_clo1(data,(closure)&c_734102,__lambda_233,  Cyc_set_cell(data, ((closureN)self_732673)->elements[3], r_731611));; 
}

static void __lambda_233(void *data, object self_732674, int argc, object *args) /* object self_732674, object r_731594 */
 {

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


closureN_type c_734192;
object e_734195 [1];
c_734192.hdr.mark = gc_color_red;
 c_734192.hdr.grayed = 0;
c_734192.tag = closureN_tag;
 c_734192.fn = (function_type)__lambda_249;
c_734192.num_args = 1;
c_734192.num_elements = 1;
c_734192.elements = (object *)e_734195;
c_734192.elements[0] = ((closureN)self_732674)->elements[6];

return_direct_with_clo1(data,(closure)&c_734104,__lambda_234,  &c_734192);; 
}

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

static void __lambda_234(void *data, object self_732676, int argc, object *args) /* object self_732676, object r_731609 */
 {
 object r_731609 = args[0];
  
closureN_type c_734106;
object e_734187 [9];
c_734106.hdr.mark = gc_color_red;
 c_734106.hdr.grayed = 0;
c_734106.tag = closureN_tag;
 c_734106.fn = (function_type)__lambda_235;
c_734106.num_args = 1;
c_734106.num_elements = 9;
c_734106.elements = (object *)e_734187;
c_734106.elements[0] = ((closureN)self_732676)->elements[0];
c_734106.elements[1] = ((closureN)self_732676)->elements[1];
c_734106.elements[2] = ((closureN)self_732676)->elements[2];
c_734106.elements[3] = ((closureN)self_732676)->elements[3];
c_734106.elements[4] = ((closureN)self_732676)->elements[4];
c_734106.elements[5] = ((closureN)self_732676)->elements[5];
c_734106.elements[6] = ((closureN)self_732676)->elements[6];
c_734106.elements[7] = ((closureN)self_732676)->elements[7];
c_734106.elements[8] = ((closureN)self_732676)->elements[8];



return_direct_with_clo1(data,(closure)&c_734106,__lambda_235,  Cyc_set_cell(data, ((closureN)self_732676)->elements[2], r_731609));; 
}

static void __lambda_235(void *data, object self_732677, int argc, object *args) /* object self_732677, object r_731595 */
 {

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


closureN_type c_734168;
object e_734186 [2];
c_734168.hdr.mark = gc_color_red;
 c_734168.hdr.grayed = 0;
c_734168.tag = closureN_tag;
 c_734168.fn = (function_type)__lambda_245;
c_734168.num_args = 2;
c_734168.num_elements = 2;
c_734168.elements = (object *)e_734186;
c_734168.elements[0] = ((closureN)self_732677)->elements[0];
c_734168.elements[1] = ((closureN)self_732677)->elements[6];

return_direct_with_clo1(data,(closure)&c_734108,__lambda_236,  &c_734168);; 
}

static void __lambda_245(void *data, object self_732678, int argc, object *args) /* object self_732678, object k_731605, object new_91elem_73194_73832, object obj_73195_73833 */
 {
 object k_731605 = args[0]; object new_91elem_73194_73832 = args[1]; object obj_73195_73833 = args[2];
  
closureN_type c_734170;
object e_734183 [4];
c_734170.hdr.mark = gc_color_red;
 c_734170.hdr.grayed = 0;
c_734170.tag = closureN_tag;
 c_734170.fn = (function_type)__lambda_246;
c_734170.num_args = 1;
c_734170.num_elements = 4;
c_734170.elements = (object *)e_734183;
c_734170.elements[0] = k_731605;
c_734170.elements[1] = new_91elem_73194_73832;
c_734170.elements[2] = obj_73195_73833;
c_734170.elements[3] = ((closureN)self_732678)->elements[1];

return_direct_with_clo4(data,  __glo_sob_91decrement_67_srfi_113, (((closure)  __glo_sob_91decrement_67_srfi_113)->fn),  &c_734170, ((closureN)self_732678)->elements[1], ((closureN)self_732678)->elements[0], obj_int2obj(1));; 
}

static void __lambda_246(void *data, object self_732679, int argc, object *args) /* object self_732679, object r_731606 */
 {

  
closureN_type c_734172;
object e_734180 [3];
c_734172.hdr.mark = gc_color_red;
 c_734172.hdr.grayed = 0;
c_734172.tag = closureN_tag;
 c_734172.fn = (function_type)__lambda_247;
c_734172.num_args = 1;
c_734172.num_elements = 3;
c_734172.elements = (object *)e_734180;
c_734172.elements[0] = ((closureN)self_732679)->elements[0];
c_734172.elements[1] = ((closureN)self_732679)->elements[2];
c_734172.elements[2] = ((closureN)self_732679)->elements[3];

return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  &c_734172, ((closureN)self_732679)->elements[3], ((closureN)self_732679)->elements[1], obj_int2obj(1));; 
}

static void __lambda_247(void *data, object self_732680, int argc, object *args) /* object self_732680, object r_731607 */
 {

  
closureN_type c_734174;
object e_734178 [2];
c_734174.hdr.mark = gc_color_red;
 c_734174.hdr.grayed = 0;
c_734174.tag = closureN_tag;
 c_734174.fn = (function_type)__lambda_248;
c_734174.num_args = 1;
c_734174.num_elements = 2;
c_734174.elements = (object *)e_734178;
c_734174.elements[0] = ((closureN)self_732680)->elements[0];
c_734174.elements[1] = ((closureN)self_732680)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91cleanup_67_srfi_113, (((closure)  __glo_sob_91cleanup_67_srfi_113)->fn),  &c_734174, ((closureN)self_732680)->elements[2]);; 
}

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

static void __lambda_236(void *data, object self_732682, int argc, object *args) /* object self_732682, object r_731604 */
 {
 object r_731604 = args[0];
  
closureN_type c_734110;
object e_734163 [9];
c_734110.hdr.mark = gc_color_red;
 c_734110.hdr.grayed = 0;
c_734110.tag = closureN_tag;
 c_734110.fn = (function_type)__lambda_237;
c_734110.num_args = 1;
c_734110.num_elements = 9;
c_734110.elements = (object *)e_734163;
c_734110.elements[0] = ((closureN)self_732682)->elements[0];
c_734110.elements[1] = ((closureN)self_732682)->elements[1];
c_734110.elements[2] = ((closureN)self_732682)->elements[2];
c_734110.elements[3] = ((closureN)self_732682)->elements[3];
c_734110.elements[4] = ((closureN)self_732682)->elements[4];
c_734110.elements[5] = ((closureN)self_732682)->elements[5];
c_734110.elements[6] = ((closureN)self_732682)->elements[6];
c_734110.elements[7] = ((closureN)self_732682)->elements[7];
c_734110.elements[8] = ((closureN)self_732682)->elements[8];



return_direct_with_clo1(data,(closure)&c_734110,__lambda_237,  Cyc_set_cell(data, ((closureN)self_732682)->elements[8], r_731604));; 
}

static void __lambda_237(void *data, object self_732683, int argc, object *args) /* object self_732683, object r_731596 */
 {

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


closureN_type c_734149;
object e_734162 [2];
c_734149.hdr.mark = gc_color_red;
 c_734149.hdr.grayed = 0;
c_734149.tag = closureN_tag;
 c_734149.fn = (function_type)__lambda_242;
c_734149.num_args = 1;
c_734149.num_elements = 2;
c_734149.elements = (object *)e_734162;
c_734149.elements[0] = ((closureN)self_732683)->elements[0];
c_734149.elements[1] = ((closureN)self_732683)->elements[6];

return_direct_with_clo1(data,(closure)&c_734112,__lambda_238,  &c_734149);; 
}

static void __lambda_242(void *data, object self_732684, int argc, object *args) /* object self_732684, object k_731601, object obj_73196_73834 */
 {
 object k_731601 = args[0]; object obj_73196_73834 = args[1];
  
closureN_type c_734151;
object e_734159 [3];
c_734151.hdr.mark = gc_color_red;
 c_734151.hdr.grayed = 0;
c_734151.tag = closureN_tag;
 c_734151.fn = (function_type)__lambda_243;
c_734151.num_args = 1;
c_734151.num_elements = 3;
c_734151.elements = (object *)e_734159;
c_734151.elements[0] = k_731601;
c_734151.elements[1] = obj_73196_73834;
c_734151.elements[2] = ((closureN)self_732684)->elements[1];

return_direct_with_clo4(data,  __glo_sob_91decrement_67_srfi_113, (((closure)  __glo_sob_91decrement_67_srfi_113)->fn),  &c_734151, ((closureN)self_732684)->elements[1], ((closureN)self_732684)->elements[0], obj_int2obj(1));; 
}

static void __lambda_243(void *data, object self_732685, int argc, object *args) /* object self_732685, object r_731602 */
 {

  
closureN_type c_734153;
object e_734157 [2];
c_734153.hdr.mark = gc_color_red;
 c_734153.hdr.grayed = 0;
c_734153.tag = closureN_tag;
 c_734153.fn = (function_type)__lambda_244;
c_734153.num_args = 1;
c_734153.num_elements = 2;
c_734153.elements = (object *)e_734157;
c_734153.elements[0] = ((closureN)self_732685)->elements[0];
c_734153.elements[1] = ((closureN)self_732685)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91cleanup_67_srfi_113, (((closure)  __glo_sob_91cleanup_67_srfi_113)->fn),  &c_734153, ((closureN)self_732685)->elements[2]);; 
}

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

static void __lambda_238(void *data, object self_732687, int argc, object *args) /* object self_732687, object r_731600 */
 {
 object r_731600 = args[0];
  
closureN_type c_734114;
object e_734144 [9];
c_734114.hdr.mark = gc_color_red;
 c_734114.hdr.grayed = 0;
c_734114.tag = closureN_tag;
 c_734114.fn = (function_type)__lambda_239;
c_734114.num_args = 1;
c_734114.num_elements = 9;
c_734114.elements = (object *)e_734144;
c_734114.elements[0] = ((closureN)self_732687)->elements[0];
c_734114.elements[1] = ((closureN)self_732687)->elements[1];
c_734114.elements[2] = ((closureN)self_732687)->elements[2];
c_734114.elements[3] = ((closureN)self_732687)->elements[3];
c_734114.elements[4] = ((closureN)self_732687)->elements[4];
c_734114.elements[5] = ((closureN)self_732687)->elements[5];
c_734114.elements[6] = ((closureN)self_732687)->elements[6];
c_734114.elements[7] = ((closureN)self_732687)->elements[7];
c_734114.elements[8] = ((closureN)self_732687)->elements[8];



return_direct_with_clo1(data,(closure)&c_734114,__lambda_239,  Cyc_set_cell(data, ((closureN)self_732687)->elements[5], r_731600));; 
}

static void __lambda_239(void *data, object self_732688, int argc, object *args) /* object self_732688, object r_731597 */
 {

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

return_direct_with_clo4(data,  __glo_sob_91member_srfi_113, (((closure)  __glo_sob_91member_srfi_113)->fn),  &c_734116, ((closureN)self_732688)->elements[6], ((closureN)self_732688)->elements[0], __glo_missing_srfi_113);; 
}

static void __lambda_240(void *data, object self_732689, int argc, object *args) /* object self_732689, object true_91element_73197_73835 */
 {
 object true_91element_73197_73835 = args[0];
  
closureN_type c_734118;
object e_734138 [8];
c_734118.hdr.mark = gc_color_red;
 c_734118.hdr.grayed = 0;
c_734118.tag = closureN_tag;
 c_734118.fn = (function_type)__lambda_241;
c_734118.num_args = 1;
c_734118.num_elements = 8;
c_734118.elements = (object *)e_734138;
c_734118.elements[0] = ((closureN)self_732689)->elements[0];
c_734118.elements[1] = ((closureN)self_732689)->elements[1];
c_734118.elements[2] = ((closureN)self_732689)->elements[2];
c_734118.elements[3] = ((closureN)self_732689)->elements[3];
c_734118.elements[4] = ((closureN)self_732689)->elements[4];
c_734118.elements[5] = ((closureN)self_732689)->elements[5];
c_734118.elements[6] = true_91element_73197_73835;
c_734118.elements[7] = ((closureN)self_732689)->elements[6];



return_direct_with_clo1(data,(closure)&c_734118,__lambda_241,  Cyc_eq(true_91element_73197_73835, __glo_missing_srfi_113));; 
}

static void __lambda_241(void *data, object self_732690, int argc, object *args) /* object self_732690, object r_731599 */
 {
 object r_731599 = args[0];
  if( (boolean_f != r_731599) ){ 
  



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



return_closcall4(data,  ((closureN)self_732690)->elements[5],  ((closureN)self_732690)->elements[3], ((closureN)self_732690)->elements[6], car(((closureN)self_732690)->elements[7]), car(((closureN)self_732690)->elements[4]));}
;; 
}

static void __lambda_227(void *data, object _, int argc, object *args) /* closure _,object k_731586, object bag_73186_73812, object elements_73187_73813 */
 {
object k_731586 = args[0]; object bag_73186_73812 = args[1]; object elements_73187_73813 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-delete-all");

closureN_type c_734079;
object e_734087 [3];
c_734079.hdr.mark = gc_color_red;
 c_734079.hdr.grayed = 0;
c_734079.tag = closureN_tag;
 c_734079.fn = (function_type)__lambda_228;
c_734079.num_args = 1;
c_734079.num_elements = 3;
c_734079.elements = (object *)e_734087;
c_734079.elements[0] = bag_73186_73812;
c_734079.elements[1] = elements_73187_73813;
c_734079.elements[2] = k_731586;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734079, bag_73186_73812);; 
}

static void __lambda_228(void *data, object self_732664, int argc, object *args) /* object self_732664, object r_731587 */
 {

  
closureN_type c_734081;
object e_734085 [2];
c_734081.hdr.mark = gc_color_red;
 c_734081.hdr.grayed = 0;
c_734081.tag = closureN_tag;
 c_734081.fn = (function_type)__lambda_229;
c_734081.num_args = 1;
c_734081.num_elements = 2;
c_734081.elements = (object *)e_734085;
c_734081.elements[0] = ((closureN)self_732664)->elements[1];
c_734081.elements[1] = ((closureN)self_732664)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91copy_srfi_113, (((closure)  __glo_sob_91copy_srfi_113)->fn),  &c_734081, ((closureN)self_732664)->elements[0]);; 
}

static void __lambda_229(void *data, object self_732665, int argc, object *args) /* object self_732665, object r_731588 */
 {
 object r_731588 = args[0];
  return_direct_with_clo3(data,  __glo_sob_91delete_91all_67_srfi_113, (((closure)  __glo_sob_91delete_91all_67_srfi_113)->fn),  ((closureN)self_732665)->elements[1], r_731588, ((closureN)self_732665)->elements[0]);; 
}

static void __lambda_224(void *data, object _, int argc, object *args) /* closure _,object k_731581, object set_73184_73810, object elements_73185_73811 */
 {
object k_731581 = args[0]; object set_73184_73810 = args[1]; object elements_73185_73811 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-delete-all");

closureN_type c_734068;
object e_734076 [3];
c_734068.hdr.mark = gc_color_red;
 c_734068.hdr.grayed = 0;
c_734068.tag = closureN_tag;
 c_734068.fn = (function_type)__lambda_225;
c_734068.num_args = 1;
c_734068.num_elements = 3;
c_734068.elements = (object *)e_734076;
c_734068.elements[0] = elements_73185_73811;
c_734068.elements[1] = k_731581;
c_734068.elements[2] = set_73184_73810;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734068, set_73184_73810);; 
}

static void __lambda_225(void *data, object self_732662, int argc, object *args) /* object self_732662, object r_731582 */
 {

  
closureN_type c_734070;
object e_734074 [2];
c_734070.hdr.mark = gc_color_red;
 c_734070.hdr.grayed = 0;
c_734070.tag = closureN_tag;
 c_734070.fn = (function_type)__lambda_226;
c_734070.num_args = 1;
c_734070.num_elements = 2;
c_734070.elements = (object *)e_734074;
c_734070.elements[0] = ((closureN)self_732662)->elements[0];
c_734070.elements[1] = ((closureN)self_732662)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91copy_srfi_113, (((closure)  __glo_sob_91copy_srfi_113)->fn),  &c_734070, ((closureN)self_732662)->elements[2]);; 
}

static void __lambda_226(void *data, object self_732663, int argc, object *args) /* object self_732663, object r_731583 */
 {
 object r_731583 = args[0];
  return_direct_with_clo3(data,  __glo_sob_91delete_91all_67_srfi_113, (((closure)  __glo_sob_91delete_91all_67_srfi_113)->fn),  ((closureN)self_732663)->elements[1], r_731583, ((closureN)self_732663)->elements[0]);; 
}

static void __lambda_221(void *data, object _, int argc, object *args) /* closure _,object k_731576, object bag_73182_73808, object elements_73183_73809_raw, ... */
 {
object k_731576 = args[0]; object bag_73182_73808 = args[1];
load_varargs(elements_73183_73809, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:bag-delete");

closureN_type c_734057;
object e_734065 [3];
c_734057.hdr.mark = gc_color_red;
 c_734057.hdr.grayed = 0;
c_734057.tag = closureN_tag;
 c_734057.fn = (function_type)__lambda_222;
c_734057.num_args = 1;
c_734057.num_elements = 3;
c_734057.elements = (object *)e_734065;
c_734057.elements[0] = bag_73182_73808;
c_734057.elements[1] = elements_73183_73809;
c_734057.elements[2] = k_731576;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734057, bag_73182_73808);; 
}

static void __lambda_222(void *data, object self_732660, int argc, object *args) /* object self_732660, object r_731577 */
 {

  
closureN_type c_734059;
object e_734063 [2];
c_734059.hdr.mark = gc_color_red;
 c_734059.hdr.grayed = 0;
c_734059.tag = closureN_tag;
 c_734059.fn = (function_type)__lambda_223;
c_734059.num_args = 1;
c_734059.num_elements = 2;
c_734059.elements = (object *)e_734063;
c_734059.elements[0] = ((closureN)self_732660)->elements[1];
c_734059.elements[1] = ((closureN)self_732660)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91copy_srfi_113, (((closure)  __glo_sob_91copy_srfi_113)->fn),  &c_734059, ((closureN)self_732660)->elements[0]);; 
}

static void __lambda_223(void *data, object self_732661, int argc, object *args) /* object self_732661, object r_731578 */
 {
 object r_731578 = args[0];
  return_direct_with_clo3(data,  __glo_sob_91delete_91all_67_srfi_113, (((closure)  __glo_sob_91delete_91all_67_srfi_113)->fn),  ((closureN)self_732661)->elements[1], r_731578, ((closureN)self_732661)->elements[0]);; 
}

static void __lambda_218(void *data, object _, int argc, object *args) /* closure _,object k_731571, object set_73180_73806, object elements_73181_73807_raw, ... */
 {
object k_731571 = args[0]; object set_73180_73806 = args[1];
load_varargs(elements_73181_73807, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:set-delete");

closureN_type c_734046;
object e_734054 [3];
c_734046.hdr.mark = gc_color_red;
 c_734046.hdr.grayed = 0;
c_734046.tag = closureN_tag;
 c_734046.fn = (function_type)__lambda_219;
c_734046.num_args = 1;
c_734046.num_elements = 3;
c_734046.elements = (object *)e_734054;
c_734046.elements[0] = elements_73181_73807;
c_734046.elements[1] = k_731571;
c_734046.elements[2] = set_73180_73806;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734046, set_73180_73806);; 
}

static void __lambda_219(void *data, object self_732658, int argc, object *args) /* object self_732658, object r_731572 */
 {

  
closureN_type c_734048;
object e_734052 [2];
c_734048.hdr.mark = gc_color_red;
 c_734048.hdr.grayed = 0;
c_734048.tag = closureN_tag;
 c_734048.fn = (function_type)__lambda_220;
c_734048.num_args = 1;
c_734048.num_elements = 2;
c_734048.elements = (object *)e_734052;
c_734048.elements[0] = ((closureN)self_732658)->elements[0];
c_734048.elements[1] = ((closureN)self_732658)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91copy_srfi_113, (((closure)  __glo_sob_91copy_srfi_113)->fn),  &c_734048, ((closureN)self_732658)->elements[2]);; 
}

static void __lambda_220(void *data, object self_732659, int argc, object *args) /* object self_732659, object r_731573 */
 {
 object r_731573 = args[0];
  return_direct_with_clo3(data,  __glo_sob_91delete_91all_67_srfi_113, (((closure)  __glo_sob_91delete_91all_67_srfi_113)->fn),  ((closureN)self_732659)->elements[1], r_731573, ((closureN)self_732659)->elements[0]);; 
}

static void __lambda_216(void *data, object _, int argc, object *args) /* closure _,object k_731567, object bag_73178_73804, object elements_73179_73805 */
 {
object k_731567 = args[0]; object bag_73178_73804 = args[1]; object elements_73179_73805 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-delete-all!");

closureN_type c_734038;
object e_734043 [3];
c_734038.hdr.mark = gc_color_red;
 c_734038.hdr.grayed = 0;
c_734038.tag = closureN_tag;
 c_734038.fn = (function_type)__lambda_217;
c_734038.num_args = 1;
c_734038.num_elements = 3;
c_734038.elements = (object *)e_734043;
c_734038.elements[0] = bag_73178_73804;
c_734038.elements[1] = elements_73179_73805;
c_734038.elements[2] = k_731567;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734038, bag_73178_73804);; 
}

static void __lambda_217(void *data, object self_732657, int argc, object *args) /* object self_732657, object r_731568 */
 {

  return_direct_with_clo3(data,  __glo_sob_91delete_91all_67_srfi_113, (((closure)  __glo_sob_91delete_91all_67_srfi_113)->fn),  ((closureN)self_732657)->elements[2], ((closureN)self_732657)->elements[0], ((closureN)self_732657)->elements[1]);; 
}

static void __lambda_214(void *data, object _, int argc, object *args) /* closure _,object k_731563, object set_73176_73802, object elements_73177_73803 */
 {
object k_731563 = args[0]; object set_73176_73802 = args[1]; object elements_73177_73803 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-delete-all!");

closureN_type c_734030;
object e_734035 [3];
c_734030.hdr.mark = gc_color_red;
 c_734030.hdr.grayed = 0;
c_734030.tag = closureN_tag;
 c_734030.fn = (function_type)__lambda_215;
c_734030.num_args = 1;
c_734030.num_elements = 3;
c_734030.elements = (object *)e_734035;
c_734030.elements[0] = elements_73177_73803;
c_734030.elements[1] = k_731563;
c_734030.elements[2] = set_73176_73802;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734030, set_73176_73802);; 
}

static void __lambda_215(void *data, object self_732656, int argc, object *args) /* object self_732656, object r_731564 */
 {

  return_direct_with_clo3(data,  __glo_sob_91delete_91all_67_srfi_113, (((closure)  __glo_sob_91delete_91all_67_srfi_113)->fn),  ((closureN)self_732656)->elements[1], ((closureN)self_732656)->elements[2], ((closureN)self_732656)->elements[0]);; 
}

static void __lambda_212(void *data, object _, int argc, object *args) /* closure _,object k_731559, object bag_73174_73800, object elements_73175_73801_raw, ... */
 {
object k_731559 = args[0]; object bag_73174_73800 = args[1];
load_varargs(elements_73175_73801, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:bag-delete!");

closureN_type c_734022;
object e_734027 [3];
c_734022.hdr.mark = gc_color_red;
 c_734022.hdr.grayed = 0;
c_734022.tag = closureN_tag;
 c_734022.fn = (function_type)__lambda_213;
c_734022.num_args = 1;
c_734022.num_elements = 3;
c_734022.elements = (object *)e_734027;
c_734022.elements[0] = bag_73174_73800;
c_734022.elements[1] = elements_73175_73801;
c_734022.elements[2] = k_731559;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_734022, bag_73174_73800);; 
}

static void __lambda_213(void *data, object self_732655, int argc, object *args) /* object self_732655, object r_731560 */
 {

  return_direct_with_clo3(data,  __glo_sob_91delete_91all_67_srfi_113, (((closure)  __glo_sob_91delete_91all_67_srfi_113)->fn),  ((closureN)self_732655)->elements[2], ((closureN)self_732655)->elements[0], ((closureN)self_732655)->elements[1]);; 
}

static void __lambda_210(void *data, object _, int argc, object *args) /* closure _,object k_731555, object set_73172_73798, object elements_73173_73799_raw, ... */
 {
object k_731555 = args[0]; object set_73172_73798 = args[1];
load_varargs(elements_73173_73799, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:set-delete!");

closureN_type c_734014;
object e_734019 [3];
c_734014.hdr.mark = gc_color_red;
 c_734014.hdr.grayed = 0;
c_734014.tag = closureN_tag;
 c_734014.fn = (function_type)__lambda_211;
c_734014.num_args = 1;
c_734014.num_elements = 3;
c_734014.elements = (object *)e_734019;
c_734014.elements[0] = elements_73173_73799;
c_734014.elements[1] = k_731555;
c_734014.elements[2] = set_73172_73798;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_734014, set_73172_73798);; 
}

static void __lambda_211(void *data, object self_732654, int argc, object *args) /* object self_732654, object r_731556 */
 {

  return_direct_with_clo3(data,  __glo_sob_91delete_91all_67_srfi_113, (((closure)  __glo_sob_91delete_91all_67_srfi_113)->fn),  ((closureN)self_732654)->elements[1], ((closureN)self_732654)->elements[2], ((closureN)self_732654)->elements[0]);; 
}

static void __lambda_205(void *data, object _, int argc, object *args) /* closure _,object k_731548, object sob_73169_73795, object elements_73170_73796 */
 {
object k_731548 = args[0]; object sob_73169_73795 = args[1]; object elements_73170_73796 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-delete-all!");

closureN_type c_733995;
object e_734007 [3];
c_733995.hdr.mark = gc_color_red;
 c_733995.hdr.grayed = 0;
c_733995.tag = closureN_tag;
 c_733995.fn = (function_type)__lambda_206;
c_733995.num_args = 1;
c_733995.num_elements = 3;
c_733995.elements = (object *)e_734007;
c_733995.elements[0] = elements_73170_73796;
c_733995.elements[1] = k_731548;
c_733995.elements[2] = sob_73169_73795;


closureN_type c_734008;
object e_734011 [1];
c_734008.hdr.mark = gc_color_red;
 c_734008.hdr.grayed = 0;
c_734008.tag = closureN_tag;
 c_734008.fn = (function_type)__lambda_209;
c_734008.num_args = 1;
c_734008.num_elements = 1;
c_734008.elements = (object *)e_734011;
c_734008.elements[0] = sob_73169_73795;

return_direct_with_clo1(data,(closure)&c_733995,__lambda_206,  &c_734008);; 
}

static void __lambda_209(void *data, object self_732650, int argc, object *args) /* object self_732650, object k_731552, object element_73171_73797 */
 {
 object k_731552 = args[0]; object element_73171_73797 = args[1];
  return_direct_with_clo4(data,  __glo_sob_91decrement_67_srfi_113, (((closure)  __glo_sob_91decrement_67_srfi_113)->fn),  k_731552, ((closureN)self_732650)->elements[0], element_73171_73797, obj_int2obj(1));; 
}

static void __lambda_206(void *data, object self_732651, int argc, object *args) /* object self_732651, object r_731551 */
 {
 object r_731551 = args[0];
  
closureN_type c_733997;
object e_734005 [2];
c_733997.hdr.mark = gc_color_red;
 c_733997.hdr.grayed = 0;
c_733997.tag = closureN_tag;
 c_733997.fn = (function_type)__lambda_207;
c_733997.num_args = 1;
c_733997.num_elements = 2;
c_733997.elements = (object *)e_734005;
c_733997.elements[0] = ((closureN)self_732651)->elements[1];
c_733997.elements[1] = ((closureN)self_732651)->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_733997, r_731551, ((closureN)self_732651)->elements[0]);; 
}

static void __lambda_207(void *data, object self_732652, int argc, object *args) /* object self_732652, object r_731549 */
 {

  
closureN_type c_733999;
object e_734003 [2];
c_733999.hdr.mark = gc_color_red;
 c_733999.hdr.grayed = 0;
c_733999.tag = closureN_tag;
 c_733999.fn = (function_type)__lambda_208;
c_733999.num_args = 1;
c_733999.num_elements = 2;
c_733999.elements = (object *)e_734003;
c_733999.elements[0] = ((closureN)self_732652)->elements[0];
c_733999.elements[1] = ((closureN)self_732652)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91cleanup_67_srfi_113, (((closure)  __glo_sob_91cleanup_67_srfi_113)->fn),  &c_733999, ((closureN)self_732652)->elements[1]);; 
}

static void __lambda_208(void *data, object self_732653, int argc, object *args) /* object self_732653, object r_731550 */
 {

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

static void __lambda_201(void *data, object _, int argc, object *args) /* closure _,object k_731542, object bag_73166_73792, object element_73167_73793 */
 {
object k_731542 = args[0]; object bag_73166_73792 = args[1]; object element_73167_73793 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-replace");

closureN_type c_733980;
object e_733992 [3];
c_733980.hdr.mark = gc_color_red;
 c_733980.hdr.grayed = 0;
c_733980.tag = closureN_tag;
 c_733980.fn = (function_type)__lambda_202;
c_733980.num_args = 1;
c_733980.num_elements = 3;
c_733980.elements = (object *)e_733992;
c_733980.elements[0] = bag_73166_73792;
c_733980.elements[1] = element_73167_73793;
c_733980.elements[2] = k_731542;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733980, bag_73166_73792);; 
}

static void __lambda_202(void *data, object self_732647, int argc, object *args) /* object self_732647, object r_731543 */
 {

  
closureN_type c_733982;
object e_733990 [2];
c_733982.hdr.mark = gc_color_red;
 c_733982.hdr.grayed = 0;
c_733982.tag = closureN_tag;
 c_733982.fn = (function_type)__lambda_203;
c_733982.num_args = 1;
c_733982.num_elements = 2;
c_733982.elements = (object *)e_733990;
c_733982.elements[0] = ((closureN)self_732647)->elements[1];
c_733982.elements[1] = ((closureN)self_732647)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91copy_srfi_113, (((closure)  __glo_sob_91copy_srfi_113)->fn),  &c_733982, ((closureN)self_732647)->elements[0]);; 
}

static void __lambda_203(void *data, object self_732648, int argc, object *args) /* object self_732648, object result_73168_73794 */
 {
 object result_73168_73794 = args[0];
  
closureN_type c_733984;
object e_733988 [2];
c_733984.hdr.mark = gc_color_red;
 c_733984.hdr.grayed = 0;
c_733984.tag = closureN_tag;
 c_733984.fn = (function_type)__lambda_204;
c_733984.num_args = 1;
c_733984.num_elements = 2;
c_733984.elements = (object *)e_733988;
c_733984.elements[0] = ((closureN)self_732648)->elements[1];
c_733984.elements[1] = result_73168_73794;

return_direct_with_clo3(data,  __glo_sob_91replace_67_srfi_113, (((closure)  __glo_sob_91replace_67_srfi_113)->fn),  &c_733984, result_73168_73794, ((closureN)self_732648)->elements[0]);; 
}

static void __lambda_204(void *data, object self_732649, int argc, object *args) /* object self_732649, object r_731545 */
 {

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

static void __lambda_197(void *data, object _, int argc, object *args) /* closure _,object k_731536, object set_73163_73789, object element_73164_73790 */
 {
object k_731536 = args[0]; object set_73163_73789 = args[1]; object element_73164_73790 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-replace");

closureN_type c_733965;
object e_733977 [3];
c_733965.hdr.mark = gc_color_red;
 c_733965.hdr.grayed = 0;
c_733965.tag = closureN_tag;
 c_733965.fn = (function_type)__lambda_198;
c_733965.num_args = 1;
c_733965.num_elements = 3;
c_733965.elements = (object *)e_733977;
c_733965.elements[0] = element_73164_73790;
c_733965.elements[1] = k_731536;
c_733965.elements[2] = set_73163_73789;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733965, set_73163_73789);; 
}

static void __lambda_198(void *data, object self_732644, int argc, object *args) /* object self_732644, object r_731537 */
 {

  
closureN_type c_733967;
object e_733975 [2];
c_733967.hdr.mark = gc_color_red;
 c_733967.hdr.grayed = 0;
c_733967.tag = closureN_tag;
 c_733967.fn = (function_type)__lambda_199;
c_733967.num_args = 1;
c_733967.num_elements = 2;
c_733967.elements = (object *)e_733975;
c_733967.elements[0] = ((closureN)self_732644)->elements[0];
c_733967.elements[1] = ((closureN)self_732644)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91copy_srfi_113, (((closure)  __glo_sob_91copy_srfi_113)->fn),  &c_733967, ((closureN)self_732644)->elements[2]);; 
}

static void __lambda_199(void *data, object self_732645, int argc, object *args) /* object self_732645, object result_73165_73791 */
 {
 object result_73165_73791 = args[0];
  
closureN_type c_733969;
object e_733973 [2];
c_733969.hdr.mark = gc_color_red;
 c_733969.hdr.grayed = 0;
c_733969.tag = closureN_tag;
 c_733969.fn = (function_type)__lambda_200;
c_733969.num_args = 1;
c_733969.num_elements = 2;
c_733969.elements = (object *)e_733973;
c_733969.elements[0] = ((closureN)self_732645)->elements[1];
c_733969.elements[1] = result_73165_73791;

return_direct_with_clo3(data,  __glo_sob_91replace_67_srfi_113, (((closure)  __glo_sob_91replace_67_srfi_113)->fn),  &c_733969, result_73165_73791, ((closureN)self_732645)->elements[0]);; 
}

static void __lambda_200(void *data, object self_732646, int argc, object *args) /* object self_732646, object r_731539 */
 {

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

static void __lambda_194(void *data, object _, int argc, object *args) /* closure _,object k_731531, object bag_73161_73787, object element_73162_73788 */
 {
object k_731531 = args[0]; object bag_73161_73787 = args[1]; object element_73162_73788 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-replace!");

closureN_type c_733953;
object e_733962 [3];
c_733953.hdr.mark = gc_color_red;
 c_733953.hdr.grayed = 0;
c_733953.tag = closureN_tag;
 c_733953.fn = (function_type)__lambda_195;
c_733953.num_args = 1;
c_733953.num_elements = 3;
c_733953.elements = (object *)e_733962;
c_733953.elements[0] = bag_73161_73787;
c_733953.elements[1] = element_73162_73788;
c_733953.elements[2] = k_731531;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733953, bag_73161_73787);; 
}

static void __lambda_195(void *data, object self_732642, int argc, object *args) /* object self_732642, object r_731532 */
 {

  
closureN_type c_733955;
object e_733959 [2];
c_733955.hdr.mark = gc_color_red;
 c_733955.hdr.grayed = 0;
c_733955.tag = closureN_tag;
 c_733955.fn = (function_type)__lambda_196;
c_733955.num_args = 1;
c_733955.num_elements = 2;
c_733955.elements = (object *)e_733959;
c_733955.elements[0] = ((closureN)self_732642)->elements[0];
c_733955.elements[1] = ((closureN)self_732642)->elements[2];

return_direct_with_clo3(data,  __glo_sob_91replace_67_srfi_113, (((closure)  __glo_sob_91replace_67_srfi_113)->fn),  &c_733955, ((closureN)self_732642)->elements[0], ((closureN)self_732642)->elements[1]);; 
}

static void __lambda_196(void *data, object self_732643, int argc, object *args) /* object self_732643, object r_731533 */
 {

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

static void __lambda_191(void *data, object _, int argc, object *args) /* closure _,object k_731526, object set_73159_73785, object element_73160_73786 */
 {
object k_731526 = args[0]; object set_73159_73785 = args[1]; object element_73160_73786 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-replace!");

closureN_type c_733941;
object e_733950 [3];
c_733941.hdr.mark = gc_color_red;
 c_733941.hdr.grayed = 0;
c_733941.tag = closureN_tag;
 c_733941.fn = (function_type)__lambda_192;
c_733941.num_args = 1;
c_733941.num_elements = 3;
c_733941.elements = (object *)e_733950;
c_733941.elements[0] = element_73160_73786;
c_733941.elements[1] = k_731526;
c_733941.elements[2] = set_73159_73785;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733941, set_73159_73785);; 
}

static void __lambda_192(void *data, object self_732640, int argc, object *args) /* object self_732640, object r_731527 */
 {

  
closureN_type c_733943;
object e_733947 [2];
c_733943.hdr.mark = gc_color_red;
 c_733943.hdr.grayed = 0;
c_733943.tag = closureN_tag;
 c_733943.fn = (function_type)__lambda_193;
c_733943.num_args = 1;
c_733943.num_elements = 2;
c_733943.elements = (object *)e_733947;
c_733943.elements[0] = ((closureN)self_732640)->elements[1];
c_733943.elements[1] = ((closureN)self_732640)->elements[2];

return_direct_with_clo3(data,  __glo_sob_91replace_67_srfi_113, (((closure)  __glo_sob_91replace_67_srfi_113)->fn),  &c_733943, ((closureN)self_732640)->elements[2], ((closureN)self_732640)->elements[0]);; 
}

static void __lambda_193(void *data, object self_732641, int argc, object *args) /* object self_732641, object r_731528 */
 {

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

static void __lambda_178(void *data, object _, int argc, object *args) /* closure _,object k_731511, object sob_73144_73777, object element_73145_73778 */
 {
object k_731511 = args[0]; object sob_73144_73777 = args[1]; object element_73145_73778 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-replace!");

closureN_type c_733884;
object e_733938 [3];
c_733884.hdr.mark = gc_color_red;
 c_733884.hdr.grayed = 0;
c_733884.tag = closureN_tag;
 c_733884.fn = (function_type)__lambda_179;
c_733884.num_args = 1;
c_733884.num_elements = 3;
c_733884.elements = (object *)e_733938;
c_733884.elements[0] = element_73145_73778;
c_733884.elements[1] = k_731511;
c_733884.elements[2] = sob_73144_73777;

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_733884, sob_73144_73777);; 
}

static void __lambda_179(void *data, object self_732628, int argc, object *args) /* object self_732628, object comparator_73148_73779 */
 {
 object comparator_73148_73779 = args[0];
  
closureN_type c_733886;
object e_733937 [4];
c_733886.hdr.mark = gc_color_red;
 c_733886.hdr.grayed = 0;
c_733886.tag = closureN_tag;
 c_733886.fn = (function_type)__lambda_180;
c_733886.num_args = 1;
c_733886.num_elements = 4;
c_733886.elements = (object *)e_733937;
c_733886.elements[0] = comparator_73148_73779;
c_733886.elements[1] = ((closureN)self_732628)->elements[0];
c_733886.elements[2] = ((closureN)self_732628)->elements[1];
c_733886.elements[3] = ((closureN)self_732628)->elements[2];

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_733886, comparator_73148_73779);; 
}

static void __lambda_180(void *data, object self_732629, int argc, object *args) /* object self_732629, object _123_73151_73780 */
 {
 object _123_73151_73780 = args[0];
  
closureN_type c_733888;
object e_733935 [5];
c_733888.hdr.mark = gc_color_red;
 c_733888.hdr.grayed = 0;
c_733888.tag = closureN_tag;
 c_733888.fn = (function_type)__lambda_181;
c_733888.num_args = 1;
c_733888.num_elements = 5;
c_733888.elements = (object *)e_733935;
c_733888.elements[0] = _123_73151_73780;
c_733888.elements[1] = ((closureN)self_732629)->elements[0];
c_733888.elements[2] = ((closureN)self_732629)->elements[1];
c_733888.elements[3] = ((closureN)self_732629)->elements[2];
c_733888.elements[4] = ((closureN)self_732629)->elements[3];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733888, ((closureN)self_732629)->elements[3]);; 
}

static void __lambda_181(void *data, object self_732630, int argc, object *args) /* object self_732630, object ht_73154_73781 */
 {
 object ht_73154_73781 = args[0];
  
closureN_type c_733890;
object e_733932 [5];
c_733890.hdr.mark = gc_color_red;
 c_733890.hdr.grayed = 0;
c_733890.tag = closureN_tag;
 c_733890.fn = (function_type)__lambda_182;
c_733890.num_args = 1;
c_733890.num_elements = 5;
c_733890.elements = (object *)e_733932;
c_733890.elements[0] = ((closureN)self_732630)->elements[0];
c_733890.elements[1] = ((closureN)self_732630)->elements[2];
c_733890.elements[2] = ht_73154_73781;
c_733890.elements[3] = ((closureN)self_732630)->elements[3];
c_733890.elements[4] = ((closureN)self_732630)->elements[4];

return_direct_with_clo3(data,  __glo_comparator_91check_91type_srfi_128, (((closure)  __glo_comparator_91check_91type_srfi_128)->fn),  &c_733890, ((closureN)self_732630)->elements[1], ((closureN)self_732630)->elements[2]);; 
}

static void __lambda_182(void *data, object self_732631, int argc, object *args) /* object self_732631, object r_731515 */
 {

  
closureN_type c_733892;
object e_733895 [1];
c_733892.hdr.mark = gc_color_red;
 c_733892.hdr.grayed = 0;
c_733892.tag = closureN_tag;
 c_733892.fn = (function_type)__lambda_183;
c_733892.num_args = 1;
c_733892.num_elements = 1;
c_733892.elements = (object *)e_733895;
c_733892.elements[0] = ((closureN)self_732631)->elements[3];


closureN_type c_733896;
object e_733931 [4];
c_733896.hdr.mark = gc_color_red;
 c_733896.hdr.grayed = 0;
c_733896.tag = closureN_tag;
 c_733896.fn = (function_type)__lambda_184;
c_733896.num_args = 1;
c_733896.num_elements = 4;
c_733896.elements = (object *)e_733931;
c_733896.elements[0] = ((closureN)self_732631)->elements[0];
c_733896.elements[1] = ((closureN)self_732631)->elements[1];
c_733896.elements[2] = ((closureN)self_732631)->elements[2];
c_733896.elements[3] = ((closureN)self_732631)->elements[4];

return_direct_with_clo1(data,(closure)&c_733892,__lambda_183,  &c_733896);; 
}

static void __lambda_184(void *data, object self_732632, int argc, object *args) /* object self_732632, object k_731517, object return_73156_73782 */
 {
 object k_731517 = args[0]; object return_73156_73782 = args[1];
  
closureN_type c_733898;
object e_733906 [3];
c_733898.hdr.mark = gc_color_red;
 c_733898.hdr.grayed = 0;
c_733898.tag = closureN_tag;
 c_733898.fn = (function_type)__lambda_185;
c_733898.num_args = 1;
c_733898.num_elements = 3;
c_733898.elements = (object *)e_733906;
c_733898.elements[0] = ((closureN)self_732632)->elements[2];
c_733898.elements[1] = k_731517;
c_733898.elements[2] = ((closureN)self_732632)->elements[3];


closureN_type c_733907;
object e_733930 [5];
c_733907.hdr.mark = gc_color_red;
 c_733907.hdr.grayed = 0;
c_733907.tag = closureN_tag;
 c_733907.fn = (function_type)__lambda_187;
c_733907.num_args = 2;
c_733907.num_elements = 5;
c_733907.elements = (object *)e_733930;
c_733907.elements[0] = ((closureN)self_732632)->elements[0];
c_733907.elements[1] = ((closureN)self_732632)->elements[1];
c_733907.elements[2] = ((closureN)self_732632)->elements[2];
c_733907.elements[3] = return_73156_73782;
c_733907.elements[4] = ((closureN)self_732632)->elements[3];

return_direct_with_clo1(data,(closure)&c_733898,__lambda_185,  &c_733907);; 
}

static void __lambda_187(void *data, object self_732633, int argc, object *args) /* object self_732633, object k_731520, object key_73157_73783, object value_73158_73784 */
 {
 object k_731520 = args[0]; object key_73157_73783 = args[1]; object value_73158_73784 = args[2];
  
closureN_type c_733910;
object e_733928 [7];
c_733910.hdr.mark = gc_color_red;
 c_733910.hdr.grayed = 0;
c_733910.tag = closureN_tag;
 c_733910.fn = (function_type)__lambda_188;
c_733910.num_args = 1;
c_733910.num_elements = 7;
c_733910.elements = (object *)e_733928;
c_733910.elements[0] = ((closureN)self_732633)->elements[1];
c_733910.elements[1] = ((closureN)self_732633)->elements[2];
c_733910.elements[2] = k_731520;
c_733910.elements[3] = key_73157_73783;
c_733910.elements[4] = ((closureN)self_732633)->elements[3];
c_733910.elements[5] = ((closureN)self_732633)->elements[4];
c_733910.elements[6] = value_73158_73784;

return_closcall3(data,  ((closureN)self_732633)->elements[0],  &c_733910, key_73157_73783, ((closureN)self_732633)->elements[1]);; 
}

static void __lambda_188(void *data, object self_732634, int argc, object *args) /* object self_732634, object r_731521 */
 {
 object r_731521 = args[0];
  if( (boolean_f != r_731521) ){ 
  
closureN_type c_733912;
object e_733923 [6];
c_733912.hdr.mark = gc_color_red;
 c_733912.hdr.grayed = 0;
c_733912.tag = closureN_tag;
 c_733912.fn = (function_type)__lambda_189;
c_733912.num_args = 1;
c_733912.num_elements = 6;
c_733912.elements = (object *)e_733923;
c_733912.elements[0] = ((closureN)self_732634)->elements[0];
c_733912.elements[1] = ((closureN)self_732634)->elements[1];
c_733912.elements[2] = ((closureN)self_732634)->elements[2];
c_733912.elements[3] = ((closureN)self_732634)->elements[4];
c_733912.elements[4] = ((closureN)self_732634)->elements[5];
c_733912.elements[5] = ((closureN)self_732634)->elements[6];

return_direct_with_clo3(data,  __glo_hash_91table_91delete_67_srfi_69, (((closure)  __glo_hash_91table_91delete_67_srfi_69)->fn),  &c_733912, ((closureN)self_732634)->elements[1], ((closureN)self_732634)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732634)->elements[2], (((closure)  ((closureN)self_732634)->elements[2])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_189(void *data, object self_732635, int argc, object *args) /* object self_732635, object r_731522 */
 {

  
closureN_type c_733914;
object e_733919 [3];
c_733914.hdr.mark = gc_color_red;
 c_733914.hdr.grayed = 0;
c_733914.tag = closureN_tag;
 c_733914.fn = (function_type)__lambda_190;
c_733914.num_args = 1;
c_733914.num_elements = 3;
c_733914.elements = (object *)e_733919;
c_733914.elements[0] = ((closureN)self_732635)->elements[2];
c_733914.elements[1] = ((closureN)self_732635)->elements[3];
c_733914.elements[2] = ((closureN)self_732635)->elements[4];

return_direct_with_clo4(data,  __glo_hash_91table_91set_67_srfi_69, (((closure)  __glo_hash_91table_91set_67_srfi_69)->fn),  &c_733914, ((closureN)self_732635)->elements[1], ((closureN)self_732635)->elements[0], ((closureN)self_732635)->elements[5]);; 
}

static void __lambda_190(void *data, object self_732636, int argc, object *args) /* object self_732636, object r_731523 */
 {

  return_closcall2(data,  ((closureN)self_732636)->elements[1],  ((closureN)self_732636)->elements[0], ((closureN)self_732636)->elements[2]);; 
}

static void __lambda_185(void *data, object self_732637, int argc, object *args) /* object self_732637, object r_731519 */
 {
 object r_731519 = args[0];
  
closureN_type c_733900;
object e_733904 [2];
c_733900.hdr.mark = gc_color_red;
 c_733900.hdr.grayed = 0;
c_733900.tag = closureN_tag;
 c_733900.fn = (function_type)__lambda_186;
c_733900.num_args = 1;
c_733900.num_elements = 2;
c_733900.elements = (object *)e_733904;
c_733900.elements[0] = ((closureN)self_732637)->elements[1];
c_733900.elements[1] = ((closureN)self_732637)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_733900, ((closureN)self_732637)->elements[0], r_731519);; 
}

static void __lambda_186(void *data, object self_732638, int argc, object *args) /* object self_732638, object r_731518_732455 */
 {

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

static void __lambda_183(void *data, object self_732639, int argc, object *args) /* object self_732639, object r_731516 */
 {
 object r_731516 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_732639)->elements[0], r_731516);; 
}

static void __lambda_174(void *data, object _, int argc, object *args) /* closure _,object k_731505, object bag_73141_73774, object elements_73142_73775_raw, ... */
 {
object k_731505 = args[0]; object bag_73141_73774 = args[1];
load_varargs(elements_73142_73775, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:bag-adjoin");

closureN_type c_733869;
object e_733881 [3];
c_733869.hdr.mark = gc_color_red;
 c_733869.hdr.grayed = 0;
c_733869.tag = closureN_tag;
 c_733869.fn = (function_type)__lambda_175;
c_733869.num_args = 1;
c_733869.num_elements = 3;
c_733869.elements = (object *)e_733881;
c_733869.elements[0] = bag_73141_73774;
c_733869.elements[1] = elements_73142_73775;
c_733869.elements[2] = k_731505;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733869, bag_73141_73774);; 
}

static void __lambda_175(void *data, object self_732625, int argc, object *args) /* object self_732625, object r_731506 */
 {

  
closureN_type c_733871;
object e_733879 [2];
c_733871.hdr.mark = gc_color_red;
 c_733871.hdr.grayed = 0;
c_733871.tag = closureN_tag;
 c_733871.fn = (function_type)__lambda_176;
c_733871.num_args = 1;
c_733871.num_elements = 2;
c_733871.elements = (object *)e_733879;
c_733871.elements[0] = ((closureN)self_732625)->elements[1];
c_733871.elements[1] = ((closureN)self_732625)->elements[2];

return_direct_with_clo2(data,  __glo_sob_91copy_srfi_113, (((closure)  __glo_sob_91copy_srfi_113)->fn),  &c_733871, ((closureN)self_732625)->elements[0]);; 
}

static void __lambda_176(void *data, object self_732626, int argc, object *args) /* object self_732626, object result_73143_73776 */
 {
 object result_73143_73776 = args[0];
  
closureN_type c_733873;
object e_733877 [2];
c_733873.hdr.mark = gc_color_red;
 c_733873.hdr.grayed = 0;
c_733873.tag = closureN_tag;
 c_733873.fn = (function_type)__lambda_177;
c_733873.num_args = 1;
c_733873.num_elements = 2;
c_733873.elements = (object *)e_733877;
c_733873.elements[0] = ((closureN)self_732626)->elements[1];
c_733873.elements[1] = result_73143_73776;

return_direct_with_clo3(data,  __glo_sob_91adjoin_91all_67_srfi_113, (((closure)  __glo_sob_91adjoin_91all_67_srfi_113)->fn),  &c_733873, result_73143_73776, ((closureN)self_732626)->elements[0]);; 
}

static void __lambda_177(void *data, object self_732627, int argc, object *args) /* object self_732627, object r_731508 */
 {

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

static void __lambda_170(void *data, object _, int argc, object *args) /* closure _,object k_731499, object set_73138_73771, object elements_73139_73772_raw, ... */
 {
object k_731499 = args[0]; object set_73138_73771 = args[1];
load_varargs(elements_73139_73772, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:set-adjoin");

closureN_type c_733854;
object e_733866 [3];
c_733854.hdr.mark = gc_color_red;
 c_733854.hdr.grayed = 0;
c_733854.tag = closureN_tag;
 c_733854.fn = (function_type)__lambda_171;
c_733854.num_args = 1;
c_733854.num_elements = 3;
c_733854.elements = (object *)e_733866;
c_733854.elements[0] = elements_73139_73772;
c_733854.elements[1] = k_731499;
c_733854.elements[2] = set_73138_73771;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733854, set_73138_73771);; 
}

static void __lambda_171(void *data, object self_732622, int argc, object *args) /* object self_732622, object r_731500 */
 {

  
closureN_type c_733856;
object e_733864 [2];
c_733856.hdr.mark = gc_color_red;
 c_733856.hdr.grayed = 0;
c_733856.tag = closureN_tag;
 c_733856.fn = (function_type)__lambda_172;
c_733856.num_args = 1;
c_733856.num_elements = 2;
c_733856.elements = (object *)e_733864;
c_733856.elements[0] = ((closureN)self_732622)->elements[0];
c_733856.elements[1] = ((closureN)self_732622)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91copy_srfi_113, (((closure)  __glo_sob_91copy_srfi_113)->fn),  &c_733856, ((closureN)self_732622)->elements[2]);; 
}

static void __lambda_172(void *data, object self_732623, int argc, object *args) /* object self_732623, object result_73140_73773 */
 {
 object result_73140_73773 = args[0];
  
closureN_type c_733858;
object e_733862 [2];
c_733858.hdr.mark = gc_color_red;
 c_733858.hdr.grayed = 0;
c_733858.tag = closureN_tag;
 c_733858.fn = (function_type)__lambda_173;
c_733858.num_args = 1;
c_733858.num_elements = 2;
c_733858.elements = (object *)e_733862;
c_733858.elements[0] = ((closureN)self_732623)->elements[1];
c_733858.elements[1] = result_73140_73773;

return_direct_with_clo3(data,  __glo_sob_91adjoin_91all_67_srfi_113, (((closure)  __glo_sob_91adjoin_91all_67_srfi_113)->fn),  &c_733858, result_73140_73773, ((closureN)self_732623)->elements[0]);; 
}

static void __lambda_173(void *data, object self_732624, int argc, object *args) /* object self_732624, object r_731502 */
 {

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

static void __lambda_167(void *data, object _, int argc, object *args) /* closure _,object k_731494, object bag_73136_73769, object elements_73137_73770_raw, ... */
 {
object k_731494 = args[0]; object bag_73136_73769 = args[1];
load_varargs(elements_73137_73770, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:bag-adjoin!");

closureN_type c_733842;
object e_733851 [3];
c_733842.hdr.mark = gc_color_red;
 c_733842.hdr.grayed = 0;
c_733842.tag = closureN_tag;
 c_733842.fn = (function_type)__lambda_168;
c_733842.num_args = 1;
c_733842.num_elements = 3;
c_733842.elements = (object *)e_733851;
c_733842.elements[0] = bag_73136_73769;
c_733842.elements[1] = elements_73137_73770;
c_733842.elements[2] = k_731494;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733842, bag_73136_73769);; 
}

static void __lambda_168(void *data, object self_732620, int argc, object *args) /* object self_732620, object r_731495 */
 {

  
closureN_type c_733844;
object e_733848 [2];
c_733844.hdr.mark = gc_color_red;
 c_733844.hdr.grayed = 0;
c_733844.tag = closureN_tag;
 c_733844.fn = (function_type)__lambda_169;
c_733844.num_args = 1;
c_733844.num_elements = 2;
c_733844.elements = (object *)e_733848;
c_733844.elements[0] = ((closureN)self_732620)->elements[0];
c_733844.elements[1] = ((closureN)self_732620)->elements[2];

return_direct_with_clo3(data,  __glo_sob_91adjoin_91all_67_srfi_113, (((closure)  __glo_sob_91adjoin_91all_67_srfi_113)->fn),  &c_733844, ((closureN)self_732620)->elements[0], ((closureN)self_732620)->elements[1]);; 
}

static void __lambda_169(void *data, object self_732621, int argc, object *args) /* object self_732621, object r_731496 */
 {

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

static void __lambda_164(void *data, object _, int argc, object *args) /* closure _,object k_731489, object set_73134_73767, object elements_73135_73768_raw, ... */
 {
object k_731489 = args[0]; object set_73134_73767 = args[1];
load_varargs(elements_73135_73768, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:set-adjoin!");

closureN_type c_733830;
object e_733839 [3];
c_733830.hdr.mark = gc_color_red;
 c_733830.hdr.grayed = 0;
c_733830.tag = closureN_tag;
 c_733830.fn = (function_type)__lambda_165;
c_733830.num_args = 1;
c_733830.num_elements = 3;
c_733830.elements = (object *)e_733839;
c_733830.elements[0] = elements_73135_73768;
c_733830.elements[1] = k_731489;
c_733830.elements[2] = set_73134_73767;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733830, set_73134_73767);; 
}

static void __lambda_165(void *data, object self_732618, int argc, object *args) /* object self_732618, object r_731490 */
 {

  
closureN_type c_733832;
object e_733836 [2];
c_733832.hdr.mark = gc_color_red;
 c_733832.hdr.grayed = 0;
c_733832.tag = closureN_tag;
 c_733832.fn = (function_type)__lambda_166;
c_733832.num_args = 1;
c_733832.num_elements = 2;
c_733832.elements = (object *)e_733836;
c_733832.elements[0] = ((closureN)self_732618)->elements[1];
c_733832.elements[1] = ((closureN)self_732618)->elements[2];

return_direct_with_clo3(data,  __glo_sob_91adjoin_91all_67_srfi_113, (((closure)  __glo_sob_91adjoin_91all_67_srfi_113)->fn),  &c_733832, ((closureN)self_732618)->elements[2], ((closureN)self_732618)->elements[0]);; 
}

static void __lambda_166(void *data, object self_732619, int argc, object *args) /* object self_732619, object r_731491 */
 {

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

static void __lambda_161(void *data, object _, int argc, object *args) /* closure _,object k_731484, object sob_73131_73764, object elements_73132_73765 */
 {
object k_731484 = args[0]; object sob_73131_73764 = args[1]; object elements_73132_73765 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-adjoin-all!");

closureN_type c_733819;
object e_733823 [2];
c_733819.hdr.mark = gc_color_red;
 c_733819.hdr.grayed = 0;
c_733819.tag = closureN_tag;
 c_733819.fn = (function_type)__lambda_162;
c_733819.num_args = 1;
c_733819.num_elements = 2;
c_733819.elements = (object *)e_733823;
c_733819.elements[0] = elements_73132_73765;
c_733819.elements[1] = k_731484;


closureN_type c_733824;
object e_733827 [1];
c_733824.hdr.mark = gc_color_red;
 c_733824.hdr.grayed = 0;
c_733824.tag = closureN_tag;
 c_733824.fn = (function_type)__lambda_163;
c_733824.num_args = 1;
c_733824.num_elements = 1;
c_733824.elements = (object *)e_733827;
c_733824.elements[0] = sob_73131_73764;

return_direct_with_clo1(data,(closure)&c_733819,__lambda_162,  &c_733824);; 
}

static void __lambda_163(void *data, object self_732616, int argc, object *args) /* object self_732616, object k_731486, object elem_73133_73766 */
 {
 object k_731486 = args[0]; object elem_73133_73766 = args[1];
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  k_731486, ((closureN)self_732616)->elements[0], elem_73133_73766, obj_int2obj(1));; 
}

static void __lambda_162(void *data, object self_732617, int argc, object *args) /* object self_732617, object r_731485 */
 {
 object r_731485 = 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_732617)->elements[1], r_731485, ((closureN)self_732617)->elements[0]);; 
}

static void __lambda_157(void *data, object _, int argc, object *args) /* closure _,object k_731478, object bag_73128_73761, object element_73129_73762, object count_73130_73763 */
 {
object k_731478 = args[0]; object bag_73128_73761 = args[1]; object element_73129_73762 = args[2]; object count_73130_73763 = args[3];
  Cyc_st_add(data, "srfi/113.sld:bag-decrement!");

closureN_type c_733802;
object e_733816 [4];
c_733802.hdr.mark = gc_color_red;
 c_733802.hdr.grayed = 0;
c_733802.tag = closureN_tag;
 c_733802.fn = (function_type)__lambda_158;
c_733802.num_args = 1;
c_733802.num_elements = 4;
c_733802.elements = (object *)e_733816;
c_733802.elements[0] = bag_73128_73761;
c_733802.elements[1] = count_73130_73763;
c_733802.elements[2] = element_73129_73762;
c_733802.elements[3] = k_731478;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733802, bag_73128_73761);; 
}

static void __lambda_158(void *data, object self_732613, int argc, object *args) /* object self_732613, object r_731479 */
 {

  
closureN_type c_733804;
object e_733812 [2];
c_733804.hdr.mark = gc_color_red;
 c_733804.hdr.grayed = 0;
c_733804.tag = closureN_tag;
 c_733804.fn = (function_type)__lambda_159;
c_733804.num_args = 1;
c_733804.num_elements = 2;
c_733804.elements = (object *)e_733812;
c_733804.elements[0] = ((closureN)self_732613)->elements[0];
c_733804.elements[1] = ((closureN)self_732613)->elements[3];

return_direct_with_clo4(data,  __glo_sob_91decrement_67_srfi_113, (((closure)  __glo_sob_91decrement_67_srfi_113)->fn),  &c_733804, ((closureN)self_732613)->elements[0], ((closureN)self_732613)->elements[2], ((closureN)self_732613)->elements[1]);; 
}

static void __lambda_159(void *data, object self_732614, int argc, object *args) /* object self_732614, object r_731480 */
 {

  
closureN_type c_733806;
object e_733810 [2];
c_733806.hdr.mark = gc_color_red;
 c_733806.hdr.grayed = 0;
c_733806.tag = closureN_tag;
 c_733806.fn = (function_type)__lambda_160;
c_733806.num_args = 1;
c_733806.num_elements = 2;
c_733806.elements = (object *)e_733810;
c_733806.elements[0] = ((closureN)self_732614)->elements[0];
c_733806.elements[1] = ((closureN)self_732614)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91cleanup_67_srfi_113, (((closure)  __glo_sob_91cleanup_67_srfi_113)->fn),  &c_733806, ((closureN)self_732614)->elements[0]);; 
}

static void __lambda_160(void *data, object self_732615, int argc, object *args) /* object self_732615, object r_731481 */
 {

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

static void __lambda_154(void *data, object _, int argc, object *args) /* closure _,object k_731473, object bag_73125_73758, object element_73126_73759, object count_73127_73760 */
 {
object k_731473 = args[0]; object bag_73125_73758 = args[1]; object element_73126_73759 = args[2]; object count_73127_73760 = args[3];
  Cyc_st_add(data, "srfi/113.sld:bag-increment!");

closureN_type c_733789;
object e_733799 [4];
c_733789.hdr.mark = gc_color_red;
 c_733789.hdr.grayed = 0;
c_733789.tag = closureN_tag;
 c_733789.fn = (function_type)__lambda_155;
c_733789.num_args = 1;
c_733789.num_elements = 4;
c_733789.elements = (object *)e_733799;
c_733789.elements[0] = bag_73125_73758;
c_733789.elements[1] = count_73127_73760;
c_733789.elements[2] = element_73126_73759;
c_733789.elements[3] = k_731473;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733789, bag_73125_73758);; 
}

static void __lambda_155(void *data, object self_732611, int argc, object *args) /* object self_732611, object r_731474 */
 {

  
closureN_type c_733791;
object e_733795 [2];
c_733791.hdr.mark = gc_color_red;
 c_733791.hdr.grayed = 0;
c_733791.tag = closureN_tag;
 c_733791.fn = (function_type)__lambda_156;
c_733791.num_args = 1;
c_733791.num_elements = 2;
c_733791.elements = (object *)e_733795;
c_733791.elements[0] = ((closureN)self_732611)->elements[0];
c_733791.elements[1] = ((closureN)self_732611)->elements[3];

return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  &c_733791, ((closureN)self_732611)->elements[0], ((closureN)self_732611)->elements[2], ((closureN)self_732611)->elements[1]);; 
}

static void __lambda_156(void *data, object self_732612, int argc, object *args) /* object self_732612, object r_731475 */
 {

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

static void __lambda_148(void *data, object _, int argc, object *args) /* closure _,object k_731464, object ht_73121_73754 */
 {
object k_731464 = args[0]; object ht_73121_73754 = args[1];
  Cyc_st_add(data, "srfi/113.sld:nonpositive-keys");

closureN_type c_733748;
object e_733786 [2];
c_733748.hdr.mark = gc_color_red;
 c_733748.hdr.grayed = 0;
c_733748.tag = closureN_tag;
 c_733748.fn = (function_type)__lambda_149;
c_733748.num_args = 1;
c_733748.num_elements = 2;
c_733748.elements = (object *)e_733786;
c_733748.elements[0] = ht_73121_73754;
c_733748.elements[1] = k_731464;

return_direct_with_clo1(data,(closure)&c_733748,__lambda_149,  NULL);; 
}

static void __lambda_149(void *data, object self_732605, int argc, object *args) /* object self_732605, object result_73122_73755 */
 {
 object result_73122_73755 = args[0];
  
closureN_type c_733750;
object e_733782 [2];
c_733750.hdr.mark = gc_color_red;
 c_733750.hdr.grayed = 0;
c_733750.tag = closureN_tag;
 c_733750.fn = (function_type)__lambda_772;
c_733750.num_args = 1;
c_733750.num_elements = 2;
c_733750.elements = (object *)e_733782;
c_733750.elements[0] = ((closureN)self_732605)->elements[0];
c_733750.elements[1] = ((closureN)self_732605)->elements[1];


pair_type local_733785; 
return_direct_with_clo1(data,(closure)&c_733750,__lambda_772,  set_cell_as_expr(&local_733785, result_73122_73755));; 
}

static void __lambda_772(void *data, object self_732606, int argc, object *args) /* object self_732606, object result_73122_73755 */
 {
 object result_73122_73755 = args[0];
  
closureN_type c_733752;
object e_733762 [3];
c_733752.hdr.mark = gc_color_red;
 c_733752.hdr.grayed = 0;
c_733752.tag = closureN_tag;
 c_733752.fn = (function_type)__lambda_150;
c_733752.num_args = 1;
c_733752.num_elements = 3;
c_733752.elements = (object *)e_733762;
c_733752.elements[0] = ((closureN)self_732606)->elements[0];
c_733752.elements[1] = ((closureN)self_732606)->elements[1];
c_733752.elements[2] = result_73122_73755;


closureN_type c_733763;
object e_733781 [1];
c_733763.hdr.mark = gc_color_red;
 c_733763.hdr.grayed = 0;
c_733763.tag = closureN_tag;
 c_733763.fn = (function_type)__lambda_152;
c_733763.num_args = 2;
c_733763.num_elements = 1;
c_733763.elements = (object *)e_733781;
c_733763.elements[0] = result_73122_73755;

return_direct_with_clo1(data,(closure)&c_733752,__lambda_150,  &c_733763);; 
}

static void __lambda_152(void *data, object self_732607, int argc, object *args) /* object self_732607, object k_731468, object key_73123_73756, object value_73124_73757 */
 {
 object k_731468 = args[0]; object key_73123_73756 = args[1]; object value_73124_73757 = args[2];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, value_73124_73757, obj_int2obj(0))) ){ 
  
closureN_type c_733767;
object e_733773 [2];
c_733767.hdr.mark = gc_color_red;
 c_733767.hdr.grayed = 0;
c_733767.tag = closureN_tag;
 c_733767.fn = (function_type)__lambda_153;
c_733767.num_args = 1;
c_733767.num_elements = 2;
c_733767.elements = (object *)e_733773;
c_733767.elements[0] = k_731468;
c_733767.elements[1] = ((closureN)self_732607)->elements[0];


pair_type local_733776; 


return_direct_with_clo1(data,(closure)&c_733767,__lambda_153,  set_pair_as_expr(&local_733776, key_73123_73756, car(((closureN)self_732607)->elements[0])));
} else { 
  return_direct_with_clo1(data,  k_731468, (((closure)  k_731468)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_153(void *data, object self_732608, int argc, object *args) /* object self_732608, object r_731470 */
 {
 object r_731470 = args[0];
  

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

static void __lambda_150(void *data, object self_732609, int argc, object *args) /* object self_732609, object r_731467 */
 {
 object r_731467 = args[0];
  
closureN_type c_733754;
object e_733760 [2];
c_733754.hdr.mark = gc_color_red;
 c_733754.hdr.grayed = 0;
c_733754.tag = closureN_tag;
 c_733754.fn = (function_type)__lambda_151;
c_733754.num_args = 1;
c_733754.num_elements = 2;
c_733754.elements = (object *)e_733760;
c_733754.elements[0] = ((closureN)self_732609)->elements[1];
c_733754.elements[1] = ((closureN)self_732609)->elements[2];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_733754, ((closureN)self_732609)->elements[0], r_731467);; 
}

static void __lambda_151(void *data, object self_732610, int argc, object *args) /* object self_732610, object r_731466_732454 */
 {

  

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

static void __lambda_142(void *data, object _, int argc, object *args) /* closure _,object k_731456, object sob_73118_73751 */
 {
object k_731456 = args[0]; object sob_73118_73751 = args[1];
  Cyc_st_add(data, "srfi/113.sld:sob-cleanup!");

closureN_type c_733726;
object e_733745 [2];
c_733726.hdr.mark = gc_color_red;
 c_733726.hdr.grayed = 0;
c_733726.tag = closureN_tag;
 c_733726.fn = (function_type)__lambda_143;
c_733726.num_args = 1;
c_733726.num_elements = 2;
c_733726.elements = (object *)e_733745;
c_733726.elements[0] = k_731456;
c_733726.elements[1] = sob_73118_73751;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733726, sob_73118_73751);; 
}

static void __lambda_143(void *data, object self_732600, int argc, object *args) /* object self_732600, object ht_73119_73752 */
 {
 object ht_73119_73752 = args[0];
  
closureN_type c_733728;
object e_733740 [3];
c_733728.hdr.mark = gc_color_red;
 c_733728.hdr.grayed = 0;
c_733728.tag = closureN_tag;
 c_733728.fn = (function_type)__lambda_144;
c_733728.num_args = 1;
c_733728.num_elements = 3;
c_733728.elements = (object *)e_733740;
c_733728.elements[0] = ht_73119_73752;
c_733728.elements[1] = ((closureN)self_732600)->elements[0];
c_733728.elements[2] = ((closureN)self_732600)->elements[1];


closureN_type c_733741;
object e_733744 [1];
c_733741.hdr.mark = gc_color_red;
 c_733741.hdr.grayed = 0;
c_733741.tag = closureN_tag;
 c_733741.fn = (function_type)__lambda_147;
c_733741.num_args = 1;
c_733741.num_elements = 1;
c_733741.elements = (object *)e_733744;
c_733741.elements[0] = ht_73119_73752;

return_direct_with_clo1(data,(closure)&c_733728,__lambda_144,  &c_733741);; 
}

static void __lambda_147(void *data, object self_732601, int argc, object *args) /* object self_732601, object k_731461, object key_73120_73753 */
 {
 object k_731461 = args[0]; object key_73120_73753 = args[1];
  return_direct_with_clo3(data,  __glo_hash_91table_91delete_67_srfi_69, (((closure)  __glo_hash_91table_91delete_67_srfi_69)->fn),  k_731461, ((closureN)self_732601)->elements[0], key_73120_73753);; 
}

static void __lambda_144(void *data, object self_732602, int argc, object *args) /* object self_732602, object r_731459 */
 {
 object r_731459 = args[0];
  
closureN_type c_733730;
object e_733738 [3];
c_733730.hdr.mark = gc_color_red;
 c_733730.hdr.grayed = 0;
c_733730.tag = closureN_tag;
 c_733730.fn = (function_type)__lambda_145;
c_733730.num_args = 1;
c_733730.num_elements = 3;
c_733730.elements = (object *)e_733738;
c_733730.elements[0] = ((closureN)self_732602)->elements[1];
c_733730.elements[1] = r_731459;
c_733730.elements[2] = ((closureN)self_732602)->elements[2];

return_direct_with_clo2(data,  __glo_nonpositive_91keys_srfi_113, (((closure)  __glo_nonpositive_91keys_srfi_113)->fn),  &c_733730, ((closureN)self_732602)->elements[0]);; 
}

static void __lambda_145(void *data, object self_732603, int argc, object *args) /* object self_732603, object r_731460 */
 {
 object r_731460 = args[0];
  
closureN_type c_733732;
object e_733736 [2];
c_733732.hdr.mark = gc_color_red;
 c_733732.hdr.grayed = 0;
c_733732.tag = closureN_tag;
 c_733732.fn = (function_type)__lambda_146;
c_733732.num_args = 1;
c_733732.num_elements = 2;
c_733732.elements = (object *)e_733736;
c_733732.elements[0] = ((closureN)self_732603)->elements[0];
c_733732.elements[1] = ((closureN)self_732603)->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_733732, ((closureN)self_732603)->elements[1], r_731460);; 
}

static void __lambda_146(void *data, object self_732604, int argc, object *args) /* object self_732604, object r_731458 */
 {

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

static void __lambda_138(void *data, object _, int argc, object *args) /* closure _,object k_731450, object sob_73114_73747, object element_73115_73748, object count_73116_73749 */
 {
object k_731450 = args[0]; object sob_73114_73747 = args[1]; object element_73115_73748 = args[2]; object count_73116_73749 = args[3];
  Cyc_st_add(data, "srfi/113.sld:sob-decrement!");

closureN_type c_733708;
object e_733723 [3];
c_733708.hdr.mark = gc_color_red;
 c_733708.hdr.grayed = 0;
c_733708.tag = closureN_tag;
 c_733708.fn = (function_type)__lambda_139;
c_733708.num_args = 1;
c_733708.num_elements = 3;
c_733708.elements = (object *)e_733723;
c_733708.elements[0] = count_73116_73749;
c_733708.elements[1] = element_73115_73748;
c_733708.elements[2] = k_731450;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733708, sob_73114_73747);; 
}

static void __lambda_139(void *data, object self_732597, int argc, object *args) /* object self_732597, object r_731451 */
 {
 object r_731451 = args[0];
  
closureN_type c_733710;
object e_733715 [3];
c_733710.hdr.mark = gc_color_red;
 c_733710.hdr.grayed = 0;
c_733710.tag = closureN_tag;
 c_733710.fn = (function_type)__lambda_140;
c_733710.num_args = 1;
c_733710.num_elements = 3;
c_733710.elements = (object *)e_733715;
c_733710.elements[0] = ((closureN)self_732597)->elements[1];
c_733710.elements[1] = ((closureN)self_732597)->elements[2];
c_733710.elements[2] = r_731451;


closureN_type c_733716;
object e_733722 [1];
c_733716.hdr.mark = gc_color_red;
 c_733716.hdr.grayed = 0;
c_733716.tag = closureN_tag;
 c_733716.fn = (function_type)__lambda_141;
c_733716.num_args = 1;
c_733716.num_elements = 1;
c_733716.elements = (object *)e_733722;
c_733716.elements[0] = ((closureN)self_732597)->elements[0];

return_direct_with_clo1(data,(closure)&c_733710,__lambda_140,  &c_733716);; 
}

static void __lambda_141(void *data, object self_732598, int argc, object *args) /* object self_732598, object k_731453, object value_73117_73750 */
 {
 object k_731453 = args[0]; object value_73117_73750 = args[1];
  
complex_num_type local_733720; 
return_direct_with_clo1(data,  k_731453, (((closure)  k_731453)->fn),  Cyc_fast_sub(data,&local_733720, value_73117_73750, ((closureN)self_732598)->elements[0]));; 
}

static void __lambda_140(void *data, object self_732599, int argc, object *args) /* object self_732599, object r_731452 */
 {
 object r_731452 = args[0];
  return_direct_with_clo5(data,  __glo_hash_91table_91update_67_95default_srfi_69, (((closure)  __glo_hash_91table_91update_67_95default_srfi_69)->fn),  ((closureN)self_732599)->elements[1], ((closureN)self_732599)->elements[2], ((closureN)self_732599)->elements[0], r_731452, obj_int2obj(0));; 
}

static void __lambda_130(void *data, object _, int argc, object *args) /* closure _,object k_731440, object sob_73109_73742, object element_73110_73743, object count_73111_73744 */
 {
object k_731440 = args[0]; object sob_73109_73742 = args[1]; object element_73110_73743 = args[2]; object count_73111_73744 = args[3];
  Cyc_st_add(data, "srfi/113.sld:sob-increment!");

closureN_type c_733674;
object e_733705 [4];
c_733674.hdr.mark = gc_color_red;
 c_733674.hdr.grayed = 0;
c_733674.tag = closureN_tag;
 c_733674.fn = (function_type)__lambda_131;
c_733674.num_args = 1;
c_733674.num_elements = 4;
c_733674.elements = (object *)e_733705;
c_733674.elements[0] = count_73111_73744;
c_733674.elements[1] = element_73110_73743;
c_733674.elements[2] = k_731440;
c_733674.elements[3] = sob_73109_73742;

return_direct_with_clo3(data,  __glo_check_91element_srfi_113, (((closure)  __glo_check_91element_srfi_113)->fn),  &c_733674, sob_73109_73742, element_73110_73743);; 
}

static void __lambda_131(void *data, object self_732590, int argc, object *args) /* object self_732590, object r_731441 */
 {

  
closureN_type c_733676;
object e_733703 [4];
c_733676.hdr.mark = gc_color_red;
 c_733676.hdr.grayed = 0;
c_733676.tag = closureN_tag;
 c_733676.fn = (function_type)__lambda_132;
c_733676.num_args = 1;
c_733676.num_elements = 4;
c_733676.elements = (object *)e_733703;
c_733676.elements[0] = ((closureN)self_732590)->elements[0];
c_733676.elements[1] = ((closureN)self_732590)->elements[1];
c_733676.elements[2] = ((closureN)self_732590)->elements[2];
c_733676.elements[3] = ((closureN)self_732590)->elements[3];

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733676, ((closureN)self_732590)->elements[3]);; 
}

static void __lambda_132(void *data, object self_732591, int argc, object *args) /* object self_732591, object r_731442 */
 {
 object r_731442 = args[0];
  
closureN_type c_733678;
object e_733696 [2];
c_733678.hdr.mark = gc_color_red;
 c_733678.hdr.grayed = 0;
c_733678.tag = closureN_tag;
 c_733678.fn = (function_type)__lambda_133;
c_733678.num_args = 0;
c_733678.num_elements = 2;
c_733678.elements = (object *)e_733696;
c_733678.elements[0] = ((closureN)self_732591)->elements[0];
c_733678.elements[1] = ((closureN)self_732591)->elements[3];


closureN_type c_733697;
object e_733702 [3];
c_733697.hdr.mark = gc_color_red;
 c_733697.hdr.grayed = 0;
c_733697.tag = closureN_tag;
 c_733697.fn = (function_type)__lambda_137;
c_733697.num_args = 1;
c_733697.num_elements = 3;
c_733697.elements = (object *)e_733702;
c_733697.elements[0] = ((closureN)self_732591)->elements[1];
c_733697.elements[1] = ((closureN)self_732591)->elements[2];
c_733697.elements[2] = r_731442;

return_direct_with_clo1(data,(closure)&c_733678,__lambda_133,  &c_733697);; 
}

static void __lambda_137(void *data, object self_732592, int argc, object *args) /* object self_732592, object r_731443 */
 {
 object r_731443 = args[0];
  return_direct_with_clo5(data,  __glo_hash_91table_91update_67_95default_srfi_69, (((closure)  __glo_hash_91table_91update_67_95default_srfi_69)->fn),  ((closureN)self_732592)->elements[1], ((closureN)self_732592)->elements[2], ((closureN)self_732592)->elements[0], r_731443, obj_int2obj(0));; 
}

static void __lambda_133(void *data, object self_732593, int argc, object *args) /* object self_732593, object k_731444 */
 {
 object k_731444 = args[0];
  
closureN_type c_733680;
object e_733694 [2];
c_733680.hdr.mark = gc_color_red;
 c_733680.hdr.grayed = 0;
c_733680.tag = closureN_tag;
 c_733680.fn = (function_type)__lambda_134;
c_733680.num_args = 1;
c_733680.num_elements = 2;
c_733680.elements = (object *)e_733694;
c_733680.elements[0] = ((closureN)self_732593)->elements[0];
c_733680.elements[1] = k_731444;

return_direct_with_clo2(data,  __glo_sob_91multi_127_srfi_113, (((closure)  __glo_sob_91multi_127_srfi_113)->fn),  &c_733680, ((closureN)self_732593)->elements[1]);; 
}

static void __lambda_134(void *data, object self_732594, int argc, object *args) /* object self_732594, object r_731445 */
 {
 object r_731445 = args[0];
  if( (boolean_f != r_731445) ){ 
  
closureN_type c_733683;
object e_733689 [1];
c_733683.hdr.mark = gc_color_red;
 c_733683.hdr.grayed = 0;
c_733683.tag = closureN_tag;
 c_733683.fn = (function_type)__lambda_135;
c_733683.num_args = 1;
c_733683.num_elements = 1;
c_733683.elements = (object *)e_733689;
c_733683.elements[0] = ((closureN)self_732594)->elements[0];

return_direct_with_clo1(data,  ((closureN)self_732594)->elements[1], (((closure)  ((closureN)self_732594)->elements[1])->fn),  &c_733683);
} else { 
  
mclosure0(c_733692, (function_type)__lambda_136);c_733692.num_args = 1;
return_direct_with_clo1(data,  ((closureN)self_732594)->elements[1], (((closure)  ((closureN)self_732594)->elements[1])->fn),  &c_733692);}
;; 
}

static void __lambda_136(void *data, object self_732596, int argc, object *args) /* object self_732596, object k_731447, object value_73113_73746 */
 {
 object k_731447 = args[0];
  return_direct_with_clo1(data,  k_731447, (((closure)  k_731447)->fn),  obj_int2obj(1));; 
}

static void __lambda_135(void *data, object self_732595, int argc, object *args) /* object self_732595, object k_731446, object value_73112_73745 */
 {
 object k_731446 = args[0]; object value_73112_73745 = args[1];
  
complex_num_type local_733687; 
return_direct_with_clo1(data,  k_731446, (((closure)  k_731446)->fn),  Cyc_fast_sum(data,&local_733687, value_73112_73745, ((closureN)self_732595)->elements[0]));; 
}

static void __lambda_128(void *data, object _, int argc, object *args) /* closure _,object k_731436, object bag_73108_73741 */
 {
object k_731436 = args[0]; object bag_73108_73741 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag-element-comparator");

closureN_type c_733667;
object e_733671 [2];
c_733667.hdr.mark = gc_color_red;
 c_733667.hdr.grayed = 0;
c_733667.tag = closureN_tag;
 c_733667.fn = (function_type)__lambda_129;
c_733667.num_args = 1;
c_733667.num_elements = 2;
c_733667.elements = (object *)e_733671;
c_733667.elements[0] = bag_73108_73741;
c_733667.elements[1] = k_731436;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733667, bag_73108_73741);; 
}

static void __lambda_129(void *data, object self_732589, int argc, object *args) /* object self_732589, object r_731437 */
 {

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

static void __lambda_126(void *data, object _, int argc, object *args) /* closure _,object k_731432, object set_73107_73740 */
 {
object k_731432 = args[0]; object set_73107_73740 = args[1];
  Cyc_st_add(data, "srfi/113.sld:set-element-comparator");

closureN_type c_733660;
object e_733664 [2];
c_733660.hdr.mark = gc_color_red;
 c_733660.hdr.grayed = 0;
c_733660.tag = closureN_tag;
 c_733660.fn = (function_type)__lambda_127;
c_733660.num_args = 1;
c_733660.num_elements = 2;
c_733660.elements = (object *)e_733664;
c_733660.elements[0] = k_731432;
c_733660.elements[1] = set_73107_73740;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733660, set_73107_73740);; 
}

static void __lambda_127(void *data, object self_732588, int argc, object *args) /* object self_732588, object r_731433 */
 {

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

static void __lambda_124(void *data, object _, int argc, object *args) /* closure _,object k_731428, object bag_73104_73737, object element_73105_73738, object default_73106_73739 */
 {
object k_731428 = args[0]; object bag_73104_73737 = args[1]; object element_73105_73738 = args[2]; object default_73106_73739 = args[3];
  Cyc_st_add(data, "srfi/113.sld:bag-member");

closureN_type c_733651;
object e_733657 [4];
c_733651.hdr.mark = gc_color_red;
 c_733651.hdr.grayed = 0;
c_733651.tag = closureN_tag;
 c_733651.fn = (function_type)__lambda_125;
c_733651.num_args = 1;
c_733651.num_elements = 4;
c_733651.elements = (object *)e_733657;
c_733651.elements[0] = bag_73104_73737;
c_733651.elements[1] = default_73106_73739;
c_733651.elements[2] = element_73105_73738;
c_733651.elements[3] = k_731428;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733651, bag_73104_73737);; 
}

static void __lambda_125(void *data, object self_732587, int argc, object *args) /* object self_732587, object r_731429 */
 {

  return_direct_with_clo4(data,  __glo_sob_91member_srfi_113, (((closure)  __glo_sob_91member_srfi_113)->fn),  ((closureN)self_732587)->elements[3], ((closureN)self_732587)->elements[0], ((closureN)self_732587)->elements[2], ((closureN)self_732587)->elements[1]);; 
}

static void __lambda_122(void *data, object _, int argc, object *args) /* closure _,object k_731424, object set_73101_73734, object element_73102_73735, object default_73103_73736 */
 {
object k_731424 = args[0]; object set_73101_73734 = args[1]; object element_73102_73735 = args[2]; object default_73103_73736 = args[3];
  Cyc_st_add(data, "srfi/113.sld:set-member");

closureN_type c_733642;
object e_733648 [4];
c_733642.hdr.mark = gc_color_red;
 c_733642.hdr.grayed = 0;
c_733642.tag = closureN_tag;
 c_733642.fn = (function_type)__lambda_123;
c_733642.num_args = 1;
c_733642.num_elements = 4;
c_733642.elements = (object *)e_733648;
c_733642.elements[0] = default_73103_73736;
c_733642.elements[1] = element_73102_73735;
c_733642.elements[2] = k_731424;
c_733642.elements[3] = set_73101_73734;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733642, set_73101_73734);; 
}

static void __lambda_123(void *data, object self_732586, int argc, object *args) /* object self_732586, object r_731425 */
 {

  return_direct_with_clo4(data,  __glo_sob_91member_srfi_113, (((closure)  __glo_sob_91member_srfi_113)->fn),  ((closureN)self_732586)->elements[2], ((closureN)self_732586)->elements[3], ((closureN)self_732586)->elements[1], ((closureN)self_732586)->elements[0]);; 
}

static void __lambda_109(void *data, object _, int argc, object *args) /* closure _,object k_731410, object sob_7393_73723, object element_7394_73724, object default_7395_73725 */
 {
object k_731410 = args[0]; object sob_7393_73723 = args[1]; object element_7394_73724 = args[2]; object default_7395_73725 = args[3];
  Cyc_st_add(data, "srfi/113.sld:sob-member");

closureN_type c_733577;
object e_733639 [4];
c_733577.hdr.mark = gc_color_red;
 c_733577.hdr.grayed = 0;
c_733577.tag = closureN_tag;
 c_733577.fn = (function_type)__lambda_110;
c_733577.num_args = 1;
c_733577.num_elements = 4;
c_733577.elements = (object *)e_733639;
c_733577.elements[0] = default_7395_73725;
c_733577.elements[1] = element_7394_73724;
c_733577.elements[2] = k_731410;
c_733577.elements[3] = sob_7393_73723;

return_direct_with_clo1(data,(closure)&c_733577,__lambda_110,  boolean_f);; 
}

static void __lambda_110(void *data, object self_732573, int argc, object *args) /* object self_732573, object same_127_73727 */
 {
 object same_127_73727 = args[0];
  
closureN_type c_733579;
object e_733635 [4];
c_733579.hdr.mark = gc_color_red;
 c_733579.hdr.grayed = 0;
c_733579.tag = closureN_tag;
 c_733579.fn = (function_type)__lambda_771;
c_733579.num_args = 1;
c_733579.num_elements = 4;
c_733579.elements = (object *)e_733635;
c_733579.elements[0] = ((closureN)self_732573)->elements[0];
c_733579.elements[1] = ((closureN)self_732573)->elements[1];
c_733579.elements[2] = ((closureN)self_732573)->elements[2];
c_733579.elements[3] = ((closureN)self_732573)->elements[3];


pair_type local_733638; 
return_direct_with_clo1(data,(closure)&c_733579,__lambda_771,  set_cell_as_expr(&local_733638, same_127_73727));; 
}

static void __lambda_771(void *data, object self_732574, int argc, object *args) /* object self_732574, object same_127_73727 */
 {
 object same_127_73727 = args[0];
  
closureN_type c_733581;
object e_733624 [5];
c_733581.hdr.mark = gc_color_red;
 c_733581.hdr.grayed = 0;
c_733581.tag = closureN_tag;
 c_733581.fn = (function_type)__lambda_111;
c_733581.num_args = 1;
c_733581.num_elements = 5;
c_733581.elements = (object *)e_733624;
c_733581.elements[0] = ((closureN)self_732574)->elements[0];
c_733581.elements[1] = ((closureN)self_732574)->elements[1];
c_733581.elements[2] = ((closureN)self_732574)->elements[2];
c_733581.elements[3] = same_127_73727;
c_733581.elements[4] = ((closureN)self_732574)->elements[3];


closureN_type c_733625;
object e_733634 [1];
c_733625.hdr.mark = gc_color_red;
 c_733625.hdr.grayed = 0;
c_733625.tag = closureN_tag;
 c_733625.fn = (function_type)__lambda_120;
c_733625.num_args = 2;
c_733625.num_elements = 1;
c_733625.elements = (object *)e_733634;
c_733625.elements[0] = ((closureN)self_732574)->elements[3];

return_direct_with_clo1(data,(closure)&c_733581,__lambda_111,  &c_733625);; 
}

static void __lambda_120(void *data, object self_732575, int argc, object *args) /* object self_732575, object k_731420, object a_7396_73729, object b_7397_73730 */
 {
 object k_731420 = args[0]; object a_7396_73729 = args[1]; object b_7397_73730 = args[2];
  
closureN_type c_733627;
object e_733632 [3];
c_733627.hdr.mark = gc_color_red;
 c_733627.hdr.grayed = 0;
c_733627.tag = closureN_tag;
 c_733627.fn = (function_type)__lambda_121;
c_733627.num_args = 1;
c_733627.num_elements = 3;
c_733627.elements = (object *)e_733632;
c_733627.elements[0] = a_7396_73729;
c_733627.elements[1] = b_7397_73730;
c_733627.elements[2] = k_731420;

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_733627, ((closureN)self_732575)->elements[0]);; 
}

static void __lambda_121(void *data, object self_732576, int argc, object *args) /* object self_732576, object r_731421 */
 {
 object r_731421 = args[0];
  return_direct_with_clo4(data,  __glo__123_127_srfi_128, (((closure)  __glo__123_127_srfi_128)->fn),  ((closureN)self_732576)->elements[2], r_731421, ((closureN)self_732576)->elements[0], ((closureN)self_732576)->elements[1]);; 
}

static void __lambda_111(void *data, object self_732577, int argc, object *args) /* object self_732577, object r_731419 */
 {
 object r_731419 = args[0];
  
closureN_type c_733583;
object e_733620 [5];
c_733583.hdr.mark = gc_color_red;
 c_733583.hdr.grayed = 0;
c_733583.tag = closureN_tag;
 c_733583.fn = (function_type)__lambda_112;
c_733583.num_args = 1;
c_733583.num_elements = 5;
c_733583.elements = (object *)e_733620;
c_733583.elements[0] = ((closureN)self_732577)->elements[0];
c_733583.elements[1] = ((closureN)self_732577)->elements[1];
c_733583.elements[2] = ((closureN)self_732577)->elements[2];
c_733583.elements[3] = ((closureN)self_732577)->elements[3];
c_733583.elements[4] = ((closureN)self_732577)->elements[4];



return_direct_with_clo1(data,(closure)&c_733583,__lambda_112,  Cyc_set_cell(data, ((closureN)self_732577)->elements[3], r_731419));; 
}

static void __lambda_112(void *data, object self_732578, int argc, object *args) /* object self_732578, object r_731411 */
 {

  
closureN_type c_733585;
object e_733588 [1];
c_733585.hdr.mark = gc_color_red;
 c_733585.hdr.grayed = 0;
c_733585.tag = closureN_tag;
 c_733585.fn = (function_type)__lambda_113;
c_733585.num_args = 1;
c_733585.num_elements = 1;
c_733585.elements = (object *)e_733588;
c_733585.elements[0] = ((closureN)self_732578)->elements[2];


closureN_type c_733589;
object e_733619 [4];
c_733589.hdr.mark = gc_color_red;
 c_733589.hdr.grayed = 0;
c_733589.tag = closureN_tag;
 c_733589.fn = (function_type)__lambda_114;
c_733589.num_args = 1;
c_733589.num_elements = 4;
c_733589.elements = (object *)e_733619;
c_733589.elements[0] = ((closureN)self_732578)->elements[0];
c_733589.elements[1] = ((closureN)self_732578)->elements[1];
c_733589.elements[2] = ((closureN)self_732578)->elements[3];
c_733589.elements[3] = ((closureN)self_732578)->elements[4];

return_direct_with_clo1(data,(closure)&c_733585,__lambda_113,  &c_733589);; 
}

static void __lambda_114(void *data, object self_732579, int argc, object *args) /* object self_732579, object k_731413, object return_7398_73731 */
 {
 object k_731413 = args[0]; object return_7398_73731 = args[1];
  
closureN_type c_733591;
object e_733603 [3];
c_733591.hdr.mark = gc_color_red;
 c_733591.hdr.grayed = 0;
c_733591.tag = closureN_tag;
 c_733591.fn = (function_type)__lambda_115;
c_733591.num_args = 1;
c_733591.num_elements = 3;
c_733591.elements = (object *)e_733603;
c_733591.elements[0] = ((closureN)self_732579)->elements[0];
c_733591.elements[1] = k_731413;
c_733591.elements[2] = ((closureN)self_732579)->elements[3];


closureN_type c_733604;
object e_733618 [3];
c_733604.hdr.mark = gc_color_red;
 c_733604.hdr.grayed = 0;
c_733604.tag = closureN_tag;
 c_733604.fn = (function_type)__lambda_118;
c_733604.num_args = 2;
c_733604.num_elements = 3;
c_733604.elements = (object *)e_733618;
c_733604.elements[0] = ((closureN)self_732579)->elements[1];
c_733604.elements[1] = return_7398_73731;
c_733604.elements[2] = ((closureN)self_732579)->elements[2];

return_direct_with_clo1(data,(closure)&c_733591,__lambda_115,  &c_733604);; 
}

static void __lambda_118(void *data, object self_732580, int argc, object *args) /* object self_732580, object k_731417, object key_7399_73732, object val_73100_73733 */
 {
 object k_731417 = args[0]; object key_7399_73732 = args[1];
  


closureN_type c_733609;
object e_733616 [3];
c_733609.hdr.mark = gc_color_red;
 c_733609.hdr.grayed = 0;
c_733609.tag = closureN_tag;
 c_733609.fn = (function_type)__lambda_119;
c_733609.num_args = 1;
c_733609.num_elements = 3;
c_733609.elements = (object *)e_733616;
c_733609.elements[0] = k_731417;
c_733609.elements[1] = key_7399_73732;
c_733609.elements[2] = ((closureN)self_732580)->elements[1];

return_closcall3(data,  car(((closureN)self_732580)->elements[2]),  &c_733609, key_7399_73732, ((closureN)self_732580)->elements[0]);; 
}

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

static void __lambda_115(void *data, object self_732582, int argc, object *args) /* object self_732582, object r_731415 */
 {
 object r_731415 = args[0];
  
closureN_type c_733593;
object e_733601 [3];
c_733593.hdr.mark = gc_color_red;
 c_733593.hdr.grayed = 0;
c_733593.tag = closureN_tag;
 c_733593.fn = (function_type)__lambda_116;
c_733593.num_args = 1;
c_733593.num_elements = 3;
c_733593.elements = (object *)e_733601;
c_733593.elements[0] = ((closureN)self_732582)->elements[0];
c_733593.elements[1] = ((closureN)self_732582)->elements[1];
c_733593.elements[2] = r_731415;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733593, ((closureN)self_732582)->elements[2]);; 
}

static void __lambda_116(void *data, object self_732583, int argc, object *args) /* object self_732583, object r_731416 */
 {
 object r_731416 = args[0];
  
closureN_type c_733595;
object e_733599 [2];
c_733595.hdr.mark = gc_color_red;
 c_733595.hdr.grayed = 0;
c_733595.tag = closureN_tag;
 c_733595.fn = (function_type)__lambda_117;
c_733595.num_args = 1;
c_733595.num_elements = 2;
c_733595.elements = (object *)e_733599;
c_733595.elements[0] = ((closureN)self_732583)->elements[0];
c_733595.elements[1] = ((closureN)self_732583)->elements[1];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_733595, r_731416, ((closureN)self_732583)->elements[2]);; 
}

static void __lambda_117(void *data, object self_732584, int argc, object *args) /* object self_732584, object r_731414_732453 */
 {

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

static void __lambda_113(void *data, object self_732585, int argc, object *args) /* object self_732585, object r_731412 */
 {
 object r_731412 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_732585)->elements[0], r_731412);; 
}

static void __lambda_104(void *data, object _, int argc, object *args) /* closure _,object k_731403, object a_7390_73721, object b_7391_73722 */
 {
object k_731403 = args[0]; object a_7390_73721 = args[1]; object b_7391_73722 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-disjoint?");

closureN_type c_733553;
object e_733574 [3];
c_733553.hdr.mark = gc_color_red;
 c_733553.hdr.grayed = 0;
c_733553.tag = closureN_tag;
 c_733553.fn = (function_type)__lambda_105;
c_733553.num_args = 1;
c_733553.num_elements = 3;
c_733553.elements = (object *)e_733574;
c_733553.elements[0] = a_7390_73721;
c_733553.elements[1] = b_7391_73722;
c_733553.elements[2] = k_731403;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733553, a_7390_73721);; 
}

static void __lambda_105(void *data, object self_732569, int argc, object *args) /* object self_732569, object r_731404 */
 {

  
closureN_type c_733555;
object e_733572 [3];
c_733555.hdr.mark = gc_color_red;
 c_733555.hdr.grayed = 0;
c_733555.tag = closureN_tag;
 c_733555.fn = (function_type)__lambda_106;
c_733555.num_args = 1;
c_733555.num_elements = 3;
c_733555.elements = (object *)e_733572;
c_733555.elements[0] = ((closureN)self_732569)->elements[0];
c_733555.elements[1] = ((closureN)self_732569)->elements[1];
c_733555.elements[2] = ((closureN)self_732569)->elements[2];

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733555, ((closureN)self_732569)->elements[1]);; 
}

static void __lambda_106(void *data, object self_732570, int argc, object *args) /* object self_732570, object r_731405 */
 {

  
closureN_type c_733557;
object e_733569 [3];
c_733557.hdr.mark = gc_color_red;
 c_733557.hdr.grayed = 0;
c_733557.tag = closureN_tag;
 c_733557.fn = (function_type)__lambda_107;
c_733557.num_args = 1;
c_733557.num_elements = 3;
c_733557.elements = (object *)e_733569;
c_733557.elements[0] = ((closureN)self_732570)->elements[0];
c_733557.elements[1] = ((closureN)self_732570)->elements[1];
c_733557.elements[2] = ((closureN)self_732570)->elements[2];

return_direct_with_clo3(data,  __glo_check_91same_91comparator_srfi_113, (((closure)  __glo_check_91same_91comparator_srfi_113)->fn),  &c_733557, ((closureN)self_732570)->elements[0], ((closureN)self_732570)->elements[1]);; 
}

static void __lambda_107(void *data, object self_732571, int argc, object *args) /* object self_732571, object r_731406 */
 {

  
closureN_type c_733559;
object e_733566 [3];
c_733559.hdr.mark = gc_color_red;
 c_733559.hdr.grayed = 0;
c_733559.tag = closureN_tag;
 c_733559.fn = (function_type)__lambda_108;
c_733559.num_args = 1;
c_733559.num_elements = 3;
c_733559.elements = (object *)e_733566;
c_733559.elements[0] = ((closureN)self_732571)->elements[0];
c_733559.elements[1] = ((closureN)self_732571)->elements[1];
c_733559.elements[2] = ((closureN)self_732571)->elements[2];

return_direct_with_clo3(data,  __glo_sob_91half_91disjoint_127_srfi_113, (((closure)  __glo_sob_91half_91disjoint_127_srfi_113)->fn),  &c_733559, ((closureN)self_732571)->elements[0], ((closureN)self_732571)->elements[1]);; 
}

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

static void __lambda_99(void *data, object _, int argc, object *args) /* closure _,object k_731396, object a_7387_73719, object b_7388_73720 */
 {
object k_731396 = args[0]; object a_7387_73719 = args[1]; object b_7388_73720 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-disjoint?");

closureN_type c_733529;
object e_733550 [3];
c_733529.hdr.mark = gc_color_red;
 c_733529.hdr.grayed = 0;
c_733529.tag = closureN_tag;
 c_733529.fn = (function_type)__lambda_100;
c_733529.num_args = 1;
c_733529.num_elements = 3;
c_733529.elements = (object *)e_733550;
c_733529.elements[0] = a_7387_73719;
c_733529.elements[1] = b_7388_73720;
c_733529.elements[2] = k_731396;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733529, a_7387_73719);; 
}

static void __lambda_100(void *data, object self_732565, int argc, object *args) /* object self_732565, object r_731397 */
 {

  
closureN_type c_733531;
object e_733548 [3];
c_733531.hdr.mark = gc_color_red;
 c_733531.hdr.grayed = 0;
c_733531.tag = closureN_tag;
 c_733531.fn = (function_type)__lambda_101;
c_733531.num_args = 1;
c_733531.num_elements = 3;
c_733531.elements = (object *)e_733548;
c_733531.elements[0] = ((closureN)self_732565)->elements[0];
c_733531.elements[1] = ((closureN)self_732565)->elements[1];
c_733531.elements[2] = ((closureN)self_732565)->elements[2];

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733531, ((closureN)self_732565)->elements[1]);; 
}

static void __lambda_101(void *data, object self_732566, int argc, object *args) /* object self_732566, object r_731398 */
 {

  
closureN_type c_733533;
object e_733545 [3];
c_733533.hdr.mark = gc_color_red;
 c_733533.hdr.grayed = 0;
c_733533.tag = closureN_tag;
 c_733533.fn = (function_type)__lambda_102;
c_733533.num_args = 1;
c_733533.num_elements = 3;
c_733533.elements = (object *)e_733545;
c_733533.elements[0] = ((closureN)self_732566)->elements[0];
c_733533.elements[1] = ((closureN)self_732566)->elements[1];
c_733533.elements[2] = ((closureN)self_732566)->elements[2];

return_direct_with_clo3(data,  __glo_check_91same_91comparator_srfi_113, (((closure)  __glo_check_91same_91comparator_srfi_113)->fn),  &c_733533, ((closureN)self_732566)->elements[0], ((closureN)self_732566)->elements[1]);; 
}

static void __lambda_102(void *data, object self_732567, int argc, object *args) /* object self_732567, object r_731399 */
 {

  
closureN_type c_733535;
object e_733542 [3];
c_733535.hdr.mark = gc_color_red;
 c_733535.hdr.grayed = 0;
c_733535.tag = closureN_tag;
 c_733535.fn = (function_type)__lambda_103;
c_733535.num_args = 1;
c_733535.num_elements = 3;
c_733535.elements = (object *)e_733542;
c_733535.elements[0] = ((closureN)self_732567)->elements[0];
c_733535.elements[1] = ((closureN)self_732567)->elements[1];
c_733535.elements[2] = ((closureN)self_732567)->elements[2];

return_direct_with_clo3(data,  __glo_sob_91half_91disjoint_127_srfi_113, (((closure)  __glo_sob_91half_91disjoint_127_srfi_113)->fn),  &c_733535, ((closureN)self_732567)->elements[0], ((closureN)self_732567)->elements[1]);; 
}

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

static void __lambda_89(void *data, object _, int argc, object *args) /* closure _,object k_731385, object a_7380_73712, object b_7381_73713 */
 {
object k_731385 = args[0]; object a_7380_73712 = args[1]; object b_7381_73713 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-half-disjoint?");

closureN_type c_733490;
object e_733526 [2];
c_733490.hdr.mark = gc_color_red;
 c_733490.hdr.grayed = 0;
c_733490.tag = closureN_tag;
 c_733490.fn = (function_type)__lambda_90;
c_733490.num_args = 1;
c_733490.num_elements = 2;
c_733490.elements = (object *)e_733526;
c_733490.elements[0] = b_7381_73713;
c_733490.elements[1] = k_731385;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733490, a_7380_73712);; 
}

static void __lambda_90(void *data, object self_732556, int argc, object *args) /* object self_732556, object r_731386 */
 {
 object r_731386 = args[0];
  
closureN_type c_733492;
object e_733524 [2];
c_733492.hdr.mark = gc_color_red;
 c_733492.hdr.grayed = 0;
c_733492.tag = closureN_tag;
 c_733492.fn = (function_type)__lambda_91;
c_733492.num_args = 1;
c_733492.num_elements = 2;
c_733492.elements = (object *)e_733524;
c_733492.elements[0] = ((closureN)self_732556)->elements[1];
c_733492.elements[1] = r_731386;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733492, ((closureN)self_732556)->elements[0]);; 
}

static void __lambda_91(void *data, object self_732557, int argc, object *args) /* object self_732557, object r_731387 */
 {
 object r_731387 = args[0];
  
closureN_type c_733494;
object e_733522 [1];
c_733494.hdr.mark = gc_color_red;
 c_733494.hdr.grayed = 0;
c_733494.tag = closureN_tag;
 c_733494.fn = (function_type)__lambda_92;
c_733494.num_args = 2;
c_733494.num_elements = 1;
c_733494.elements = (object *)e_733522;
c_733494.elements[0] = ((closureN)self_732557)->elements[0];

return_direct_with_clo2(data,(closure)&c_733494,__lambda_92,  ((closureN)self_732557)->elements[1], r_731387);; 
}

static void __lambda_92(void *data, object self_732558, int argc, object *args) /* object self_732558, object ha_7382_73714, object hb_7383_73715 */
 {
 object ha_7382_73714 = args[0]; object hb_7383_73715 = args[1];
  
closureN_type c_733496;
object e_733499 [1];
c_733496.hdr.mark = gc_color_red;
 c_733496.hdr.grayed = 0;
c_733496.tag = closureN_tag;
 c_733496.fn = (function_type)__lambda_93;
c_733496.num_args = 1;
c_733496.num_elements = 1;
c_733496.elements = (object *)e_733499;
c_733496.elements[0] = ((closureN)self_732558)->elements[0];


closureN_type c_733500;
object e_733521 [2];
c_733500.hdr.mark = gc_color_red;
 c_733500.hdr.grayed = 0;
c_733500.tag = closureN_tag;
 c_733500.fn = (function_type)__lambda_94;
c_733500.num_args = 1;
c_733500.num_elements = 2;
c_733500.elements = (object *)e_733521;
c_733500.elements[0] = ha_7382_73714;
c_733500.elements[1] = hb_7383_73715;

return_direct_with_clo1(data,(closure)&c_733496,__lambda_93,  &c_733500);; 
}

static void __lambda_94(void *data, object self_732559, int argc, object *args) /* object self_732559, object k_731389, object return_7384_73716 */
 {
 object k_731389 = args[0]; object return_7384_73716 = args[1];
  
closureN_type c_733502;
object e_733509 [2];
c_733502.hdr.mark = gc_color_red;
 c_733502.hdr.grayed = 0;
c_733502.tag = closureN_tag;
 c_733502.fn = (function_type)__lambda_95;
c_733502.num_args = 1;
c_733502.num_elements = 2;
c_733502.elements = (object *)e_733509;
c_733502.elements[0] = ((closureN)self_732559)->elements[0];
c_733502.elements[1] = k_731389;


closureN_type c_733510;
object e_733520 [2];
c_733510.hdr.mark = gc_color_red;
 c_733510.hdr.grayed = 0;
c_733510.tag = closureN_tag;
 c_733510.fn = (function_type)__lambda_97;
c_733510.num_args = 2;
c_733510.num_elements = 2;
c_733510.elements = (object *)e_733520;
c_733510.elements[0] = ((closureN)self_732559)->elements[1];
c_733510.elements[1] = return_7384_73716;

return_direct_with_clo1(data,(closure)&c_733502,__lambda_95,  &c_733510);; 
}

static void __lambda_97(void *data, object self_732560, int argc, object *args) /* object self_732560, object k_731392, object key_7385_73717, object val_7386_73718 */
 {
 object k_731392 = args[0]; object key_7385_73717 = args[1];
  
closureN_type c_733512;
object e_733518 [2];
c_733512.hdr.mark = gc_color_red;
 c_733512.hdr.grayed = 0;
c_733512.tag = closureN_tag;
 c_733512.fn = (function_type)__lambda_98;
c_733512.num_args = 1;
c_733512.num_elements = 2;
c_733512.elements = (object *)e_733518;
c_733512.elements[0] = k_731392;
c_733512.elements[1] = ((closureN)self_732560)->elements[1];

return_direct_with_clo3(data,  __glo_hash_91table_91contains_127_srfi_113, (((closure)  __glo_hash_91table_91contains_127_srfi_113)->fn),  &c_733512, ((closureN)self_732560)->elements[0], key_7385_73717);; 
}

static void __lambda_98(void *data, object self_732561, int argc, object *args) /* object self_732561, object r_731393 */
 {
 object r_731393 = args[0];
  if( (boolean_f != r_731393) ){ 
  return_closcall2(data,  ((closureN)self_732561)->elements[1],  ((closureN)self_732561)->elements[0], boolean_f);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732561)->elements[0], (((closure)  ((closureN)self_732561)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_95(void *data, object self_732562, int argc, object *args) /* object self_732562, object r_731391 */
 {
 object r_731391 = args[0];
  
closureN_type c_733504;
object e_733507 [1];
c_733504.hdr.mark = gc_color_red;
 c_733504.hdr.grayed = 0;
c_733504.tag = closureN_tag;
 c_733504.fn = (function_type)__lambda_96;
c_733504.num_args = 1;
c_733504.num_elements = 1;
c_733504.elements = (object *)e_733507;
c_733504.elements[0] = ((closureN)self_732562)->elements[1];

return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  &c_733504, ((closureN)self_732562)->elements[0], r_731391);; 
}

static void __lambda_96(void *data, object self_732563, int argc, object *args) /* object self_732563, object r_731390_732452 */
 {

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

static void __lambda_93(void *data, object self_732564, int argc, object *args) /* object self_732564, object r_731388 */
 {
 object r_731388 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_732564)->elements[0], r_731388);; 
}

static void __lambda_87(void *data, object _, int argc, object *args) /* closure _,object k_731381, object bag_7379_73711 */
 {
object k_731381 = args[0]; object bag_7379_73711 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag-empty?");

closureN_type c_733483;
object e_733487 [2];
c_733483.hdr.mark = gc_color_red;
 c_733483.hdr.grayed = 0;
c_733483.tag = closureN_tag;
 c_733483.fn = (function_type)__lambda_88;
c_733483.num_args = 1;
c_733483.num_elements = 2;
c_733483.elements = (object *)e_733487;
c_733483.elements[0] = bag_7379_73711;
c_733483.elements[1] = k_731381;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733483, bag_7379_73711);; 
}

static void __lambda_88(void *data, object self_732555, int argc, object *args) /* object self_732555, object r_731382 */
 {

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

static void __lambda_85(void *data, object _, int argc, object *args) /* closure _,object k_731377, object set_7378_73710 */
 {
object k_731377 = args[0]; object set_7378_73710 = args[1];
  Cyc_st_add(data, "srfi/113.sld:set-empty?");

closureN_type c_733476;
object e_733480 [2];
c_733476.hdr.mark = gc_color_red;
 c_733476.hdr.grayed = 0;
c_733476.tag = closureN_tag;
 c_733476.fn = (function_type)__lambda_86;
c_733476.num_args = 1;
c_733476.num_elements = 2;
c_733476.elements = (object *)e_733480;
c_733476.elements[0] = k_731377;
c_733476.elements[1] = set_7378_73710;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733476, set_7378_73710);; 
}

static void __lambda_86(void *data, object self_732554, int argc, object *args) /* object self_732554, object r_731378 */
 {

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

static void __lambda_82(void *data, object _, int argc, object *args) /* closure _,object k_731372, object sob_7377_73709 */
 {
object k_731372 = args[0]; object sob_7377_73709 = args[1];
  Cyc_st_add(data, "srfi/113.sld:sob-empty?");

closureN_type c_733465;
object e_733473 [1];
c_733465.hdr.mark = gc_color_red;
 c_733465.hdr.grayed = 0;
c_733465.tag = closureN_tag;
 c_733465.fn = (function_type)__lambda_83;
c_733465.num_args = 1;
c_733465.num_elements = 1;
c_733465.elements = (object *)e_733473;
c_733465.elements[0] = k_731372;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733465, sob_7377_73709);; 
}

static void __lambda_83(void *data, object self_732552, int argc, object *args) /* object self_732552, object r_731374 */
 {
 object r_731374 = args[0];
  
closureN_type c_733467;
object e_733472 [1];
c_733467.hdr.mark = gc_color_red;
 c_733467.hdr.grayed = 0;
c_733467.tag = closureN_tag;
 c_733467.fn = (function_type)__lambda_84;
c_733467.num_args = 1;
c_733467.num_elements = 1;
c_733467.elements = (object *)e_733472;
c_733467.elements[0] = ((closureN)self_732552)->elements[0];

return_direct_with_clo2(data,  __glo_hash_91table_91size_srfi_69, (((closure)  __glo_hash_91table_91size_srfi_69)->fn),  &c_733467, r_731374);; 
}

static void __lambda_84(void *data, object self_732553, int argc, object *args) /* object self_732553, object r_731373 */
 {
 object r_731373 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_732553)->elements[0], (((closure)  ((closureN)self_732553)->elements[0])->fn),  Cyc_num_fast_eq_op(data, obj_int2obj(0), r_731373));; 
}

static void __lambda_80(void *data, object _, int argc, object *args) /* closure _,object k_731368, object bag_7375_73707, object member_7376_73708 */
 {
object k_731368 = args[0]; object bag_7375_73707 = args[1]; object member_7376_73708 = args[2];
  Cyc_st_add(data, "srfi/113.sld:bag-contains?");

closureN_type c_733457;
object e_733462 [3];
c_733457.hdr.mark = gc_color_red;
 c_733457.hdr.grayed = 0;
c_733457.tag = closureN_tag;
 c_733457.fn = (function_type)__lambda_81;
c_733457.num_args = 1;
c_733457.num_elements = 3;
c_733457.elements = (object *)e_733462;
c_733457.elements[0] = bag_7375_73707;
c_733457.elements[1] = k_731368;
c_733457.elements[2] = member_7376_73708;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733457, bag_7375_73707);; 
}

static void __lambda_81(void *data, object self_732551, int argc, object *args) /* object self_732551, object r_731369 */
 {

  return_direct_with_clo3(data,  __glo_sob_91contains_127_srfi_113, (((closure)  __glo_sob_91contains_127_srfi_113)->fn),  ((closureN)self_732551)->elements[1], ((closureN)self_732551)->elements[0], ((closureN)self_732551)->elements[2]);; 
}

static void __lambda_78(void *data, object _, int argc, object *args) /* closure _,object k_731364, object set_7373_73705, object member_7374_73706 */
 {
object k_731364 = args[0]; object set_7373_73705 = args[1]; object member_7374_73706 = args[2];
  Cyc_st_add(data, "srfi/113.sld:set-contains?");

closureN_type c_733449;
object e_733454 [3];
c_733449.hdr.mark = gc_color_red;
 c_733449.hdr.grayed = 0;
c_733449.tag = closureN_tag;
 c_733449.fn = (function_type)__lambda_79;
c_733449.num_args = 1;
c_733449.num_elements = 3;
c_733449.elements = (object *)e_733454;
c_733449.elements[0] = k_731364;
c_733449.elements[1] = member_7374_73706;
c_733449.elements[2] = set_7373_73705;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733449, set_7373_73705);; 
}

static void __lambda_79(void *data, object self_732550, int argc, object *args) /* object self_732550, object r_731365 */
 {

  return_direct_with_clo3(data,  __glo_sob_91contains_127_srfi_113, (((closure)  __glo_sob_91contains_127_srfi_113)->fn),  ((closureN)self_732550)->elements[0], ((closureN)self_732550)->elements[2], ((closureN)self_732550)->elements[1]);; 
}

static void __lambda_76(void *data, object _, int argc, object *args) /* closure _,object k_731360, object sob_7371_73703, object member_7372_73704 */
 {
object k_731360 = args[0]; object sob_7371_73703 = args[1]; object member_7372_73704 = args[2];
  Cyc_st_add(data, "srfi/113.sld:sob-contains?");

closureN_type c_733442;
object e_733446 [2];
c_733442.hdr.mark = gc_color_red;
 c_733442.hdr.grayed = 0;
c_733442.tag = closureN_tag;
 c_733442.fn = (function_type)__lambda_77;
c_733442.num_args = 1;
c_733442.num_elements = 2;
c_733442.elements = (object *)e_733446;
c_733442.elements[0] = k_731360;
c_733442.elements[1] = member_7372_73704;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733442, sob_7371_73703);; 
}

static void __lambda_77(void *data, object self_732549, int argc, object *args) /* object self_732549, object r_731361 */
 {
 object r_731361 = args[0];
  return_direct_with_clo3(data,  __glo_hash_91table_91contains_127_srfi_113, (((closure)  __glo_hash_91table_91contains_127_srfi_113)->fn),  ((closureN)self_732549)->elements[0], r_731361, ((closureN)self_732549)->elements[1]);; 
}

static void __lambda_75(void *data, object _, int argc, object *args) /* closure _,object k_731357, object continue_127_7366_73698, object mapper_7367_73699, object successor_7368_73700, object seed_7369_73701, object comparator_7370_73702 */
 {
object k_731357 = args[0]; object continue_127_7366_73698 = args[1]; object mapper_7367_73699 = args[2]; object successor_7368_73700 = args[3]; object seed_7369_73701 = args[4]; object comparator_7370_73702 = args[5];
  Cyc_st_add(data, "srfi/113.sld:bag-unfold");
return_direct_with_clo7(data,  __glo_sob_91unfold_srfi_113, (((closure)  __glo_sob_91unfold_srfi_113)->fn),  k_731357, continue_127_7366_73698, mapper_7367_73699, successor_7368_73700, seed_7369_73701, comparator_7370_73702, boolean_t);; 
}

static void __lambda_74(void *data, object _, int argc, object *args) /* closure _,object k_731354, object continue_127_7361_73693, object mapper_7362_73694, object successor_7363_73695, object seed_7364_73696, object comparator_7365_73697 */
 {
object k_731354 = args[0]; object continue_127_7361_73693 = args[1]; object mapper_7362_73694 = args[2]; object successor_7363_73695 = args[3]; object seed_7364_73696 = args[4]; object comparator_7365_73697 = args[5];
  Cyc_st_add(data, "srfi/113.sld:set-unfold");
return_direct_with_clo7(data,  __glo_sob_91unfold_srfi_113, (((closure)  __glo_sob_91unfold_srfi_113)->fn),  k_731354, continue_127_7361_73693, mapper_7362_73694, successor_7363_73695, seed_7364_73696, comparator_7365_73697, boolean_f);; 
}

static void __lambda_63(void *data, object _, int argc, object *args) /* closure _,object k_731343, object stop_127_7350_73683, object mapper_7351_73684, object successor_7352_73685, object seed_7353_73686, object comparator_7354_73687, object multi_127_7355_73688 */
 {
object k_731343 = args[0]; object stop_127_7350_73683 = args[1]; object mapper_7351_73684 = args[2]; object successor_7352_73685 = args[3]; object seed_7353_73686 = args[4]; object comparator_7354_73687 = args[5]; object multi_127_7355_73688 = args[6];
  Cyc_st_add(data, "srfi/113.sld:sob-unfold");

closureN_type c_733378;
object e_733435 [5];
c_733378.hdr.mark = gc_color_red;
 c_733378.hdr.grayed = 0;
c_733378.tag = closureN_tag;
 c_733378.fn = (function_type)__lambda_64;
c_733378.num_args = 1;
c_733378.num_elements = 5;
c_733378.elements = (object *)e_733435;
c_733378.elements[0] = k_731343;
c_733378.elements[1] = mapper_7351_73684;
c_733378.elements[2] = seed_7353_73686;
c_733378.elements[3] = stop_127_7350_73683;
c_733378.elements[4] = successor_7352_73685;

return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  &c_733378, comparator_7354_73687, multi_127_7355_73688);; 
}

static void __lambda_64(void *data, object self_732538, int argc, object *args) /* object self_732538, object result_7356_73689 */
 {
 object result_7356_73689 = args[0];
  
closureN_type c_733380;
object e_733433 [5];
c_733380.hdr.mark = gc_color_red;
 c_733380.hdr.grayed = 0;
c_733380.tag = closureN_tag;
 c_733380.fn = (function_type)__lambda_65;
c_733380.num_args = 1;
c_733380.num_elements = 5;
c_733380.elements = (object *)e_733433;
c_733380.elements[0] = ((closureN)self_732538)->elements[0];
c_733380.elements[1] = ((closureN)self_732538)->elements[1];
c_733380.elements[2] = result_7356_73689;
c_733380.elements[3] = ((closureN)self_732538)->elements[3];
c_733380.elements[4] = ((closureN)self_732538)->elements[4];

return_direct_with_clo1(data,(closure)&c_733380,__lambda_65,  ((closureN)self_732538)->elements[2]);; 
}

static void __lambda_65(void *data, object self_732539, int argc, object *args) /* object self_732539, object seed_7358_73690 */
 {
 object seed_7358_73690 = args[0];
  
closureN_type c_733382;
object e_733432 [6];
c_733382.hdr.mark = gc_color_red;
 c_733382.hdr.grayed = 0;
c_733382.tag = closureN_tag;
 c_733382.fn = (function_type)__lambda_66;
c_733382.num_args = 1;
c_733382.num_elements = 6;
c_733382.elements = (object *)e_733432;
c_733382.elements[0] = ((closureN)self_732539)->elements[0];
c_733382.elements[1] = ((closureN)self_732539)->elements[1];
c_733382.elements[2] = ((closureN)self_732539)->elements[2];
c_733382.elements[3] = seed_7358_73690;
c_733382.elements[4] = ((closureN)self_732539)->elements[3];
c_733382.elements[5] = ((closureN)self_732539)->elements[4];

return_direct_with_clo1(data,(closure)&c_733382,__lambda_66,  boolean_f);; 
}

static void __lambda_66(void *data, object self_732540, int argc, object *args) /* object self_732540, object loop_7359_73691 */
 {
 object loop_7359_73691 = args[0];
  
closureN_type c_733384;
object e_733428 [6];
c_733384.hdr.mark = gc_color_red;
 c_733384.hdr.grayed = 0;
c_733384.tag = closureN_tag;
 c_733384.fn = (function_type)__lambda_770;
c_733384.num_args = 1;
c_733384.num_elements = 6;
c_733384.elements = (object *)e_733428;
c_733384.elements[0] = ((closureN)self_732540)->elements[0];
c_733384.elements[1] = ((closureN)self_732540)->elements[1];
c_733384.elements[2] = ((closureN)self_732540)->elements[2];
c_733384.elements[3] = ((closureN)self_732540)->elements[3];
c_733384.elements[4] = ((closureN)self_732540)->elements[4];
c_733384.elements[5] = ((closureN)self_732540)->elements[5];


pair_type local_733431; 
return_direct_with_clo1(data,(closure)&c_733384,__lambda_770,  set_cell_as_expr(&local_733431, loop_7359_73691));; 
}

static void __lambda_770(void *data, object self_732541, int argc, object *args) /* object self_732541, object loop_7359_73691 */
 {
 object loop_7359_73691 = args[0];
  
closureN_type c_733386;
object e_733399 [3];
c_733386.hdr.mark = gc_color_red;
 c_733386.hdr.grayed = 0;
c_733386.tag = closureN_tag;
 c_733386.fn = (function_type)__lambda_67;
c_733386.num_args = 1;
c_733386.num_elements = 3;
c_733386.elements = (object *)e_733399;
c_733386.elements[0] = ((closureN)self_732541)->elements[0];
c_733386.elements[1] = loop_7359_73691;
c_733386.elements[2] = ((closureN)self_732541)->elements[3];


closureN_type c_733400;
object e_733427 [5];
c_733400.hdr.mark = gc_color_red;
 c_733400.hdr.grayed = 0;
c_733400.tag = closureN_tag;
 c_733400.fn = (function_type)__lambda_69;
c_733400.num_args = 1;
c_733400.num_elements = 5;
c_733400.elements = (object *)e_733427;
c_733400.elements[0] = loop_7359_73691;
c_733400.elements[1] = ((closureN)self_732541)->elements[1];
c_733400.elements[2] = ((closureN)self_732541)->elements[2];
c_733400.elements[3] = ((closureN)self_732541)->elements[4];
c_733400.elements[4] = ((closureN)self_732541)->elements[5];

return_direct_with_clo1(data,(closure)&c_733386,__lambda_67,  &c_733400);; 
}

static void __lambda_69(void *data, object self_732542, int argc, object *args) /* object self_732542, object k_731347, object seed_7360_73692 */
 {
 object k_731347 = args[0]; object seed_7360_73692 = args[1];
  
closureN_type c_733403;
object e_733426 [6];
c_733403.hdr.mark = gc_color_red;
 c_733403.hdr.grayed = 0;
c_733403.tag = closureN_tag;
 c_733403.fn = (function_type)__lambda_70;
c_733403.num_args = 1;
c_733403.num_elements = 6;
c_733403.elements = (object *)e_733426;
c_733403.elements[0] = k_731347;
c_733403.elements[1] = ((closureN)self_732542)->elements[0];
c_733403.elements[2] = ((closureN)self_732542)->elements[1];
c_733403.elements[3] = ((closureN)self_732542)->elements[2];
c_733403.elements[4] = seed_7360_73692;
c_733403.elements[5] = ((closureN)self_732542)->elements[4];

return_closcall2(data,  ((closureN)self_732542)->elements[3],  &c_733403, seed_7360_73692);; 
}

static void __lambda_70(void *data, object self_732543, int argc, object *args) /* object self_732543, object r_731348 */
 {
 object r_731348 = args[0];
  if( (boolean_f != r_731348) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732543)->elements[0], (((closure)  ((closureN)self_732543)->elements[0])->fn),  ((closureN)self_732543)->elements[3]);
} else { 
  
closureN_type c_733409;
object e_733424 [5];
c_733409.hdr.mark = gc_color_red;
 c_733409.hdr.grayed = 0;
c_733409.tag = closureN_tag;
 c_733409.fn = (function_type)__lambda_71;
c_733409.num_args = 1;
c_733409.num_elements = 5;
c_733409.elements = (object *)e_733424;
c_733409.elements[0] = ((closureN)self_732543)->elements[0];
c_733409.elements[1] = ((closureN)self_732543)->elements[1];
c_733409.elements[2] = ((closureN)self_732543)->elements[3];
c_733409.elements[3] = ((closureN)self_732543)->elements[4];
c_733409.elements[4] = ((closureN)self_732543)->elements[5];

return_closcall2(data,  ((closureN)self_732543)->elements[2],  &c_733409, ((closureN)self_732543)->elements[4]);}
;; 
}

static void __lambda_71(void *data, object self_732544, int argc, object *args) /* object self_732544, object r_731351 */
 {
 object r_731351 = args[0];
  
closureN_type c_733411;
object e_733422 [4];
c_733411.hdr.mark = gc_color_red;
 c_733411.hdr.grayed = 0;
c_733411.tag = closureN_tag;
 c_733411.fn = (function_type)__lambda_72;
c_733411.num_args = 1;
c_733411.num_elements = 4;
c_733411.elements = (object *)e_733422;
c_733411.elements[0] = ((closureN)self_732544)->elements[0];
c_733411.elements[1] = ((closureN)self_732544)->elements[1];
c_733411.elements[2] = ((closureN)self_732544)->elements[3];
c_733411.elements[3] = ((closureN)self_732544)->elements[4];

return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  &c_733411, ((closureN)self_732544)->elements[2], r_731351, obj_int2obj(1));; 
}

static void __lambda_72(void *data, object self_732545, int argc, object *args) /* object self_732545, object r_731349 */
 {

  
closureN_type c_733414;
object e_733420 [2];
c_733414.hdr.mark = gc_color_red;
 c_733414.hdr.grayed = 0;
c_733414.tag = closureN_tag;
 c_733414.fn = (function_type)__lambda_73;
c_733414.num_args = 1;
c_733414.num_elements = 2;
c_733414.elements = (object *)e_733420;
c_733414.elements[0] = ((closureN)self_732545)->elements[0];
c_733414.elements[1] = ((closureN)self_732545)->elements[1];

return_closcall2(data,  ((closureN)self_732545)->elements[3],  &c_733414, ((closureN)self_732545)->elements[2]);; 
}

static void __lambda_73(void *data, object self_732546, int argc, object *args) /* object self_732546, object r_731350 */
 {
 object r_731350 = args[0];
  

return_closcall2(data,  car(((closureN)self_732546)->elements[1]),  ((closureN)self_732546)->elements[0], r_731350);; 
}

static void __lambda_67(void *data, object self_732547, int argc, object *args) /* object self_732547, object r_731346 */
 {
 object r_731346 = args[0];
  
closureN_type c_733388;
object e_733395 [3];
c_733388.hdr.mark = gc_color_red;
 c_733388.hdr.grayed = 0;
c_733388.tag = closureN_tag;
 c_733388.fn = (function_type)__lambda_68;
c_733388.num_args = 1;
c_733388.num_elements = 3;
c_733388.elements = (object *)e_733395;
c_733388.elements[0] = ((closureN)self_732547)->elements[0];
c_733388.elements[1] = ((closureN)self_732547)->elements[1];
c_733388.elements[2] = ((closureN)self_732547)->elements[2];



return_direct_with_clo1(data,(closure)&c_733388,__lambda_68,  Cyc_set_cell(data, ((closureN)self_732547)->elements[1], r_731346));; 
}

static void __lambda_68(void *data, object self_732548, int argc, object *args) /* object self_732548, object r_731345 */
 {

  

return_closcall2(data,  car(((closureN)self_732548)->elements[1]),  ((closureN)self_732548)->elements[0], ((closureN)self_732548)->elements[2]);; 
}

static void __lambda_58(void *data, object _, int argc, object *args) /* closure _,object k_731336, object comparator_7346_73679, object elements_7347_73680_raw, ... */
 {
object k_731336 = args[0]; object comparator_7346_73679 = args[1];
load_varargs(elements_7347_73680, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:bag");

closureN_type c_733360;
object e_733375 [2];
c_733360.hdr.mark = gc_color_red;
 c_733360.hdr.grayed = 0;
c_733360.tag = closureN_tag;
 c_733360.fn = (function_type)__lambda_59;
c_733360.num_args = 1;
c_733360.num_elements = 2;
c_733360.elements = (object *)e_733375;
c_733360.elements[0] = elements_7347_73680;
c_733360.elements[1] = k_731336;

return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  &c_733360, comparator_7346_73679, boolean_t);; 
}

static void __lambda_59(void *data, object self_732534, int argc, object *args) /* object self_732534, object result_7348_73681 */
 {
 object result_7348_73681 = args[0];
  
closureN_type c_733362;
object e_733370 [3];
c_733362.hdr.mark = gc_color_red;
 c_733362.hdr.grayed = 0;
c_733362.tag = closureN_tag;
 c_733362.fn = (function_type)__lambda_60;
c_733362.num_args = 1;
c_733362.num_elements = 3;
c_733362.elements = (object *)e_733370;
c_733362.elements[0] = ((closureN)self_732534)->elements[0];
c_733362.elements[1] = ((closureN)self_732534)->elements[1];
c_733362.elements[2] = result_7348_73681;


closureN_type c_733371;
object e_733374 [1];
c_733371.hdr.mark = gc_color_red;
 c_733371.hdr.grayed = 0;
c_733371.tag = closureN_tag;
 c_733371.fn = (function_type)__lambda_62;
c_733371.num_args = 1;
c_733371.num_elements = 1;
c_733371.elements = (object *)e_733374;
c_733371.elements[0] = result_7348_73681;

return_direct_with_clo1(data,(closure)&c_733362,__lambda_60,  &c_733371);; 
}

static void __lambda_62(void *data, object self_732535, int argc, object *args) /* object self_732535, object k_731340, object x_7349_73682 */
 {
 object k_731340 = args[0]; object x_7349_73682 = args[1];
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  k_731340, ((closureN)self_732535)->elements[0], x_7349_73682, obj_int2obj(1));; 
}

static void __lambda_60(void *data, object self_732536, int argc, object *args) /* object self_732536, object r_731339 */
 {
 object r_731339 = args[0];
  
closureN_type c_733364;
object e_733368 [2];
c_733364.hdr.mark = gc_color_red;
 c_733364.hdr.grayed = 0;
c_733364.tag = closureN_tag;
 c_733364.fn = (function_type)__lambda_61;
c_733364.num_args = 1;
c_733364.num_elements = 2;
c_733364.elements = (object *)e_733368;
c_733364.elements[0] = ((closureN)self_732536)->elements[1];
c_733364.elements[1] = ((closureN)self_732536)->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_733364, r_731339, ((closureN)self_732536)->elements[0]);; 
}

static void __lambda_61(void *data, object self_732537, int argc, object *args) /* object self_732537, object r_731338 */
 {

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

static void __lambda_53(void *data, object _, int argc, object *args) /* closure _,object k_731329, object comparator_7342_73675, object elements_7343_73676_raw, ... */
 {
object k_731329 = args[0]; object comparator_7342_73675 = args[1];
load_varargs(elements_7343_73676, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/113.sld:set");

closureN_type c_733342;
object e_733357 [2];
c_733342.hdr.mark = gc_color_red;
 c_733342.hdr.grayed = 0;
c_733342.tag = closureN_tag;
 c_733342.fn = (function_type)__lambda_54;
c_733342.num_args = 1;
c_733342.num_elements = 2;
c_733342.elements = (object *)e_733357;
c_733342.elements[0] = elements_7343_73676;
c_733342.elements[1] = k_731329;

return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  &c_733342, comparator_7342_73675, boolean_f);; 
}

static void __lambda_54(void *data, object self_732530, int argc, object *args) /* object self_732530, object result_7344_73677 */
 {
 object result_7344_73677 = args[0];
  
closureN_type c_733344;
object e_733352 [3];
c_733344.hdr.mark = gc_color_red;
 c_733344.hdr.grayed = 0;
c_733344.tag = closureN_tag;
 c_733344.fn = (function_type)__lambda_55;
c_733344.num_args = 1;
c_733344.num_elements = 3;
c_733344.elements = (object *)e_733352;
c_733344.elements[0] = ((closureN)self_732530)->elements[0];
c_733344.elements[1] = ((closureN)self_732530)->elements[1];
c_733344.elements[2] = result_7344_73677;


closureN_type c_733353;
object e_733356 [1];
c_733353.hdr.mark = gc_color_red;
 c_733353.hdr.grayed = 0;
c_733353.tag = closureN_tag;
 c_733353.fn = (function_type)__lambda_57;
c_733353.num_args = 1;
c_733353.num_elements = 1;
c_733353.elements = (object *)e_733356;
c_733353.elements[0] = result_7344_73677;

return_direct_with_clo1(data,(closure)&c_733344,__lambda_55,  &c_733353);; 
}

static void __lambda_57(void *data, object self_732531, int argc, object *args) /* object self_732531, object k_731333, object x_7345_73678 */
 {
 object k_731333 = args[0]; object x_7345_73678 = args[1];
  return_direct_with_clo4(data,  __glo_sob_91increment_67_srfi_113, (((closure)  __glo_sob_91increment_67_srfi_113)->fn),  k_731333, ((closureN)self_732531)->elements[0], x_7345_73678, obj_int2obj(1));; 
}

static void __lambda_55(void *data, object self_732532, int argc, object *args) /* object self_732532, object r_731332 */
 {
 object r_731332 = args[0];
  
closureN_type c_733346;
object e_733350 [2];
c_733346.hdr.mark = gc_color_red;
 c_733346.hdr.grayed = 0;
c_733346.tag = closureN_tag;
 c_733346.fn = (function_type)__lambda_56;
c_733346.num_args = 1;
c_733346.num_elements = 2;
c_733346.elements = (object *)e_733350;
c_733346.elements[0] = ((closureN)self_732532)->elements[1];
c_733346.elements[1] = ((closureN)self_732532)->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_733346, r_731332, ((closureN)self_732532)->elements[0]);; 
}

static void __lambda_56(void *data, object self_732533, int argc, object *args) /* object self_732533, object r_731331 */
 {

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

static void __lambda_50(void *data, object _, int argc, object *args) /* closure _,object k_731324, object sob_7341_73674 */
 {
object k_731324 = args[0]; object sob_7341_73674 = args[1];
  Cyc_st_add(data, "srfi/113.sld:sob-empty-copy");

closureN_type c_733331;
object e_733339 [2];
c_733331.hdr.mark = gc_color_red;
 c_733331.hdr.grayed = 0;
c_733331.tag = closureN_tag;
 c_733331.fn = (function_type)__lambda_51;
c_733331.num_args = 1;
c_733331.num_elements = 2;
c_733331.elements = (object *)e_733339;
c_733331.elements[0] = k_731324;
c_733331.elements[1] = sob_7341_73674;

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_733331, sob_7341_73674);; 
}

static void __lambda_51(void *data, object self_732528, int argc, object *args) /* object self_732528, object r_731325 */
 {
 object r_731325 = args[0];
  
closureN_type c_733333;
object e_733337 [2];
c_733333.hdr.mark = gc_color_red;
 c_733333.hdr.grayed = 0;
c_733333.tag = closureN_tag;
 c_733333.fn = (function_type)__lambda_52;
c_733333.num_args = 1;
c_733333.num_elements = 2;
c_733333.elements = (object *)e_733337;
c_733333.elements[0] = ((closureN)self_732528)->elements[0];
c_733333.elements[1] = r_731325;

return_direct_with_clo2(data,  __glo_sob_91multi_127_srfi_113, (((closure)  __glo_sob_91multi_127_srfi_113)->fn),  &c_733333, ((closureN)self_732528)->elements[1]);; 
}

static void __lambda_52(void *data, object self_732529, int argc, object *args) /* object self_732529, object r_731326 */
 {
 object r_731326 = args[0];
  return_direct_with_clo3(data,  __glo_make_91sob_srfi_113, (((closure)  __glo_make_91sob_srfi_113)->fn),  ((closureN)self_732529)->elements[0], ((closureN)self_732529)->elements[1], r_731326);; 
}

static void __lambda_48(void *data, object _, int argc, object *args) /* closure _,object k_731320, object bag_7340_73673 */
 {
object k_731320 = args[0]; object bag_7340_73673 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag-copy");

closureN_type c_733324;
object e_733328 [2];
c_733324.hdr.mark = gc_color_red;
 c_733324.hdr.grayed = 0;
c_733324.tag = closureN_tag;
 c_733324.fn = (function_type)__lambda_49;
c_733324.num_args = 1;
c_733324.num_elements = 2;
c_733324.elements = (object *)e_733328;
c_733324.elements[0] = bag_7340_73673;
c_733324.elements[1] = k_731320;

return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  &c_733324, bag_7340_73673);; 
}

static void __lambda_49(void *data, object self_732527, int argc, object *args) /* object self_732527, object r_731321 */
 {

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

static void __lambda_46(void *data, object _, int argc, object *args) /* closure _,object k_731316, object set_7339_73672 */
 {
object k_731316 = args[0]; object set_7339_73672 = args[1];
  Cyc_st_add(data, "srfi/113.sld:set-copy");

closureN_type c_733317;
object e_733321 [2];
c_733317.hdr.mark = gc_color_red;
 c_733317.hdr.grayed = 0;
c_733317.tag = closureN_tag;
 c_733317.fn = (function_type)__lambda_47;
c_733317.num_args = 1;
c_733317.num_elements = 2;
c_733317.elements = (object *)e_733321;
c_733317.elements[0] = k_731316;
c_733317.elements[1] = set_7339_73672;

return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  &c_733317, set_7339_73672);; 
}

static void __lambda_47(void *data, object self_732526, int argc, object *args) /* object self_732526, object r_731317 */
 {

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

static void __lambda_41(void *data, object _, int argc, object *args) /* closure _,object k_731309, object sob_7338_73671 */
 {
object k_731309 = args[0]; object sob_7338_73671 = args[1];
  Cyc_st_add(data, "srfi/113.sld:sob-copy");

closureN_type c_733298;
object e_733314 [2];
c_733298.hdr.mark = gc_color_red;
 c_733298.hdr.grayed = 0;
c_733298.tag = closureN_tag;
 c_733298.fn = (function_type)__lambda_42;
c_733298.num_args = 1;
c_733298.num_elements = 2;
c_733298.elements = (object *)e_733314;
c_733298.elements[0] = k_731309;
c_733298.elements[1] = sob_7338_73671;

return_direct_with_clo2(data,  __glo_sob_91hash_91table_srfi_113, (((closure)  __glo_sob_91hash_91table_srfi_113)->fn),  &c_733298, sob_7338_73671);; 
}

static void __lambda_42(void *data, object self_732522, int argc, object *args) /* object self_732522, object r_731313 */
 {
 object r_731313 = args[0];
  
closureN_type c_733300;
object e_733313 [2];
c_733300.hdr.mark = gc_color_red;
 c_733300.hdr.grayed = 0;
c_733300.tag = closureN_tag;
 c_733300.fn = (function_type)__lambda_43;
c_733300.num_args = 1;
c_733300.num_elements = 2;
c_733300.elements = (object *)e_733313;
c_733300.elements[0] = ((closureN)self_732522)->elements[0];
c_733300.elements[1] = ((closureN)self_732522)->elements[1];

return_direct_with_clo2(data,  __glo_hash_91table_91copy_srfi_69, (((closure)  __glo_hash_91table_91copy_srfi_69)->fn),  &c_733300, r_731313);; 
}

static void __lambda_43(void *data, object self_732523, int argc, object *args) /* object self_732523, object r_731310 */
 {
 object r_731310 = args[0];
  
closureN_type c_733302;
object e_733311 [3];
c_733302.hdr.mark = gc_color_red;
 c_733302.hdr.grayed = 0;
c_733302.tag = closureN_tag;
 c_733302.fn = (function_type)__lambda_44;
c_733302.num_args = 1;
c_733302.num_elements = 3;
c_733302.elements = (object *)e_733311;
c_733302.elements[0] = ((closureN)self_732523)->elements[0];
c_733302.elements[1] = r_731310;
c_733302.elements[2] = ((closureN)self_732523)->elements[1];

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_733302, ((closureN)self_732523)->elements[1]);; 
}

static void __lambda_44(void *data, object self_732524, int argc, object *args) /* object self_732524, object r_731311 */
 {
 object r_731311 = args[0];
  
closureN_type c_733304;
object e_733309 [3];
c_733304.hdr.mark = gc_color_red;
 c_733304.hdr.grayed = 0;
c_733304.tag = closureN_tag;
 c_733304.fn = (function_type)__lambda_45;
c_733304.num_args = 1;
c_733304.num_elements = 3;
c_733304.elements = (object *)e_733309;
c_733304.elements[0] = ((closureN)self_732524)->elements[0];
c_733304.elements[1] = ((closureN)self_732524)->elements[1];
c_733304.elements[2] = r_731311;

return_direct_with_clo2(data,  __glo_sob_91multi_127_srfi_113, (((closure)  __glo_sob_91multi_127_srfi_113)->fn),  &c_733304, ((closureN)self_732524)->elements[2]);; 
}

static void __lambda_45(void *data, object self_732525, int argc, object *args) /* object self_732525, object r_731312 */
 {
 object r_731312 = args[0];
  return_direct_with_clo4(data,  __glo_raw_91make_91sob_srfi_113, (((closure)  __glo_raw_91make_91sob_srfi_113)->fn),  ((closureN)self_732525)->elements[0], ((closureN)self_732525)->elements[1], ((closureN)self_732525)->elements[2], r_731312);; 
}

static void __lambda_39(void *data, object _, int argc, object *args) /* closure _,object k_731305, object comparator_7336_73669, object multi_127_7337_73670 */
 {
object k_731305 = args[0]; object comparator_7336_73669 = args[1]; object multi_127_7337_73670 = args[2];
  Cyc_st_add(data, "srfi/113.sld:make-sob");

closureN_type c_733290;
object e_733295 [3];
c_733290.hdr.mark = gc_color_red;
 c_733290.hdr.grayed = 0;
c_733290.tag = closureN_tag;
 c_733290.fn = (function_type)__lambda_40;
c_733290.num_args = 1;
c_733290.num_elements = 3;
c_733290.elements = (object *)e_733295;
c_733290.elements[0] = comparator_7336_73669;
c_733290.elements[1] = k_731305;
c_733290.elements[2] = multi_127_7337_73670;

return_direct_with_clo2(data,  __glo_make_91hash_91table_95comparator_srfi_113, (((closure)  __glo_make_91hash_91table_95comparator_srfi_113)->fn),  &c_733290, comparator_7336_73669);; 
}

static void __lambda_40(void *data, object self_732521, int argc, object *args) /* object self_732521, object r_731306 */
 {
 object r_731306 = args[0];
  return_direct_with_clo4(data,  __glo_raw_91make_91sob_srfi_113, (((closure)  __glo_raw_91make_91sob_srfi_113)->fn),  ((closureN)self_732521)->elements[1], r_731306, ((closureN)self_732521)->elements[0], ((closureN)self_732521)->elements[2]);; 
}

static void __lambda_37(void *data, object _, int argc, object *args) /* closure _,object k_731301, object sob_7334_73667, object element_7335_73668 */
 {
object k_731301 = args[0]; object sob_7334_73667 = args[1]; object element_7335_73668 = args[2];
  Cyc_st_add(data, "srfi/113.sld:check-element");

closureN_type c_733283;
object e_733287 [2];
c_733283.hdr.mark = gc_color_red;
 c_733283.hdr.grayed = 0;
c_733283.tag = closureN_tag;
 c_733283.fn = (function_type)__lambda_38;
c_733283.num_args = 1;
c_733283.num_elements = 2;
c_733283.elements = (object *)e_733287;
c_733283.elements[0] = element_7335_73668;
c_733283.elements[1] = k_731301;

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_733283, sob_7334_73667);; 
}

static void __lambda_38(void *data, object self_732520, int argc, object *args) /* object self_732520, object r_731302 */
 {
 object r_731302 = args[0];
  return_direct_with_clo3(data,  __glo_comparator_91check_91type_srfi_128, (((closure)  __glo_comparator_91check_91type_srfi_128)->fn),  ((closureN)self_732520)->elements[1], r_731302, ((closureN)self_732520)->elements[0]);; 
}

static void __lambda_34(void *data, object _, int argc, object *args) /* closure _,object k_731295, object a_7332_73665, object b_7333_73666 */
 {
object k_731295 = args[0]; object a_7332_73665 = args[1]; object b_7333_73666 = args[2];
  Cyc_st_add(data, "srfi/113.sld:check-same-comparator");

closureN_type c_733265;
object e_733280 [3];
c_733265.hdr.mark = gc_color_red;
 c_733265.hdr.grayed = 0;
c_733265.tag = closureN_tag;
 c_733265.fn = (function_type)__lambda_35;
c_733265.num_args = 1;
c_733265.num_elements = 3;
c_733265.elements = (object *)e_733280;
c_733265.elements[0] = a_7332_73665;
c_733265.elements[1] = b_7333_73666;
c_733265.elements[2] = k_731295;

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_733265, a_7332_73665);; 
}

static void __lambda_35(void *data, object self_732518, int argc, object *args) /* object self_732518, object r_731297 */
 {
 object r_731297 = args[0];
  
closureN_type c_733267;
object e_733278 [4];
c_733267.hdr.mark = gc_color_red;
 c_733267.hdr.grayed = 0;
c_733267.tag = closureN_tag;
 c_733267.fn = (function_type)__lambda_36;
c_733267.num_args = 1;
c_733267.num_elements = 4;
c_733267.elements = (object *)e_733278;
c_733267.elements[0] = ((closureN)self_732518)->elements[0];
c_733267.elements[1] = ((closureN)self_732518)->elements[1];
c_733267.elements[2] = ((closureN)self_732518)->elements[2];
c_733267.elements[3] = r_731297;

return_direct_with_clo2(data,  __glo_sob_91comparator_srfi_113, (((closure)  __glo_sob_91comparator_srfi_113)->fn),  &c_733267, ((closureN)self_732518)->elements[1]);; 
}

static void __lambda_36(void *data, object self_732519, int argc, object *args) /* object self_732519, object r_731298 */
 {
 object r_731298 = args[0];
    
if( (boolean_f != Cyc_eq(((closureN)self_732519)->elements[3], r_731298)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732519)->elements[2], (((closure)  ((closureN)self_732519)->elements[2])->fn),  Cyc_VOID);
} else { 
  
make_utf8_string_with_len(c_733275, "different comparators", 21, 21);
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_732519)->elements[2], &c_733275, ((closureN)self_732519)->elements[0], ((closureN)self_732519)->elements[1]);}
;; 
}

static void __lambda_31(void *data, object _, int argc, object *args) /* closure _,object k_731287, object list_7330_73663 */
 {
object k_731287 = args[0]; object list_7330_73663 = args[1];
  Cyc_st_add(data, "srfi/113.sld:sob-check-comparators");
  
if( (boolean_f != Cyc_is_null(list_7330_73663)) ){ 
  return_direct_with_clo1(data,  k_731287, (((closure)  k_731287)->fn),  Cyc_VOID);
} else { 
  
closureN_type c_733250;
object e_733256 [2];
c_733250.hdr.mark = gc_color_red;
 c_733250.hdr.grayed = 0;
c_733250.tag = closureN_tag;
 c_733250.fn = (function_type)__lambda_32;
c_733250.num_args = 1;
c_733250.num_elements = 2;
c_733250.elements = (object *)e_733256;
c_733250.elements[0] = k_731287;
c_733250.elements[1] = list_7330_73663;


closureN_type c_733257;
object e_733262 [1];
c_733257.hdr.mark = gc_color_red;
 c_733257.hdr.grayed = 0;
c_733257.tag = closureN_tag;
 c_733257.fn = (function_type)__lambda_33;
c_733257.num_args = 1;
c_733257.num_elements = 1;
c_733257.elements = (object *)e_733262;
c_733257.elements[0] = list_7330_73663;

return_direct_with_clo1(data,(closure)&c_733250,__lambda_32,  &c_733257);}
;; 
}

static void __lambda_33(void *data, object self_732516, int argc, object *args) /* object self_732516, object k_731291, object sob_7331_73664 */
 {
 object k_731291 = args[0]; object sob_7331_73664 = args[1];
  

return_direct_with_clo3(data,  __glo_check_91same_91comparator_srfi_113, (((closure)  __glo_check_91same_91comparator_srfi_113)->fn),  k_731291, Cyc_car(data, ((closureN)self_732516)->elements[0]), sob_7331_73664);; 
}

static void __lambda_32(void *data, object self_732517, int argc, object *args) /* object self_732517, object r_731289 */
 {
 object r_731289 = 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_732517)->elements[0], r_731289, Cyc_cdr(data, ((closureN)self_732517)->elements[1]));; 
}

static void __lambda_27(void *data, object _, int argc, object *args) /* closure _,object k_731281, object list_7328_73661 */
 {
object k_731281 = args[0]; object list_7328_73661 = args[1];
  Cyc_st_add(data, "srfi/113.sld:check-all-bags");

closureN_type c_733234;
object e_733242 [2];
c_733234.hdr.mark = gc_color_red;
 c_733234.hdr.grayed = 0;
c_733234.tag = closureN_tag;
 c_733234.fn = (function_type)__lambda_28;
c_733234.num_args = 1;
c_733234.num_elements = 2;
c_733234.elements = (object *)e_733242;
c_733234.elements[0] = k_731281;
c_733234.elements[1] = list_7328_73661;


mclosure0(c_733243, (function_type)__lambda_30);c_733243.num_args = 1;
return_direct_with_clo1(data,(closure)&c_733234,__lambda_28,  &c_733243);; 
}

static void __lambda_30(void *data, object self_732513, int argc, object *args) /* object self_732513, object k_731284, object obj_7329_73662 */
 {
 object k_731284 = args[0]; object obj_7329_73662 = args[1];
  return_direct_with_clo2(data,  __glo_check_91bag_srfi_113, (((closure)  __glo_check_91bag_srfi_113)->fn),  k_731284, obj_7329_73662);; 
}

static void __lambda_28(void *data, object self_732514, int argc, object *args) /* object self_732514, object r_731283 */
 {
 object r_731283 = args[0];
  
closureN_type c_733236;
object e_733240 [2];
c_733236.hdr.mark = gc_color_red;
 c_733236.hdr.grayed = 0;
c_733236.tag = closureN_tag;
 c_733236.fn = (function_type)__lambda_29;
c_733236.num_args = 1;
c_733236.num_elements = 2;
c_733236.elements = (object *)e_733240;
c_733236.elements[0] = ((closureN)self_732514)->elements[0];
c_733236.elements[1] = ((closureN)self_732514)->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_733236, r_731283, ((closureN)self_732514)->elements[1]);; 
}

static void __lambda_29(void *data, object self_732515, int argc, object *args) /* object self_732515, object r_731282 */
 {

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

static void __lambda_23(void *data, object _, int argc, object *args) /* closure _,object k_731275, object list_7326_73659 */
 {
object k_731275 = args[0]; object list_7326_73659 = args[1];
  Cyc_st_add(data, "srfi/113.sld:check-all-sets");

closureN_type c_733221;
object e_733229 [2];
c_733221.hdr.mark = gc_color_red;
 c_733221.hdr.grayed = 0;
c_733221.tag = closureN_tag;
 c_733221.fn = (function_type)__lambda_24;
c_733221.num_args = 1;
c_733221.num_elements = 2;
c_733221.elements = (object *)e_733229;
c_733221.elements[0] = k_731275;
c_733221.elements[1] = list_7326_73659;


mclosure0(c_733230, (function_type)__lambda_26);c_733230.num_args = 1;
return_direct_with_clo1(data,(closure)&c_733221,__lambda_24,  &c_733230);; 
}

static void __lambda_26(void *data, object self_732510, int argc, object *args) /* object self_732510, object k_731278, object obj_7327_73660 */
 {
 object k_731278 = args[0]; object obj_7327_73660 = args[1];
  return_direct_with_clo2(data,  __glo_check_91set_srfi_113, (((closure)  __glo_check_91set_srfi_113)->fn),  k_731278, obj_7327_73660);; 
}

static void __lambda_24(void *data, object self_732511, int argc, object *args) /* object self_732511, object r_731277 */
 {
 object r_731277 = args[0];
  
closureN_type c_733223;
object e_733227 [2];
c_733223.hdr.mark = gc_color_red;
 c_733223.hdr.grayed = 0;
c_733223.tag = closureN_tag;
 c_733223.fn = (function_type)__lambda_25;
c_733223.num_args = 1;
c_733223.num_elements = 2;
c_733223.elements = (object *)e_733227;
c_733223.elements[0] = ((closureN)self_732511)->elements[0];
c_733223.elements[1] = ((closureN)self_732511)->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_733223, r_731277, ((closureN)self_732511)->elements[1]);; 
}

static void __lambda_25(void *data, object self_732512, int argc, object *args) /* object self_732512, object r_731276 */
 {

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

static void __lambda_21(void *data, object _, int argc, object *args) /* closure _,object k_731271, object obj_7325_73658 */
 {
object k_731271 = args[0]; object obj_7325_73658 = args[1];
  Cyc_st_add(data, "srfi/113.sld:check-bag");

closureN_type c_733211;
object e_733218 [2];
c_733211.hdr.mark = gc_color_red;
 c_733211.hdr.grayed = 0;
c_733211.tag = closureN_tag;
 c_733211.fn = (function_type)__lambda_22;
c_733211.num_args = 1;
c_733211.num_elements = 2;
c_733211.elements = (object *)e_733218;
c_733211.elements[0] = k_731271;
c_733211.elements[1] = obj_7325_73658;

return_direct_with_clo2(data,  __glo_bag_127_srfi_113, (((closure)  __glo_bag_127_srfi_113)->fn),  &c_733211, obj_7325_73658);; 
}

static void __lambda_22(void *data, object self_732509, int argc, object *args) /* object self_732509, object r_731272 */
 {
 object r_731272 = args[0];
  if( (boolean_f != r_731272) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732509)->elements[0], (((closure)  ((closureN)self_732509)->elements[0])->fn),  Cyc_VOID);
} else { 
  
make_utf8_string_with_len(c_733216, "not a bag", 9, 9);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_732509)->elements[0], &c_733216, ((closureN)self_732509)->elements[1]);}
;; 
}

static void __lambda_19(void *data, object _, int argc, object *args) /* closure _,object k_731267, object obj_7324_73657 */
 {
object k_731267 = args[0]; object obj_7324_73657 = args[1];
  Cyc_st_add(data, "srfi/113.sld:check-set");

closureN_type c_733201;
object e_733208 [2];
c_733201.hdr.mark = gc_color_red;
 c_733201.hdr.grayed = 0;
c_733201.tag = closureN_tag;
 c_733201.fn = (function_type)__lambda_20;
c_733201.num_args = 1;
c_733201.num_elements = 2;
c_733201.elements = (object *)e_733208;
c_733201.elements[0] = k_731267;
c_733201.elements[1] = obj_7324_73657;

return_direct_with_clo2(data,  __glo_set_127_srfi_113, (((closure)  __glo_set_127_srfi_113)->fn),  &c_733201, obj_7324_73657);; 
}

static void __lambda_20(void *data, object self_732508, int argc, object *args) /* object self_732508, object r_731268 */
 {
 object r_731268 = args[0];
  if( (boolean_f != r_731268) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732508)->elements[0], (((closure)  ((closureN)self_732508)->elements[0])->fn),  Cyc_VOID);
} else { 
  
make_utf8_string_with_len(c_733206, "not a set", 9, 9);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_732508)->elements[0], &c_733206, ((closureN)self_732508)->elements[1]);}
;; 
}

static void __lambda_17(void *data, object _, int argc, object *args) /* closure _,object k_731263, object obj_7322_73656 */
 {
object k_731263 = args[0]; object obj_7322_73656 = args[1];
  Cyc_st_add(data, "srfi/113.sld:bag?");

closureN_type c_733192;
object e_733198 [2];
c_733192.hdr.mark = gc_color_red;
 c_733192.hdr.grayed = 0;
c_733192.tag = closureN_tag;
 c_733192.fn = (function_type)__lambda_18;
c_733192.num_args = 1;
c_733192.num_elements = 2;
c_733192.elements = (object *)e_733198;
c_733192.elements[0] = k_731263;
c_733192.elements[1] = obj_7322_73656;

return_direct_with_clo2(data,  __glo_sob_127_srfi_113, (((closure)  __glo_sob_127_srfi_113)->fn),  &c_733192, obj_7322_73656);; 
}

static void __lambda_18(void *data, object self_732507, int argc, object *args) /* object self_732507, object r_731264 */
 {
 object r_731264 = args[0];
  if( (boolean_f != r_731264) ){ 
  return_direct_with_clo2(data,  __glo_sob_91multi_127_srfi_113, (((closure)  __glo_sob_91multi_127_srfi_113)->fn),  ((closureN)self_732507)->elements[0], ((closureN)self_732507)->elements[1]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732507)->elements[0], (((closure)  ((closureN)self_732507)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_14(void *data, object _, int argc, object *args) /* closure _,object k_731258, object obj_7320_73655 */
 {
object k_731258 = args[0]; object obj_7320_73655 = args[1];
  Cyc_st_add(data, "srfi/113.sld:set?");

closureN_type c_733177;
object e_733189 [2];
c_733177.hdr.mark = gc_color_red;
 c_733177.hdr.grayed = 0;
c_733177.tag = closureN_tag;
 c_733177.fn = (function_type)__lambda_15;
c_733177.num_args = 1;
c_733177.num_elements = 2;
c_733177.elements = (object *)e_733189;
c_733177.elements[0] = k_731258;
c_733177.elements[1] = obj_7320_73655;

return_direct_with_clo2(data,  __glo_sob_127_srfi_113, (((closure)  __glo_sob_127_srfi_113)->fn),  &c_733177, obj_7320_73655);; 
}

static void __lambda_15(void *data, object self_732505, int argc, object *args) /* object self_732505, object r_731259 */
 {
 object r_731259 = args[0];
  if( (boolean_f != r_731259) ){ 
  
closureN_type c_733179;
object e_733185 [1];
c_733179.hdr.mark = gc_color_red;
 c_733179.hdr.grayed = 0;
c_733179.tag = closureN_tag;
 c_733179.fn = (function_type)__lambda_16;
c_733179.num_args = 1;
c_733179.num_elements = 1;
c_733179.elements = (object *)e_733185;
c_733179.elements[0] = ((closureN)self_732505)->elements[0];

return_direct_with_clo2(data,  __glo_sob_91multi_127_srfi_113, (((closure)  __glo_sob_91multi_127_srfi_113)->fn),  &c_733179, ((closureN)self_732505)->elements[1]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732505)->elements[0], (((closure)  ((closureN)self_732505)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_16(void *data, object self_732506, int argc, object *args) /* object self_732506, object r_731260 */
 {
 object r_731260 = args[0];
  
complex_num_type local_733184; 
return_direct_with_clo1(data,  ((closureN)self_732506)->elements[0], (((closure)  ((closureN)self_732506)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_733184, r_731260));; 
}

static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_731252, object hash_91table_7317_73652, object comparator_7318_73653, object multi_127_7319_73654 */
 {
object k_731252 = args[0]; object hash_91table_7317_73652 = args[1]; object comparator_7318_73653 = args[2]; object multi_127_7319_73654 = args[3];
  Cyc_st_add(data, "srfi/113.sld:raw-make-sob");

vector_3_type local_733168; 

complex_num_type local_733171; 

vector_3_type local_733174; 
return_direct_with_clo1(data,  k_731252, (((closure)  k_731252)->fn),  Cyc_fast_vector_3(&local_733168, ((inline_function_type)
                   ((closure)__glo_make_91record_91marker_191_191inline_191_191_scheme_base)->fn)(data,&local_733171), quote_sob, Cyc_fast_vector_3(&local_733174, hash_91table_7317_73652, comparator_7318_73653, multi_127_7319_73654)));; 
}

static void __lambda_12(void *data, object _, int argc, object *args) /* closure _,object k_731239, object proc_7314_73650, object hash_91table_7315_73651 */
 {
object k_731239 = args[0]; object proc_7314_73650 = args[1]; object hash_91table_7315_73651 = args[2];
  Cyc_st_add(data, "srfi/113.sld:hash-table-for-each");
return_direct_with_clo3(data,  __glo_hash_91table_91walk_srfi_69, (((closure)  __glo_hash_91table_91walk_srfi_69)->fn),  k_731239, hash_91table_7315_73651, proc_7314_73650);; 
}

static void __lambda_5(void *data, object _, int argc, object *args) /* closure _,object k_731221, object hash_91function_732_73644 */
 {
object k_731221 = args[0]; object hash_91function_732_73644 = args[1];
  Cyc_st_add(data, "srfi/113.sld:modulizer");

closureN_type c_733112;
object e_733161 [1];
c_733112.hdr.mark = gc_color_red;
 c_733112.hdr.grayed = 0;
c_733112.tag = closureN_tag;
 c_733112.fn = (function_type)__lambda_6;
c_733112.num_args = 0;
c_733112.num_elements = 1;
c_733112.elements = (object *)e_733161;
c_733112.elements[0] = hash_91function_732_73644;

return_direct_with_clo1(data,  k_731221, (((closure)  k_731221)->fn),  &c_733112);; 
}

static void __lambda_6(void *data, object self_732499, int argc, object *args) /* object self_732499, object k_731222, object args_733_737_73645_raw, ... */
 {
 object k_731222 = args[0];
load_varargs(args_733_737_73645, args, 1, argc - 1);
    
  
  
  make_pair(c_733119,quote_obj,NULL);c_733119.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_733_737_73645), Cyc_length(data, &c_733119))) ){ 
  
closureN_type c_733121;
object e_733128 [2];
c_733121.hdr.mark = gc_color_red;
 c_733121.hdr.grayed = 0;
c_733121.tag = closureN_tag;
 c_733121.fn = (function_type)__lambda_7;
c_733121.num_args = 1;
c_733121.num_elements = 2;
c_733121.elements = (object *)e_733128;
c_733121.elements[0] = args_733_737_73645;
c_733121.elements[1] = k_731222;


closureN_type c_733129;
object e_733132 [1];
c_733129.hdr.mark = gc_color_red;
 c_733129.hdr.grayed = 0;
c_733129.tag = closureN_tag;
 c_733129.fn = (function_type)__lambda_8;
c_733129.num_args = 1;
c_733129.num_elements = 1;
c_733129.elements = (object *)e_733132;
c_733129.elements[0] = ((closureN)self_732499)->elements[0];

return_direct_with_clo1(data,(closure)&c_733121,__lambda_7,  &c_733129);
} else { 
    
  
  
  make_pair(c_733140,quote_limit,NULL);c_733140.hdr.immutable = 1;
  make_pair(c_733139,quote_obj,&c_733140);c_733139.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_733_737_73645), Cyc_length(data, &c_733139))) ){ 
  
closureN_type c_733142;
object e_733149 [2];
c_733142.hdr.mark = gc_color_red;
 c_733142.hdr.grayed = 0;
c_733142.tag = closureN_tag;
 c_733142.fn = (function_type)__lambda_9;
c_733142.num_args = 1;
c_733142.num_elements = 2;
c_733142.elements = (object *)e_733149;
c_733142.elements[0] = args_733_737_73645;
c_733142.elements[1] = k_731222;


closureN_type c_733150;
object e_733158 [1];
c_733150.hdr.mark = gc_color_red;
 c_733150.hdr.grayed = 0;
c_733150.tag = closureN_tag;
 c_733150.fn = (function_type)__lambda_10;
c_733150.num_args = 2;
c_733150.num_elements = 1;
c_733150.elements = (object *)e_733158;
c_733150.elements[0] = ((closureN)self_732499)->elements[0];

return_direct_with_clo1(data,(closure)&c_733142,__lambda_9,  &c_733150);
} else { 
  
make_utf8_string_with_len(c_733160, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731222, &c_733160);}
;}
;; 
}

static void __lambda_10(void *data, object self_732502, int argc, object *args) /* object self_732502, object k_731229, object obj_7312_73648, object limit_7313_73649 */
 {
 object k_731229 = args[0]; object obj_7312_73648 = args[1]; object limit_7313_73649 = args[2];
  
closureN_type c_733153;
object e_733157 [2];
c_733153.hdr.mark = gc_color_red;
 c_733153.hdr.grayed = 0;
c_733153.tag = closureN_tag;
 c_733153.fn = (function_type)__lambda_11;
c_733153.num_args = 1;
c_733153.num_elements = 2;
c_733153.elements = (object *)e_733157;
c_733153.elements[0] = k_731229;
c_733153.elements[1] = limit_7313_73649;

return_closcall2(data,  ((closureN)self_732502)->elements[0],  &c_733153, obj_7312_73648);; 
}

static void __lambda_11(void *data, object self_732503, int argc, object *args) /* object self_732503, object r_731230 */
 {
 object r_731230 = args[0];
  return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  ((closureN)self_732503)->elements[0], r_731230, ((closureN)self_732503)->elements[1]);; 
}

static void __lambda_9(void *data, object self_732504, int argc, object *args) /* object self_732504, object r_731228 */
 {
 object r_731228 = args[0];
  
object c_733147 = apply(data,  ((closureN)self_732504)->elements[1],r_731228, ((closureN)self_732504)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732504)->elements[1], (((closure)  ((closureN)self_732504)->elements[1])->fn),  c_733147);; 
}

static void __lambda_8(void *data, object self_732500, int argc, object *args) /* object self_732500, object k_731226, object obj_7310_73647 */
 {
 object k_731226 = args[0]; object obj_7310_73647 = args[1];
  return_closcall2(data,  ((closureN)self_732500)->elements[0],  k_731226, obj_7310_73647);; 
}

static void __lambda_7(void *data, object self_732501, int argc, object *args) /* object self_732501, object r_731225 */
 {
 object r_731225 = args[0];
  
object c_733126 = apply(data,  ((closureN)self_732501)->elements[1],r_731225, ((closureN)self_732501)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732501)->elements[1], (((closure)  ((closureN)self_732501)->elements[1])->fn),  c_733126);; 
}

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_731215, object comparator_731_73643 */
 {
object k_731215 = args[0]; object comparator_731_73643 = args[1];
  Cyc_st_add(data, "srfi/113.sld:make-hash-table/comparator");

closureN_type c_733098;
object e_733109 [2];
c_733098.hdr.mark = gc_color_red;
 c_733098.hdr.grayed = 0;
c_733098.tag = closureN_tag;
 c_733098.fn = (function_type)__lambda_2;
c_733098.num_args = 1;
c_733098.num_elements = 2;
c_733098.elements = (object *)e_733109;
c_733098.elements[0] = comparator_731_73643;
c_733098.elements[1] = k_731215;

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_733098, comparator_731_73643);; 
}

static void __lambda_2(void *data, object self_732496, int argc, object *args) /* object self_732496, object r_731216 */
 {
 object r_731216 = args[0];
  
closureN_type c_733100;
object e_733107 [2];
c_733100.hdr.mark = gc_color_red;
 c_733100.hdr.grayed = 0;
c_733100.tag = closureN_tag;
 c_733100.fn = (function_type)__lambda_3;
c_733100.num_args = 1;
c_733100.num_elements = 2;
c_733100.elements = (object *)e_733107;
c_733100.elements[0] = ((closureN)self_732496)->elements[1];
c_733100.elements[1] = r_731216;

return_direct_with_clo2(data,  __glo_comparator_91hash_91function_srfi_128, (((closure)  __glo_comparator_91hash_91function_srfi_128)->fn),  &c_733100, ((closureN)self_732496)->elements[0]);; 
}

static void __lambda_3(void *data, object self_732497, int argc, object *args) /* object self_732497, object r_731218 */
 {
 object r_731218 = args[0];
  
closureN_type c_733102;
object e_733106 [2];
c_733102.hdr.mark = gc_color_red;
 c_733102.hdr.grayed = 0;
c_733102.tag = closureN_tag;
 c_733102.fn = (function_type)__lambda_4;
c_733102.num_args = 1;
c_733102.num_elements = 2;
c_733102.elements = (object *)e_733106;
c_733102.elements[0] = ((closureN)self_732497)->elements[0];
c_733102.elements[1] = ((closureN)self_732497)->elements[1];

return_direct_with_clo2(data,  __glo_modulizer_srfi_113, (((closure)  __glo_modulizer_srfi_113)->fn),  &c_733102, r_731218);; 
}

static void __lambda_4(void *data, object self_732498, int argc, object *args) /* object self_732498, object r_731217 */
 {
 object r_731217 = args[0];
  return_direct_with_clo3(data,  __glo_make_91hash_91table_srfi_69, (((closure)  __glo_make_91hash_91table_srfi_69)->fn),  ((closureN)self_732498)->elements[0], ((closureN)self_732498)->elements[1], r_731217);; 
}

void c_srfi113_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_srfi113_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote_hash_91table_91contains_127 = find_or_add_symbol("hash-table-contains?");
  quote_sob_127 = find_or_add_symbol("sob?");
  quote_hash_91table = find_or_add_symbol("hash-table");
  quote_sob_91hash_91table = find_or_add_symbol("sob-hash-table");
  quote_comparator = find_or_add_symbol("comparator");
  quote_sob_91comparator = find_or_add_symbol("sob-comparator");
  quote_multi_127 = find_or_add_symbol("multi?");
  quote_sob_91multi_127 = find_or_add_symbol("sob-multi?");
  quote_missing = find_or_add_symbol("missing");
  quote_set_91comparator = find_or_add_symbol("set-comparator");
  quote_bag_91comparator = find_or_add_symbol("bag-comparator");
  quote_sob2 = find_or_add_symbol("sob2");
  quote_sob1 = find_or_add_symbol("sob1");
  quote_sob = find_or_add_symbol("sob");
  quote_limit = find_or_add_symbol("limit");
  quote_obj = find_or_add_symbol("obj");

  add_global("__glo_lib_91init_117srfi113_srfi_113", (object *) &__glo_lib_91init_117srfi113_srfi_113);
  add_global("__glo_bag_91comparator_srfi_113", (object *) &__glo_bag_91comparator_srfi_113);
  add_global("__glo_set_91comparator_srfi_113", (object *) &__glo_set_91comparator_srfi_113);
  add_global("__glo_sob_91hash_srfi_113", (object *) &__glo_sob_91hash_srfi_113);
  add_global("__glo_alist_91_125bag_srfi_113", (object *) &__glo_alist_91_125bag_srfi_113);
  add_global("__glo_bag_91_125alist_srfi_113", (object *) &__glo_bag_91_125alist_srfi_113);
  add_global("__glo_set_91_125bag_67_srfi_113", (object *) &__glo_set_91_125bag_67_srfi_113);
  add_global("__glo_set_91_125bag_srfi_113", (object *) &__glo_set_91_125bag_srfi_113);
  add_global("__glo_bag_91_125set_srfi_113", (object *) &__glo_bag_91_125set_srfi_113);
  add_global("__glo_bag_91fold_91unique_srfi_113", (object *) &__glo_bag_91fold_91unique_srfi_113);
  add_global("__glo_bag_91for_91each_91unique_srfi_113", (object *) &__glo_bag_91for_91each_91unique_srfi_113);
  add_global("__glo_bag_91element_91count_srfi_113", (object *) &__glo_bag_91element_91count_srfi_113);
  add_global("__glo_bag_91unique_91size_srfi_113", (object *) &__glo_bag_91unique_91size_srfi_113);
  add_global("__glo_bag_91product_67_srfi_113", (object *) &__glo_bag_91product_67_srfi_113);
  add_global("__glo_bag_91product_srfi_113", (object *) &__glo_bag_91product_srfi_113);
  add_global("__glo_valid_91n_srfi_113", (object *) &__glo_valid_91n_srfi_113);
  add_global("__glo_sob_91product_67_srfi_113", (object *) &__glo_sob_91product_67_srfi_113);
  add_global("__glo_bag_91xor_67_srfi_113", (object *) &__glo_bag_91xor_67_srfi_113);
  add_global("__glo_set_91xor_67_srfi_113", (object *) &__glo_set_91xor_67_srfi_113);
  add_global("__glo_bag_91xor_srfi_113", (object *) &__glo_bag_91xor_srfi_113);
  add_global("__glo_set_91xor_srfi_113", (object *) &__glo_set_91xor_srfi_113);
  add_global("__glo_sob_91xor_67_srfi_113", (object *) &__glo_sob_91xor_67_srfi_113);
  add_global("__glo_bag_91sum_67_srfi_113", (object *) &__glo_bag_91sum_67_srfi_113);
  add_global("__glo_sob_91sum_67_srfi_113", (object *) &__glo_sob_91sum_67_srfi_113);
  add_global("__glo_bag_91sum_srfi_113", (object *) &__glo_bag_91sum_srfi_113);
  add_global("__glo_dyadic_91sob_91sum_67_srfi_113", (object *) &__glo_dyadic_91sob_91sum_67_srfi_113);
  add_global("__glo_sob_91sum_srfi_113", (object *) &__glo_sob_91sum_srfi_113);
  add_global("__glo_bag_91difference_67_srfi_113", (object *) &__glo_bag_91difference_67_srfi_113);
  add_global("__glo_set_91difference_67_srfi_113", (object *) &__glo_set_91difference_67_srfi_113);
  add_global("__glo_sob_91difference_67_srfi_113", (object *) &__glo_sob_91difference_67_srfi_113);
  add_global("__glo_bag_91difference_srfi_113", (object *) &__glo_bag_91difference_srfi_113);
  add_global("__glo_set_91difference_srfi_113", (object *) &__glo_set_91difference_srfi_113);
  add_global("__glo_dyadic_91sob_91difference_67_srfi_113", (object *) &__glo_dyadic_91sob_91difference_67_srfi_113);
  add_global("__glo_sob_91difference_srfi_113", (object *) &__glo_sob_91difference_srfi_113);
  add_global("__glo_bag_91intersection_67_srfi_113", (object *) &__glo_bag_91intersection_67_srfi_113);
  add_global("__glo_set_91intersection_67_srfi_113", (object *) &__glo_set_91intersection_67_srfi_113);
  add_global("__glo_sob_91intersection_67_srfi_113", (object *) &__glo_sob_91intersection_67_srfi_113);
  add_global("__glo_bag_91intersection_srfi_113", (object *) &__glo_bag_91intersection_srfi_113);
  add_global("__glo_set_91intersection_srfi_113", (object *) &__glo_set_91intersection_srfi_113);
  add_global("__glo_dyadic_91sob_91intersection_67_srfi_113", (object *) &__glo_dyadic_91sob_91intersection_67_srfi_113);
  add_global("__glo_sob_91intersection_srfi_113", (object *) &__glo_sob_91intersection_srfi_113);
  add_global("__glo_bag_91union_67_srfi_113", (object *) &__glo_bag_91union_67_srfi_113);
  add_global("__glo_set_91union_67_srfi_113", (object *) &__glo_set_91union_67_srfi_113);
  add_global("__glo_sob_91union_67_srfi_113", (object *) &__glo_sob_91union_67_srfi_113);
  add_global("__glo_bag_91union_srfi_113", (object *) &__glo_bag_91union_srfi_113);
  add_global("__glo_set_91union_srfi_113", (object *) &__glo_set_91union_srfi_113);
  add_global("__glo_dyadic_91sob_91union_67_srfi_113", (object *) &__glo_dyadic_91sob_91union_67_srfi_113);
  add_global("__glo_sob_91union_srfi_113", (object *) &__glo_sob_91union_srfi_113);
  add_global("__glo_dyadic_91sob_125_123_127_srfi_113", (object *) &__glo_dyadic_91sob_125_123_127_srfi_113);
  add_global("__glo_bag_125_123_127_srfi_113", (object *) &__glo_bag_125_123_127_srfi_113);
  add_global("__glo_set_125_123_127_srfi_113", (object *) &__glo_set_125_123_127_srfi_113);
  add_global("__glo_sob_125_123_127_srfi_113", (object *) &__glo_sob_125_123_127_srfi_113);
  add_global("__glo_dyadic_91sob_121_127_srfi_113", (object *) &__glo_dyadic_91sob_121_127_srfi_113);
  add_global("__glo_bag_121_127_srfi_113", (object *) &__glo_bag_121_127_srfi_113);
  add_global("__glo_set_121_127_srfi_113", (object *) &__glo_set_121_127_srfi_113);
  add_global("__glo_sob_121_127_srfi_113", (object *) &__glo_sob_121_127_srfi_113);
  add_global("__glo_dyadic_91sob_125_127_srfi_113", (object *) &__glo_dyadic_91sob_125_127_srfi_113);
  add_global("__glo_bag_125_127_srfi_113", (object *) &__glo_bag_125_127_srfi_113);
  add_global("__glo_set_125_127_srfi_113", (object *) &__glo_set_125_127_srfi_113);
  add_global("__glo_sob_125_127_srfi_113", (object *) &__glo_sob_125_127_srfi_113);
  add_global("__glo_dyadic_91sob_121_123_127_srfi_113", (object *) &__glo_dyadic_91sob_121_123_127_srfi_113);
  add_global("__glo_bag_121_123_127_srfi_113", (object *) &__glo_bag_121_123_127_srfi_113);
  add_global("__glo_set_121_123_127_srfi_113", (object *) &__glo_set_121_123_127_srfi_113);
  add_global("__glo_sob_121_123_127_srfi_113", (object *) &__glo_sob_121_123_127_srfi_113);
  add_global("__glo_dyadic_91sob_123_127_srfi_113", (object *) &__glo_dyadic_91sob_123_127_srfi_113);
  add_global("__glo_bag_123_127_srfi_113", (object *) &__glo_bag_123_127_srfi_113);
  add_global("__glo_set_123_127_srfi_113", (object *) &__glo_set_123_127_srfi_113);
  add_global("__glo_sob_123_127_srfi_113", (object *) &__glo_sob_123_127_srfi_113);
  add_global("__glo_list_91_125bag_67_srfi_113", (object *) &__glo_list_91_125bag_67_srfi_113);
  add_global("__glo_list_91_125set_67_srfi_113", (object *) &__glo_list_91_125set_67_srfi_113);
  add_global("__glo_list_91_125bag_srfi_113", (object *) &__glo_list_91_125bag_srfi_113);
  add_global("__glo_list_91_125set_srfi_113", (object *) &__glo_list_91_125set_srfi_113);
  add_global("__glo_list_91_125sob_67_srfi_113", (object *) &__glo_list_91_125sob_67_srfi_113);
  add_global("__glo_bag_91_125list_srfi_113", (object *) &__glo_bag_91_125list_srfi_113);
  add_global("__glo_set_91_125list_srfi_113", (object *) &__glo_set_91_125list_srfi_113);
  add_global("__glo_sob_91_125list_srfi_113", (object *) &__glo_sob_91_125list_srfi_113);
  add_global("__glo_bag_91partition_67_srfi_113", (object *) &__glo_bag_91partition_67_srfi_113);
  add_global("__glo_set_91partition_67_srfi_113", (object *) &__glo_set_91partition_67_srfi_113);
  add_global("__glo_sob_91partition_67_srfi_113", (object *) &__glo_sob_91partition_67_srfi_113);
  add_global("__glo_bag_91partition_srfi_113", (object *) &__glo_bag_91partition_srfi_113);
  add_global("__glo_set_91partition_srfi_113", (object *) &__glo_set_91partition_srfi_113);
  add_global("__glo_sob_91partition_srfi_113", (object *) &__glo_sob_91partition_srfi_113);
  add_global("__glo_bag_91remove_67_srfi_113", (object *) &__glo_bag_91remove_67_srfi_113);
  add_global("__glo_set_91remove_67_srfi_113", (object *) &__glo_set_91remove_67_srfi_113);
  add_global("__glo_bag_91filter_67_srfi_113", (object *) &__glo_bag_91filter_67_srfi_113);
  add_global("__glo_set_91filter_67_srfi_113", (object *) &__glo_set_91filter_67_srfi_113);
  add_global("__glo_sob_91filter_67_srfi_113", (object *) &__glo_sob_91filter_67_srfi_113);
  add_global("__glo_bag_91remove_srfi_113", (object *) &__glo_bag_91remove_srfi_113);
  add_global("__glo_set_91remove_srfi_113", (object *) &__glo_set_91remove_srfi_113);
  add_global("__glo_bag_91filter_srfi_113", (object *) &__glo_bag_91filter_srfi_113);
  add_global("__glo_set_91filter_srfi_113", (object *) &__glo_set_91filter_srfi_113);
  add_global("__glo_sob_91filter_srfi_113", (object *) &__glo_sob_91filter_srfi_113);
  add_global("__glo_bag_91fold_srfi_113", (object *) &__glo_bag_91fold_srfi_113);
  add_global("__glo_set_91fold_srfi_113", (object *) &__glo_set_91fold_srfi_113);
  add_global("__glo_sob_91fold_srfi_113", (object *) &__glo_sob_91fold_srfi_113);
  add_global("__glo_bag_91map_srfi_113", (object *) &__glo_bag_91map_srfi_113);
  add_global("__glo_set_91map_srfi_113", (object *) &__glo_set_91map_srfi_113);
  add_global("__glo_sob_91map_srfi_113", (object *) &__glo_sob_91map_srfi_113);
  add_global("__glo_bag_91for_91each_srfi_113", (object *) &__glo_bag_91for_91each_srfi_113);
  add_global("__glo_set_91for_91each_srfi_113", (object *) &__glo_set_91for_91each_srfi_113);
  add_global("__glo_sob_91for_91each_srfi_113", (object *) &__glo_sob_91for_91each_srfi_113);
  add_global("__glo_do_91n_91times_srfi_113", (object *) &__glo_do_91n_91times_srfi_113);
  add_global("__glo_bag_91every_127_srfi_113", (object *) &__glo_bag_91every_127_srfi_113);
  add_global("__glo_set_91every_127_srfi_113", (object *) &__glo_set_91every_127_srfi_113);
  add_global("__glo_sob_91every_127_srfi_113", (object *) &__glo_sob_91every_127_srfi_113);
  add_global("__glo_bag_91any_127_srfi_113", (object *) &__glo_bag_91any_127_srfi_113);
  add_global("__glo_set_91any_127_srfi_113", (object *) &__glo_set_91any_127_srfi_113);
  add_global("__glo_sob_91any_127_srfi_113", (object *) &__glo_sob_91any_127_srfi_113);
  add_global("__glo_bag_91count_srfi_113", (object *) &__glo_bag_91count_srfi_113);
  add_global("__glo_set_91count_srfi_113", (object *) &__glo_set_91count_srfi_113);
  add_global("__glo_sob_91count_srfi_113", (object *) &__glo_sob_91count_srfi_113);
  add_global("__glo_bag_91find_srfi_113", (object *) &__glo_bag_91find_srfi_113);
  add_global("__glo_set_91find_srfi_113", (object *) &__glo_set_91find_srfi_113);
  add_global("__glo_sob_91find_srfi_113", (object *) &__glo_sob_91find_srfi_113);
  add_global("__glo_bag_91size_srfi_113", (object *) &__glo_bag_91size_srfi_113);
  add_global("__glo_set_91size_srfi_113", (object *) &__glo_set_91size_srfi_113);
  add_global("__glo_sob_91size_srfi_113", (object *) &__glo_sob_91size_srfi_113);
  add_global("__glo_bag_91search_67_srfi_113", (object *) &__glo_bag_91search_67_srfi_113);
  add_global("__glo_set_91search_67_srfi_113", (object *) &__glo_set_91search_67_srfi_113);
  add_global("__glo_sob_91search_67_srfi_113", (object *) &__glo_sob_91search_67_srfi_113);
  add_global("__glo_missing_srfi_113", (object *) &__glo_missing_srfi_113);
  add_global("__glo_bag_91delete_91all_srfi_113", (object *) &__glo_bag_91delete_91all_srfi_113);
  add_global("__glo_set_91delete_91all_srfi_113", (object *) &__glo_set_91delete_91all_srfi_113);
  add_global("__glo_bag_91delete_srfi_113", (object *) &__glo_bag_91delete_srfi_113);
  add_global("__glo_set_91delete_srfi_113", (object *) &__glo_set_91delete_srfi_113);
  add_global("__glo_bag_91delete_91all_67_srfi_113", (object *) &__glo_bag_91delete_91all_67_srfi_113);
  add_global("__glo_set_91delete_91all_67_srfi_113", (object *) &__glo_set_91delete_91all_67_srfi_113);
  add_global("__glo_bag_91delete_67_srfi_113", (object *) &__glo_bag_91delete_67_srfi_113);
  add_global("__glo_set_91delete_67_srfi_113", (object *) &__glo_set_91delete_67_srfi_113);
  add_global("__glo_sob_91delete_91all_67_srfi_113", (object *) &__glo_sob_91delete_91all_67_srfi_113);
  add_global("__glo_bag_91replace_srfi_113", (object *) &__glo_bag_91replace_srfi_113);
  add_global("__glo_set_91replace_srfi_113", (object *) &__glo_set_91replace_srfi_113);
  add_global("__glo_bag_91replace_67_srfi_113", (object *) &__glo_bag_91replace_67_srfi_113);
  add_global("__glo_set_91replace_67_srfi_113", (object *) &__glo_set_91replace_67_srfi_113);
  add_global("__glo_sob_91replace_67_srfi_113", (object *) &__glo_sob_91replace_67_srfi_113);
  add_global("__glo_bag_91adjoin_srfi_113", (object *) &__glo_bag_91adjoin_srfi_113);
  add_global("__glo_set_91adjoin_srfi_113", (object *) &__glo_set_91adjoin_srfi_113);
  add_global("__glo_bag_91adjoin_67_srfi_113", (object *) &__glo_bag_91adjoin_67_srfi_113);
  add_global("__glo_set_91adjoin_67_srfi_113", (object *) &__glo_set_91adjoin_67_srfi_113);
  add_global("__glo_sob_91adjoin_91all_67_srfi_113", (object *) &__glo_sob_91adjoin_91all_67_srfi_113);
  add_global("__glo_bag_91decrement_67_srfi_113", (object *) &__glo_bag_91decrement_67_srfi_113);
  add_global("__glo_bag_91increment_67_srfi_113", (object *) &__glo_bag_91increment_67_srfi_113);
  add_global("__glo_nonpositive_91keys_srfi_113", (object *) &__glo_nonpositive_91keys_srfi_113);
  add_global("__glo_sob_91cleanup_67_srfi_113", (object *) &__glo_sob_91cleanup_67_srfi_113);
  add_global("__glo_sob_91decrement_67_srfi_113", (object *) &__glo_sob_91decrement_67_srfi_113);
  add_global("__glo_sob_91increment_67_srfi_113", (object *) &__glo_sob_91increment_67_srfi_113);
  add_global("__glo_bag_91element_91comparator_srfi_113", (object *) &__glo_bag_91element_91comparator_srfi_113);
  add_global("__glo_set_91element_91comparator_srfi_113", (object *) &__glo_set_91element_91comparator_srfi_113);
  add_global("__glo_bag_91member_srfi_113", (object *) &__glo_bag_91member_srfi_113);
  add_global("__glo_set_91member_srfi_113", (object *) &__glo_set_91member_srfi_113);
  add_global("__glo_sob_91member_srfi_113", (object *) &__glo_sob_91member_srfi_113);
  add_global("__glo_bag_91disjoint_127_srfi_113", (object *) &__glo_bag_91disjoint_127_srfi_113);
  add_global("__glo_set_91disjoint_127_srfi_113", (object *) &__glo_set_91disjoint_127_srfi_113);
  add_global("__glo_sob_91half_91disjoint_127_srfi_113", (object *) &__glo_sob_91half_91disjoint_127_srfi_113);
  add_global("__glo_bag_91empty_127_srfi_113", (object *) &__glo_bag_91empty_127_srfi_113);
  add_global("__glo_set_91empty_127_srfi_113", (object *) &__glo_set_91empty_127_srfi_113);
  add_global("__glo_sob_91empty_127_srfi_113", (object *) &__glo_sob_91empty_127_srfi_113);
  add_global("__glo_bag_91contains_127_srfi_113", (object *) &__glo_bag_91contains_127_srfi_113);
  add_global("__glo_set_91contains_127_srfi_113", (object *) &__glo_set_91contains_127_srfi_113);
  add_global("__glo_sob_91contains_127_srfi_113", (object *) &__glo_sob_91contains_127_srfi_113);
  add_global("__glo_bag_91unfold_srfi_113", (object *) &__glo_bag_91unfold_srfi_113);
  add_global("__glo_set_91unfold_srfi_113", (object *) &__glo_set_91unfold_srfi_113);
  add_global("__glo_sob_91unfold_srfi_113", (object *) &__glo_sob_91unfold_srfi_113);
  add_global("__glo_bag_srfi_113", (object *) &__glo_bag_srfi_113);
  add_global("__glo_set_srfi_113", (object *) &__glo_set_srfi_113);
  add_global("__glo_sob_91empty_91copy_srfi_113", (object *) &__glo_sob_91empty_91copy_srfi_113);
  add_global("__glo_bag_91copy_srfi_113", (object *) &__glo_bag_91copy_srfi_113);
  add_global("__glo_set_91copy_srfi_113", (object *) &__glo_set_91copy_srfi_113);
  add_global("__glo_sob_91copy_srfi_113", (object *) &__glo_sob_91copy_srfi_113);
  add_global("__glo_make_91sob_srfi_113", (object *) &__glo_make_91sob_srfi_113);
  add_global("__glo_check_91element_srfi_113", (object *) &__glo_check_91element_srfi_113);
  add_global("__glo_check_91same_91comparator_srfi_113", (object *) &__glo_check_91same_91comparator_srfi_113);
  add_global("__glo_sob_91check_91comparators_srfi_113", (object *) &__glo_sob_91check_91comparators_srfi_113);
  add_global("__glo_check_91all_91bags_srfi_113", (object *) &__glo_check_91all_91bags_srfi_113);
  add_global("__glo_check_91all_91sets_srfi_113", (object *) &__glo_check_91all_91sets_srfi_113);
  add_global("__glo_check_91bag_srfi_113", (object *) &__glo_check_91bag_srfi_113);
  add_global("__glo_check_91set_srfi_113", (object *) &__glo_check_91set_srfi_113);
  add_global("__glo_bag_127_srfi_113", (object *) &__glo_bag_127_srfi_113);
  add_global("__glo_set_127_srfi_113", (object *) &__glo_set_127_srfi_113);
  add_global("__glo_raw_91make_91sob_srfi_113", (object *) &__glo_raw_91make_91sob_srfi_113);
  add_global("__glo_sob_91multi_127_srfi_113", (object *) &__glo_sob_91multi_127_srfi_113);
  add_global("__glo_sob_91comparator_srfi_113", (object *) &__glo_sob_91comparator_srfi_113);
  add_global("__glo_sob_91hash_91table_srfi_113", (object *) &__glo_sob_91hash_91table_srfi_113);
  add_global("__glo_sob_127_srfi_113", (object *) &__glo_sob_127_srfi_113);
  add_global("__glo_sob_srfi_113", (object *) &__glo_sob_srfi_113);
  add_global("__glo_hash_91table_91for_91each_srfi_113", (object *) &__glo_hash_91table_91for_91each_srfi_113);
  add_global("__glo_hash_91table_91contains_127_srfi_113", (object *) &__glo_hash_91table_91contains_127_srfi_113);
  add_global("__glo_modulizer_srfi_113", (object *) &__glo_modulizer_srfi_113);
  add_global("__glo_make_91hash_91table_95comparator_srfi_113", (object *) &__glo_make_91hash_91table_95comparator_srfi_113);
  mclosure0(c_736619, (function_type)__lambda_748);c_736619.num_args = 0; 
  __glo_lib_91init_117srfi113_srfi_113 = &c_736619; 
  mclosure0(c_736590, (function_type)__lambda_741);c_736590.num_args = 1; 
  __glo_sob_91hash_srfi_113 = &c_736590; 
  mclosure0(c_736554, (function_type)__lambda_734);c_736554.num_args = 2; 
  __glo_alist_91_125bag_srfi_113 = &c_736554; 
  mclosure0(c_736536, (function_type)__lambda_730);c_736536.num_args = 1; 
  __glo_bag_91_125alist_srfi_113 = &c_736536; 
  mclosure0(c_736505, (function_type)__lambda_722);c_736505.num_args = 2; 
  __glo_set_91_125bag_67_srfi_113 = &c_736505; 
  mclosure0(c_736476, (function_type)__lambda_714);c_736476.num_args = 1; 
  __glo_set_91_125bag_srfi_113 = &c_736476; 
  mclosure0(c_736447, (function_type)__lambda_706);c_736447.num_args = 1; 
  __glo_bag_91_125set_srfi_113 = &c_736447; 
  mclosure0(c_736403, (function_type)__lambda_698);c_736403.num_args = 3; 
  __glo_bag_91fold_91unique_srfi_113 = &c_736403; 
  mclosure0(c_736385, (function_type)__lambda_693);c_736385.num_args = 2; 
  __glo_bag_91for_91each_91unique_srfi_113 = &c_736385; 
  mclosure0(c_736374, (function_type)__lambda_690);c_736374.num_args = 2; 
  __glo_bag_91element_91count_srfi_113 = &c_736374; 
  mclosure0(c_736364, (function_type)__lambda_687);c_736364.num_args = 1; 
  __glo_bag_91unique_91size_srfi_113 = &c_736364; 
  mclosure0(c_736351, (function_type)__lambda_684);c_736351.num_args = 2; 
  __glo_bag_91product_67_srfi_113 = &c_736351; 
  mclosure0(c_736335, (function_type)__lambda_680);c_736335.num_args = 2; 
  __glo_bag_91product_srfi_113 = &c_736335; 
  mclosure0(c_736323, (function_type)__lambda_679);c_736323.num_args = 1; 
  __glo_valid_91n_srfi_113 = &c_736323; 
  mclosure0(c_736297, (function_type)__lambda_673);c_736297.num_args = 3; 
  __glo_sob_91product_67_srfi_113 = &c_736297; 
  mclosure0(c_736279, (function_type)__lambda_669);c_736279.num_args = 2; 
  __glo_bag_91xor_67_srfi_113 = &c_736279; 
  mclosure0(c_736261, (function_type)__lambda_665);c_736261.num_args = 2; 
  __glo_set_91xor_67_srfi_113 = &c_736261; 
  mclosure0(c_736240, (function_type)__lambda_660);c_736240.num_args = 2; 
  __glo_bag_91xor_srfi_113 = &c_736240; 
  mclosure0(c_736219, (function_type)__lambda_655);c_736219.num_args = 2; 
  __glo_set_91xor_srfi_113 = &c_736219; 
  mclosure0(c_736153, (function_type)__lambda_641);c_736153.num_args = 3; 
  __glo_sob_91xor_67_srfi_113 = &c_736153; 
  mclosure0(c_736143, (function_type)__lambda_639);c_736143.num_args = 0; 
  __glo_bag_91sum_67_srfi_113 = &c_736143; 
  mclosure0(c_736127, (function_type)__lambda_635);c_736127.num_args = 1; 
  __glo_sob_91sum_67_srfi_113 = &c_736127; 
  mclosure0(c_736117, (function_type)__lambda_633);c_736117.num_args = 0; 
  __glo_bag_91sum_srfi_113 = &c_736117; 
  mclosure0(c_736058, (function_type)__lambda_621);c_736058.num_args = 3; 
  __glo_dyadic_91sob_91sum_67_srfi_113 = &c_736058; 
  mclosure0(c_736027, (function_type)__lambda_615);c_736027.num_args = 1; 
  __glo_sob_91sum_srfi_113 = &c_736027; 
  mclosure0(c_736017, (function_type)__lambda_613);c_736017.num_args = 0; 
  __glo_bag_91difference_67_srfi_113 = &c_736017; 
  mclosure0(c_736007, (function_type)__lambda_611);c_736007.num_args = 0; 
  __glo_set_91difference_67_srfi_113 = &c_736007; 
  mclosure0(c_735991, (function_type)__lambda_607);c_735991.num_args = 1; 
  __glo_sob_91difference_67_srfi_113 = &c_735991; 
  mclosure0(c_735981, (function_type)__lambda_605);c_735981.num_args = 0; 
  __glo_bag_91difference_srfi_113 = &c_735981; 
  mclosure0(c_735971, (function_type)__lambda_603);c_735971.num_args = 0; 
  __glo_set_91difference_srfi_113 = &c_735971; 
  mclosure0(c_735934, (function_type)__lambda_595);c_735934.num_args = 3; 
  __glo_dyadic_91sob_91difference_67_srfi_113 = &c_735934; 
  mclosure0(c_735903, (function_type)__lambda_589);c_735903.num_args = 1; 
  __glo_sob_91difference_srfi_113 = &c_735903; 
  mclosure0(c_735893, (function_type)__lambda_587);c_735893.num_args = 0; 
  __glo_bag_91intersection_67_srfi_113 = &c_735893; 
  mclosure0(c_735883, (function_type)__lambda_585);c_735883.num_args = 0; 
  __glo_set_91intersection_67_srfi_113 = &c_735883; 
  mclosure0(c_735867, (function_type)__lambda_581);c_735867.num_args = 1; 
  __glo_sob_91intersection_67_srfi_113 = &c_735867; 
  mclosure0(c_735857, (function_type)__lambda_579);c_735857.num_args = 0; 
  __glo_bag_91intersection_srfi_113 = &c_735857; 
  mclosure0(c_735847, (function_type)__lambda_577);c_735847.num_args = 0; 
  __glo_set_91intersection_srfi_113 = &c_735847; 
  mclosure0(c_735810, (function_type)__lambda_568);c_735810.num_args = 3; 
  __glo_dyadic_91sob_91intersection_67_srfi_113 = &c_735810; 
  mclosure0(c_735779, (function_type)__lambda_562);c_735779.num_args = 1; 
  __glo_sob_91intersection_srfi_113 = &c_735779; 
  mclosure0(c_735769, (function_type)__lambda_560);c_735769.num_args = 0; 
  __glo_bag_91union_67_srfi_113 = &c_735769; 
  mclosure0(c_735759, (function_type)__lambda_558);c_735759.num_args = 0; 
  __glo_set_91union_67_srfi_113 = &c_735759; 
  mclosure0(c_735743, (function_type)__lambda_554);c_735743.num_args = 1; 
  __glo_sob_91union_67_srfi_113 = &c_735743; 
  mclosure0(c_735733, (function_type)__lambda_552);c_735733.num_args = 0; 
  __glo_bag_91union_srfi_113 = &c_735733; 
  mclosure0(c_735723, (function_type)__lambda_550);c_735723.num_args = 0; 
  __glo_set_91union_srfi_113 = &c_735723; 
  mclosure0(c_735664, (function_type)__lambda_537);c_735664.num_args = 3; 
  __glo_dyadic_91sob_91union_67_srfi_113 = &c_735664; 
  mclosure0(c_735633, (function_type)__lambda_531);c_735633.num_args = 1; 
  __glo_sob_91union_srfi_113 = &c_735633; 
  mclosure0(c_735624, (function_type)__lambda_529);c_735624.num_args = 2; 
  __glo_dyadic_91sob_125_123_127_srfi_113 = &c_735624; 
  mclosure0(c_735614, (function_type)__lambda_527);c_735614.num_args = 0; 
  __glo_bag_125_123_127_srfi_113 = &c_735614; 
  mclosure0(c_735604, (function_type)__lambda_525);c_735604.num_args = 0; 
  __glo_set_125_123_127_srfi_113 = &c_735604; 
  mclosure0(c_735538, (function_type)__lambda_517);c_735538.num_args = 0; 
  __glo_sob_125_123_127_srfi_113 = &c_735538; 
  mclosure0(c_735536, (function_type)__lambda_516);c_735536.num_args = 2; 
  __glo_dyadic_91sob_121_127_srfi_113 = &c_735536; 
  mclosure0(c_735526, (function_type)__lambda_514);c_735526.num_args = 0; 
  __glo_bag_121_127_srfi_113 = &c_735526; 
  mclosure0(c_735516, (function_type)__lambda_512);c_735516.num_args = 0; 
  __glo_set_121_127_srfi_113 = &c_735516; 
  mclosure0(c_735450, (function_type)__lambda_504);c_735450.num_args = 0; 
  __glo_sob_121_127_srfi_113 = &c_735450; 
  mclosure0(c_735441, (function_type)__lambda_502);c_735441.num_args = 2; 
  __glo_dyadic_91sob_125_127_srfi_113 = &c_735441; 
  mclosure0(c_735431, (function_type)__lambda_500);c_735431.num_args = 0; 
  __glo_bag_125_127_srfi_113 = &c_735431; 
  mclosure0(c_735421, (function_type)__lambda_498);c_735421.num_args = 0; 
  __glo_set_125_127_srfi_113 = &c_735421; 
  mclosure0(c_735355, (function_type)__lambda_490);c_735355.num_args = 0; 
  __glo_sob_125_127_srfi_113 = &c_735355; 
  mclosure0(c_735291, (function_type)__lambda_476);c_735291.num_args = 2; 
  __glo_dyadic_91sob_121_123_127_srfi_113 = &c_735291; 
  mclosure0(c_735281, (function_type)__lambda_474);c_735281.num_args = 0; 
  __glo_bag_121_123_127_srfi_113 = &c_735281; 
  mclosure0(c_735271, (function_type)__lambda_472);c_735271.num_args = 0; 
  __glo_set_121_123_127_srfi_113 = &c_735271; 
  mclosure0(c_735205, (function_type)__lambda_464);c_735205.num_args = 0; 
  __glo_sob_121_123_127_srfi_113 = &c_735205; 
  mclosure0(c_735141, (function_type)__lambda_450);c_735141.num_args = 2; 
  __glo_dyadic_91sob_123_127_srfi_113 = &c_735141; 
  mclosure0(c_735131, (function_type)__lambda_448);c_735131.num_args = 0; 
  __glo_bag_123_127_srfi_113 = &c_735131; 
  mclosure0(c_735121, (function_type)__lambda_446);c_735121.num_args = 0; 
  __glo_set_123_127_srfi_113 = &c_735121; 
  mclosure0(c_735055, (function_type)__lambda_438);c_735055.num_args = 0; 
  __glo_sob_123_127_srfi_113 = &c_735055; 
  mclosure0(c_735047, (function_type)__lambda_436);c_735047.num_args = 2; 
  __glo_list_91_125bag_67_srfi_113 = &c_735047; 
  mclosure0(c_735039, (function_type)__lambda_434);c_735039.num_args = 2; 
  __glo_list_91_125set_67_srfi_113 = &c_735039; 
  mclosure0(c_735032, (function_type)__lambda_432);c_735032.num_args = 2; 
  __glo_list_91_125bag_srfi_113 = &c_735032; 
  mclosure0(c_735025, (function_type)__lambda_430);c_735025.num_args = 2; 
  __glo_list_91_125set_srfi_113 = &c_735025; 
  mclosure0(c_735010, (function_type)__lambda_426);c_735010.num_args = 2; 
  __glo_list_91_125sob_67_srfi_113 = &c_735010; 
  mclosure0(c_735003, (function_type)__lambda_424);c_735003.num_args = 1; 
  __glo_bag_91_125list_srfi_113 = &c_735003; 
  mclosure0(c_734996, (function_type)__lambda_422);c_734996.num_args = 1; 
  __glo_set_91_125list_srfi_113 = &c_734996; 
  mclosure0(c_734984, (function_type)__lambda_419);c_734984.num_args = 1; 
  __glo_sob_91_125list_srfi_113 = &c_734984; 
  mclosure0(c_734976, (function_type)__lambda_417);c_734976.num_args = 2; 
  __glo_bag_91partition_67_srfi_113 = &c_734976; 
  mclosure0(c_734968, (function_type)__lambda_415);c_734968.num_args = 2; 
  __glo_set_91partition_67_srfi_113 = &c_734968; 
  mclosure0(c_734927, (function_type)__lambda_406);c_734927.num_args = 2; 
  __glo_sob_91partition_67_srfi_113 = &c_734927; 
  mclosure0(c_734919, (function_type)__lambda_404);c_734919.num_args = 2; 
  __glo_bag_91partition_srfi_113 = &c_734919; 
  mclosure0(c_734911, (function_type)__lambda_402);c_734911.num_args = 2; 
  __glo_set_91partition_srfi_113 = &c_734911; 
  mclosure0(c_734868, (function_type)__lambda_393);c_734868.num_args = 2; 
  __glo_sob_91partition_srfi_113 = &c_734868; 
  mclosure0(c_734847, (function_type)__lambda_388);c_734847.num_args = 2; 
  __glo_bag_91remove_67_srfi_113 = &c_734847; 
  mclosure0(c_734826, (function_type)__lambda_383);c_734826.num_args = 2; 
  __glo_set_91remove_67_srfi_113 = &c_734826; 
  mclosure0(c_734818, (function_type)__lambda_381);c_734818.num_args = 2; 
  __glo_bag_91filter_67_srfi_113 = &c_734818; 
  mclosure0(c_734810, (function_type)__lambda_379);c_734810.num_args = 2; 
  __glo_set_91filter_67_srfi_113 = &c_734810; 
  mclosure0(c_734782, (function_type)__lambda_373);c_734782.num_args = 2; 
  __glo_sob_91filter_67_srfi_113 = &c_734782; 
  mclosure0(c_734761, (function_type)__lambda_368);c_734761.num_args = 2; 
  __glo_bag_91remove_srfi_113 = &c_734761; 
  mclosure0(c_734740, (function_type)__lambda_363);c_734740.num_args = 2; 
  __glo_set_91remove_srfi_113 = &c_734740; 
  mclosure0(c_734732, (function_type)__lambda_361);c_734732.num_args = 2; 
  __glo_bag_91filter_srfi_113 = &c_734732; 
  mclosure0(c_734724, (function_type)__lambda_359);c_734724.num_args = 2; 
  __glo_set_91filter_srfi_113 = &c_734724; 
  mclosure0(c_734693, (function_type)__lambda_352);c_734693.num_args = 2; 
  __glo_sob_91filter_srfi_113 = &c_734693; 
  mclosure0(c_734684, (function_type)__lambda_350);c_734684.num_args = 3; 
  __glo_bag_91fold_srfi_113 = &c_734684; 
  mclosure0(c_734675, (function_type)__lambda_348);c_734675.num_args = 3; 
  __glo_set_91fold_srfi_113 = &c_734675; 
  mclosure0(c_734639, (function_type)__lambda_342);c_734639.num_args = 3; 
  __glo_sob_91fold_srfi_113 = &c_734639; 
  mclosure0(c_734630, (function_type)__lambda_340);c_734630.num_args = 3; 
  __glo_bag_91map_srfi_113 = &c_734630; 
  mclosure0(c_734621, (function_type)__lambda_338);c_734621.num_args = 3; 
  __glo_set_91map_srfi_113 = &c_734621; 
  mclosure0(c_734589, (function_type)__lambda_330);c_734589.num_args = 3; 
  __glo_sob_91map_srfi_113 = &c_734589; 
  mclosure0(c_734581, (function_type)__lambda_328);c_734581.num_args = 2; 
  __glo_bag_91for_91each_srfi_113 = &c_734581; 
  mclosure0(c_734573, (function_type)__lambda_326);c_734573.num_args = 2; 
  __glo_set_91for_91each_srfi_113 = &c_734573; 
  mclosure0(c_734549, (function_type)__lambda_320);c_734549.num_args = 2; 
  __glo_sob_91for_91each_srfi_113 = &c_734549; 
  mclosure0(c_734503, (function_type)__lambda_313);c_734503.num_args = 2; 
  __glo_do_91n_91times_srfi_113 = &c_734503; 
  mclosure0(c_734495, (function_type)__lambda_311);c_734495.num_args = 2; 
  __glo_bag_91every_127_srfi_113 = &c_734495; 
  mclosure0(c_734487, (function_type)__lambda_309);c_734487.num_args = 2; 
  __glo_set_91every_127_srfi_113 = &c_734487; 
  mclosure0(c_734455, (function_type)__lambda_301);c_734455.num_args = 2; 
  __glo_sob_91every_127_srfi_113 = &c_734455; 
  mclosure0(c_734447, (function_type)__lambda_299);c_734447.num_args = 2; 
  __glo_bag_91any_127_srfi_113 = &c_734447; 
  mclosure0(c_734439, (function_type)__lambda_297);c_734439.num_args = 2; 
  __glo_set_91any_127_srfi_113 = &c_734439; 
  mclosure0(c_734407, (function_type)__lambda_289);c_734407.num_args = 2; 
  __glo_sob_91any_127_srfi_113 = &c_734407; 
  mclosure0(c_734399, (function_type)__lambda_287);c_734399.num_args = 2; 
  __glo_bag_91count_srfi_113 = &c_734399; 
  mclosure0(c_734391, (function_type)__lambda_285);c_734391.num_args = 2; 
  __glo_set_91count_srfi_113 = &c_734391; 
  mclosure0(c_734369, (function_type)__lambda_281);c_734369.num_args = 2; 
  __glo_sob_91count_srfi_113 = &c_734369; 
  mclosure0(c_734360, (function_type)__lambda_279);c_734360.num_args = 3; 
  __glo_bag_91find_srfi_113 = &c_734360; 
  mclosure0(c_734351, (function_type)__lambda_277);c_734351.num_args = 3; 
  __glo_set_91find_srfi_113 = &c_734351; 
  mclosure0(c_734317, (function_type)__lambda_269);c_734317.num_args = 3; 
  __glo_sob_91find_srfi_113 = &c_734317; 
  mclosure0(c_734310, (function_type)__lambda_267);c_734310.num_args = 1; 
  __glo_bag_91size_srfi_113 = &c_734310; 
  mclosure0(c_734303, (function_type)__lambda_265);c_734303.num_args = 1; 
  __glo_set_91size_srfi_113 = &c_734303; 
  mclosure0(c_734252, (function_type)__lambda_256);c_734252.num_args = 1; 
  __glo_sob_91size_srfi_113 = &c_734252; 
  mclosure0(c_734242, (function_type)__lambda_254);c_734242.num_args = 4; 
  __glo_bag_91search_67_srfi_113 = &c_734242; 
  mclosure0(c_734232, (function_type)__lambda_252);c_734232.num_args = 4; 
  __glo_set_91search_67_srfi_113 = &c_734232; 
  mclosure0(c_734088, (function_type)__lambda_230);c_734088.num_args = 4; 
  __glo_sob_91search_67_srfi_113 = &c_734088; 
  mclosure0(c_734077, (function_type)__lambda_227);c_734077.num_args = 2; 
  __glo_bag_91delete_91all_srfi_113 = &c_734077; 
  mclosure0(c_734066, (function_type)__lambda_224);c_734066.num_args = 2; 
  __glo_set_91delete_91all_srfi_113 = &c_734066; 
  mclosure0(c_734055, (function_type)__lambda_221);c_734055.num_args = 1; 
  __glo_bag_91delete_srfi_113 = &c_734055; 
  mclosure0(c_734044, (function_type)__lambda_218);c_734044.num_args = 1; 
  __glo_set_91delete_srfi_113 = &c_734044; 
  mclosure0(c_734036, (function_type)__lambda_216);c_734036.num_args = 2; 
  __glo_bag_91delete_91all_67_srfi_113 = &c_734036; 
  mclosure0(c_734028, (function_type)__lambda_214);c_734028.num_args = 2; 
  __glo_set_91delete_91all_67_srfi_113 = &c_734028; 
  mclosure0(c_734020, (function_type)__lambda_212);c_734020.num_args = 1; 
  __glo_bag_91delete_67_srfi_113 = &c_734020; 
  mclosure0(c_734012, (function_type)__lambda_210);c_734012.num_args = 1; 
  __glo_set_91delete_67_srfi_113 = &c_734012; 
  mclosure0(c_733993, (function_type)__lambda_205);c_733993.num_args = 2; 
  __glo_sob_91delete_91all_67_srfi_113 = &c_733993; 
  mclosure0(c_733978, (function_type)__lambda_201);c_733978.num_args = 2; 
  __glo_bag_91replace_srfi_113 = &c_733978; 
  mclosure0(c_733963, (function_type)__lambda_197);c_733963.num_args = 2; 
  __glo_set_91replace_srfi_113 = &c_733963; 
  mclosure0(c_733951, (function_type)__lambda_194);c_733951.num_args = 2; 
  __glo_bag_91replace_67_srfi_113 = &c_733951; 
  mclosure0(c_733939, (function_type)__lambda_191);c_733939.num_args = 2; 
  __glo_set_91replace_67_srfi_113 = &c_733939; 
  mclosure0(c_733882, (function_type)__lambda_178);c_733882.num_args = 2; 
  __glo_sob_91replace_67_srfi_113 = &c_733882; 
  mclosure0(c_733867, (function_type)__lambda_174);c_733867.num_args = 1; 
  __glo_bag_91adjoin_srfi_113 = &c_733867; 
  mclosure0(c_733852, (function_type)__lambda_170);c_733852.num_args = 1; 
  __glo_set_91adjoin_srfi_113 = &c_733852; 
  mclosure0(c_733840, (function_type)__lambda_167);c_733840.num_args = 1; 
  __glo_bag_91adjoin_67_srfi_113 = &c_733840; 
  mclosure0(c_733828, (function_type)__lambda_164);c_733828.num_args = 1; 
  __glo_set_91adjoin_67_srfi_113 = &c_733828; 
  mclosure0(c_733817, (function_type)__lambda_161);c_733817.num_args = 2; 
  __glo_sob_91adjoin_91all_67_srfi_113 = &c_733817; 
  mclosure0(c_733800, (function_type)__lambda_157);c_733800.num_args = 3; 
  __glo_bag_91decrement_67_srfi_113 = &c_733800; 
  mclosure0(c_733787, (function_type)__lambda_154);c_733787.num_args = 3; 
  __glo_bag_91increment_67_srfi_113 = &c_733787; 
  mclosure0(c_733746, (function_type)__lambda_148);c_733746.num_args = 1; 
  __glo_nonpositive_91keys_srfi_113 = &c_733746; 
  mclosure0(c_733724, (function_type)__lambda_142);c_733724.num_args = 1; 
  __glo_sob_91cleanup_67_srfi_113 = &c_733724; 
  mclosure0(c_733706, (function_type)__lambda_138);c_733706.num_args = 3; 
  __glo_sob_91decrement_67_srfi_113 = &c_733706; 
  mclosure0(c_733672, (function_type)__lambda_130);c_733672.num_args = 3; 
  __glo_sob_91increment_67_srfi_113 = &c_733672; 
  mclosure0(c_733665, (function_type)__lambda_128);c_733665.num_args = 1; 
  __glo_bag_91element_91comparator_srfi_113 = &c_733665; 
  mclosure0(c_733658, (function_type)__lambda_126);c_733658.num_args = 1; 
  __glo_set_91element_91comparator_srfi_113 = &c_733658; 
  mclosure0(c_733649, (function_type)__lambda_124);c_733649.num_args = 3; 
  __glo_bag_91member_srfi_113 = &c_733649; 
  mclosure0(c_733640, (function_type)__lambda_122);c_733640.num_args = 3; 
  __glo_set_91member_srfi_113 = &c_733640; 
  mclosure0(c_733575, (function_type)__lambda_109);c_733575.num_args = 3; 
  __glo_sob_91member_srfi_113 = &c_733575; 
  mclosure0(c_733551, (function_type)__lambda_104);c_733551.num_args = 2; 
  __glo_bag_91disjoint_127_srfi_113 = &c_733551; 
  mclosure0(c_733527, (function_type)__lambda_99);c_733527.num_args = 2; 
  __glo_set_91disjoint_127_srfi_113 = &c_733527; 
  mclosure0(c_733488, (function_type)__lambda_89);c_733488.num_args = 2; 
  __glo_sob_91half_91disjoint_127_srfi_113 = &c_733488; 
  mclosure0(c_733481, (function_type)__lambda_87);c_733481.num_args = 1; 
  __glo_bag_91empty_127_srfi_113 = &c_733481; 
  mclosure0(c_733474, (function_type)__lambda_85);c_733474.num_args = 1; 
  __glo_set_91empty_127_srfi_113 = &c_733474; 
  mclosure0(c_733463, (function_type)__lambda_82);c_733463.num_args = 1; 
  __glo_sob_91empty_127_srfi_113 = &c_733463; 
  mclosure0(c_733455, (function_type)__lambda_80);c_733455.num_args = 2; 
  __glo_bag_91contains_127_srfi_113 = &c_733455; 
  mclosure0(c_733447, (function_type)__lambda_78);c_733447.num_args = 2; 
  __glo_set_91contains_127_srfi_113 = &c_733447; 
  mclosure0(c_733440, (function_type)__lambda_76);c_733440.num_args = 2; 
  __glo_sob_91contains_127_srfi_113 = &c_733440; 
  mclosure0(c_733438, (function_type)__lambda_75);c_733438.num_args = 5; 
  __glo_bag_91unfold_srfi_113 = &c_733438; 
  mclosure0(c_733436, (function_type)__lambda_74);c_733436.num_args = 5; 
  __glo_set_91unfold_srfi_113 = &c_733436; 
  mclosure0(c_733376, (function_type)__lambda_63);c_733376.num_args = 6; 
  __glo_sob_91unfold_srfi_113 = &c_733376; 
  mclosure0(c_733358, (function_type)__lambda_58);c_733358.num_args = 1; 
  __glo_bag_srfi_113 = &c_733358; 
  mclosure0(c_733340, (function_type)__lambda_53);c_733340.num_args = 1; 
  __glo_set_srfi_113 = &c_733340; 
  mclosure0(c_733329, (function_type)__lambda_50);c_733329.num_args = 1; 
  __glo_sob_91empty_91copy_srfi_113 = &c_733329; 
  mclosure0(c_733322, (function_type)__lambda_48);c_733322.num_args = 1; 
  __glo_bag_91copy_srfi_113 = &c_733322; 
  mclosure0(c_733315, (function_type)__lambda_46);c_733315.num_args = 1; 
  __glo_set_91copy_srfi_113 = &c_733315; 
  mclosure0(c_733296, (function_type)__lambda_41);c_733296.num_args = 1; 
  __glo_sob_91copy_srfi_113 = &c_733296; 
  mclosure0(c_733288, (function_type)__lambda_39);c_733288.num_args = 2; 
  __glo_make_91sob_srfi_113 = &c_733288; 
  mclosure0(c_733281, (function_type)__lambda_37);c_733281.num_args = 2; 
  __glo_check_91element_srfi_113 = &c_733281; 
  mclosure0(c_733263, (function_type)__lambda_34);c_733263.num_args = 2; 
  __glo_check_91same_91comparator_srfi_113 = &c_733263; 
  mclosure0(c_733245, (function_type)__lambda_31);c_733245.num_args = 1; 
  __glo_sob_91check_91comparators_srfi_113 = &c_733245; 
  mclosure0(c_733232, (function_type)__lambda_27);c_733232.num_args = 1; 
  __glo_check_91all_91bags_srfi_113 = &c_733232; 
  mclosure0(c_733219, (function_type)__lambda_23);c_733219.num_args = 1; 
  __glo_check_91all_91sets_srfi_113 = &c_733219; 
  mclosure0(c_733209, (function_type)__lambda_21);c_733209.num_args = 1; 
  __glo_check_91bag_srfi_113 = &c_733209; 
  mclosure0(c_733199, (function_type)__lambda_19);c_733199.num_args = 1; 
  __glo_check_91set_srfi_113 = &c_733199; 
  mclosure0(c_733190, (function_type)__lambda_17);c_733190.num_args = 1; 
  __glo_bag_127_srfi_113 = &c_733190; 
  mclosure0(c_733175, (function_type)__lambda_14);c_733175.num_args = 1; 
  __glo_set_127_srfi_113 = &c_733175; 
  mclosure0(c_733164, (function_type)__lambda_13);c_733164.num_args = 3; 
  __glo_raw_91make_91sob_srfi_113 = &c_733164; 
  mclosure0(c_733162, (function_type)__lambda_12);c_733162.num_args = 2; 
  __glo_hash_91table_91for_91each_srfi_113 = &c_733162; 
  mclosure0(c_733110, (function_type)__lambda_5);c_733110.num_args = 1; 
  __glo_modulizer_srfi_113 = &c_733110; 
  mclosure0(c_733096, (function_type)__lambda_1);c_733096.num_args = 1; 
  __glo_make_91hash_91table_95comparator_srfi_113 = &c_733096; 
  __glo_bag_91comparator_srfi_113 = boolean_f; 
  __glo_set_91comparator_srfi_113 = boolean_f; 
  __glo_missing_srfi_113 = boolean_f; 
  __glo_sob_91multi_127_srfi_113 = boolean_f; 
  __glo_sob_91comparator_srfi_113 = boolean_f; 
  __glo_sob_91hash_91table_srfi_113 = boolean_f; 
  __glo_sob_127_srfi_113 = boolean_f; 
  __glo_sob_srfi_113 = boolean_f; 
  __glo_hash_91table_91contains_127_srfi_113 = boolean_f; 

  mclosure0(clo_736720, c_srfi113_inlinable_lambdas); make_pair(pair_736719, find_or_add_symbol("c_srfi113_inlinable_lambdas"), &clo_736720);
  make_cvar(cvar_736721, (object *)&__glo_lib_91init_117srfi113_srfi_113);make_pair(pair_736722, find_or_add_symbol("lib-init:srfi113"), &cvar_736721);
  make_cvar(cvar_736723, (object *)&__glo_bag_91comparator_srfi_113);make_pair(pair_736724, find_or_add_symbol("bag-comparator"), &cvar_736723);
  make_cvar(cvar_736725, (object *)&__glo_set_91comparator_srfi_113);make_pair(pair_736726, find_or_add_symbol("set-comparator"), &cvar_736725);
  make_cvar(cvar_736727, (object *)&__glo_sob_91hash_srfi_113);make_pair(pair_736728, find_or_add_symbol("sob-hash"), &cvar_736727);
  make_cvar(cvar_736729, (object *)&__glo_alist_91_125bag_srfi_113);make_pair(pair_736730, find_or_add_symbol("alist->bag"), &cvar_736729);
  make_cvar(cvar_736731, (object *)&__glo_bag_91_125alist_srfi_113);make_pair(pair_736732, find_or_add_symbol("bag->alist"), &cvar_736731);
  make_cvar(cvar_736733, (object *)&__glo_set_91_125bag_67_srfi_113);make_pair(pair_736734, find_or_add_symbol("set->bag!"), &cvar_736733);
  make_cvar(cvar_736735, (object *)&__glo_set_91_125bag_srfi_113);make_pair(pair_736736, find_or_add_symbol("set->bag"), &cvar_736735);
  make_cvar(cvar_736737, (object *)&__glo_bag_91_125set_srfi_113);make_pair(pair_736738, find_or_add_symbol("bag->set"), &cvar_736737);
  make_cvar(cvar_736739, (object *)&__glo_bag_91fold_91unique_srfi_113);make_pair(pair_736740, find_or_add_symbol("bag-fold-unique"), &cvar_736739);
  make_cvar(cvar_736741, (object *)&__glo_bag_91for_91each_91unique_srfi_113);make_pair(pair_736742, find_or_add_symbol("bag-for-each-unique"), &cvar_736741);
  make_cvar(cvar_736743, (object *)&__glo_bag_91element_91count_srfi_113);make_pair(pair_736744, find_or_add_symbol("bag-element-count"), &cvar_736743);
  make_cvar(cvar_736745, (object *)&__glo_bag_91unique_91size_srfi_113);make_pair(pair_736746, find_or_add_symbol("bag-unique-size"), &cvar_736745);
  make_cvar(cvar_736747, (object *)&__glo_bag_91product_67_srfi_113);make_pair(pair_736748, find_or_add_symbol("bag-product!"), &cvar_736747);
  make_cvar(cvar_736749, (object *)&__glo_bag_91product_srfi_113);make_pair(pair_736750, find_or_add_symbol("bag-product"), &cvar_736749);
  make_cvar(cvar_736751, (object *)&__glo_valid_91n_srfi_113);make_pair(pair_736752, find_or_add_symbol("valid-n"), &cvar_736751);
  make_cvar(cvar_736753, (object *)&__glo_sob_91product_67_srfi_113);make_pair(pair_736754, find_or_add_symbol("sob-product!"), &cvar_736753);
  make_cvar(cvar_736755, (object *)&__glo_bag_91xor_67_srfi_113);make_pair(pair_736756, find_or_add_symbol("bag-xor!"), &cvar_736755);
  make_cvar(cvar_736757, (object *)&__glo_set_91xor_67_srfi_113);make_pair(pair_736758, find_or_add_symbol("set-xor!"), &cvar_736757);
  make_cvar(cvar_736759, (object *)&__glo_bag_91xor_srfi_113);make_pair(pair_736760, find_or_add_symbol("bag-xor"), &cvar_736759);
  make_cvar(cvar_736761, (object *)&__glo_set_91xor_srfi_113);make_pair(pair_736762, find_or_add_symbol("set-xor"), &cvar_736761);
  make_cvar(cvar_736763, (object *)&__glo_sob_91xor_67_srfi_113);make_pair(pair_736764, find_or_add_symbol("sob-xor!"), &cvar_736763);
  make_cvar(cvar_736765, (object *)&__glo_bag_91sum_67_srfi_113);make_pair(pair_736766, find_or_add_symbol("bag-sum!"), &cvar_736765);
  make_cvar(cvar_736767, (object *)&__glo_sob_91sum_67_srfi_113);make_pair(pair_736768, find_or_add_symbol("sob-sum!"), &cvar_736767);
  make_cvar(cvar_736769, (object *)&__glo_bag_91sum_srfi_113);make_pair(pair_736770, find_or_add_symbol("bag-sum"), &cvar_736769);
  make_cvar(cvar_736771, (object *)&__glo_dyadic_91sob_91sum_67_srfi_113);make_pair(pair_736772, find_or_add_symbol("dyadic-sob-sum!"), &cvar_736771);
  make_cvar(cvar_736773, (object *)&__glo_sob_91sum_srfi_113);make_pair(pair_736774, find_or_add_symbol("sob-sum"), &cvar_736773);
  make_cvar(cvar_736775, (object *)&__glo_bag_91difference_67_srfi_113);make_pair(pair_736776, find_or_add_symbol("bag-difference!"), &cvar_736775);
  make_cvar(cvar_736777, (object *)&__glo_set_91difference_67_srfi_113);make_pair(pair_736778, find_or_add_symbol("set-difference!"), &cvar_736777);
  make_cvar(cvar_736779, (object *)&__glo_sob_91difference_67_srfi_113);make_pair(pair_736780, find_or_add_symbol("sob-difference!"), &cvar_736779);
  make_cvar(cvar_736781, (object *)&__glo_bag_91difference_srfi_113);make_pair(pair_736782, find_or_add_symbol("bag-difference"), &cvar_736781);
  make_cvar(cvar_736783, (object *)&__glo_set_91difference_srfi_113);make_pair(pair_736784, find_or_add_symbol("set-difference"), &cvar_736783);
  make_cvar(cvar_736785, (object *)&__glo_dyadic_91sob_91difference_67_srfi_113);make_pair(pair_736786, find_or_add_symbol("dyadic-sob-difference!"), &cvar_736785);
  make_cvar(cvar_736787, (object *)&__glo_sob_91difference_srfi_113);make_pair(pair_736788, find_or_add_symbol("sob-difference"), &cvar_736787);
  make_cvar(cvar_736789, (object *)&__glo_bag_91intersection_67_srfi_113);make_pair(pair_736790, find_or_add_symbol("bag-intersection!"), &cvar_736789);
  make_cvar(cvar_736791, (object *)&__glo_set_91intersection_67_srfi_113);make_pair(pair_736792, find_or_add_symbol("set-intersection!"), &cvar_736791);
  make_cvar(cvar_736793, (object *)&__glo_sob_91intersection_67_srfi_113);make_pair(pair_736794, find_or_add_symbol("sob-intersection!"), &cvar_736793);
  make_cvar(cvar_736795, (object *)&__glo_bag_91intersection_srfi_113);make_pair(pair_736796, find_or_add_symbol("bag-intersection"), &cvar_736795);
  make_cvar(cvar_736797, (object *)&__glo_set_91intersection_srfi_113);make_pair(pair_736798, find_or_add_symbol("set-intersection"), &cvar_736797);
  make_cvar(cvar_736799, (object *)&__glo_dyadic_91sob_91intersection_67_srfi_113);make_pair(pair_736800, find_or_add_symbol("dyadic-sob-intersection!"), &cvar_736799);
  make_cvar(cvar_736801, (object *)&__glo_sob_91intersection_srfi_113);make_pair(pair_736802, find_or_add_symbol("sob-intersection"), &cvar_736801);
  make_cvar(cvar_736803, (object *)&__glo_bag_91union_67_srfi_113);make_pair(pair_736804, find_or_add_symbol("bag-union!"), &cvar_736803);
  make_cvar(cvar_736805, (object *)&__glo_set_91union_67_srfi_113);make_pair(pair_736806, find_or_add_symbol("set-union!"), &cvar_736805);
  make_cvar(cvar_736807, (object *)&__glo_sob_91union_67_srfi_113);make_pair(pair_736808, find_or_add_symbol("sob-union!"), &cvar_736807);
  make_cvar(cvar_736809, (object *)&__glo_bag_91union_srfi_113);make_pair(pair_736810, find_or_add_symbol("bag-union"), &cvar_736809);
  make_cvar(cvar_736811, (object *)&__glo_set_91union_srfi_113);make_pair(pair_736812, find_or_add_symbol("set-union"), &cvar_736811);
  make_cvar(cvar_736813, (object *)&__glo_dyadic_91sob_91union_67_srfi_113);make_pair(pair_736814, find_or_add_symbol("dyadic-sob-union!"), &cvar_736813);
  make_cvar(cvar_736815, (object *)&__glo_sob_91union_srfi_113);make_pair(pair_736816, find_or_add_symbol("sob-union"), &cvar_736815);
  make_cvar(cvar_736817, (object *)&__glo_dyadic_91sob_125_123_127_srfi_113);make_pair(pair_736818, find_or_add_symbol("dyadic-sob>=?"), &cvar_736817);
  make_cvar(cvar_736819, (object *)&__glo_bag_125_123_127_srfi_113);make_pair(pair_736820, find_or_add_symbol("bag>=?"), &cvar_736819);
  make_cvar(cvar_736821, (object *)&__glo_set_125_123_127_srfi_113);make_pair(pair_736822, find_or_add_symbol("set>=?"), &cvar_736821);
  make_cvar(cvar_736823, (object *)&__glo_sob_125_123_127_srfi_113);make_pair(pair_736824, find_or_add_symbol("sob>=?"), &cvar_736823);
  make_cvar(cvar_736825, (object *)&__glo_dyadic_91sob_121_127_srfi_113);make_pair(pair_736826, find_or_add_symbol("dyadic-sob<?"), &cvar_736825);
  make_cvar(cvar_736827, (object *)&__glo_bag_121_127_srfi_113);make_pair(pair_736828, find_or_add_symbol("bag<?"), &cvar_736827);
  make_cvar(cvar_736829, (object *)&__glo_set_121_127_srfi_113);make_pair(pair_736830, find_or_add_symbol("set<?"), &cvar_736829);
  make_cvar(cvar_736831, (object *)&__glo_sob_121_127_srfi_113);make_pair(pair_736832, find_or_add_symbol("sob<?"), &cvar_736831);
  make_cvar(cvar_736833, (object *)&__glo_dyadic_91sob_125_127_srfi_113);make_pair(pair_736834, find_or_add_symbol("dyadic-sob>?"), &cvar_736833);
  make_cvar(cvar_736835, (object *)&__glo_bag_125_127_srfi_113);make_pair(pair_736836, find_or_add_symbol("bag>?"), &cvar_736835);
  make_cvar(cvar_736837, (object *)&__glo_set_125_127_srfi_113);make_pair(pair_736838, find_or_add_symbol("set>?"), &cvar_736837);
  make_cvar(cvar_736839, (object *)&__glo_sob_125_127_srfi_113);make_pair(pair_736840, find_or_add_symbol("sob>?"), &cvar_736839);
  make_cvar(cvar_736841, (object *)&__glo_dyadic_91sob_121_123_127_srfi_113);make_pair(pair_736842, find_or_add_symbol("dyadic-sob<=?"), &cvar_736841);
  make_cvar(cvar_736843, (object *)&__glo_bag_121_123_127_srfi_113);make_pair(pair_736844, find_or_add_symbol("bag<=?"), &cvar_736843);
  make_cvar(cvar_736845, (object *)&__glo_set_121_123_127_srfi_113);make_pair(pair_736846, find_or_add_symbol("set<=?"), &cvar_736845);
  make_cvar(cvar_736847, (object *)&__glo_sob_121_123_127_srfi_113);make_pair(pair_736848, find_or_add_symbol("sob<=?"), &cvar_736847);
  make_cvar(cvar_736849, (object *)&__glo_dyadic_91sob_123_127_srfi_113);make_pair(pair_736850, find_or_add_symbol("dyadic-sob=?"), &cvar_736849);
  make_cvar(cvar_736851, (object *)&__glo_bag_123_127_srfi_113);make_pair(pair_736852, find_or_add_symbol("bag=?"), &cvar_736851);
  make_cvar(cvar_736853, (object *)&__glo_set_123_127_srfi_113);make_pair(pair_736854, find_or_add_symbol("set=?"), &cvar_736853);
  make_cvar(cvar_736855, (object *)&__glo_sob_123_127_srfi_113);make_pair(pair_736856, find_or_add_symbol("sob=?"), &cvar_736855);
  make_cvar(cvar_736857, (object *)&__glo_list_91_125bag_67_srfi_113);make_pair(pair_736858, find_or_add_symbol("list->bag!"), &cvar_736857);
  make_cvar(cvar_736859, (object *)&__glo_list_91_125set_67_srfi_113);make_pair(pair_736860, find_or_add_symbol("list->set!"), &cvar_736859);
  make_cvar(cvar_736861, (object *)&__glo_list_91_125bag_srfi_113);make_pair(pair_736862, find_or_add_symbol("list->bag"), &cvar_736861);
  make_cvar(cvar_736863, (object *)&__glo_list_91_125set_srfi_113);make_pair(pair_736864, find_or_add_symbol("list->set"), &cvar_736863);
  make_cvar(cvar_736865, (object *)&__glo_list_91_125sob_67_srfi_113);make_pair(pair_736866, find_or_add_symbol("list->sob!"), &cvar_736865);
  make_cvar(cvar_736867, (object *)&__glo_bag_91_125list_srfi_113);make_pair(pair_736868, find_or_add_symbol("bag->list"), &cvar_736867);
  make_cvar(cvar_736869, (object *)&__glo_set_91_125list_srfi_113);make_pair(pair_736870, find_or_add_symbol("set->list"), &cvar_736869);
  make_cvar(cvar_736871, (object *)&__glo_sob_91_125list_srfi_113);make_pair(pair_736872, find_or_add_symbol("sob->list"), &cvar_736871);
  make_cvar(cvar_736873, (object *)&__glo_bag_91partition_67_srfi_113);make_pair(pair_736874, find_or_add_symbol("bag-partition!"), &cvar_736873);
  make_cvar(cvar_736875, (object *)&__glo_set_91partition_67_srfi_113);make_pair(pair_736876, find_or_add_symbol("set-partition!"), &cvar_736875);
  make_cvar(cvar_736877, (object *)&__glo_sob_91partition_67_srfi_113);make_pair(pair_736878, find_or_add_symbol("sob-partition!"), &cvar_736877);
  make_cvar(cvar_736879, (object *)&__glo_bag_91partition_srfi_113);make_pair(pair_736880, find_or_add_symbol("bag-partition"), &cvar_736879);
  make_cvar(cvar_736881, (object *)&__glo_set_91partition_srfi_113);make_pair(pair_736882, find_or_add_symbol("set-partition"), &cvar_736881);
  make_cvar(cvar_736883, (object *)&__glo_sob_91partition_srfi_113);make_pair(pair_736884, find_or_add_symbol("sob-partition"), &cvar_736883);
  make_cvar(cvar_736885, (object *)&__glo_bag_91remove_67_srfi_113);make_pair(pair_736886, find_or_add_symbol("bag-remove!"), &cvar_736885);
  make_cvar(cvar_736887, (object *)&__glo_set_91remove_67_srfi_113);make_pair(pair_736888, find_or_add_symbol("set-remove!"), &cvar_736887);
  make_cvar(cvar_736889, (object *)&__glo_bag_91filter_67_srfi_113);make_pair(pair_736890, find_or_add_symbol("bag-filter!"), &cvar_736889);
  make_cvar(cvar_736891, (object *)&__glo_set_91filter_67_srfi_113);make_pair(pair_736892, find_or_add_symbol("set-filter!"), &cvar_736891);
  make_cvar(cvar_736893, (object *)&__glo_sob_91filter_67_srfi_113);make_pair(pair_736894, find_or_add_symbol("sob-filter!"), &cvar_736893);
  make_cvar(cvar_736895, (object *)&__glo_bag_91remove_srfi_113);make_pair(pair_736896, find_or_add_symbol("bag-remove"), &cvar_736895);
  make_cvar(cvar_736897, (object *)&__glo_set_91remove_srfi_113);make_pair(pair_736898, find_or_add_symbol("set-remove"), &cvar_736897);
  make_cvar(cvar_736899, (object *)&__glo_bag_91filter_srfi_113);make_pair(pair_736900, find_or_add_symbol("bag-filter"), &cvar_736899);
  make_cvar(cvar_736901, (object *)&__glo_set_91filter_srfi_113);make_pair(pair_736902, find_or_add_symbol("set-filter"), &cvar_736901);
  make_cvar(cvar_736903, (object *)&__glo_sob_91filter_srfi_113);make_pair(pair_736904, find_or_add_symbol("sob-filter"), &cvar_736903);
  make_cvar(cvar_736905, (object *)&__glo_bag_91fold_srfi_113);make_pair(pair_736906, find_or_add_symbol("bag-fold"), &cvar_736905);
  make_cvar(cvar_736907, (object *)&__glo_set_91fold_srfi_113);make_pair(pair_736908, find_or_add_symbol("set-fold"), &cvar_736907);
  make_cvar(cvar_736909, (object *)&__glo_sob_91fold_srfi_113);make_pair(pair_736910, find_or_add_symbol("sob-fold"), &cvar_736909);
  make_cvar(cvar_736911, (object *)&__glo_bag_91map_srfi_113);make_pair(pair_736912, find_or_add_symbol("bag-map"), &cvar_736911);
  make_cvar(cvar_736913, (object *)&__glo_set_91map_srfi_113);make_pair(pair_736914, find_or_add_symbol("set-map"), &cvar_736913);
  make_cvar(cvar_736915, (object *)&__glo_sob_91map_srfi_113);make_pair(pair_736916, find_or_add_symbol("sob-map"), &cvar_736915);
  make_cvar(cvar_736917, (object *)&__glo_bag_91for_91each_srfi_113);make_pair(pair_736918, find_or_add_symbol("bag-for-each"), &cvar_736917);
  make_cvar(cvar_736919, (object *)&__glo_set_91for_91each_srfi_113);make_pair(pair_736920, find_or_add_symbol("set-for-each"), &cvar_736919);
  make_cvar(cvar_736921, (object *)&__glo_sob_91for_91each_srfi_113);make_pair(pair_736922, find_or_add_symbol("sob-for-each"), &cvar_736921);
  make_cvar(cvar_736923, (object *)&__glo_do_91n_91times_srfi_113);make_pair(pair_736924, find_or_add_symbol("do-n-times"), &cvar_736923);
  make_cvar(cvar_736925, (object *)&__glo_bag_91every_127_srfi_113);make_pair(pair_736926, find_or_add_symbol("bag-every?"), &cvar_736925);
  make_cvar(cvar_736927, (object *)&__glo_set_91every_127_srfi_113);make_pair(pair_736928, find_or_add_symbol("set-every?"), &cvar_736927);
  make_cvar(cvar_736929, (object *)&__glo_sob_91every_127_srfi_113);make_pair(pair_736930, find_or_add_symbol("sob-every?"), &cvar_736929);
  make_cvar(cvar_736931, (object *)&__glo_bag_91any_127_srfi_113);make_pair(pair_736932, find_or_add_symbol("bag-any?"), &cvar_736931);
  make_cvar(cvar_736933, (object *)&__glo_set_91any_127_srfi_113);make_pair(pair_736934, find_or_add_symbol("set-any?"), &cvar_736933);
  make_cvar(cvar_736935, (object *)&__glo_sob_91any_127_srfi_113);make_pair(pair_736936, find_or_add_symbol("sob-any?"), &cvar_736935);
  make_cvar(cvar_736937, (object *)&__glo_bag_91count_srfi_113);make_pair(pair_736938, find_or_add_symbol("bag-count"), &cvar_736937);
  make_cvar(cvar_736939, (object *)&__glo_set_91count_srfi_113);make_pair(pair_736940, find_or_add_symbol("set-count"), &cvar_736939);
  make_cvar(cvar_736941, (object *)&__glo_sob_91count_srfi_113);make_pair(pair_736942, find_or_add_symbol("sob-count"), &cvar_736941);
  make_cvar(cvar_736943, (object *)&__glo_bag_91find_srfi_113);make_pair(pair_736944, find_or_add_symbol("bag-find"), &cvar_736943);
  make_cvar(cvar_736945, (object *)&__glo_set_91find_srfi_113);make_pair(pair_736946, find_or_add_symbol("set-find"), &cvar_736945);
  make_cvar(cvar_736947, (object *)&__glo_sob_91find_srfi_113);make_pair(pair_736948, find_or_add_symbol("sob-find"), &cvar_736947);
  make_cvar(cvar_736949, (object *)&__glo_bag_91size_srfi_113);make_pair(pair_736950, find_or_add_symbol("bag-size"), &cvar_736949);
  make_cvar(cvar_736951, (object *)&__glo_set_91size_srfi_113);make_pair(pair_736952, find_or_add_symbol("set-size"), &cvar_736951);
  make_cvar(cvar_736953, (object *)&__glo_sob_91size_srfi_113);make_pair(pair_736954, find_or_add_symbol("sob-size"), &cvar_736953);
  make_cvar(cvar_736955, (object *)&__glo_bag_91search_67_srfi_113);make_pair(pair_736956, find_or_add_symbol("bag-search!"), &cvar_736955);
  make_cvar(cvar_736957, (object *)&__glo_set_91search_67_srfi_113);make_pair(pair_736958, find_or_add_symbol("set-search!"), &cvar_736957);
  make_cvar(cvar_736959, (object *)&__glo_sob_91search_67_srfi_113);make_pair(pair_736960, find_or_add_symbol("sob-search!"), &cvar_736959);
  make_cvar(cvar_736961, (object *)&__glo_missing_srfi_113);make_pair(pair_736962, find_or_add_symbol("missing"), &cvar_736961);
  make_cvar(cvar_736963, (object *)&__glo_bag_91delete_91all_srfi_113);make_pair(pair_736964, find_or_add_symbol("bag-delete-all"), &cvar_736963);
  make_cvar(cvar_736965, (object *)&__glo_set_91delete_91all_srfi_113);make_pair(pair_736966, find_or_add_symbol("set-delete-all"), &cvar_736965);
  make_cvar(cvar_736967, (object *)&__glo_bag_91delete_srfi_113);make_pair(pair_736968, find_or_add_symbol("bag-delete"), &cvar_736967);
  make_cvar(cvar_736969, (object *)&__glo_set_91delete_srfi_113);make_pair(pair_736970, find_or_add_symbol("set-delete"), &cvar_736969);
  make_cvar(cvar_736971, (object *)&__glo_bag_91delete_91all_67_srfi_113);make_pair(pair_736972, find_or_add_symbol("bag-delete-all!"), &cvar_736971);
  make_cvar(cvar_736973, (object *)&__glo_set_91delete_91all_67_srfi_113);make_pair(pair_736974, find_or_add_symbol("set-delete-all!"), &cvar_736973);
  make_cvar(cvar_736975, (object *)&__glo_bag_91delete_67_srfi_113);make_pair(pair_736976, find_or_add_symbol("bag-delete!"), &cvar_736975);
  make_cvar(cvar_736977, (object *)&__glo_set_91delete_67_srfi_113);make_pair(pair_736978, find_or_add_symbol("set-delete!"), &cvar_736977);
  make_cvar(cvar_736979, (object *)&__glo_sob_91delete_91all_67_srfi_113);make_pair(pair_736980, find_or_add_symbol("sob-delete-all!"), &cvar_736979);
  make_cvar(cvar_736981, (object *)&__glo_bag_91replace_srfi_113);make_pair(pair_736982, find_or_add_symbol("bag-replace"), &cvar_736981);
  make_cvar(cvar_736983, (object *)&__glo_set_91replace_srfi_113);make_pair(pair_736984, find_or_add_symbol("set-replace"), &cvar_736983);
  make_cvar(cvar_736985, (object *)&__glo_bag_91replace_67_srfi_113);make_pair(pair_736986, find_or_add_symbol("bag-replace!"), &cvar_736985);
  make_cvar(cvar_736987, (object *)&__glo_set_91replace_67_srfi_113);make_pair(pair_736988, find_or_add_symbol("set-replace!"), &cvar_736987);
  make_cvar(cvar_736989, (object *)&__glo_sob_91replace_67_srfi_113);make_pair(pair_736990, find_or_add_symbol("sob-replace!"), &cvar_736989);
  make_cvar(cvar_736991, (object *)&__glo_bag_91adjoin_srfi_113);make_pair(pair_736992, find_or_add_symbol("bag-adjoin"), &cvar_736991);
  make_cvar(cvar_736993, (object *)&__glo_set_91adjoin_srfi_113);make_pair(pair_736994, find_or_add_symbol("set-adjoin"), &cvar_736993);
  make_cvar(cvar_736995, (object *)&__glo_bag_91adjoin_67_srfi_113);make_pair(pair_736996, find_or_add_symbol("bag-adjoin!"), &cvar_736995);
  make_cvar(cvar_736997, (object *)&__glo_set_91adjoin_67_srfi_113);make_pair(pair_736998, find_or_add_symbol("set-adjoin!"), &cvar_736997);
  make_cvar(cvar_736999, (object *)&__glo_sob_91adjoin_91all_67_srfi_113);make_pair(pair_737000, find_or_add_symbol("sob-adjoin-all!"), &cvar_736999);
  make_cvar(cvar_737001, (object *)&__glo_bag_91decrement_67_srfi_113);make_pair(pair_737002, find_or_add_symbol("bag-decrement!"), &cvar_737001);
  make_cvar(cvar_737003, (object *)&__glo_bag_91increment_67_srfi_113);make_pair(pair_737004, find_or_add_symbol("bag-increment!"), &cvar_737003);
  make_cvar(cvar_737005, (object *)&__glo_nonpositive_91keys_srfi_113);make_pair(pair_737006, find_or_add_symbol("nonpositive-keys"), &cvar_737005);
  make_cvar(cvar_737007, (object *)&__glo_sob_91cleanup_67_srfi_113);make_pair(pair_737008, find_or_add_symbol("sob-cleanup!"), &cvar_737007);
  make_cvar(cvar_737009, (object *)&__glo_sob_91decrement_67_srfi_113);make_pair(pair_737010, find_or_add_symbol("sob-decrement!"), &cvar_737009);
  make_cvar(cvar_737011, (object *)&__glo_sob_91increment_67_srfi_113);make_pair(pair_737012, find_or_add_symbol("sob-increment!"), &cvar_737011);
  make_cvar(cvar_737013, (object *)&__glo_bag_91element_91comparator_srfi_113);make_pair(pair_737014, find_or_add_symbol("bag-element-comparator"), &cvar_737013);
  make_cvar(cvar_737015, (object *)&__glo_set_91element_91comparator_srfi_113);make_pair(pair_737016, find_or_add_symbol("set-element-comparator"), &cvar_737015);
  make_cvar(cvar_737017, (object *)&__glo_bag_91member_srfi_113);make_pair(pair_737018, find_or_add_symbol("bag-member"), &cvar_737017);
  make_cvar(cvar_737019, (object *)&__glo_set_91member_srfi_113);make_pair(pair_737020, find_or_add_symbol("set-member"), &cvar_737019);
  make_cvar(cvar_737021, (object *)&__glo_sob_91member_srfi_113);make_pair(pair_737022, find_or_add_symbol("sob-member"), &cvar_737021);
  make_cvar(cvar_737023, (object *)&__glo_bag_91disjoint_127_srfi_113);make_pair(pair_737024, find_or_add_symbol("bag-disjoint?"), &cvar_737023);
  make_cvar(cvar_737025, (object *)&__glo_set_91disjoint_127_srfi_113);make_pair(pair_737026, find_or_add_symbol("set-disjoint?"), &cvar_737025);
  make_cvar(cvar_737027, (object *)&__glo_sob_91half_91disjoint_127_srfi_113);make_pair(pair_737028, find_or_add_symbol("sob-half-disjoint?"), &cvar_737027);
  make_cvar(cvar_737029, (object *)&__glo_bag_91empty_127_srfi_113);make_pair(pair_737030, find_or_add_symbol("bag-empty?"), &cvar_737029);
  make_cvar(cvar_737031, (object *)&__glo_set_91empty_127_srfi_113);make_pair(pair_737032, find_or_add_symbol("set-empty?"), &cvar_737031);
  make_cvar(cvar_737033, (object *)&__glo_sob_91empty_127_srfi_113);make_pair(pair_737034, find_or_add_symbol("sob-empty?"), &cvar_737033);
  make_cvar(cvar_737035, (object *)&__glo_bag_91contains_127_srfi_113);make_pair(pair_737036, find_or_add_symbol("bag-contains?"), &cvar_737035);
  make_cvar(cvar_737037, (object *)&__glo_set_91contains_127_srfi_113);make_pair(pair_737038, find_or_add_symbol("set-contains?"), &cvar_737037);
  make_cvar(cvar_737039, (object *)&__glo_sob_91contains_127_srfi_113);make_pair(pair_737040, find_or_add_symbol("sob-contains?"), &cvar_737039);
  make_cvar(cvar_737041, (object *)&__glo_bag_91unfold_srfi_113);make_pair(pair_737042, find_or_add_symbol("bag-unfold"), &cvar_737041);
  make_cvar(cvar_737043, (object *)&__glo_set_91unfold_srfi_113);make_pair(pair_737044, find_or_add_symbol("set-unfold"), &cvar_737043);
  make_cvar(cvar_737045, (object *)&__glo_sob_91unfold_srfi_113);make_pair(pair_737046, find_or_add_symbol("sob-unfold"), &cvar_737045);
  make_cvar(cvar_737047, (object *)&__glo_bag_srfi_113);make_pair(pair_737048, find_or_add_symbol("bag"), &cvar_737047);
  make_cvar(cvar_737049, (object *)&__glo_set_srfi_113);make_pair(pair_737050, find_or_add_symbol("set"), &cvar_737049);
  make_cvar(cvar_737051, (object *)&__glo_sob_91empty_91copy_srfi_113);make_pair(pair_737052, find_or_add_symbol("sob-empty-copy"), &cvar_737051);
  make_cvar(cvar_737053, (object *)&__glo_bag_91copy_srfi_113);make_pair(pair_737054, find_or_add_symbol("bag-copy"), &cvar_737053);
  make_cvar(cvar_737055, (object *)&__glo_set_91copy_srfi_113);make_pair(pair_737056, find_or_add_symbol("set-copy"), &cvar_737055);
  make_cvar(cvar_737057, (object *)&__glo_sob_91copy_srfi_113);make_pair(pair_737058, find_or_add_symbol("sob-copy"), &cvar_737057);
  make_cvar(cvar_737059, (object *)&__glo_make_91sob_srfi_113);make_pair(pair_737060, find_or_add_symbol("make-sob"), &cvar_737059);
  make_cvar(cvar_737061, (object *)&__glo_check_91element_srfi_113);make_pair(pair_737062, find_or_add_symbol("check-element"), &cvar_737061);
  make_cvar(cvar_737063, (object *)&__glo_check_91same_91comparator_srfi_113);make_pair(pair_737064, find_or_add_symbol("check-same-comparator"), &cvar_737063);
  make_cvar(cvar_737065, (object *)&__glo_sob_91check_91comparators_srfi_113);make_pair(pair_737066, find_or_add_symbol("sob-check-comparators"), &cvar_737065);
  make_cvar(cvar_737067, (object *)&__glo_check_91all_91bags_srfi_113);make_pair(pair_737068, find_or_add_symbol("check-all-bags"), &cvar_737067);
  make_cvar(cvar_737069, (object *)&__glo_check_91all_91sets_srfi_113);make_pair(pair_737070, find_or_add_symbol("check-all-sets"), &cvar_737069);
  make_cvar(cvar_737071, (object *)&__glo_check_91bag_srfi_113);make_pair(pair_737072, find_or_add_symbol("check-bag"), &cvar_737071);
  make_cvar(cvar_737073, (object *)&__glo_check_91set_srfi_113);make_pair(pair_737074, find_or_add_symbol("check-set"), &cvar_737073);
  make_cvar(cvar_737075, (object *)&__glo_bag_127_srfi_113);make_pair(pair_737076, find_or_add_symbol("bag?"), &cvar_737075);
  make_cvar(cvar_737077, (object *)&__glo_set_127_srfi_113);make_pair(pair_737078, find_or_add_symbol("set?"), &cvar_737077);
  make_cvar(cvar_737079, (object *)&__glo_raw_91make_91sob_srfi_113);make_pair(pair_737080, find_or_add_symbol("raw-make-sob"), &cvar_737079);
  make_cvar(cvar_737081, (object *)&__glo_sob_91multi_127_srfi_113);make_pair(pair_737082, find_or_add_symbol("sob-multi?"), &cvar_737081);
  make_cvar(cvar_737083, (object *)&__glo_sob_91comparator_srfi_113);make_pair(pair_737084, find_or_add_symbol("sob-comparator"), &cvar_737083);
  make_cvar(cvar_737085, (object *)&__glo_sob_91hash_91table_srfi_113);make_pair(pair_737086, find_or_add_symbol("sob-hash-table"), &cvar_737085);
  make_cvar(cvar_737087, (object *)&__glo_sob_127_srfi_113);make_pair(pair_737088, find_or_add_symbol("sob?"), &cvar_737087);
  make_cvar(cvar_737089, (object *)&__glo_sob_srfi_113);make_pair(pair_737090, find_or_add_symbol("sob"), &cvar_737089);
  make_cvar(cvar_737091, (object *)&__glo_hash_91table_91for_91each_srfi_113);make_pair(pair_737092, find_or_add_symbol("hash-table-for-each"), &cvar_737091);
  make_cvar(cvar_737093, (object *)&__glo_hash_91table_91contains_127_srfi_113);make_pair(pair_737094, find_or_add_symbol("hash-table-contains?"), &cvar_737093);
  make_cvar(cvar_737095, (object *)&__glo_modulizer_srfi_113);make_pair(pair_737096, find_or_add_symbol("modulizer"), &cvar_737095);
  make_cvar(cvar_737097, (object *)&__glo_make_91hash_91table_95comparator_srfi_113);make_pair(pair_737098, find_or_add_symbol("make-hash-table/comparator"), &cvar_737097);
make_pair(c_737288, &pair_736719,Cyc_global_variables);
make_pair(c_737287, &pair_736722, &c_737288);
make_pair(c_737286, &pair_736724, &c_737287);
make_pair(c_737285, &pair_736726, &c_737286);
make_pair(c_737284, &pair_736728, &c_737285);
make_pair(c_737283, &pair_736730, &c_737284);
make_pair(c_737282, &pair_736732, &c_737283);
make_pair(c_737281, &pair_736734, &c_737282);
make_pair(c_737280, &pair_736736, &c_737281);
make_pair(c_737279, &pair_736738, &c_737280);
make_pair(c_737278, &pair_736740, &c_737279);
make_pair(c_737277, &pair_736742, &c_737278);
make_pair(c_737276, &pair_736744, &c_737277);
make_pair(c_737275, &pair_736746, &c_737276);
make_pair(c_737274, &pair_736748, &c_737275);
make_pair(c_737273, &pair_736750, &c_737274);
make_pair(c_737272, &pair_736752, &c_737273);
make_pair(c_737271, &pair_736754, &c_737272);
make_pair(c_737270, &pair_736756, &c_737271);
make_pair(c_737269, &pair_736758, &c_737270);
make_pair(c_737268, &pair_736760, &c_737269);
make_pair(c_737267, &pair_736762, &c_737268);
make_pair(c_737266, &pair_736764, &c_737267);
make_pair(c_737265, &pair_736766, &c_737266);
make_pair(c_737264, &pair_736768, &c_737265);
make_pair(c_737263, &pair_736770, &c_737264);
make_pair(c_737262, &pair_736772, &c_737263);
make_pair(c_737261, &pair_736774, &c_737262);
make_pair(c_737260, &pair_736776, &c_737261);
make_pair(c_737259, &pair_736778, &c_737260);
make_pair(c_737258, &pair_736780, &c_737259);
make_pair(c_737257, &pair_736782, &c_737258);
make_pair(c_737256, &pair_736784, &c_737257);
make_pair(c_737255, &pair_736786, &c_737256);
make_pair(c_737254, &pair_736788, &c_737255);
make_pair(c_737253, &pair_736790, &c_737254);
make_pair(c_737252, &pair_736792, &c_737253);
make_pair(c_737251, &pair_736794, &c_737252);
make_pair(c_737250, &pair_736796, &c_737251);
make_pair(c_737249, &pair_736798, &c_737250);
make_pair(c_737248, &pair_736800, &c_737249);
make_pair(c_737247, &pair_736802, &c_737248);
make_pair(c_737246, &pair_736804, &c_737247);
make_pair(c_737245, &pair_736806, &c_737246);
make_pair(c_737244, &pair_736808, &c_737245);
make_pair(c_737243, &pair_736810, &c_737244);
make_pair(c_737242, &pair_736812, &c_737243);
make_pair(c_737241, &pair_736814, &c_737242);
make_pair(c_737240, &pair_736816, &c_737241);
make_pair(c_737239, &pair_736818, &c_737240);
make_pair(c_737238, &pair_736820, &c_737239);
make_pair(c_737237, &pair_736822, &c_737238);
make_pair(c_737236, &pair_736824, &c_737237);
make_pair(c_737235, &pair_736826, &c_737236);
make_pair(c_737234, &pair_736828, &c_737235);
make_pair(c_737233, &pair_736830, &c_737234);
make_pair(c_737232, &pair_736832, &c_737233);
make_pair(c_737231, &pair_736834, &c_737232);
make_pair(c_737230, &pair_736836, &c_737231);
make_pair(c_737229, &pair_736838, &c_737230);
make_pair(c_737228, &pair_736840, &c_737229);
make_pair(c_737227, &pair_736842, &c_737228);
make_pair(c_737226, &pair_736844, &c_737227);
make_pair(c_737225, &pair_736846, &c_737226);
make_pair(c_737224, &pair_736848, &c_737225);
make_pair(c_737223, &pair_736850, &c_737224);
make_pair(c_737222, &pair_736852, &c_737223);
make_pair(c_737221, &pair_736854, &c_737222);
make_pair(c_737220, &pair_736856, &c_737221);
make_pair(c_737219, &pair_736858, &c_737220);
make_pair(c_737218, &pair_736860, &c_737219);
make_pair(c_737217, &pair_736862, &c_737218);
make_pair(c_737216, &pair_736864, &c_737217);
make_pair(c_737215, &pair_736866, &c_737216);
make_pair(c_737214, &pair_736868, &c_737215);
make_pair(c_737213, &pair_736870, &c_737214);
make_pair(c_737212, &pair_736872, &c_737213);
make_pair(c_737211, &pair_736874, &c_737212);
make_pair(c_737210, &pair_736876, &c_737211);
make_pair(c_737209, &pair_736878, &c_737210);
make_pair(c_737208, &pair_736880, &c_737209);
make_pair(c_737207, &pair_736882, &c_737208);
make_pair(c_737206, &pair_736884, &c_737207);
make_pair(c_737205, &pair_736886, &c_737206);
make_pair(c_737204, &pair_736888, &c_737205);
make_pair(c_737203, &pair_736890, &c_737204);
make_pair(c_737202, &pair_736892, &c_737203);
make_pair(c_737201, &pair_736894, &c_737202);
make_pair(c_737200, &pair_736896, &c_737201);
make_pair(c_737199, &pair_736898, &c_737200);
make_pair(c_737198, &pair_736900, &c_737199);
make_pair(c_737197, &pair_736902, &c_737198);
make_pair(c_737196, &pair_736904, &c_737197);
make_pair(c_737195, &pair_736906, &c_737196);
make_pair(c_737194, &pair_736908, &c_737195);
make_pair(c_737193, &pair_736910, &c_737194);
make_pair(c_737192, &pair_736912, &c_737193);
make_pair(c_737191, &pair_736914, &c_737192);
make_pair(c_737190, &pair_736916, &c_737191);
make_pair(c_737189, &pair_736918, &c_737190);
make_pair(c_737188, &pair_736920, &c_737189);
make_pair(c_737187, &pair_736922, &c_737188);
make_pair(c_737186, &pair_736924, &c_737187);
make_pair(c_737185, &pair_736926, &c_737186);
make_pair(c_737184, &pair_736928, &c_737185);
make_pair(c_737183, &pair_736930, &c_737184);
make_pair(c_737182, &pair_736932, &c_737183);
make_pair(c_737181, &pair_736934, &c_737182);
make_pair(c_737180, &pair_736936, &c_737181);
make_pair(c_737179, &pair_736938, &c_737180);
make_pair(c_737178, &pair_736940, &c_737179);
make_pair(c_737177, &pair_736942, &c_737178);
make_pair(c_737176, &pair_736944, &c_737177);
make_pair(c_737175, &pair_736946, &c_737176);
make_pair(c_737174, &pair_736948, &c_737175);
make_pair(c_737173, &pair_736950, &c_737174);
make_pair(c_737172, &pair_736952, &c_737173);
make_pair(c_737171, &pair_736954, &c_737172);
make_pair(c_737170, &pair_736956, &c_737171);
make_pair(c_737169, &pair_736958, &c_737170);
make_pair(c_737168, &pair_736960, &c_737169);
make_pair(c_737167, &pair_736962, &c_737168);
make_pair(c_737166, &pair_736964, &c_737167);
make_pair(c_737165, &pair_736966, &c_737166);
make_pair(c_737164, &pair_736968, &c_737165);
make_pair(c_737163, &pair_736970, &c_737164);
make_pair(c_737162, &pair_736972, &c_737163);
make_pair(c_737161, &pair_736974, &c_737162);
make_pair(c_737160, &pair_736976, &c_737161);
make_pair(c_737159, &pair_736978, &c_737160);
make_pair(c_737158, &pair_736980, &c_737159);
make_pair(c_737157, &pair_736982, &c_737158);
make_pair(c_737156, &pair_736984, &c_737157);
make_pair(c_737155, &pair_736986, &c_737156);
make_pair(c_737154, &pair_736988, &c_737155);
make_pair(c_737153, &pair_736990, &c_737154);
make_pair(c_737152, &pair_736992, &c_737153);
make_pair(c_737151, &pair_736994, &c_737152);
make_pair(c_737150, &pair_736996, &c_737151);
make_pair(c_737149, &pair_736998, &c_737150);
make_pair(c_737148, &pair_737000, &c_737149);
make_pair(c_737147, &pair_737002, &c_737148);
make_pair(c_737146, &pair_737004, &c_737147);
make_pair(c_737145, &pair_737006, &c_737146);
make_pair(c_737144, &pair_737008, &c_737145);
make_pair(c_737143, &pair_737010, &c_737144);
make_pair(c_737142, &pair_737012, &c_737143);
make_pair(c_737141, &pair_737014, &c_737142);
make_pair(c_737140, &pair_737016, &c_737141);
make_pair(c_737139, &pair_737018, &c_737140);
make_pair(c_737138, &pair_737020, &c_737139);
make_pair(c_737137, &pair_737022, &c_737138);
make_pair(c_737136, &pair_737024, &c_737137);
make_pair(c_737135, &pair_737026, &c_737136);
make_pair(c_737134, &pair_737028, &c_737135);
make_pair(c_737133, &pair_737030, &c_737134);
make_pair(c_737132, &pair_737032, &c_737133);
make_pair(c_737131, &pair_737034, &c_737132);
make_pair(c_737130, &pair_737036, &c_737131);
make_pair(c_737129, &pair_737038, &c_737130);
make_pair(c_737128, &pair_737040, &c_737129);
make_pair(c_737127, &pair_737042, &c_737128);
make_pair(c_737126, &pair_737044, &c_737127);
make_pair(c_737125, &pair_737046, &c_737126);
make_pair(c_737124, &pair_737048, &c_737125);
make_pair(c_737123, &pair_737050, &c_737124);
make_pair(c_737122, &pair_737052, &c_737123);
make_pair(c_737121, &pair_737054, &c_737122);
make_pair(c_737120, &pair_737056, &c_737121);
make_pair(c_737119, &pair_737058, &c_737120);
make_pair(c_737118, &pair_737060, &c_737119);
make_pair(c_737117, &pair_737062, &c_737118);
make_pair(c_737116, &pair_737064, &c_737117);
make_pair(c_737115, &pair_737066, &c_737116);
make_pair(c_737114, &pair_737068, &c_737115);
make_pair(c_737113, &pair_737070, &c_737114);
make_pair(c_737112, &pair_737072, &c_737113);
make_pair(c_737111, &pair_737074, &c_737112);
make_pair(c_737110, &pair_737076, &c_737111);
make_pair(c_737109, &pair_737078, &c_737110);
make_pair(c_737108, &pair_737080, &c_737109);
make_pair(c_737107, &pair_737082, &c_737108);
make_pair(c_737106, &pair_737084, &c_737107);
make_pair(c_737105, &pair_737086, &c_737106);
make_pair(c_737104, &pair_737088, &c_737105);
make_pair(c_737103, &pair_737090, &c_737104);
make_pair(c_737102, &pair_737092, &c_737103);
make_pair(c_737101, &pair_737094, &c_737102);
make_pair(c_737100, &pair_737096, &c_737101);
make_pair(c_737099, &pair_737098, &c_737100);
Cyc_global_variables = &c_737099;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117srfi113_srfi_113)->fn)(data, buf[0], 1, buf);
}
void c_srfi113_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("srfi_113");
  c_srfi113_entry_pt_first_lambda(data, cont, argc, value);
}
